egghelp/eggheads community

help me whit a litle question

2002-06-14T09:16:00-04:00

It's called laziness to not even try.

Code:

set bfile "/usr/local/eggdrop/asobiba/lan.txt"set cmd "!nextlan"set bwhere 1bind pub -|- $cmd dumpfile proc dumpfile {nick handle host chan text } {  global bfile bwhere  set foo [open $bfile r]  set line [read $foo]  if {!$bwhere} {    puthelp "NOTICE $nick :[lindex $line [expr [llength $line] - 1]]"  } else {    puthelp "NOTICE $chan :[lindex $line [expr [llength $line] - 1]]"  }  catch {close $foo}}

Statistics: Posted by ppslim — Fri Jun 14, 2002 9:16 am

help me whit a litle question

2002-06-13T15:31:00-04:00

ahh, its soo hard ...
the script line for that??

[ This Message was edited by: blarre on 2002-06-13 13:31 ]

Statistics: Posted by blarre — Thu Jun 13, 2002 3:31 pm

help me whit a litle question

2002-06-13T14:55:00-04:00

you read through the whole file, store it in a list, and extract the last line from that list.

Statistics: Posted by Petersen — Thu Jun 13, 2002 2:55 pm

help me whit a litle question

2002-06-13T07:43:00-04:00

please!! only need to now how i do soo the bot only read the last line in the file...

Statistics: Posted by blarre — Thu Jun 13, 2002 7:43 am

help me whit a litle question

2002-06-12T16:51:00-04:00

hi, i have a script that read from a text file... now its reading allt the text in the file but i whant it to only read the last line...
::: Here is the script :::
set bfile "/usr/local/eggdrop/asobiba/lan.txt"

set cmd "!nextlan"

set bwhere 1

bind pub -|- $cmd dumpfile
proc dumpfile {nick handle host chan text } {
global bfile bwhere
set foo [open $bfile r]
while { ! [eof $foo] } {
set line [gets $foo]
if {!$bwhere} {
puthelp "NOTICE $nick :$line"
} else {
puthelp "NOTICE $chan :$line"
}
}
}

thanks
//Patrik

Statistics: Posted by blarre — Wed Jun 12, 2002 4:51 pm