start tok64 d64-DbMK9K
0 POKE 53280,0:POKE 53281,0
1 PRINT"{clear}"
100 PRINT"{white}pokes for c-64"
110 PRINT"pO809,251 run stop av
120 PRINT"pO808,237 {-*3}{sh -*2}{-*3} pa
130 PRINT"pO808,225 run stop/restore av
140 PRINT"pO808,297 {-*8}{sh -*2}{-*6} pa
150 PRINT"pO774,131:pO774,164 list av
160 PRINT"pO56325, 1 to 255 markorhastighet
170 PRINT"peek (197) tangent av
180 PRINT"sys59626 skarm upp
190 PRINT"wait 198,1 tryck pa en tangent
200 PRINT"pO768,128 inga fel-medelanden
210 PRINT"pO650,128 repeterar
220 PRINT"pO778,255 fel i ratta rader
230 PRINT"pO53272,21 stora bokstaver
240 PRINT"pO53272,23 sma bokstaver
250 PRINT"pO53280,0-240 forgrundsfarg"
260 PRINT"pO53281,0-15 bakgrundsfarg"
stop tok64
(bastext 1.0)