10 PRINT"[147]"TAB(7)"[176][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][174]"
20 PRINTTAB(7)"[221]    NEUE SCORELISTE    [221]"
30 PRINTTAB(7)"[173][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][189]"
40 PRINTTAB(10)"VON JAN PETER MOHR"
50 SYS57812"WUERFELN.SC",8,1:POKE780,0:SYS65493
60 PRINTTAB(5)"NEUER NAME DER ALTEN LISTE":INPUT"     ";N$
70 N$=LEFT$(N$,16)
80 OPEN1,8,15,"R:"+N$+"=WUERFELN.SC":CLOSE1
90 FORI=828TO837:POKEI,0:NEXT:REM SCORES
100 FORI=838TO937:POKEI,46:NEXT:REM NAMEN
110 SYS938
120 PRINTTAB(7)"---LEERE LISTE ERZEUGT---"