mIRC Home    About    Download    Register    News    Help

Active Threads | Unanswered Past 24 hours | Past 48 hours | Past Week | Past Month | Past Year
Scripts & Popups Jump to new posts
Ircops list count numbers danielboom 06/09/21 12:38 AM
menu nicklist {
.S-canners
..Bots: who 0 o
}

raw 352:*: {
if H& isin $7 { set %operado1 $addtok(%operado1,$6,44) }
if Hr isin $7 { set %operado $addtok(%operado,$6,44) }
if H* isin $7 { set %operadores $addtok(%operadores,$6,44) }
}

raw 315:*: {
echo -a 1,0Ircops- %operado
echo -a 1,0Bots- %operadores
}


how i can do to count the opers

Ircops : (2) - Daniel - AFK

THNX
0 82 Read More
mIRC Help Jump to new posts
cant scroll through the popups vigilant 05/09/21 05:03 PM
i cant scroll down through popups while in 150% display mode in windows 10
....

there should be an option
0 84 Read More
Scripts & Popups Jump to new posts
notify on off script help danielboom 03/09/21 06:25 PM
alias noti {
var %i = 1
while (%i <= 10) {
if $exists(@notif) = $false { window -le+td @notif 400 400 200 200 }
if $notify(%i).ison == $true { .aline @notif 0,4 C-ctado:  $Notify(%i) }
elseif $notify(%i).ison == $false { .aline @notif 0,3 D/ectado:  $Notify(%i) }
inc %i
}
}

ii made this but doesnt work fine , any help thnx
0 65 Read More
Scripts & Popups Jump to new posts
dialog help landonsandor 21/08/21 02:54 PM
Hello everybody. It's been ages since I've been around and asking for help, but I can't find the solution here. I want to add a function to an existing dialog. I want to add a dropdown menu but in a very specific and I just can't seem to find it. Say I have dropdown option A selected, then I want multiselect checkbox options 1-4 to show up below it. If I have dropdown option B selected, I want multiselect checkbox options 5-8 to show. This is for a Dungeons and Dragons script I use (instead of actually rolling dice and calculating stuff myself since it's faster this way). basically, if I want to use a use to attack, I want to be able to choose what options from a secondary list get used on that attack. I hope the information I have provided is everything you need to know to help me out. Thanks for your help in advnace smile
0 56 Read More
Feature Suggestions Jump to new posts
New $ScaleFont() identifier Talon 19/08/21 06:19 AM
I'd like to request $ScaleFont() as a native identifier in mIRC.

$ScaleFont(text,font,min-size,width,height,bipt)

Please see the comments in the code snippet below for the usage.

mIRC has the ability to render text within a clipped region. /drawtext -c, which is quite handy, but one problem with picture windows, especially when it comes to drawing text, is there's no garuntee one users default @window font is the same, or if you specify some font with /drawtext, there's also no garuntee they have the same fonts installed on the system, so relying on font metrics for positioning text properly isn't an accurate assumption that those coordinates will apply correctly between any users potential font choices. This makes it extremely tricky to have a picture window oriented script render text properly across all users.

The problem gets even worse, fonts themselves do NOT follow any form of linear scaling so there's no logical scale from one font-point to another, even within the same font so calculating the proper font-point isn't too simple. We can greatly reduce this by using a form of estimation, and decreasing from there if it exceeds our bounds instead of having to step through all possible font-points to find the closest point to match our bound region.

This is actually more taxing than expected as a scripted solution, especially if you do something on a timed basis where text may need to be re-drawn. There may even be a better way to tackle this problem outside if mSL itself natively in C++ and win32 api like GDI+ GetTextMetrics, etc... which I'm sure $width() and $height() most likely use.

Below is my proposed identifier:

Code
;=======================================================================
; $ScaleFont(text,font,min-size,width,height,bipt)
; width OR height (not both) can be -1 to omit testing in this direction.
; "bipt" are the same as those within $width() and $height().
;
; This identifier returns the largest possible fontsize point to fit in
; a given rectangle. this WILL return your original size which may or
; may not fit, if your minimum size restraint still exceeds the rectangle.
; If you do not need this option, it's recommended to just pass "1" for
; this parameter.
;=======================================================================
ScaleFont {
  var %hw = $iif($6,$width($1,$2,1638,$6),$width($1,$2,1638)) , %hh = $iif($6,$height($1,$2,1638,$6),$height($1,$2,1638))
  if ($4 == -1 && $5 == -1) { return }
  elseif ($5 == -1) { var %wr = $4 / %hw , %hr = %wr }
  elseif ($4 == -1) { var %hr = $5 / %hh , %wr = %hr } 
  else { var %wr = $4 / %hw , %hr = $5 / %hh }

  var %efs = $int($calc(1638 * $min(%wr,%hr))) , %ew = $iif($5,$width($1,$2,%efs,$5),$width($1,$2,%efs)) , %eh = $iif($5,$height($1,$2,%efs,$5),$height($1,$2,%efs))
  while (%efs >= $3) && (($4 > 0 && %ew > $4) || ($5 > 0 && %eh > $5)) { var %efs = %efs - 1 , %ew = $iif($6,$width($1,$2,%efs,$6),$width($1,$2,%efs)) , %eh = $iif($6,$height($1,$2,%efs,$6),$height($1,$2,%efs)) }
  return $iif(%efs > $3,%efs,$3)
}


Below is a test alias to utilize the above identifier. IMPORTANT NOTE! Some fonts only have one size, if you're still using mIRC's default "Fixedsys" for testing, you WILL NOT see this work. After @Test is open, use it's titlebar icon to select a new font to test with under "Font..." then execute the command again to see it re-drawn with the newly selected font.

Heres some examples of using:
/TestScaleFont <w> <h> <text>

Fixed rectangle bounding box (execute these one at a time to watch the size shrink-to-fit the bounding rectangle):
/testscalefont 200 30 Mooo! This is a test!
/testscalefont 200 30 Mooo! This is a test! and only a test..
/testscalefont 200 30 Mooo! This is a test! and only a test... Wow!

Fixed Height, not width:
/testscalefont -1 30 Mooo! This is a test! and only a test...

Fixed Width, not height:
/testscalefont 300 -1 Mooo! This is a test!

Code
TestScaleFont {
  window -dp @Test -1 -1 640 480
  drawrect -nf @Test $color(background) 1 0 0 640 480
  var %FontSize = $ScaleFont($3-,$window(@Test).font,1,$1,$2) , %w = $width($3-,$window(@Test).font,%FontSize) , %h = $height($3-,$window(@Test).font,%FontSize)
  var %cw = $iif($1 > 0,$calc(($1 - %w) // 2),0) , %ch = $iif($2 > 0,$calc(($2 - %h) // 2),0)
  drawrect -n @Test 4 1 1 1 $iif($1 > 0,$1,%w) $iif($2 > 0,$2,%h)
  drawtext -nc @Test $color(normal) $qt($window(@Test).font) %FontSize %cw %ch $iif($1 > 0,$1,%w) $iif($2 > 0,$2,%h) $3-
  drawdot @Test
  echo -s *** Debug-Fontsize: %FontSize , Max/Overall Width: $+($1,/,%w) , Max/Overall Height: $+($2,/,%h) Centering: %cw %ch
}
0 64 Read More
Scripts & Popups Jump to new posts
How to make this code work? Help me pls Robert 04/08/21 06:04 AM
Code
alias atb_set {
  %atb_comm = .blacklist
  %atb_btype = 2
  %atb_chans = all
  %atb_notice = yes
  %atb_work = yes
  %atb_reason = $mircdir $+ atb_blacklistreason.txt
  %atb_pathdb = $mircdir $+ atb_identblacklistdatabase.txt
  %atb_admins = $read(userbot.txt,nw,$nick)
}
on @*:text:*:#:{
      var %atb_banid $+([ID:,$chr(32),$rand(A,Z),$rand(A,Z),$rand(10000,99999),])
      var %atb_knick $strip($2)
      if ($strip($1) == %atb_comm) {
      if (*irccloud* iswm $address) { atb_bankick $chan %atb_knick %atb_banid - (for more information regarding your ban please contact nickname Kendy for removal)
        else { .ban -ku600 $chan %atb_knick %atb_btype %atb_banid - (for more information regarding your ban please contact nickname Kendy for removal)
          if (!$read(%atb_pathdb, -w, $+(*,$remove($address($2,10),1,64) $+ @*,*))) {
            .write $qt(%atb_pathdb) $+(%atb_banid,$chr(44),$remove($address($2,10),1,64) $+ @*)
          }
        }
        if (%atb_notice == yes) { .notice $nick BlackListAkickBan: %atb_knick - $+($chr(40),%atb_time,$chr(41)) %atb_banid }
        if ($3 isin $1-) { .ban -ku600 $chan %atb_knick $3- %atb_banid - (for more information regarding your ban please contact nickname Kendy for removal)
      }
    }
  }
}
on *:JOIN:#:{
  if ($network == DaVang) {
    atb_set | if (%atb_work == yes) {
      if (%atb_chans == all) || ($istok(%atb_chans,$chan,44)) {
        if ($read(%atb_pathdb, -w, $+($remove(*,$address($2,10),1,64)))) {
          var %atb_jbanid $gettok($read(%atb_pathdb,$readn),1,44)
          var %atb_reason1 You are no longer welcome here)
          if (*irccloud* iswm $address) { .atb_bankick $chan $nick %atb_jbanid $+ ) }
          else { .ban -ku600 $chan $nick %atb_reason1 %atb_jbanid $+ ) }
        }
      }
    }
  }
}
alias atb_bankick {
  .ban $1 $gettok($address($2,10),1,64)
  if (%atb_kick == yes) {
    if ($exists(%atb_reason) == $true) var %atb_r $read(%atb_reason) | else var %atb_r 4[Banned] (reason: You are no longer welcome here)
    .kick $1 $2 %atb_i %atb_r $3-
  }
}
0 146 Read More
General Discussion Jump to new posts
Being followed across name change?? Vund 01/08/21 11:56 AM

I can't find any way this is done so i came here to ask.

Recently I was chatting with someone while not in any room. The other person received a message from someone unexpectedly so they changed their name to something similar and the person messaged again.

I know sometimes some clients may show someone as they change their name but is it possible to search for variations of a name? The messages finally stopped when my friend stopped having a variation of the root name
ie: Original name: Chatter
BlahChatter
CrazyChatter

each variation got messaged until the name was completely changed. I'm not sure this is making sense, but i'm curious how that person was following each name change while not in any rooms.
0 218 Read More
Feature Suggestions Jump to new posts
$remove for &binvars _entropy 26/07/21 09:45 PM
It would be nice to have a $remove to remove a string from a binvar...

usage: $rembinvar(&binvar,token,32)

would remove "token" from binvar!

Thanks!
0 202 Read More
Connection Issues Jump to new posts
Dreaded 10053 Waynec 18/07/21 08:32 PM
Queenelsa a oper on undernet and others I am sure came up with something that works... not always but it helps to ease the pain. This is put in the remote ini .... not perfect but I will take what it does.

on *:START:.timerAnti-10053 -o 0 60 scon -at1 raw -q ping Q
on ^*:PONG:if ($2 == Q) haltdef

Wayne
0 252 Read More
Feature Suggestions Jump to new posts
/timer -eN - execute but don't modify Wims 17/07/21 04:36 AM
/timer -e currently will change the number of repetition of your timer, I'd like to see /timer -eN where N = 0 would be the default and the current behavior, and N = 1 would only execute the command, without changing the number of repetition, see https://forums.mirc.com/ubbthreads.php/ubb/showflat/Number/261738/
0 112 Read More
Feature Suggestions Jump to new posts
findtext in editor - loop from the beginning Wims 16/07/21 10:35 PM
In the editor when you search text with control + f, the dialog has no way to search upward in the script, I'm not sure if there's a shortcut similar to F3 to find the next occurence but up.
I would like to see a small improvement so that when he 'search in all files' option in unchecked, the search try to search from the beginning again.
0 157 Read More
Feature Suggestions Jump to new posts
$regsubex and \0 Wims 13/07/21 01:51 PM
\0 in $regsubex is documented as reporting the number of matches but it actually returns the total number of captures made accross all matches.

I would like to see a new marker \@ for $regsubex which would effectively return the number of match.
0 128 Read More
Feature Suggestions Jump to new posts
Strikethough Text. KindOne 04/07/21 09:57 PM
Can strikethough text be added to mIRC?

A few other IRC clients support strikethrough text. - https://defs.ircdocs.horse/info/formatting.html

Example:
Code
//topic $chan Can $+($chr(30),strikethrough text,$chr(30)) be supported in mIRC?


https://i.imgur.com/nljLQtn.png


Thanks.
0 177 Read More
Latest News Jump to new posts
mIRC 7.66 released Khaled 29/06/21 05:20 PM
Dear mIRC User,

mIRC v7.66 has been released today.

This is a small update that addresses a number of issues reported by users since the last release. It includes improvements, changes and fixes to a number of features, including:

Added MDI area background color option to Colors dialog to allow users to change brightness of MDI area.
Changed the editbox/nickname list line separator color so that it matches current theme.
Changed /window -h to support hiding status windows in both the switchbar and the treebar.
Changed channel and query window icons to make them more distinctive.
Added colors dialog default/undo buttons to allow reset/revert of color settings.
Changed /server to prioritize group name over server address to handle server group names that contain periods.
Changed parsing of /mode commands that use combinations of +ovh to ensure compatibility with recent ircd changes.
Fixed maximized MDI window duplicate icons bug.
Changed tab completion to leave in place non-existent/empty identifiers/variables.
Fixed select folder bug incorrectly filling in filename as a *.* wildcard.
Updated CA root certificates cacert.pem file.

How to upgrade?
mIRC is distributed in an installer that installs mIRC on your computer for you. Simply download and run the installer from the download page on the mIRC website. Follow the instructions the installer gives to you. When upgrading all your old settings and scripts will stay as they were, if you want that. Read the questions the installer asks with care and nothing can go wrong. You will be chatting with the new mIRC in no time. If you get stuck or if you want to find out more about a certain feature, just click on a Help button or browse the Help file and you should find lots of hints to help you out.

Where to download?
As always, the latest version of mIRC can be downloaded from the download page on the mIRC website.

Registering mIRC
As you know, mIRC can be downloaded freely and evaluated for 30 days. If you find that you enjoy using mIRC, it would be great and much appreciated if you registered your copy. This licenses you to use your copy of mIRC and helps to support our continued work on mIRC. You can find out how to register here.

Full list of Fixes, Changes and Additions.
For a more detailed list of recent changes, please see the whatsnew.txt file. You will need to read through the help file to learn more about these changes and their impact. Some changes are obvious, some need getting used to - please take your time to play with them and see how they work. May we invite you to use these forums for all questions you might have? The forums offer great help with everything related to mIRC!

Thanks for using mIRC, have fun on IRC!
0 1,567 Read More
Scripts & Popups Jump to new posts
Help with find lines of text raycomp 18/06/21 02:50 PM
I have a script saving the information of a user when logging into a channel using ircCloud

Josef=J Josef!uid244513@AzgedaIRC-986B5A42.irccloud.com 1623339086 #volwasseklets
and later use different nick like
Muis=J Muis!uid244513@AzgedaIRC-986B5A42.irccloud.com 1623339086 #volwasseklets

I need to find the lines containing !uid244513 and play all lines in a channel containing that portion. I have tried various methods adapting this script with no success

Quote

on *:text:!uid244513:#: {
var %x = 1
while (%x <= $numtok($strip($1-),32)) {
var %y = 1
while (%y <= $lines(seendata.txt.txt)) {
if ($read(Seendata.txt, %y) == $gettok($strip($1-),%x,32)) || ($read(Seendata.txt, %y) == $gettok($strip($1-),$+(%x,-,$numtok($read(Seendata.txt, %y),32)),32)) {
play #cloudusers ???
}
inc %y
}
inc %x
}


or if someone can help with a sort of AKA script fo ircCloud users
0 216 Read More
Feature Suggestions Jump to new posts
position save|clear all channels maroon 01/06/21 10:09 PM
It would be nice to have a menu choice to save just the entries for the actual channels without saving everything else. If there are N channels open, then it would create/alter N items under the [windows] section.

When I used the upper left menu of a channel window to make the choice position/save-all, I was expecting it to create N [windows] entries to save all N currently-open channel windows. Instead, it created a pair of entries for each channel plus a pair for a lot of other things, including all the open @windows including @debug. It creates an item for @windowname as well as for @windowname-networkname. It's reasonable to expect that 'all' in the channel menu means all channels, and possibly the status window too, but not for all the other entries for all @windows, as well as wdccs* or wdccg if there happens to be an active dcc in/out at the time.
0 388 Read More
Feature Suggestions Jump to new posts
New /server flag to set options without connecting Sat 26/05/21 09:53 AM
Background: with /server -n, it is possible to create a new status window with various parameters, such as the server to connect to and (with -i) the identity for that connection. I use /server -n on start-up to set up various connections, without immediately connecting to them, so that I can choose whether and when to initiate the connection myself (by clicking the Connect button in the toolbar for each). This works perfectly.. except for the very first status window. There, my script needs to use various other commands to set the identity for that connection (nick/anick/fullname etc), while there is no way at all (at least, that I am aware of) to pre-define the server that mIRC will connect to when I click on the Connect button. Usually that is fine, because the previous server is saved properly and used again after restarting mIRC. However, every once in a while, I do something that screws this up, which after restarting mIRC causes me to end up connecting to the wrong server. That only ever happens in the first status window, because the /server -n commands set the proper options for all other status windows on each start-up.

What I'd like to request, is a switch for /server that sets the options for the current server window, but without connecting just yet. In other words: the behavior of /server -n, but without creating a new window. That way, I can set up the first status window just like I do for the other status windows, just by using a different flag than -n. Other flags like -i/-p/-f/-o/-c would end up being honored at time of (user-initiated) connection, just like with -n.

This suggestion will probably also allow for a decent implementation of a "connection/identity management" type of script which generalizes the above with dialogs etc.

One question is how such a new switch would behave in case the current status window is already connected. I think it would be fine if that case would result in a failure of the /server command with an "already connected" type of error.

I believe the above is currently not already possible, but if there is already a way to accomplish the above with scripting right now (without destroying the first status window!), I'd love to hear it.
0 180 Read More
Scripts & Popups Jump to new posts
Color Scripts / Themes? TimPendragon 24/05/21 12:24 AM
Hi,

Not a total mIRC noob, but you might as well treat me like one for the purposes of this conversation. I've never had much of a need to modify the program beyond the defaults until now. The color tweaks in the latest update seem minor enough, but somehow it's so much *brighter*. It is literally hurting my eyes. Not a problem with my brightness settings, it's only happening in mIRC. None of the other default color schemes provided really work for me, either.

How would I go about importing a new scheme, via a script or a plugin or something, rather than have to change everything manually? I've googled, and searched these forums, but all I find are references to things on an "mircscripts" website, which no longer seems to exist. Are these things archived elsewhere now? Or are there alternatives I'm not finding?

I tried asking on reddit, but all I got was "durr, you still use mIRC, what a loser." I mean, my needs haven't changed in ages, why should I learn a entirely new program just because the one I've been using forever is now "old"? Sigh. Should've known better than to expect any different from reddit.

Anyway, any help on locating themes or color schemes, and what to do when I find one I like, would be most appreciated. Thank you!
0 126 Read More
Scripts & Popups Jump to new posts
Any ideas how to add timer ? noelmando 23/05/21 08:18 AM
Hi any suggestions how to add timer ?

Code
ON $*:TEXT:/^!number\s/:#:{ 
  if ((%floodEVERYONE) || ($($+(%,floodEVERYONE.,$nick),2))) { return }
  set -u60 %floodEVERYONE On
  IF ($regex($3,^+$)) {
    var -g %target $remove($2, @)
    inc %scriptcount | 
    set %number [ $+ [ $chan ] ] $rand(1,10) 
    msg $chan %target , You Have Been Chosen By $nick To Guess A Random Number Between: 1 And 10, To Guess What It Is Type: !guess <number> (You have 60 s. ).
  }
  ELSE MSG $chan $nick $+ , Use: !number [username] to challenge a user to guess a number from 1-10
} 


So i want to add 60 sec. timer to guess the number for person ($target) who has to guess or he will get timeout.

Thanks for any help.
0 169 Read More
Feature Suggestions Jump to new posts
Window menu > Buffer > Copy to Clipboard Raccoon 22/05/21 05:30 PM
When you right-click a window, select the menu Buffer, it offers the options Save As... and Save & Log As...

Please also add the option Copy to Clipboard.
0 241 Read More
mIRC Help Jump to new posts
Changing the default opening program mk96 14/05/21 11:29 AM
I was installing mirc on a windows machine 10 machine for the first time and when I tried to enter my registration key was asked what program I wanted to use to open mirc (I had installed and opened the program by this point, was at the title screen where I clicked register) I picked chrome because none of the offered choices made any sense and was taken to the download page of the website and despite closing mirc, uninstalling mirc even using using iobit to get rid of every last trace of mirc before doing a reinstall the same thing keeps happening! How do I fix this and what program should I use to open mirc?
0 198 Read More
Scripts & Popups Jump to new posts
KeepMyNick script Czuz 09/05/21 06:02 PM
Hi,

I have retrieved from the bottom of my old hard drives an old mIRC script of mine.

If you connect and your nick happens to be unavailable (e.g. used by someone else) the script will use timer and server events to get it back once it’s available again.

It’s multi-network and you can configure different nicks for different networks.

I have decided to share it via https://github.com/Czuz/KeepMyNick.

I hope someone will find it useful.

Kind regards,
Czuz
0 135 Read More
Scripts & Popups Jump to new posts
$btoken(&input,N,C,[&output]) Imk0tter 09/05/21 01:36 PM
Here is a snippit of code that allows you to get tokens from bvars (binary variables).

IE: $btoken(&bvar,0,64 64 64) returns the number of tokens separated by the string '@@@'
IE: $btoken(&bvar,n,64 64 64) returns the nth token separated by the string '@@@'

IE: $btoken(&bvar,0,@@@).text returns the number of tokens separated by the string '@@@'
IE: $btoken(&bvar,n,@@@).text returns the nth token separated by the string '@@@'

IE: $btoken(&bvar,0,@@@,&output).text returns the number of tokens separated by the string '@@@'
IE: $btoken(&bvar,n,@@@,&output).text returns the number of bytes in the &output bvar that contains the nth token separated by the string '@@@'

Code
alias btoken {
  hinc -m BTOKEN NUMBER

  var %htable BTOKEN $+ $hget(BTOKEN,NUMBER)

  hadd -m %htable COUNT 0

  var %bvar $1

  var %tokSepBvar &btokensep $+ %htable

  bset $iif($prop,-t) %tokSepBvar -1 $3

  var %tokSepLen $bvar(%tokSepBvar,0)

  var %numtok $bnumtok(%bvar, %htable, %tokSepBvar)

  $iif($2 == 0,return %numtok)

  var %range $parseRange($2, %numtok)

  var %startTok $token(%range,1,32)
  var %endTok $iif($token(%range,2,32) >= %startTok,$v1 + 1, $v1 - 1)

  if (%startTok > %numtok) return $iif(!$prop,-1)

  var %buffer &btokenbuffer $+ %htable
  var %buffer2 &btokenbuffer2 $+ %htable

  var %return

  var %outputFlag $iif($4,$true)

  var %output $iif(%outputFlag,$4)

  while %startTok != %endTok {
    var %data $hget(%htable,%startTok,%buffer)

    bcopy %buffer2 -1 %buffer 1 %data
    bcopy %buffer2 -1 %tokSepBvar 1 %tokSepLen

    $iif(%startTok > %endTok,dec,inc) %startTok 
  }

  hfree %htable

  if %outputFlag  {
    bcopy -c %output 1 %buffer2 1 $calc($bvar(%buffer2,0) - %tokSepLen)
    return $bvar(%output,0)
  }
  return $bvar(%buffer2,1,$calc($bvar(%buffer2,0) - %tokSepLen)).text
}

alias -l bnumtok {

  var %bvar $1
  var %htable $2

  var %btoksep $$3

  var %bnumtok &bnumtok $+ %htable

  $iif($hget(%htable,COUNT) != 0,return $hget(%htable,COUNT))

  var %findPos 1
  var %lastFindPos 1

  var %lengthOfBvar $bvar(%bvar,0)

  var %odd $bvar(%btoksep,0)

  while %lastFindPos < %lengthOfBvar {
    var %findPos $iif($bfind(%bvar,%lastFindPos,$bvar(%btoksep,1,$bvar(%btoksep,0))) == 0,$bvar(%bvar,0),$v1) - 1

    hinc -m %htable COUNT

    bcopy %bnumtok 1 %bvar %lastFindPos $calc(%findpos - %lastFindPos + $iif($calc(%findPos + %odd + 1) > %lengthOfBvar,2,1))

    hadd -mb %htable $hget(%htable,COUNT) %bnumtok 

    bunset %bnumtok

    var %lastFindPos $calc(%findPos + %odd + 1) 
  }

  return $hget(%htable,COUNT)
}

alias -l parserange {
  var %input $1
  var %maxRange $2

  var %startNumber, %endNumber,%c $token(%input,1,45)

  ;if the first character is a -, the first parameter is a negative number; proceed to second - or end of the string
  if ($left(%input,1) == -) {
    var %startNumber $calc(%maxRange - %c + 1)
    var %input $right(%input,-1)
  }
  else {
    var %startNumber %c
  }

  var %a $pos(%input,-,1)

  if %a == $len(%input) {
    ;second - as at end of string (range encountered) no second integer
    %endNumber = %maxRange
  }
  else if !%a {
    ;no - after the first token; no range
    %endNumber = %startNumber
  }
  else {
    ;range encountered; second number present
    ;proceed to first - or end of string, and if there is a positive or negative integer

    var %a $iif($Pos(%input,-,1),$v1,0)
    var %b $iif($pos(%input,-,2),$v1,0)

    var %c $token(%input,2,45)

    if %b > 0 && $calc(%b - %a) == 1 {
      ;second integer is negative,

      var %endNumber $calc(%maxRange - %c + 1)
    }
    else if %b == 0 {
      ;second integer is positive
      var %endnumber %c
    }
    else {
      ;unknown condition
      var %endnumber %c
    }
  }
  return %startNumber %endNumber
}

alias -l + {
  if (!$window(@DEBUG)) window -e @DEBUG
  echo @DEBUG $1-
}
alias -l - {
  noop $1-
}


Feel free to optimize the code!
0 146 Read More
Feature Suggestions Jump to new posts
Dark mode for windows borders Awesoft 09/05/21 02:23 AM
Since I updated mIRC to v7.65 I see that the windows inside the main window are not using the "Aero" theme anymore (I appreciate it).
How to change the borders to dark mode? (including the main Window, like Windows dark theme).

Thank you.
0 233 Read More
Latest News Jump to new posts
mIRC 7.65 released Khaled 07/05/21 07:51 PM
Dear mIRC User,

mIRC v7.65 has been released today.

This is a small update that addresses a number of issues reported by users since the last release. It includes improvements, changes and fixes to a number of features, including:

Added Windows 10 Aero theme support to MDI windows.
Updated OpenSSL library to v1.1.1k.
Updated CA root certificates cacert.pem file.
Added "Index" menu to scripts editor alias/popup/remote menubars that lists all entries in a script.
Extended tab completion to support %halfops.
Fixed MDI tile feature leaving gaps in right/bottom-most window edges.
Fixed bind to adapter/IP address bug that caused it to use wrong adapter.
Reverted change to nick idle time that broke backward compatibility.
Fixed regex global matching bug with UTF-8 characters.
Fixed tray tips display bug.

How to upgrade?
mIRC is distributed in an installer that installs mIRC on your computer for you. Simply download and run the installer from the download page on the mIRC website. Follow the instructions the installer gives to you. When upgrading all your old settings and scripts will stay as they were, if you want that. Read the questions the installer asks with care and nothing can go wrong. You will be chatting with the new mIRC in no time. If you get stuck or if you want to find out more about a certain feature, just click on a Help button or browse the Help file and you should find lots of hints to help you out.

Where to download?
As always, the latest version of mIRC can be downloaded from the download page on the mIRC website.

Registering mIRC
As you know, mIRC can be downloaded freely and evaluated for 30 days. If you find that you enjoy using mIRC, it would be great and much appreciated if you registered your copy. This licenses you to use your copy of mIRC and helps to support our continued work on mIRC. You can find out how to register here.

Full list of Fixes, Changes and Additions.
For a more detailed list of recent changes, please see the whatsnew.txt file. You will need to read through the help file to learn more about these changes and their impact. Some changes are obvious, some need getting used to - please take your time to play with them and see how they work. May we invite you to use these forums for all questions you might have? The forums offer great help with everything related to mIRC!

Thanks for using mIRC, have fun on IRC!
0 1,510 Read More
Page 1 of 3 1 2 3