|
Joined: Jan 2004
Posts: 509
Fjord artisan
|
OP
Fjord artisan
Joined: Jan 2004
Posts: 509 |
One does +v line by line, and the other +vvvvvvvvvvvv at a time. Help please.
/alphabetvoice { %temp.alpha = a.b.c.d.e.f.g.h.i.j.k.l.m.n.o.p.q.r.s.t.u.v.w.x.y.z var %x = 0, %y = 26 while (%x < %y) { inc %x var %a = 0, %b = $snick($active,0) while (%a < %b) { inc %a if ($gettok(%temp.alpha,%x,46) == $left($snick($active,%a),1)) { /mode $active +v $snick($active,%a) } } } }
/alphavoice { %temp.alpha = a.b.c.d.e.f.g.h.i.j.k.l.m.n.o.p.q.r.s.t.u.v.w.x.y.z var %x = 0, %y = 26 while (%x < %y) { inc %x var %a = 0, %b = $snick($active,0) while (%a < %b) { inc %a if ($gettok(%temp.alpha,%x,46) == $left($snick($active,%a),1)) { if (!%alpha.nicks) { var %alpha.nicks = $snick($active,%a) } else { var %alpha.nicks = $addtok(%alpha.nicks,$snick($active,%a),32) } /mode $active +vvvvvvvvvvvv %alpha.nicks } } } }
|
|
|
|
Joined: Mar 2004
Posts: 175
Vogon poet
|
Vogon poet
Joined: Mar 2004
Posts: 175 |
alphabetvoice {
var %a = 1
While (%a <= $Nick(#,0,a,v)) {
mode # +v $Nick(#,%a,a,v)
inc %a
}
}
alphavoice {
var %a = $Nick(#,0,a,v)
While (%a) {
var %b = $Nick(#,%a,a,v) %b
Dec %a
}
While (%b) {
tokenize 32 %b
mode # + $+ $Str(v,$Modespl) $($+($,1-,$Modespl),2)
var %b = $Deltok(%b,$+(1-,$Modespl),32)
}
} That should work perfectly. There is no need to use so many complicated identifiers/if statements. :P
- Relinsquish
|
|
|
|
Joined: Mar 2004
Posts: 175
Vogon poet
|
Vogon poet
Joined: Mar 2004
Posts: 175 |
Oh. I wasn't sure if you were referring to popups or not. So just in case, here is the aliases customised for popups. alphabetvoice {
If ($SNicks) {
var %a = $Sorttok($IfMatch,44)
While (%a) {
mode # +v $Gettok(%a,1,44)
var %a = $Deltok(%a,1,44)
}
}
}
alphavoice {
If ($SNicks) {
var %a = $Sorttok($IfMatch,44)
While (%a) {
tokenize 44 %a
mode # + $+ $Str(v,$Modespl) $($+($,1-,$Modespl),2)
var %a = $Deltok(%a,$+(1-,$Modespl),44)
}
}
}
- Relinsquish
|
|
|
|
|