egghelp/eggheads community Discussion of eggdrop bots, shell accounts and tcl scripts. 2004-06-25T17:34:28-04:00 https://forum.eggheads.org/app.php/feed/topic/7785 2004-06-25T17:34:28-04:00 2004-06-25T17:34:28-04:00 https://forum.eggheads.org/viewtopic.php?p=37885#p37885 <![CDATA[! on another way !]]> here

Statistics: Posted by DarkJFMan — Fri Jun 25, 2004 5:34 pm

]]> 2004-06-25T10:43:39-04:00 2004-06-25T10:43:39-04:00 https://forum.eggheads.org/viewtopic.php?p=37868#p37868 <![CDATA[! on another way !]]>
hello. how can i do the same job on another way.. like read the lines from a file coca.txt not random .. when user say !coca say the first line on coca.txt .. when other user say !coca again say the second line on the coca.txt

Code: 

set trigger "!" set coca "coca"proc char {} {  global trigger  return $trigger}proc coca {} {  global coca  return $coca}bind pub - "[char]coca" pub_cocaproc pub_coca {nick uhost hand chan arg} {  global coca2 botnick channel   set coca [lindex $coca2 [rand [llength $coca2]]]   putserv "PRIVMSG $chan :$nick $coca "}set coca2 {     "need to drink one?"     "me 2 like it."}

Statistics: Posted by AbuAli — Fri Jun 25, 2004 10:43 am

]]>