well this is what i can up with .. with help ..
alias uptest {
var %i = 1
var %ii = 2
while (%ii <= $lines(Best-up-times.txt)) {
//write temptest.txt $read(Best-up-times.txt,%i) $duration($replace($read(Best-up-times.txt,%ii), weeks,wks, week,wk, hours,hrs, hour,hr, minutes,mins, minute,min, seconds,secs, second,sec))
inc %i
inc %i
inc %ii
inc %ii
}
upfilter
}
alias upfilter {
var %o = 1
while (%o <= 10) {
var %high = 0
var %i = $lines(temptest.txt)
while (%i >= 1) {
if ($gettok($read(temptest.txt,%i),2,32) > %high) {
set %high.line %i
set %high $gettok($read(temptest.txt,%i),2,32)
}
dec %i
}
.write high.txt $read(temptest.txt,%high.line)
;echo $active %high -- $read(temptest.txt,%high.line)
.write [ -dl $+ [ %high.line ] ] temptest.txt
inc %o
}
; fmsg %msgnetwork-test #test-chat
fmsg %msgnetwork-test #test11 .: Top 10 Best Uptimes 11:.
fmsg %msgnetwork-test #test11 1: $gettok($read(high.txt,1),1,32) 11- $duration($gettok($read(high.txt,1),2,32))
fmsg %msgnetwork-test #test 11 2: $gettok($read(high.txt,2),1,32) 11- $duration($gettok($read(high.txt,2),2,32))
fmsg %msgnetwork-test #test 11 3: $gettok($read(high.txt,3),1,32) 11- $duration($gettok($read(high.txt,3),2,32))
fmsg %msgnetwork-test #test 11 4: $gettok($read(high.txt,4),1,32) 11- $duration($gettok($read(high.txt,4),2,32))
fmsg %msgnetwork-test #test 11 5: $gettok($read(high.txt,5),1,32) 11- $duration($gettok($read(high.txt,5),2,32))
fmsg %msgnetwork-test #test 11 6: $gettok($read(high.txt,6),1,32) 11- $duration($gettok($read(high.txt,6),2,32))
fmsg %msgnetwork-test #test 11 7: $gettok($read(high.txt,7),1,32) 11- $duration($gettok($read(high.txt,7),2,32))
fmsg %msgnetwork-test #test 11 8: $gettok($read(high.txt,8),1,32) 11- $duration($gettok($read(high.txt,8),2,32))
fmsg %msgnetwork-test #test 11 9: $gettok($read(high.txt,9),1,32) 11- $duration($gettok($read(high.txt,9),2,32))
fmsg %msgnetwork-test #test 11 10: $gettok($read(high.txt,10),1,32) 11- $duration($gettok($read(high.txt,10),2,32))
.remove temptest.txt
.remove high.txt
}
on *:text:!bestuptime*:#test:{
uptest
}
It works .. but lags the heck out of .. mirc .. lol
thanks guys ..
