chain

menu channel { @clone scan: /vs } alias vs { hmake clones 500 var %x = 1, %c = $iif($1 ischan,$1,$active),%ticks = $ticks,%clones if ($window(@clones)) window -c @clones window @clones if (%c ischan) && ($ialchan(*,%c,0) != $nick(%c,0)) { .enable #clones | aline @clones S tò a nalizzando l a I AL .. | .ial on | who %c } while ($nick(%c,%x)) { var %i = $ifmatch if ($hget(clones,$address(%i,2)) == $null) && ($ialchan($address(%i,2),%c,0) > 1) { inc %clones $ialchan($address(%i, 2),%c,0) hadd clones $address(%i,2) $address(%i,2) var %temp,%a = 1 while ($ialchan($address(%i,2),%c,%a)) { set %temp %temp $+ $chr(44) $ialchan($address(%i,2),%c,%a).nick inc %a } aline @clones $ialchan($address(%i,2),%c,0) 4 Clones having as address: 11 $address(%i,2) $+ : aline @clones - Nick del Clone: 9 $mid(%temp,2,$calc($len(%temp) - 1)) } inc %x } aline @clones - aline @clones - -- ---- C onnessioni c on C loni R ilevate: $hmatch(clones,*,0) aline @clones - -- ---- In all there are n° %clones clones aline @clones - -- ---- P er t rovarli c i h o m it: $duration($calc(($ticks - %ticks) / 1000)) $gettok($calc(($ticks - %ticks) / 1000),2,46) $+ millisecs hfree clones } #clones off raw 315:*: vs $2 | .disable #clones #clones end on *:connect: .disable #clones Clone Scan by mAx' - irc.ircgate.it, #angel_&_Devil.;

pcinfo { say $me say Statistics Current Time: $time(h:nn:sstt) say Using mIRC $+ $version say My User Modes are: $usermode say Using Windows $os say My Host is: $address($me,2) say My nick is $nick say my IP is $ip say mIRC.exe is located in $mircdir say Windows $os is active from: $duration($int($calc($ticks / 1000))) say The mIRC is Connected to $server $+ : $+ $port from: $uptime(mirc,1) say The Resolution of my Monitor is: $window(-1).w $+ x $+ $window(-1).h say Currently on C:\: I have this space available $round($calc(($disk(c:).free) / 1024 / 1024000), 2) $+ GB }

New Addon for DevilScript

on 1:OPEN:?:*:{ set %query.nick $nick set %query.address $address($nick,1) set %query.text $1- close -m $nick .msg $nick Query Manager: Wait, I have to decide whether or not to accept your Pvt... query.decide } alias -l query.decide { dialog -m Query Query } dialog Query { title "Query" size 300 250 200 50 option dbu text "Nick:", 2, 5 12 12 10, nowrap text "Text:", 3, 5 22 12 10, nowrap edit %query.nick %query.address, 4, 20 10 170 10, read edit %query.text, 5, 20 20 170 10, read button "Accept", 6, 25 32 40 15 button "Reject", 7, 75 32 40 15 button "Ignore", 8, 125 32 40 15 } on 1:dialog:Query:*:* { if ($devent == sclick) { if ($did == 6) { dialog -x Query Query query %query.nick echo -t %query.nick < $+ %query.nick $+ > %query.text .msg %query.nick Query Manager : Your Pvt Has Been Accepted! unset %query.* } if ($did == 7) { dialog -x Query Query .msg %query.nick Query Manager : Your Pvt Was Rejected! unset %query.* } if ($did == 8) { dialog -x Query Query ignore -p %query.nick .msg %query.nick Query Manager : Your Pvt was Rejected and I Put You in Ignore! unset %query.* } } }

making my adiIRC custom to my needs. Love this client it's great!!

Been working on easy script for quite a few months, doing english translation been having fun. Also customizing it to my needs. tell me what you all think about it!!

I have retested the downloads and it seems to be working, there have been people telling me there's issues. So i have tested it and seems to work fine. Please let me know if there's anymore issues with the archive downloads

Here's a Zip file of some old IRC Scripts if your interested in keeping for your own archives. I take no responsibility to any damage caused by any noobs running somethings that I might upload for the mIRC community as I did not make even a dent of what I will be sharing. Anything I know for sure is dangerous I will surely Mark it as Such and if I do Heed the Warning. Like GtBots. for instance those can be dangerous toys if not used properly. This is for your own warning. coders-Resources is not responsible when or how you use these scripts. 1325329690_mIRCScripts.zip