egghelp/eggheads community

modify script

2005-07-15T14:07:17-04:00

If you don't understand it, you shouldn't be using it really. You want to modify a code of which you don't even know how it works.

Statistics: Posted by metroid — Fri Jul 15, 2005 2:07 pm

modify script

2005-07-15T14:02:32-04:00

heh, another animated gif dude, posting unindented code with quote tags

how about not saving names with zero score in the first place?

I did try about not saving names with zero score but it seems more difficult to do, because the scripts longer and i cant understand it..

Statistics: Posted by hikaro — Fri Jul 15, 2005 2:02 pm

modify script

2005-07-15T04:13:59-04:00

heh, another animated gif dude, posting unindented code with quote tags

how about not saving names with zero score in the first place?

Perhaps its animated gif week and noone told us?

Statistics: Posted by ^DooM^ — Fri Jul 15, 2005 4:13 am

modify script

2005-07-15T04:03:10-04:00

heh, another animated gif dude, posting unindented code with quote tags

how about not saving names with zero score in the first place?

Statistics: Posted by demond — Fri Jul 15, 2005 4:03 am

modify script

2005-07-15T03:47:11-04:00

Hello,
ive been trying to edit the auto reset into delete only those who has score 0, i dont want to reset the score everymonth but i want to delete those who has score 0. can anybody help me please...
on the score file it looks like:
hebron 10
cipe 7
born 0
bir 0

nah i want to del those who has 0 score.

proc KAOS_NewMonth {min hour day month year} {
global KAOSScoreFile KAOSScore KAOSLastMonthScores

set cmonth [expr $month +1]
set lmonth [KAOSLastMonthName $cmonth]

kaosmsg "[kaos] [kcr] Clearing Monthly Scores \003"

set KAOSMonthFileName "$KAOSScoreFile.$lmonth"

set f [open $KAOSMonthFileName w]
set s 0
foreach n [lsort -decreasing -command sort_KAOSScore [array names KAOSScore]] {
puts $f "$n $KAOSScore($n)"
if {$s < 3} {
if {$KAOSScore($n) > 0} {
set KAOSLastMonthScores($s) "$n $KAOSScore($n)"
} {
set KAOSLastMonthScores($s) "Nobody 0"
}
}
incr s
}
close $f

KAOS_WriteCFG

if [info exists KAOSScore] {unset KAOSScore}

set f [open $KAOSScoreFile w]
puts $f "Nobody 0"
close $f

Statistics: Posted by hikaro — Fri Jul 15, 2005 3:47 am