mIRC Homepage
Posted By: obsessed hashhhhh - 22/06/03 03:28 AM
Im having some trouble getting my head around this:
alias clonescan {
window -ak @Clones
var %chan = $iif($1,$1,$chan)
if (!%chan || $chr(35) !isin %chan) {
aline @clones No channel specified.
return
}
if (!$chan(%chan).ial) {
.ial on
.enable #ialupdate
.who %chan
echo @clones Updating IAL...
return
}
var %t = $ticks
aline @clones Scanning %chan $+ ...
if ($hget(clones)) hfree clones
hmake clones $nick(%chan,0)
var %x = 1
while (%x <= $nick(%chan,0)) {
hadd clones $address($nick(%chan,%x),2) $+($hget(clones,$address($nick(%chan,%x),2)),$nick(%chan,%x),$chr(44))
inc %x
}
var %x = 1
while (%x <= $hget(clones,0)) {
if ($numtok($hget(clones,%x).item,44) > 1) {
echo -s aline @clones $hget(clones,%x) - $left($hget(clones,%x).item,2)),$calc($len($hget(clones,%x).item,2))) -1))
inc %x 1
}
hfree clones
aline @clones Scan Completed in $round($calc(($ticks - %t) / 1000),2) $+ s
linesep @clones
}
}
#ialupdate off
raw 352:*:haltdef
raw 315:*:{
clonescan $2
.disable #ialupdate
haltdef
}
#ialupdate end
menu channel {
Clonescan:clonescan
}
It was working last night now it isn't.
Posted By: NightChillz Re: hashhhhh - 22/06/03 03:43 AM
perhaps instead of making us sort though it all, you can post what your problem is, what ISNT working properly, i dont think we need ten miles of code to read, of which 9 miles works just fine... know what i mean!
Posted By: obsessed Re: hashhhhh - 22/06/03 04:07 AM
I didn't realise it was measured in miles. My bad.
Posted By: NightChillz Re: hashhhhh - 22/06/03 04:22 AM
It was a figure of speach, perhaps instead of having an attitude about it, you could post the code thats giving you problems and maybe someone will be *willing* to help you!


(*willing*: i woulda put Able, but i know for myself, i tend not to help users who seem totaly and utterly UNGRATEFULL For Help And Guidance They Receive!!!!)
Posted By: obsessed Re: hashhhhh - 22/06/03 04:29 AM
Perhaps you should post something usefull instead of trying to run people down?
Posted By: NightChillz Re: hashhhhh - 22/06/03 04:37 AM
sorry, but i give up on this thread, i asked twice to have you post the problem you were having, and both time you replied with a smart ass remark, hope you get the help you need, later.
Posted By: ScatMan Re: hashhhhh - 22/06/03 05:10 AM
alias clonescan {
window -ak @Clones
var %chan = $iif($1,$1,$chan)
if (!%chan || %chan !ischan) {
aline @clones No channel specified.
return
}
if (!$chan(%chan).ial) {
.ial on
.enable #ialupdate
.who %chan
echo @clones Updating IAL...
return
}
var %t = $ticks
aline @clones Scanning %chan $+ ...
var %x = 1
while (%x <= $nick(%chan,0)) {
hadd -m clones $address($nick(%chan,%x),2) $addtok($hget(clones,$address($nick(%chan,%x),2)),$nick(%chan,%x),44)
inc %x
}
var %x = 1
while (%x <= $hget(clones,0).item) {
if ($numtok($hget(clones,$hget(clones,%x).item),44) > 1) {
echo @clones $hget(clones,%x).item - $hget(clones,$hget(clones,%x).item)
}
inc %x
}
hfree clones
aline @clones Scan Completed in $round($calc(($ticks - %t) / 1000),2) $+ s
linesep @clones
}
#ialupdate off
raw 352:*:haltdef
raw 315:*:{
clonescan $2
.disable #ialupdate
haltdef
}
#ialupdate end
menu channel {
Clonescan:clonescan
}

Posted By: obsessed Re: hashhhhh - 22/06/03 05:48 AM
Thank you very much smile
Posted By: pheonix Re: hashhhhh - 22/06/03 12:19 PM
maybe he posted it all coz he didnt which bit was wrong :tongue:
© mIRC Discussion Forums