mIRC Home    About    Download    Register    News    Help

Print Thread
#48990 12/09/03 03:03 PM
Joined: Jul 2003
Posts: 27
I
Ameglian cow
OP Offline
Ameglian cow
I
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

#48991 12/09/03 04:05 PM
Joined: Mar 2003
Posts: 1,271
L
Hoopy frood
Offline
Hoopy frood
L
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
#48992 12/09/03 04:24 PM
Joined: Jul 2003
Posts: 27
I
Ameglian cow
OP Offline
Ameglian cow
I
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

#48993 12/09/03 09:11 PM
Joined: Jul 2003
Posts: 27
I
Ameglian cow
OP Offline
Ameglian cow
I
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

#48994 12/09/03 09:26 PM
Joined: Jan 2003
Posts: 150
J
Vogon poet
Offline
Vogon poet
J
Joined: Jan 2003
Posts: 150
while I'm awake...

Code:
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.
#48995 12/09/03 09:34 PM
Joined: Jul 2003
Posts: 27
I
Ameglian cow
OP Offline
Ameglian cow
I
Joined: Jul 2003
Posts: 27
thanks =)

#48996 12/09/03 09:36 PM
Joined: Jan 2003
Posts: 150
J
Vogon poet
Offline
Vogon poet
J
Joined: Jan 2003
Posts: 150
np grin


Go ahead, jump. 100,000 lemmings can't be wrong.

Link Copied to Clipboard