Create successful ePaper yourself
Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.
PROGRAM: RESTORER BASE<br />
D1 10 A<br />
-82<br />
20 FORDOTOB:EO:FORF0107:R<br />
2 0 4EADS 9 :<br />
816 330 5 : CIFS255THENPRINT"ERR<br />
. . . 1OR 0 IN 0 LINE";C+(D*10):END<br />
EF 40 POKEA+CD*8)<br />
-4-<br />
TV<br />
38 F,6:E...E4-6:NEX<br />
SO READG:IFSETHENPRINT"ERR<br />
OR IN LINE";OA-(D*10)<br />
02 60 NEXTD<br />
40 100 DATA 16,8,196,7,158,50,4<br />
8,54,537<br />
4D 110 DATA 54,58,82,67,68,49,0<br />
,0,378<br />
C9 120 DATA 0<br />
, ,141,33,735<br />
1EF 6130 9 , 1DATA 1 , 1 208,159,15,141,134,<br />
4<br />
1 , 32,169,23,861 2 , 2 0 8<br />
08 140 DATA 141,24,208,169,128,<br />
141,145,2,858<br />
FS 150 DATA 32,58,225,160,0,185<br />
,182,8,864<br />
F4 160 DATA '153,0,4,200,192,34,<br />
208,245,1036<br />
12 170 DATA 160,0,185,73,8,153,<br />
52,3,534<br />
45 180 DATA 200,192,112,208,245<br />
,76,52,3,1088<br />
97 190 DATA 120,165,0,133,1,169<br />
,0,133,725<br />
FE 200 DATA 251,169,8,133,252,1<br />
52,248,150,1383<br />
14 210 DATA 127,168,0,145,251,1<br />
35,192,63,1083<br />
BS 220 DATA 208,249,169,255,145<br />
,251,135,15,1429<br />
D5 230 DATA 2<br />
5 1 , 120,133,251,1308<br />
1 5 5 , 2 5<br />
1 80 , 240 2 4 , DATA 1 0 5 165,252,105,0,133,2<br />
,<br />
52,202,208,1317<br />
E4 250 DATA 222,155,252,201,132<br />
,240,214,150,1595<br />
9A 250 DATA 55,133,1,160,0,185,<br />
128,3,655<br />
C64 PROGRAMMING<br />
78 270 DATA 153,80,4,200,192,32<br />
,208,245,1114<br />
2F 280 DATA 7<br />
6 , 1 ,14,340 2 4 , 3 , 0<br />
, 75 8 290 4 , 2 DATA 1 , 1 832,69,24,15,5,18,20<br />
,32,216<br />
Al 300 DATA 7 9<br />
,<br />
8,5,400<br />
7OA<br />
310 DATA 1 9<br />
0 , , 7<br />
20,201<br />
0 , 4 6 , 3 2 ,<br />
63 81 0 320 , 1 DATA 4 5<br />
, 9 , 3<br />
,16,251<br />
2 , 8 2 , 5 , 1<br />
3F8 9 2 , 330 5 , , 3 2 DATA , 3 2 5,18,20,32,77,5,13,<br />
, 0<br />
, 8 9<br />
15,185<br />
, 2 4<br />
51 340 DATA 1 8<br />
, ,15,218<br />
26F 5 350 , 3 2 DATA , 8 2 , 158 , 1 9 ,67,299 , 2 0<br />
87 5 , 360 1 8 , DATA 3 2 , 455 8 , 3, 42 6,32,399<br />
9 , 8, 23<br />
2 , 4<br />
9 7A , 370 5 7 , DATA 6 6 , 50<br />
,<br />
0 OA , 380 0 , 0 DATA , 0 , 02<br />
2 8<br />
, 0 ,<br />
5,201,50,1233<br />
3 2 , 3 2<br />
2E2 5390 5 , 2 DATA 0 1 , 429 0,<br />
28 4, 20 2,8,152,1111<br />
4, 5 , 1 6 2 ,<br />
53 8 , 400 7 6 , DATA 2 4 1<br />
, 6,255,804<br />
79 1 6410 9 , 1 DATA , 1 6 1E9,15,182,19,160,9<br />
0<br />
, 0 ,<br />
,32,189,755<br />
3 2 , 1 0<br />
31 420 DATA 255,155,1,133,251,1<br />
58,8,133,1119<br />
85 430 DATA 252,169,251,162,218<br />
,160,8,76,1296<br />
5A 440 DATA 215,255,77,59,77,79<br />
,82,99,944<br />
D9 450 DATA 32,82,59,93,84,75,8<br />
2,59,580<br />
22 460 DATA 82,0,0,0,0,0,0,0,82<br />
80 500 PRINT"CCLR3PRESS '1' TO<br />
SAVE RESTORER TO TAPE,"<br />
01 510 PRINT"CSPC3JOR '2' TO SA<br />
VE TO DISK."<br />
19 520 8'152272<br />
Fifty Y O U R COMMODORE