egghelp/eggheads community

easy tcl:)

2004-05-09T10:35:34-04:00

or you can use switch and set the like the contents in ur tcl like 8bal game or something ..

Statistics: Posted by Ofloo — Sun May 09, 2004 10:35 am

easy tcl:)

2004-05-08T11:36:40-04:00

and i think thats ur second request

Code:

bind pub - !xy xy:pub proc xy:pub {nick host hand chan arg} {   set rfile [open filename.txt r]  set randline [rand 5]; # [rand ] change it   while {![eof $rfile]} {    gets $rfile line     if {[info exists i]} {      incr i      if {$i == $randline} {        putserv "PRIVMSG $nick :$line"       }    } else {      set i 0      if {$i == $randline} {        putserv "PRIVMSG $nick :$line"       }    }  }   close $rfile }

Statistics: Posted by Ofloo — Sat May 08, 2004 11:36 am

easy tcl:)

2004-05-08T11:31:57-04:00

next time look true the forum first

Code:

bind pub - !xy xy:pubproc xy:pub {nick host hand chan arg} {  set rfile [open filename.txt r]  while {![eof $rfile]} {    gets $rfile line    putserv "PRIVMSG $nick :$line"  }  close $rfile}

this wil read every file and output it to the channel

Statistics: Posted by Ofloo — Sat May 08, 2004 11:31 am

easy tcl:)

2004-05-08T09:38:54-04:00

oh, ive got 1 more request, sorry:)

--
!xy then the bot random choose a line from msg.txt and say it to the chan
--

thnx;)

Statistics: Posted by roller — Sat May 08, 2004 9:38 am

easy tcl:)

2004-05-08T09:29:05-04:00

i think its easy for you.. when i type !xy then the bot says yx to #chan1 and #chan2 rooms. Thnx!

Statistics: Posted by roller — Sat May 08, 2004 9:29 am