Content
Image Gallery
Breakout
1 PRINT "IN THIS GAME OF BREAKOUT, IN ORDER TO START PLAY,SET THE HIGH SCORE COUNTER BY ENTERING IN THE DIRECT MODE,(LET H=0,THEN GOTO 5).AFTER SETTING THE HIGH SCORE COUNTER,TO CONTINUE GOTO 5."
2 PRINT AT 10,2;"YOUR BAT KEYS ARE 6 AND 7"
3 PAUSE 700
4 CLS
5 RAND
6 LET H=0
10 LET T=0
15 LET Z=0
17 LET Q=0
20 LET TB=0
25 LET Q=Q+1
30 LET R=265
40 PRINT AT 1,0;"\..\..\..\..\..\..\..\..\..\..\..%B%R%E%A%K%O%U%T\..\..\..\..\..\..\..\..\..\..\..\.."
50 PRINT AT 17,0;"\''\''\''\''\''\''\''\''\''\''\''%B%R%E%A%K%O%U%T\''\''\''\''\''\''\''\''\''\''\''\''"
80 PRINT ,,"TOTAL 0 BALL NO ,"
90 PRINT ,," HIGHEST SCORE ";H
100 FOR I=2 TO 16
110 PRINT AT I,13;"\'.\'.\'.\'. \ :\ :\ : \':\':\': \ :"
120 NEXT I
130 LET A=-1
140 LET D=1
150 LET X=11
160 LET Y=INT (RND*10)+5
165 LET P=PEEK 16396+PEEK 16397*256+1
170 LET TB=TB+1
180 GOTO (TB=6)*210+200
200 POKE P+647,TB+28
220 POKE R+P,0
230 LET R=R+33*(INKEY$="6")-33*(INKEY$="7")
240 POKE P+R,5
250 POKE P+Y*33+X,0
260 LET X=X+A
270 LET Y=Y+D
275 LET Z=P+Y*33+X
280 LET N=PEEK Z
290 POKE Z,28
300 IF Y=2 OR Y=16 THEN LET D=-D
310 IF N=5 OR X=30 THEN LET A=-A
320 POKE P+R,0
330 LET R=R+33*(INKEY$="6")-33*(INKEY$="7")
340 POKE P+R,5
350 GOTO (N<132)*30+360
360 LET T=T+(136-N)*5
370 PRINT AT 19,5;T
380 LET A=-A
390 GOTO (X>0)*90+130
410 IF T>2000*Q THEN GOTO 20
415 PRINT AT 10,3;"GAME OVER"
420 IF T>H THEN LET H=T
440 INPUT A$
450 IF A$="N" THEN STOP
460 CLS
470 GOTO 10
480 SAVE "1007%0"
490 RUN
People
No people associated with this content.