Bomb Smasher

Developer(s): M. Hampson
Date: 198x
Type: Cassette
Platform(s): TS 1000

Side-scrolling Breakout like game.

Content

Appears On

Related Products

Related Articles

Related Content

Image Gallery

Bomb Smasher

Source Code

   1 REM 



Bomb Smasher

Developer(s): M. Hampson
Date: 198x
Type: Cassette
Platform(s): TS 1000

Side-scrolling Breakout like game.

Content

Appears On

Related Products

Related Articles

Related Content

Image Gallery

Bomb Smasher

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
Scroll to Top
A

Bomb Smasher

Developer(s): M. Hampson
Date: 198x
Type: Cassette
Platform(s): TS 1000

Side-scrolling Breakout like game.

Content

Appears On

Related Products

Related Articles

Related Content

Image Gallery

Bomb Smasher

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
Scroll to Top
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

Bomb Smasher

Developer(s): M. Hampson
Date: 198x
Type: Cassette
Platform(s): TS 1000

Side-scrolling Breakout like game.

Content

Appears On

Related Products

Related Articles

Related Content

Image Gallery

Bomb Smasher

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
Scroll to Top
\ED\B0

Bomb Smasher

Developer(s): M. Hampson
Date: 198x
Type: Cassette
Platform(s): TS 1000

Side-scrolling Breakout like game.

Content

Appears On

Related Products

Related Articles

Related Content

Image Gallery

Bomb Smasher

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
Scroll to Top
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
Scroll to Top