Side-scrolling Breakout like game.
Content
Source Code
1 REM
Skip to content
Bomb Smasher
Side-scrolling Breakout like game.
Content
Source Code
1 REM \2A\0C\40\06\18\C5\23\7E\32\21\40\54\5D\23\01\1F\00\ED\B0\2B\3A\21\40\77\23\C1\10\E9\C9\25\1C\1D
10 POKE 16418,0
20 PRINT "\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@";AT 15,5;"% "
30 FOR Z=1 TO 50
31 PRINT AT INT (RND*10)+3,INT (RND*32);"%*"
32 NEXT Z
40 LET B=0
50 LET S=0
100 PRINT AT 22,15;" "
110 RAND USR 16514
120 PRINT AT 22,15;"\..% \.."
130 IF NOT B THEN GOTO 200
135 LET P=P-1
140 PRINT AT P,16;
150 LET N=PEEK (PEEK 16398+256*PEEK 16399)
155 PRINT "*"
160 IF N=8 THEN GOTO 300
170 IF N THEN GOTO 400
180 PRINT AT P,16;" "
190 GOTO 100
200 IF INKEY$="" THEN GOTO 100
210 LET P=22
220 LET B=1
230 GOTO 100
300 PRINT AT 1,1;"GAME OVER...YOUR SCORE->";S
310 IF INKEY$<>CHR$ 118 THEN GOTO 310
320 CLS
330 RUN
400 LET S=S+1
410 LET B=0
420 GOTO 180
People
A
Skip to content
Bomb Smasher
Side-scrolling Breakout like game.
Content
Source Code
1 REM \2A\0C\40\06\18\C5\23\7E\32\21\40\54\5D\23\01\1F\00\ED\B0\2B\3A\21\40\77\23\C1\10\E9\C9\25\1C\1D
10 POKE 16418,0
20 PRINT "\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@";AT 15,5;"% "
30 FOR Z=1 TO 50
31 PRINT AT INT (RND*10)+3,INT (RND*32);"%*"
32 NEXT Z
40 LET B=0
50 LET S=0
100 PRINT AT 22,15;" "
110 RAND USR 16514
120 PRINT AT 22,15;"\..% \.."
130 IF NOT B THEN GOTO 200
135 LET P=P-1
140 PRINT AT P,16;
150 LET N=PEEK (PEEK 16398+256*PEEK 16399)
155 PRINT "*"
160 IF N=8 THEN GOTO 300
170 IF N THEN GOTO 400
180 PRINT AT P,16;" "
190 GOTO 100
200 IF INKEY$="" THEN GOTO 100
210 LET P=22
220 LET B=1
230 GOTO 100
300 PRINT AT 1,1;"GAME OVER...YOUR SCORE->";S
310 IF INKEY$<>CHR$ 118 THEN GOTO 310
320 CLS
330 RUN
400 LET S=S+1
410 LET B=0
420 GOTO 180
People
C\C5ED itemtype='https://schema.org/Blog' itemscope='itemscope' class="wp-singular computer_media-template-default single single-computer_media postid-56513 wp-custom-logo wp-theme-astra wp-child-theme-astra-child ast-desktop ast-separate-container ast-left-sidebar astra-4.10.0 group-blog ast-blog-single-style-1 ast-custom-post-type ast-single-post ast-inherit-site-logo-transparent ast-hfb-header ast-full-width-primary-header ast-box-layout ast-normal-title-enabled astra-addon-4.10.0" itemtype='https://schema.org/Blog' itemscope='itemscope' class="wp-singular computer_media-template-default single single-computer_media postid-56513 wp-custom-logo wp-theme-astra wp-child-theme-astra-child ast-desktop ast-separate-container ast-left-sidebar astra-4.10.0 group-blog ast-blog-single-style-1 ast-custom-post-type ast-single-post ast-inherit-site-logo-transparent ast-hfb-header ast-full-width-primary-header ast-box-layout ast-normal-title-enabled astra-addon-4.10.0"F
Skip to content
Bomb Smasher
Side-scrolling Breakout like game.
Content
Source Code
1 REM \2A\0C\40\06\18\C5\23\7E\32\21\40\54\5D\23\01\1F\00\ED\B0\2B\3A\21\40\77\23\C1\10\E9\C9\25\1C\1D
10 POKE 16418,0
20 PRINT "\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@";AT 15,5;"% "
30 FOR Z=1 TO 50
31 PRINT AT INT (RND*10)+3,INT (RND*32);"%*"
32 NEXT Z
40 LET B=0
50 LET S=0
100 PRINT AT 22,15;" "
110 RAND USR 16514
120 PRINT AT 22,15;"\..% \.."
130 IF NOT B THEN GOTO 200
135 LET P=P-1
140 PRINT AT P,16;
150 LET N=PEEK (PEEK 16398+256*PEEK 16399)
155 PRINT "*"
160 IF N=8 THEN GOTO 300
170 IF N THEN GOTO 400
180 PRINT AT P,16;" "
190 GOTO 100
200 IF INKEY$="" THEN GOTO 100
210 LET P=22
220 LET B=1
230 GOTO 100
300 PRINT AT 1,1;"GAME OVER...YOUR SCORE->";S
310 IF INKEY$<>CHR$ 118 THEN GOTO 310
320 CLS
330 RUN
400 LET S=S+1
410 LET B=0
420 GOTO 180
People
\ED\B0
Skip to content
Bomb Smasher
Side-scrolling Breakout like game.
Content
Source Code
1 REM \2A\0C\40\06\18\C5\23\7E\32\21\40\54\5D\23\01\1F\00\ED\B0\2B\3A\21\40\77\23\C1\10\E9\C9\25\1C\1D
10 POKE 16418,0
20 PRINT "\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@";AT 15,5;"% "
30 FOR Z=1 TO 50
31 PRINT AT INT (RND*10)+3,INT (RND*32);"%*"
32 NEXT Z
40 LET B=0
50 LET S=0
100 PRINT AT 22,15;" "
110 RAND USR 16514
120 PRINT AT 22,15;"\..% \.."
130 IF NOT B THEN GOTO 200
135 LET P=P-1
140 PRINT AT P,16;
150 LET N=PEEK (PEEK 16398+256*PEEK 16399)
155 PRINT "*"
160 IF N=8 THEN GOTO 300
170 IF N THEN GOTO 400
180 PRINT AT P,16;" "
190 GOTO 100
200 IF INKEY$="" THEN GOTO 100
210 LET P=22
220 LET B=1
230 GOTO 100
300 PRINT AT 1,1;"GAME OVER...YOUR SCORE->";S
310 IF INKEY$<>CHR$ 118 THEN GOTO 310
320 CLS
330 RUN
400 LET S=S+1
410 LET B=0
420 GOTO 180
People
BA\C1\E9\C9 itemtype='https://schema.org/Blog' itemscope='itemscope' class="wp-singular computer_media-template-default single single-computer_media postid-56513 wp-custom-logo wp-theme-astra wp-child-theme-astra-child ast-desktop ast-separate-container ast-left-sidebar astra-4.10.0 group-blog ast-blog-single-style-1 ast-custom-post-type ast-single-post ast-inherit-site-logo-transparent ast-hfb-header ast-full-width-primary-header ast-box-layout ast-normal-title-enabled astra-addon-4.10.0"C itemtype='https://schema.org/Blog' itemscope='itemscope' class="wp-singular computer_media-template-default single single-computer_media postid-56513 wp-custom-logo wp-theme-astra wp-child-theme-astra-child ast-desktop ast-separate-container ast-left-sidebar astra-4.10.0 group-blog ast-blog-single-style-1 ast-custom-post-type ast-single-post ast-inherit-site-logo-transparent ast-hfb-header ast-full-width-primary-header ast-box-layout ast-normal-title-enabled astra-addon-4.10.0"D
10 POKE 16418,0
20 PRINT "\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@\@@";AT 15,5;"% "
30 FOR Z=1 TO 50
31 PRINT AT INT (RND*10)+3,INT (RND*32);"%*"
32 NEXT Z
40 LET B=0
50 LET S=0
100 PRINT AT 22,15;" "
110 RAND USR 16514
120 PRINT AT 22,15;"\..% \.."
130 IF NOT B THEN GOTO 200
135 LET P=P-1
140 PRINT AT P,16;
150 LET N=PEEK (PEEK 16398+256*PEEK 16399)
155 PRINT "*"
160 IF N=8 THEN GOTO 300
170 IF N THEN GOTO 400
180 PRINT AT P,16;" "
190 GOTO 100
200 IF INKEY$="" THEN GOTO 100
210 LET P=22
220 LET B=1
230 GOTO 100
300 PRINT AT 1,1;"GAME OVER...YOUR SCORE->";S
310 IF INKEY$<>CHR$ 118 THEN GOTO 310
320 CLS
330 RUN
400 LET S=S+1
410 LET B=0
420 GOTO 180