egghelp/eggheads community Discussion of eggdrop bots, shell accounts and tcl scripts. 2003-10-11T08:46:13-04:00 https://forum.eggheads.org/app.php/feed/topic/5812 2003-10-11T08:46:13-04:00 2003-10-11T08:46:13-04:00 https://forum.eggheads.org/viewtopic.php?p=28262#p28262 <![CDATA[List Script]]> read to read the lines of your file, but gets

Without an exact number of characters to read that command will read everything until it encounters EOF, gets reads a single line from the specified channel.

Code: 

 set fo [open "$db" r]while { ![eof $fo] } {  set buffer [gets $fo]  putserv "NOTICE $nick : $buffer "} close $fo

Statistics: Posted by mortician — Sat Oct 11, 2003 8:46 am

]]> 2003-10-11T08:19:46-04:00 2003-10-11T08:19:46-04:00 https://forum.eggheads.org/viewtopic.php?p=28256#p28256 <![CDATA[List Script]]> When i type !list or @list it will show line for line from the text file "list.db"
But its only showed the first line of fine anyone can help me with this?

Best Regards
FiskerEn

<code>

set channel "channel"
set db eggdrop/scripts/list.db

bind pub - @list pub:list
bind pub - !list pub:list

proc pub:list {nick uhost hand chan text} {
global channel db

set fo [open "$db" r]
while { ![eof $fo]} {

set buffer [read $fo]
putserv "NOTICE $nick : $buffer "
}
}

putlog "Script loaded: list"

</code>

Statistics: Posted by FiskerEnDK — Sat Oct 11, 2003 8:19 am

]]>