64er_1984-04.pdf
64er_1984-04.pdf
64er_1984-04.pdf
Sie wollen auch ein ePaper? Erhöhen Sie die Reichweite Ihrer Titel.
YUMPU macht aus Druck-PDFs automatisch weboptimierte ePaper, die Google liebt.
C64 Invaders<br />
3 150 FETCH"a ",13,NAME*(RANG ) iPUNKTE(RANG > =PUNKTE<br />
3160 IF NAMES(RANG)="" THEN NAME*(RANG)="***"<br />
3 170 PROC PRINT TABLE<br />
3 130 PRINT"uia*** REKORDE ***5HH"<br />
3130 FOR INDEX=0 TO 3<br />
3300 : IF INDEX =RANG THENPR I NT" jS" '<br />
3210 : PRINT INDEX+1,PUNKTE(INDEX),NAME*(INDEX>;<br />
3220 NEXT INDEX<br />
3230 PRINT"a!NOCH EINMAL ?•<br />
3240 PROC WAIT<br />
3250 GETA*:IF A*"J" AND A*"N" THEN CALL WAIT<br />
3260 PRINTA*;:IF A*="J" THEN CALL NEU<br />
3270 QPEN2,8,2,"20:TAB INVADERS,3,W"<br />
3280 FOR INDEX=0 TO 3<br />
3230 PRINTtt2,PUNKTE(INDEX)<br />
3308 PR INT#2,NAME*(INDEX)<br />
3310 NEXT<br />
3320 CLOSE2<br />
3330 :<br />
3340 :<br />
3368 REM* * *****************************<br />
3370 REM*** MASCHINENPROGRAMM ***<br />
3380 REM* ***************************** *<br />
Listing des Simons Basic-Programms<br />
»Invaders« (Schluß)<br />
3400 DATA32 , 164 , 124 , 163 ,207 , 133 , 10 1 , 169 ,2 10 , 133 , 100 ,32 , 182 , 124 , 169 ,70<br />
34 18 DATA 160,0,145,20,32, 173,124,163,12,133,252,169,0,133,102,133,110,133,108<br />
3420 DATA 133,2,133,251 , 165,25 1 ,201,66,240,110, 165,2,240,3,133,2,32,246,126<br />
3430 DATA76,122,124,160,O , 177,20,201,73,283,7,163,32,145,20,76,32,124,32,4<br />
3440 DATA 125,224,0,240,3,32,26,125,32,5, 126,32,225,124,165,20,201,0,208,2 13<br />
3450 DATA 165,2 1,28 1 ,204,208,213,56,163,66,223,251,74,74,74,133,2,32,102,127<br />
3460 DATA32,57,125,32,207, 125,32,43,126,32,85,126,32,130,126,32,173,124,165<br />
3470 DATA37,240,5,56,233 ,3 , 133,37,24,105,128,141,24,212,165,108,201 ,1,208,143<br />
3480 DATA32,34,127,32,17 , 125 , 164,251,32,162,173,36,165,28,133,38,165,21 ,133<br />
3438 DATA33,36,169,255,133,28,163,287,133,2i,96,165,188,133,28,165,181,133<br />
3588 DATA2 1,36,165,185,133 ,20 , 165,186,133,21,96,165,28,133,188,165,21,133, 101<br />
35 10 DATA36,165,28,133,185,165,21,133,186,96,238,28,288,2,230,21,36,138,20<br />
3520 DATA 166,28,224,255,288,2,133,21,36,165,28,24,185,48,144,2,230,21,133,20<br />
3530 DATA36,165,28,56,233,48, 176,2,133,21,133,28,36,162,8,281,64,43,6,281,70<br />
3540 DATA 16,2,162,1,36 , 165 ,33 , 133,20,165,39,133,21,36,73,1,166,102,288,13,32<br />
3558 DATA2 13,124,145,20,163,32,32,225,124,145,28,96,72,169,32,145,20,32,225<br />
3560 DATA 124,104,145,20,36,32,173,125,165,102,201,1,240,4,163,33,133,20,163<br />
3570 DATAO,133,187,177,20,32,4,125,224,1,240,13,32,236,124,166,107,232,134<br />
3580 DATA 107,224,23,203,235,36,165,182,73,1 ,133,182,32,173,124,177,20,133,109<br />
3530 DATA32 ,4 , 125 ,224 , 1 ,283 , 14 ,32 ,236 , 124 , 165 , 183 , 145 ,20 ,32 ,248 , 124 , 163 ,32<br />
3680 DATA 145,20,32,225 , 124 , 165 ,28,281,8,288,222, 165,2 1 ,201,204,208,216,32,173<br />
3610 DATA 125,162,23,32,236, 124,282,288,258,162,48,134,187,32,218,124,177,28<br />
3628 DATA32,4,125,224 , 1 ,288,2,134,183,133,187,288,233,96,169,8,133,28,163,284<br />
3630 DATA 133,2 1 ,36,\69,128, 141,13,212,169,143,141,24,2lc , 163, 1 , 141,15,212,173<br />
3648 DATA27,212,36,32,173,125,162,4,32,183,125,24,11 3 1 ,20,133,20, 144,2,230,21<br />
3650 DATA282,288,24 1,177,28,32,4,125,224,1,288,24,32,236,124,177,28,201,32<br />
3668 DATA288,4, 163,71 , 145 ,28 ,281,78,283,7,163, 1,133,188,76,245,125,96,177,20<br />
3670 DATA281,71,283,24, 163,32, 145,28,32,236,124,177,28,281,32,288,4,163,71<br />
3688 DATA 145,28,28 1 ,78,248,4,32,243,124,36,163, 1,133 , 188,76 , 24,126,32,132,124<br />
3638 DATA32,183,125,4 1,15,248,246,133,187,32,243,124,138,107,208,249,177,20<br />
3700 DATA32,4,125,224,1 ,203, 13,32,236,124,177,20,201,32,208,4,163,71,145,20<br />
3710 DATA96,32,132,124,32, 153,255,168,8,165,283,281,53,288,17,165,110,201,1<br />
3720 DATA240,18,32,283, 124 ,32 ,6,127,163,1,133, 118,36,201,56,208,30,169,32,145<br />
3738 DATA28,32,225,124,165 ,28 ,281,131,288,3,32,218,124,177,20,201,71,240,43<br />
3740 DATA 163,70,145,20,32,200, 124,36,201,8,240,1,36,169,32,145,20,32,218,124<br />
3750 DATA 165,20,281,232,203,3,32,225,124,177,20,201,71,240,3,163,70,145,28<br />
3760 DATA32,200,124,96 , 169 , 1,133,108,96,165,118,208,1 ,36,32,131,124,177,20<br />
3770 DATA20 1,72,203,4,169 ,32 , 145,28,32,243,124,177,20,201,32,203,3,163,72,145<br />
3780 DATA20,32,203,124,36,32,4,125,224,0,248,5,230,251,32,77,127,169,73,145<br />
3730 DATA20,169,8,133,118 ,36 , 163,8,133,21,32,225,124,165,28,283,249,165,21<br />
3888 DATA203,245,96,169 ,8, 141,11,212,141,8,212,169,18,133,37,163,100,141,1<br />
3310 DATA2 12,163,123 , 14 1 ,4 ,2 12 , 169,240,141,6,212,96,169,7,141,1,212,163,15<br />
3320 DATA 14 1 ,24,212, 163,0,141, 11,212,141,13,212,141,4,212,141,5,212,163,252<br />
3830 DATA 14 1,6,212,163,123 , 14 1 ,4,212,32,246,126,163,128,141,4,212,96,169,7<br />
3840 DATA 14 1 ,1,212,169, 13 , 133 ,37,163,123,141,4,212,169,240,141,6,212,169,0<br />
3350 DATA 14 1,11 ,2 12,96,165,252,56,233,2,201,2,208,2,163,10,141,3,212,133,252<br />
3860 DATA 163,15,133,37, 163,240,141,13,212,163,143,141,24,212,163,0,141,4,212<br />
3370 DATA163,33,141,11,212,36<br />
READY.<br />
Ausgabe 4/April <strong>1984</strong> 77
Change language