if $read(scores/Journal.txt,s,$nick) { write -s $nick scores/Journal.txt $nick $calc($v1 + %points) }
else { write -s $nick scores/Journal.txt $nick %points }
if $read(scores/Weekly.txt,s,$nick) { write -s $nick scores/Weekly.txt $nick $calc($v1 + %points) }
else { write -s $nick scores/Weekly.txt $nick %points }