egghelp/eggheads community

!freebie

2004-03-13T14:32:13-04:00

Code:

proc randomline { file } {  set fp [open $file r]   seek $fp 0 end   set len [tell $fp]   seek $fp [rand $len]   gets $fp partial   if {[gets $fp line] == -1} {     seek $fp 0     gets $fp line   }   return $line  close $file}

some old code someone in here provided once, dunno who it was...

thx m8, where do i have to put this in the script above ?

Statistics: Posted by Guest — Sat Mar 13, 2004 2:32 pm

!freebie

2004-02-09T19:43:29-04:00

Code:

proc randomline { file } {  set fp [open $file r]   seek $fp 0 end   set len [tell $fp]   seek $fp [rand $len]   gets $fp partial   if {[gets $fp line] == -1} {     seek $fp 0     gets $fp line   }   return $line  close $file}

some old code someone in here provided once, dunno who it was...

Statistics: Posted by GodOfSuicide — Mon Feb 09, 2004 7:43 pm

!freebie

2004-02-09T17:32:09-04:00

Code:

bind pub - !freebie my:freebieproc my:freebie {nick uhost hand chan text} {  set content [split [read [set f [open "freebie.txt" r]]][close $f] \n]   foreach line $content {    putserv "PRIVMSG $nick :$line"  }}

the problem its when type !freebie the egg send all site to put in the freebie.txt the thin its only send one line to freebie.txt

Statistics: Posted by devilsoulblack — Mon Feb 09, 2004 5:32 pm

!freebie

2004-02-09T15:41:23-04:00

The freebie.txt file (you can change it's name if you want to but you must change in the tcl file too) in the eggdrop's "root" directory.

Statistics: Posted by caesar — Mon Feb 09, 2004 3:41 pm

where put the txt

2004-02-08T16:50:00-04:00

where put the freebie.txt what section ?

Statistics: Posted by Guest — Sun Feb 08, 2004 4:50 pm

!freebie

2004-02-08T03:14:26-04:00

Code:

bind pub - !freebie my:freebieproc my:freebie {nick uhost hand chan text} {  set content [split [read [set f [open "freebie.txt" r]]][close $f] \n]   foreach line $content {    putserv "PRIVMSG $nick :$line"  }}

Statistics: Posted by caesar — Sun Feb 08, 2004 3:14 am

!freebie

2004-02-07T19:58:56-04:00

any one have where download tcl script for !freebie when the user tipe in the channel !freebie the egg send text fron a txt list ?

Statistics: Posted by devilsoulblack — Sat Feb 07, 2004 7:58 pm