|
Joined: Jul 2003
Posts: 27
Ameglian cow
|
OP
Ameglian cow
Joined: Jul 2003
Posts: 27 |
What im trying to do is show the /whois nicks modes on raw 319...im having it $gettok the modes off $3- then bold the comchans ...so now i need to add them back before the raw is displayed.....heres what im using now.. code: raw 319:*:{ var %chans = $sorttok($remove($3-,@,%,+,&,~),32),%i = 1 while ($comchan($2,%i)) { var %chans = $reptok(%chans,$ifmatch,$+($chr(2),$ifmatch,$chr(2)),32) inc %i } echo -a $2 on %chans haltdef } which gives a display like... MaggieS on #Atheism #Entertainment #French #Hebrew #North_America #Turkey
|
|
|
|
Joined: Mar 2003
Posts: 1,271
Hoopy frood
|
Hoopy frood
Joined: Mar 2003
Posts: 1,271 |
And your question is? Cause the code you pasted works fine for me...
DALnet #Helpdesk I hear and I forget. I see and I remember. I do and I understand. -Confucius
|
|
|
|
Joined: Jul 2003
Posts: 27
Ameglian cow
|
OP
Ameglian cow
Joined: Jul 2003
Posts: 27 |
lol...yea it works fine but it doesnt show the /whois nicks modes cause i $removed them ...guess it really doesnt matter if i show them or not tho...now i wanna add them back after i $ifmatch the $comchans
|
|
|
|
Joined: Jul 2003
Posts: 27
Ameglian cow
|
OP
Ameglian cow
Joined: Jul 2003
Posts: 27 |
this is what im getting now...
MaggieS on #Atheism #Entertainment #French #Hebrew #North_America #Turkey
but heres what im after...
MaggieS on @#Atheism @#Entertainment @#French @#Hebrew %#North_America +#Turkey
|
|
|
|
Joined: Jan 2003
Posts: 150
Vogon poet
|
Vogon poet
Joined: Jan 2003
Posts: 150 |
while I'm awake...
raw 319:*:{
var %c = $3-
var %i = 1
while ($comchan($2,%i)) { inc %i | var %com = $addtok(%com,$ifmatch,32) }
var %e = $numtok(%c,32), %i = 0
while (%i < %e) {
inc %i | var %cc = $gettok(%c,%i,32)
var %o = $addtok(%o,$iif($istok(%com,$cpfx(%cc),32),$+($chr(2),%cc,$chr(2)),%cc),32)
}
echo -a WHOIS $2 on %o | haltdef
}
alias cpfx { $iif($numtok($1,35) == 2,return $right($1,-1),return $1) }
Last edited by J0ke; 12/09/03 09:38 PM.
Go ahead, jump. 100,000 lemmings can't be wrong.
|
|
|
|
Joined: Jul 2003
Posts: 27
Ameglian cow
|
OP
Ameglian cow
Joined: Jul 2003
Posts: 27 |
|
|
|
|
Joined: Jan 2003
Posts: 150
Vogon poet
|
Vogon poet
Joined: Jan 2003
Posts: 150 |
np
Go ahead, jump. 100,000 lemmings can't be wrong.
|
|
|
|
|