egghelp/eggheads community

simple "parrot" script

2010-06-16T12:26:02-04:00

THANK YOU ALL SO MUCH

works perfectly. i <3 u

/closed

Statistics: Posted by shixxor — Wed Jun 16, 2010 12:26 pm

simple "parrot" script

2010-06-16T12:06:08-04:00

I've found this script train.tcl somewhere in french eggdrop site.

Statistics: Posted by username — Wed Jun 16, 2010 12:06 pm

simple "parrot" script

2010-06-16T11:48:24-04:00

i agree

Statistics: Posted by tueb — Wed Jun 16, 2010 11:48 am

simple "parrot" script

2010-06-16T11:17:26-04:00

tueb:
You'd probably like to have the "set lastsaid $text" line outside of the conditional, otherwize it would never be set in the first place.
Also, you'd better test that the variable exists before attempting to read it..

Code:

bind pubm - * repeat_pubmvariable lastsaidproc repeat_pubm {nick host handle channel text} {  global lastsaid  if {[info exists lastsaid] &&[string equal -nocase $text $lastsaid]} {    putserv "PRIVMSG $channel :$text"  }  set lastsaid $text}

Statistics: Posted by nml375 — Wed Jun 16, 2010 11:17 am

simple "parrot" script

2010-06-16T11:07:08-04:00

Code:

bind pubm - * repeat_pubmvariable lastsaidproc repeat_pubm {nick host handle channel text} {global lastsaid  if {[string equal -nocase $text $lastsaid]} {     putserv "PRIVMSG $channel :$text"     set lastsaid $text  }}

untested

Statistics: Posted by tueb — Wed Jun 16, 2010 11:07 am

simple "parrot" script

2010-06-16T09:07:56-04:00

hi there,

i need a simple TCL script that just makes the bot repeat what 2 ppl said. for example

[shixxor]: lol
[peter]: lol

then

[eggdrop]: lol

would be cool if you could help me

Statistics: Posted by shixxor — Wed Jun 16, 2010 9:07 am