egghelp/eggheads community

, - Tcl?

2002-07-01T21:05:23-04:00

Except:

Code:

  if {[scan $arg "%\[^,]," somenick] && [isbotnick $somenick]} {

should be

Code:

  if {[scan $arg "%\[^,\]," somenick] && [isbotnick $somenick]} {

Wcc

Statistics: Posted by Wcc — Mon Jul 01, 2002 9:05 pm

, - Tcl?

2002-07-01T18:51:05-04:00

Code:

bind pubm - "% %,*" pubm:botnickproc pubm:botnick {nick uhost hand chan arg} {  if {[scan $arg "%\[^,]," somenick] && [isbotnick $somenick]} {      }  return 0}

something like that probably.

[/code]

Statistics: Posted by guppy — Mon Jul 01, 2002 6:51 pm

tcl?

2002-06-30T18:24:20-04:00

so what would the tcl look like then??

Statistics: Posted by Guest — Sun Jun 30, 2002 6:24 pm

, - Tcl?

2002-06-30T17:03:08-04:00

I would do a pubm bind on "*", then compare it to "${::botnick}," inside the proc.

Wcc

Statistics: Posted by Wcc — Sun Jun 30, 2002 5:03 pm

, - Tcl?

2002-06-30T14:30:49-04:00

How would i produce something like this in TCL?

[Jason] bot, hello
[bot] Hi

Want the commands to be accessed like..

,

If anyone knows how please post!

Thanks,
Jas0n
[/code][/quote]

Statistics: Posted by Guest — Sun Jun 30, 2002 2:30 pm