egghelp/eggheads community Discussion of eggdrop bots, shell accounts and tcl scripts. 2012-03-28T14:25:17-04:00 https://forum.eggheads.org/app.php/feed/topic/18911 2012-03-28T14:25:17-04:00 2012-03-28T14:25:17-04:00 https://forum.eggheads.org/viewtopic.php?p=99131#p99131 <![CDATA[Reading from .txt file]]>

Code: 

set sex "./sex.txt"bind pub - !sex sex:msgproc sex:msg {nick uhost hand chan arg} {  global sex  set sexmsg [string range [randomline $sex] 0 end]  puthelp "privmsg $chan :$sexmsg"}proc randomline f { set data [split [read [set file [open $f]]][close $file] \n] set position [rand [llength $data]] lindex $data $position}
is there a way this can be modified, so it will keep track of which lines from the sex.txt have been used, and not repeat those until all lines have been used ?

Statistics: Posted by Burke-1 — Wed Mar 28, 2012 2:25 pm

]]>