alias -l add.pts {
if %point.off { return }
if ($read(reglist.txt,nw,$gettok($1,-1,46))) {
writeini -n Points.ini $1 Points $calc($readini(Points.ini,$1,Points) + 4)
}
else {
writeini -n Points.ini $1 Points $calc($readini(Points.ini,$1,Points) + 1)
}
}