alias spellcheck { var %tmpr $r(1,10000) if ($hget(SpellCheck $+ %tmpr,tmp)) .hdel -sw SpellCheck $+ %tmpr tmp .sockclose SpellCheck $+ %tmpr | .sockopen SpellCheck $+ %tmpr spellcheck.net 80 .sockmark SpellCheck $+ %tmpr /cgi-bin/spell.exe?action=CHECKWORD&string= $+ $1 pause ms 1250 if ($hget(SpellCheck $+ %tmpr,tmp)) && (%chan != #Avidbots) && ($sockname != AvidServ) { .hdel -sw SpellCheck $+ %tmpr tmp | sockwrite -n $gettok($hget(regchans,%chan),1,32) PRIVMSG %chan :Word $1 spelled correctly | halt } if ($hget(SpellCheck $+ %tmpr,tmp)) && (%chan == #Avidbots) && ($sockname == AvidServ) { .hdel -sw SpellCheck $+ %tmpr tmp | sockwrite -n AvidServ PRIVMSG %chan :Word $1 spelled correctly | halt } } on *:sockopen:SpellCheck*:{ sockwrite -n $sockname GET $sock($sockname).mark HTTP/1.1 sockwrite -n $sockname host: $sock($sockname).ip sockwrite -n $sockname Connection: Close sockwrite -n $sockname $crlf } on *:sockread:SpellCheck*:{ var %d | sockread %d if ($regex(%d,".*" is spelled correctly.<\/B>)) { hadd -m $sockname tmp 1 | .sockclose $sockname | return } else return } alias pause { var %e = !echo $color(info) -a * /pause: if ($version < 5.91) { %e this snippet requires atleast mIRC version 5.91 } elseif (!$regex(pause,$1-,/^m?s \d+$/Si)) { %e incorrect/insufficient parameters. Syntax: /pause } elseif ($1 == ms) && ($istok(95 98 ME,$os,32)) { %e cannot use milliseconds parameter on OS'es beneath Win2k } elseif ($2 !isnum 1-) { %e must specify a number within range 1- } else { var %wsh = wsh $+ $ticks, %cmd if ($1 == s) %cmd = ping.exe -n $int($calc($2 + 1)) 127.0.0.1 else %cmd = pathping.exe -n -w 1 -q 1 -h 1 -p $iif($2 > 40,$calc($2 - 40),$2) 127.0.0.1 .comopen %wsh wscript.shell .comclose %wsh $com(%wsh,run,1,bstr*,% $+ comspec% /c %cmd >nul,uint,0,bool,true) } }