alias display_Points {
if ($isid) aline @Points $gettok($1,1,61) $+ $chr(9) $+ $gettok($1,2,61)
else {
window -hMd -t80,50 @Points
noop $read(coins.ini,tnw,$+([,$1,]))
var %n $readn + 1,%n2 %n + $ini(coins.ini,$1,0)
filter -fkrtue $+(%n,-,%n2) 2 61 coins.ini display_Points *
window -a @Points
savebuf @Points Points.csv
bread Points.csv 1 $lof(Points.csv) &a
.remove Points.csv
breplace &a 9 44
bwrite Points.csv -1 -1 &a
}
}