puthelp/serv/quick problem

Nada_Surf · Post by **Nada_Surf** » Thu Jan 24, 2002 7:21 am

I'm using a series of puthelp statements to read lines of a file to a user... however each time the code is run not all of the puthelp statements get called, the statements are valid and no error is given, what could the problem be?

Petersen · Post by **Petersen** » Thu Jan 24, 2002 7:58 am

Could you give an example of the code, expected output and real output please.

Nada_Surf · Post by **Nada_Surf** » Thu Jan 24, 2002 8:02 am

file contents:

All Time Top Score Records:
LeAlTeRnATiF 3365
LeAlTeRnaTiF 2034
scaly 2001
she- 1734
black_circle 1733

Last weeks Top Scores:
LeAlTeRnATiF 3365
Heckto 1219
GothGirl 375

All Time 2 sec Challenge scores:
black_circle 49
mindee 40
Mindee 31
Zoo 17
black_circle 15

Last Weeks
mindi 31
ZOO 17
black_circle 15

PROC:

proc Show2SecScores {nick host hand chan text} {
global Channel

set ScoreFileList ""
set ScoreFileLines 0
set TSFile [open "~/bot/scripts/topscores.txt" r]

while {![eof $TSFile]} {
lappend ScoreFileList [gets $TSFile]
incr ScoreFileLines
}

puthelp "PRIVMSG $nick :0314**Crypto 2 Sec Challenge Top Scores**"
puthelp "PRIVMSG $nick :030."
puthelp "PRIVMSG $nick :0314[lindex $ScoreFileList 12]"
puthelp "PRIVMSG $nick :0314[lindex $ScoreFileList 13]"
puthelp "PRIVMSG $nick :0314[lindex $ScoreFileList 14]"
puthelp "PRIVMSG $nick :0314[lindex $ScoreFileList 15]"
puthelp "PRIVMSG $nick :0314[lindex $ScoreFileList 16]"
puthelp "PRIVMSG $nick :0314[lindex $ScoreFileList 17]"
puthelp "PRIVMSG $nick :030work!"
puthelp "PRIVMSG $nick :0314[lindex $ScoreFileList 19]"
puthelp "PRIVMSG $nick :0314[lindex $ScoreFileList 20]"
puthelp "PRIVMSG $nick :0314[lindex $ScoreFileList 21]"
puthelp "PRIVMSG $nick :0314[lindex $ScoreFileList 22]"

close $TSFile
}

Expected output:

**Crypto 2 Sec Challenge Top Scores**

All Time 2 sec Challenge scores:
.
black_circle 49
mindee 40
Mindee 31
Zoo 17
black_circle 15
work!
Last Weeks
mindi 31
ZOO 17
black_circle 15

Actual output:

**Crypto 2 Sec Challenge Top Scores**

All Time 2 sec Challenge scores:
.
black_circle 49
mindee 40
Mindee 31
Zoo 17
black_circle 15
work!
Last Weeks
mindi 31

ie. the two final lines are not being printed.

ppslim · Post by **ppslim** » Thu Jan 24, 2002 1:29 pm

A series of putlog commands, and enabling +d console mode, should help determine if the script is even reading the file, or if this is an issue with the queue system.

Petersen · Post by **Petersen** » Thu Jan 24, 2002 6:12 pm

nah, its just that he's got $double-help set to 0. set it to 1.