egghelp/eggheads community

Problem with textfiles

2006-05-23T04:37:38-04:00

Start using your brain man, there is only line that uses similar vars with lappend. But strange that he finds the nick and creates a new entry anyway... thats irrationel .

Statistics: Posted by De Kus — Tue May 23, 2006 4:37 am

Problem with textfiles

2006-05-22T15:16:49-04:00

Yes in the textfile, there is exactly that nick. When I type "!medals {{As}masterblast{GEN}}" lsearch find this nick. But when I want to store this nick a new line is made everytime. What do you mean with

Code:

lappend list "$name $mvp $kills"

Instead of what do I have to use this?

Statistics: Posted by darton — Mon May 22, 2006 3:16 pm

Problem with textfiles

2006-05-16T16:25:32-04:00

does the nick stand in the text file exactly like that, or are the {} excaped with \?
Maybe lsearch doenst find it, because of the sublist. You could try to use

Code:

lappend list "$name $mvp $kills"

instead for a pure string.
You must remove escape characters from the current textfile, of course.

Statistics: Posted by De Kus — Tue May 16, 2006 4:25 pm

Problem with textfiles

2006-05-16T09:37:14-04:00

The bot seems to have problems with this nick: {{As}masterblast{GEN}}
It does not make an own line for each time, but it makes a new line everytime for this nick, when it has MVP or MostKills.
Does anyone know why?

Statistics: Posted by darton — Tue May 16, 2006 9:37 am

Problem with textfiles

2006-05-07T10:56:20-04:00

Does it make any difference where I put in the close command? So this should be right?

Code:

set medalsfile "scripts/medals.txt"bind pub - !medals medals:getproc medals:get {nick uhost hand chan arg} {  set fd [open $::medalsfile r+]      while {![eof $fd]} {         lappend list [gets $fd]      }  if {[set le [lsearch -glob $list "$nick *"]] != -1} {       set line [lindex $list $le]       set mvp [lindex $line 1]       set kills [lindex $line 2]     putquick "PRIVMSG $chan :$nick has $mvp MVP Medal(s) and $kills MostKills Medal(s)."     } else {       putquick "PRIVMSG $chan :$nick has no medals yet."   }   close $fd }

Statistics: Posted by darton — Sun May 07, 2006 10:56 am

Problem with textfiles

2006-05-07T10:19:50-04:00

well, I would have used a 'return 1' at the end, used puthelp instead of putquick and changed the r+ to r, since we nolonger need to open the file in read and write modus , but its exactly that what I thought you should make .

only 1 note: you forgot to close the file .

Statistics: Posted by De Kus — Sun May 07, 2006 10:19 am

Problem with textfiles

2006-05-07T07:55:08-04:00

Code:

set medalsfile "scripts/medals.txt"bind pub - !medals medals:getproc medals:get {nick uhost hand chan arg} {  set fd [open $::medalsfile r+]      while {![eof $fd]} {         lappend list [gets $fd]      }  if {[set le [lsearch -glob $list "$nick *"]] != -1} {        set line [lindex $list $le]       set mvp [lindex $line 1]       set kills [lindex $line 2]     putquick "PRIVMSG $chan :$nick has $mvp MVP Medal(s) and $kills MostKills Medal(s)."     } else {       putquick "PRIVMSG $chan :$nick has no medals yet."    }}

I made that script. It works. I hope its a "proper syntax".
Thanks again for your work De Kus.

Statistics: Posted by darton — Sun May 07, 2006 7:55 am

Problem with textfiles

2006-05-07T07:37:07-04:00

you can creat a modified copy of the above script. [lindex $line 1] and [lindex $line 2] will contain the counter of the medals and if lsearch returns -1, there is no record of medals of him.

Statistics: Posted by De Kus — Sun May 07, 2006 7:37 am

Problem with textfiles

2006-05-07T07:04:17-04:00

Now I have a last question. Is this possible: If someone in the channel writes "!medals" my bot looks for his name in the textfile and says for example:"$nick has 2 MVP Medal(s) and 1 MostKills Medal(s)". If the bot could not find the name in the textfile it should say: "$nick has no medals yet."

Statistics: Posted by darton — Sun May 07, 2006 7:04 am

Problem with textfiles

2006-05-07T06:34:00-04:00

But it doesn't.

else? and make sure you used a copy from the last edit .

Statistics: Posted by De Kus — Sun May 07, 2006 6:34 am

Problem with textfiles

2006-05-07T07:03:55-04:00

EDIT: Hey it works, you are great De Kus. Thank you very much.

Statistics: Posted by darton — Sun May 07, 2006 6:32 am

Problem with textfiles

2006-05-07T06:17:58-04:00

if you looked at the complete error message, you would have seen what var name there should be written . Thats why its recommned to use meaningfull var names.

Statistics: Posted by De Kus — Sun May 07, 2006 6:17 am

Problem with textfiles

2006-05-07T04:12:25-04:00

Tcl error [medals]: can't read "line": no such variable

Hm...what's that?

Statistics: Posted by darton — Sun May 07, 2006 4:12 am

Problem with textfiles

2006-05-07T02:47:31-04:00

sorry, didnt consider empty file and that the last line would always expent by an empty line. I changed code to discard the empty last line and dont put no more \n before EOF. However you will have to remove the first empty line by hand .

For the counting, you exressed yourself a bit misunderstanding, I thought you meant a boolan, not a counter . These simply incr statements should work... if my sleepy brain didnt make a total disaster .

Statistics: Posted by De Kus — Sun May 07, 2006 2:47 am

Problem with textfiles

2006-05-06T15:52:25-04:00

Not possible??

Statistics: Posted by darton — Sat May 06, 2006 3:52 pm