egghelp/eggheads community

how to set $nick into variables

2005-08-29T22:50:20-04:00

Code:

if {$helloline == "welcome "} {append helloline $nick to $chan :)}

output:welcome nickto#chan:)

Statistics: Posted by Reynaldo — Mon Aug 29, 2005 10:50 pm

how to set $nick into variables

2005-08-29T15:33:30-04:00

dont know about the option shortcuts, maybe you can always shorten them to a unique expression. at least these are not mentioned in the command documentaion, so I rather beleave its something global.

tcl: evaluate (.tcl): string equal -n a A
Tcl: 1
tcl: evaluate (.tcl): string mat -n *a* Age
Tcl: 1

if you actually concern about perfomance you really should cache the regexp by using it like:

Code:

set hellore {(?i)(hai|hello)}...  global hellobib hellore botnick  if {[regexp $hellore $args]} {...

Statistics: Posted by De Kus — Mon Aug 29, 2005 3:33 pm

how to set $nick into variables

2005-08-29T15:13:12-04:00

*Off topic*
Subst works with -nob (instead of -nobackslashes) and -noc (instead of -nocommands) duno exactly from what version.

-nobackslashes or -nob means you won't be able to use any '\' won't be replaced, that means no bold, underline, italic, etc.

-nocommands or -noc means you won't be able to use commands, example: length of $nick is [llength $nick]

And about that regexp, if {[regexp -nocase {(hai|hello)} $args]} { # your stuff } should do better than two regexp if you want to use one, if I where you I'd go with a 'string match -nocase'

Statistics: Posted by caesar — Mon Aug 29, 2005 3:13 pm

how to set $nick into variables

2005-08-28T19:33:28-04:00

I beleave he was looking for:

putserv "PRIVMSG $chan :[subst -nobackslashes -nocommands $helloline]"

that would enable him to use phrases like
"welcome $nick in our channel $chan. enjoy your stay!"
without modify the whole script but just the list.

Statistics: Posted by De Kus — Sun Aug 28, 2005 7:33 pm

how to set $nick into variables

2005-08-28T00:12:17-04:00

Code:

set hellobib {{hi too =)}{yups what's up}{hmm..}{yoi..}{hi..}{hi there}{alo!}{oi}{aw aw}{hoayem}{welcome }}bind pubm - "*" pub_haiiproc pub_haii {nick uhost hand chan args} {global hellobib botnick if {[regexp -nocase "hai" $args] || [regexp -nocase "hello" $args]} {   set helloline [lindex $hellobib [rand [llength $hellobib]]]   if {$helloline == "welcome "} {append helloline $nick}   putserv "PRIVMSG $chan :$helloline"   }

Statistics: Posted by demond — Sun Aug 28, 2005 12:12 am

how to set $nick into variables

2005-08-27T22:46:11-04:00

Code:

set hellobib {{hi too =)}{yups what's up}{hmm..}{yoi..}{hi..}{hi there}{alo!}{oi}{aw aw}{hoayem}{welcome $nick}}bind pubm - "*" pub_haiiproc pub_haii {nick uhost hand chan args} {global hellobib botnick if {[regexp -nocase "hai" $args] || [regexp -nocase "hello" $args] > 0} { set helloline [lindex $hellobib [rand [llength $hellobib]]]putserv "PRIVMSG $chan :$helloline"}

how to take the $nick into $hellobib, when somebody spoken in channel.
the bot always saying: welcome $nick, not welcome "somebody nick"

Statistics: Posted by Reynaldo — Sat Aug 27, 2005 10:46 pm