rendered paste bodyalias top5 {
if (%trivia == ON) {
set %nickn %right. [ $+ [ %ni ] ]
set %nickna %ni $+ %pipe $+ %nickn $+ %pipe $+
set %t1 $readini(top5.ini,#1, 1)
set %t2 $readini(top5.ini,#2, 2)
set %t3 $readini(top5.ini,#3, 3)
set %t4 $readini(top5.ini,#4, 4)
set %t5 $readini(top5.ini,#5, 5)
set %t1s $gettok(%t1,2,124)
set %t2s $gettok(%t2,2,124)
set %t3s $gettok(%t3,2,124)
set %t4s $gettok(%t4,2,124)
set %t5s $gettok(%t5,2,124)
set %t1n $gettok(%t1,1,124)
set %t2n $gettok(%t2,1,124)
set %t3n $gettok(%t3,1,124)
set %t4n $gettok(%t4,1,124)
set %t5n $gettok(%t5,1,124)
if (%ni == %t1n) {
/set %temp 1 | halt
}
elseif (%ni == %t2n) {
/set %temp 2 | halt
}
elseif (%ni == %t3n) {
/set %temp 3 | halt
}
elseif (%ni == %t4n) {
/set %temp 4 | halt
}
elseif (%ni == %t5n) {
/set %temp 5 | halt
}
else {
}
if (%nickn > %t1s) {
/set %temps 1 | halt
}
elseif (%nickn > %t2s) {
/set %temps 2 | halt
}
elseif (%nickn > %t3s) {
/set %temps 3 | halt
}
elseif (%nickn > %t4s) {
/set %temps 4 | halt
}
elseif (%nickn > %t5s) {
/set %temps 5 | halt
}
else {
}
%tt = $calc(%temp - %temps)
%tt2 = $calc(%tt - %temp)
if (%t $+ %temps $+ s < %nickn) {
writeini top5.ini # $+ %tt2 %tt2 %nickna
writeini top5.ini # $+ %temp %temp %t $+ %temps
}
else {
}
}
}