|
|
Joined: Jun 2003
Posts: 130
Vogon poet
|
OP
Vogon poet
Joined: Jun 2003
Posts: 130 |
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.
If only women came with popup menus and online help.
|
|
|
|
|
Joined: Dec 2002
Posts: 271
Fjord artisan
|
|
Fjord artisan
Joined: Dec 2002
Posts: 271 |
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!
|
|
|
|
|
Joined: Jun 2003
Posts: 130
Vogon poet
|
|
OP
Vogon poet
Joined: Jun 2003
Posts: 130 |
I didn't realise it was measured in miles. My bad.
If only women came with popup menus and online help.
|
|
|
|
|
Joined: Dec 2002
Posts: 271
Fjord artisan
|
|
Fjord artisan
Joined: Dec 2002
Posts: 271 |
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!!!!)
|
|
|
|
|
Joined: Jun 2003
Posts: 130
Vogon poet
|
|
OP
Vogon poet
Joined: Jun 2003
Posts: 130 |
Perhaps you should post something usefull instead of trying to run people down?
If only women came with popup menus and online help.
|
|
|
|
|
Joined: Dec 2002
Posts: 271
Fjord artisan
|
|
Fjord artisan
Joined: Dec 2002
Posts: 271 |
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.
|
|
|
|
|
Joined: May 2003
Posts: 730
Hoopy frood
|
|
Hoopy frood
Joined: May 2003
Posts: 730 |
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
}
|
|
|
|
|
Joined: Jun 2003
Posts: 130
Vogon poet
|
|
OP
Vogon poet
Joined: Jun 2003
Posts: 130 |
Thank you very much 
If only women came with popup menus and online help.
|
|
|
|
|
Joined: May 2003
Posts: 2,265
Hoopy frood
|
|
Hoopy frood
Joined: May 2003
Posts: 2,265 |
maybe he posted it all coz he didnt which bit was wrong :tongue:
new username: tidy_trax
|
|
|
|
|
