egghelp/eggheads community

String Help

2005-05-06T18:58:05-04:00

oops, and this is why I shouldn't post code at 6am..

Statistics: Posted by greenbear — Fri May 06, 2005 6:58 pm

String Help

2005-05-06T19:06:06-04:00

You will need to change

Code:

set string [string map {"::" "~"] $string]

Code:

set string [string map {"::" "~"} $string]

Edit: You're welcome gb

Statistics: Posted by Sir_Fz — Fri May 06, 2005 10:50 am

String Help

2005-05-06T18:56:51-04:00

Code:

bind pub - !parse parse:stringproc parse:string {nick uhost hand chan text} { set string "a:b :: b :: c :: d ::" set string [string map {"::" "~"} $string] set type 0 foreach s [split $string ~] {  if !$type {   lappend out \00302$s   set type 1  } {   lappend out \00304$s   set type 0  } } putserv "PRIVMSG $chan :[join [lrange $out 0 e] { :: }]"}

Edit: fixed typo, thanks Sir_Fz !

Statistics: Posted by greenbear — Thu May 05, 2005 11:50 pm

String Help

2005-05-05T22:25:19-04:00

It doesn't work if the text has spaces ... for example:

firt last :: name :: last first :: name

The coloring gets jacked ... can you help?

Thanks!

Statistics: Posted by Esoteric — Thu May 05, 2005 10:25 pm

String Help

2005-04-21T09:22:14-04:00

Code:

bind pub - !parse parse:stringproc parse:string {nick uhost hand chan text} { set string "a:b :: b :: c :: d ::" set type 0 foreach s $string {  if ![string match :: $s] {   if !$type {    lappend out \00302$s    set type 1   } {    lappend out \00304$s    set type 0   }  } } putserv "PRIVMSG $chan :[join [lrange $out 2 e] { :: }]"}

Statistics: Posted by greenbear — Thu Apr 21, 2005 9:22 am

String Help

2005-04-21T06:54:47-04:00

I haven't been able to find anything that will work ... can anyone help?

Statistics: Posted by Esoteric — Thu Apr 21, 2005 6:54 am

String Help

2005-04-20T21:48:07-04:00

Alright one more question, now I need to make every other one a different color ... ie ...

blue :: red :: blue :: red :: blue :: red

etc..

Any ideas?

Statistics: Posted by Esoteric — Wed Apr 20, 2005 9:48 pm

String Help

2005-04-20T21:01:19-04:00

hmm, good point, maybe something like this then..

Code:

bind pub - !parse parse:stringproc parse:string {nick uhost hand chan text} { set string "a:b :: b :: c :: d ::" foreach s $string {  if ![string match :: $s] {lappend out $s} } putserv "PRIVMSG $chan :[lrange $out 2 e]" # use this one if you want to keep the :: as a seperator # putserv "PRIVMSG $chan :[join [lrange $out 2 e] { :: }]"}

Statistics: Posted by greenbear — Wed Apr 20, 2005 9:01 pm

String Help

2005-04-20T20:29:47-04:00

PS: you cannot split on "::", the interpreter will threat it like ":", but because the empty elements are merged together with join again it won't bother as long USERNAME doesn't contain a ":".

Statistics: Posted by De Kus — Wed Apr 20, 2005 8:29 pm

String Help

2005-04-20T15:25:28-04:00

Code:

bind pub - !parse parse:stringproc parse:string {nick uhost hand chan text} { set string "a :: b :: c :: d ::" set out [lrange [join [split $string ::]] 2 end] putserv "PRIVMSG $chan :$out"}

Statistics: Posted by greenbear — Wed Apr 20, 2005 3:25 pm

String Help

2005-04-20T15:19:15-04:00

how exactly to I then print that out?

Statistics: Posted by Esoteric — Wed Apr 20, 2005 3:19 pm

String Help

2005-04-20T15:18:01-04:00

Code:

lrange [join [split $string ::]] 2 end

Statistics: Posted by greenbear — Wed Apr 20, 2005 3:18 pm

String Help

2005-04-20T14:44:27-04:00

I have a string that is in this format

username :: username :: username :: username ::

I need to output this as a single line in my channel but I don't want the first two to ever appear in the output.

Can anyone help?

Thanks!
-Erik

Statistics: Posted by Esoteric — Wed Apr 20, 2005 2:44 pm