0 REM  itemtype='https://schema.org/Blog' itemscope='itemscope' class="wp-singular computer_media-template-default single single-computer_media postid-57151 wp-custom-logo wp-theme-astra wp-child-theme-astra-child ast-desktop ast-separate-container ast-left-sidebar astra-4.11.3 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.11.2"


		Skip to content


			

			

		

		

						

				

											

									

							

					

						
						

				The Authoritative Website
			
				
				
			
					
								
																								

															
												
					
								
			
	
 

		

		

									

													

										

							

					

						
						

				The Authoritative Website
			
				
				
			
					
									
																									

										

						

				
					Main Menu
					
											
									
			
					
									
											
						
	
				

						

			
		
				

			
Log in
		
				

			

				
Sign up
			Sign up
		
					
			
		

			

		

							

				

                                
                                    Home
                                
                                
                             » 
                                    Computer Media
                                    
                                 » 
                                    Brick Buster
                                    
                                
					
				

	

	

		
		
	




	


		
					

				



	
	


	
	
		


			
			
Brick Buster
			
		


	
	
	


							

				

  
Download
  





Date: 198x
Type: Program
Platform(s): TS 1000


					
				
		
		
							

				

  
      
  










Content



  







Appears On


Timex Sinclair Public Domain Library Tape 1002
Assembled by Tim Ward from many sources. Contains programs 10051 – 10121.







Related Products









Related Articles









Related Content









Image Gallery




  
    






Source Code



 
   0 REM \11\10\16\01\0A\16\78\FE\02\20\07\3E\04\32\AC\40\18\03\FE\18\C8\79\FE\02\20\07\3E\0C\32\AD\40\18\09\FE\1F\20\05\3E\0D\32\AD\40\05\0D\CD\55\41\7E\FE\08\20\16\CD\6A\41\3A\AC\40\FE\05\20\07\3E\04\32\AC\40\18\05\3E\05\32\AC\40\36\80\CD\E0\40\CD\82\41\CD\E0\40\CD\82\41\36\00\18\AA\00\00\E5\C5\42\4B\DB\04\FE\3B\20\08\79\FE\1D\28\0D\0C\18\0A\FE\2F\20\06\79\FE\01\28\01\0D\CD\55\41\36\00\23\36\03\23\36\03\23\36\00\05\CD\55\41\3A\AD\40\FE\0C\20\0F\7E\FE\80\20\0A\3E\0D\32\AD\40\3E\05\32\AC\40\06\02\23\7E\FE\80\20\0C\3E\05\32\AC\40\D9\C1\06\14\C5\D9\00\10\EC\23\3A\AD\40\FE\0D\20\0F\7E\FE\80\20\0A\3E\0C\32\AD\40\3E\05\32\AC\40\59\C1\E1\C9\D5\C5\2A\0C\40\C5\06\00\09\C1\11\21\00\10\03\C1\D1\C9\19\18\F8\E5\2A\0C\40\23\23\23\23\7E\3C\FE\26\28\03\77\18\05\36\1C\2B\18\F2\E1\C9\C5\01\00\09\0B\78\B1\20\FB\C1\C9\24\25\1C
   5 LET DISP=PEEK 16396+256*PEEK 16397
  10 LET BEST=0
  15 CLS 
  20 PRINT "ENTER SPEED 1 TO 9 (1=FASTEST)"
  25 PRINT AT 3,6;"<=5....8=> S=SERVE"
  30 INPUT I
  40 IF I<1 OR I>9 THEN GOTO 30
  50 POKE 16773,I
  60 CLS 
  70 PRINT "\ .0000\..\..\..\..\..BRICK BUSTER\..\..\..\..\..\..\..\..\..\. "
  80 FOR F=1 TO 20
  90 PRINT AT F,0;"\ :";TAB 31;"\: "
 100 NEXT F
 110 FOR F=1 TO 7
 120 PRINT AT F,1;"\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##"
 130 NEXT F
 135 LET B=5
 136 PRINT AT 0,30;B
 140 FOR F=5 TO 25 STEP 5
 150 POKE 16556,5
 160 POKE 16518,F
 170 IF INKEY$<>"S" THEN GOTO 170
 175 LET B=B-1
 176 PRINT AT 0,30;B
 180 RAND USR 16514
 190 PRINT AT 21,0;"                               "
 200 NEXT F
 210 PRINT AT 0,10;"\..GAME  OVER\.."
 220 LET SCORE=0
 230 FOR R=1 TO 4
 240 LET SCORE=SCORE+(PEEK (DISP+R+1)-28)*10**(4-R)
 250 NEXT R
 260 IF SCORE>BEST THEN GOSUB 400
 270 PRINT AT 9,1;"      BEST SCORE IS ";BEST;AT 10,INT ((32-LEN Z$-3)/2);"BY ";Z$
 280 PRINT AT 12,4;"%P%R%E%S%S% %"%P%"% %T%O% %P%L%A%Y% %A%G%A%I%N"
 281 PRINT AT 0,10;"BRICK BUSTER"
 282 FOR Q=0 TO 30
 283 NEXT Q
 284 PRINT AT 12,4;"PRESS ""P"" TO PLAY AGAIN"
 285 PRINT AT 0,10;"\..GAME  OVER\.."
 286 FOR Q=0 TO 30
 287 NEXT Q
 290 IF INKEY$="P" THEN GOTO 15
 300 GOTO 280
 410 LET BEST=SCORE
 420 PRINT AT 2,2;"YOU NOW HAVE THE BEST SCORE"
 430 PRINT AT 4,1;"ENTER YOUR NAME (1-27 LETTERS)"
 440 INPUT Z$
 450 RETURN 
 500 SAVE "1010%0"
 510 RUN 

					
				
			



						

				


Tags


Archived Media, Downloadable, TS 1000




People


No people associated with this content.


					
				


			

			
		
	



	
 
	


	











		Scroll to Top





















			
				A\FE


		Skip to content


			

			

		

		

						

				

											

									

							

					

						
						

				The Authoritative Website
			
				
				
			
					
								
																								

															
												
					
								
			
	
 

		

		

									

													

										

							

					

						
						

				The Authoritative Website
			
				
				
			
					
									
																									

										

						

				
					Main Menu
					
											
									
			
					
									
											
						
	
				

						

			
		
				

			
Log in
		
				

			

				
Sign up
			Sign up
		
					
			
		

			

		

							

				

                                
                                    Home
                                
                                
                             » 
                                    Computer Media
                                    
                                 » 
                                    Brick Buster
                                    
                                
					
				

	

	

		
		
	




	


		
					

				



	
	


	
	
		


			
			
Brick Buster
			
		


	
	
	


							

				

  
Download
  





Date: 198x
Type: Program
Platform(s): TS 1000


					
				
		
		
							

				

  
      
  










Content



  







Appears On


Timex Sinclair Public Domain Library Tape 1002
Assembled by Tim Ward from many sources. Contains programs 10051 – 10121.







Related Products









Related Articles









Related Content









Image Gallery




  
    






Source Code



 
   0 REM \11\10\16\01\0A\16\78\FE\02\20\07\3E\04\32\AC\40\18\03\FE\18\C8\79\FE\02\20\07\3E\0C\32\AD\40\18\09\FE\1F\20\05\3E\0D\32\AD\40\05\0D\CD\55\41\7E\FE\08\20\16\CD\6A\41\3A\AC\40\FE\05\20\07\3E\04\32\AC\40\18\05\3E\05\32\AC\40\36\80\CD\E0\40\CD\82\41\CD\E0\40\CD\82\41\36\00\18\AA\00\00\E5\C5\42\4B\DB\04\FE\3B\20\08\79\FE\1D\28\0D\0C\18\0A\FE\2F\20\06\79\FE\01\28\01\0D\CD\55\41\36\00\23\36\03\23\36\03\23\36\00\05\CD\55\41\3A\AD\40\FE\0C\20\0F\7E\FE\80\20\0A\3E\0D\32\AD\40\3E\05\32\AC\40\06\02\23\7E\FE\80\20\0C\3E\05\32\AC\40\D9\C1\06\14\C5\D9\00\10\EC\23\3A\AD\40\FE\0D\20\0F\7E\FE\80\20\0A\3E\0C\32\AD\40\3E\05\32\AC\40\59\C1\E1\C9\D5\C5\2A\0C\40\C5\06\00\09\C1\11\21\00\10\03\C1\D1\C9\19\18\F8\E5\2A\0C\40\23\23\23\23\7E\3C\FE\26\28\03\77\18\05\36\1C\2B\18\F2\E1\C9\C5\01\00\09\0B\78\B1\20\FB\C1\C9\24\25\1C
   5 LET DISP=PEEK 16396+256*PEEK 16397
  10 LET BEST=0
  15 CLS 
  20 PRINT "ENTER SPEED 1 TO 9 (1=FASTEST)"
  25 PRINT AT 3,6;"<=5....8=> S=SERVE"
  30 INPUT I
  40 IF I<1 OR I>9 THEN GOTO 30
  50 POKE 16773,I
  60 CLS 
  70 PRINT "\ .0000\..\..\..\..\..BRICK BUSTER\..\..\..\..\..\..\..\..\..\. "
  80 FOR F=1 TO 20
  90 PRINT AT F,0;"\ :";TAB 31;"\: "
 100 NEXT F
 110 FOR F=1 TO 7
 120 PRINT AT F,1;"\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##"
 130 NEXT F
 135 LET B=5
 136 PRINT AT 0,30;B
 140 FOR F=5 TO 25 STEP 5
 150 POKE 16556,5
 160 POKE 16518,F
 170 IF INKEY$<>"S" THEN GOTO 170
 175 LET B=B-1
 176 PRINT AT 0,30;B
 180 RAND USR 16514
 190 PRINT AT 21,0;"                               "
 200 NEXT F
 210 PRINT AT 0,10;"\..GAME  OVER\.."
 220 LET SCORE=0
 230 FOR R=1 TO 4
 240 LET SCORE=SCORE+(PEEK (DISP+R+1)-28)*10**(4-R)
 250 NEXT R
 260 IF SCORE>BEST THEN GOSUB 400
 270 PRINT AT 9,1;"      BEST SCORE IS ";BEST;AT 10,INT ((32-LEN Z$-3)/2);"BY ";Z$
 280 PRINT AT 12,4;"%P%R%E%S%S% %"%P%"% %T%O% %P%L%A%Y% %A%G%A%I%N"
 281 PRINT AT 0,10;"BRICK BUSTER"
 282 FOR Q=0 TO 30
 283 NEXT Q
 284 PRINT AT 12,4;"PRESS ""P"" TO PLAY AGAIN"
 285 PRINT AT 0,10;"\..GAME  OVER\.."
 286 FOR Q=0 TO 30
 287 NEXT Q
 290 IF INKEY$="P" THEN GOTO 15
 300 GOTO 280
 410 LET BEST=SCORE
 420 PRINT AT 2,2;"YOU NOW HAVE THE BEST SCORE"
 430 PRINT AT 4,1;"ENTER YOUR NAME (1-27 LETTERS)"
 440 INPUT Z$
 450 RETURN 
 500 SAVE "1010%0"
 510 RUN 

					
				
			



						

				


Tags


Archived Media, Downloadable, TS 1000




People


No people associated with this content.


					
				


			

			
		
	



	
 
	


	











		Scroll to Top





















			
				E\AC\FE\C8\FE


		Skip to content


			

			

		

		

						

				

											

									

							

					

						
						

				The Authoritative Website
			
				
				
			
					
								
																								

															
												
					
								
			
	
 

		

		

									

													

										

							

					

						
						

				The Authoritative Website
			
				
				
			
					
									
																									

										

						

				
					Main Menu
					
											
									
			
					
									
											
						
	
				

						

			
		
				

			
Log in
		
				

			

				
Sign up
			Sign up
		
					
			
		

			

		

							

				

                                
                                    Home
                                
                                
                             » 
                                    Computer Media
                                    
                                 » 
                                    Brick Buster
                                    
                                
					
				

	

	

		
		
	




	


		
					

				



	
	


	
	
		


			
			
Brick Buster
			
		


	
	
	


							

				

  
Download
  





Date: 198x
Type: Program
Platform(s): TS 1000


					
				
		
		
							

				

  
      
  










Content



  







Appears On


Timex Sinclair Public Domain Library Tape 1002
Assembled by Tim Ward from many sources. Contains programs 10051 – 10121.







Related Products









Related Articles









Related Content









Image Gallery




  
    






Source Code



 
   0 REM \11\10\16\01\0A\16\78\FE\02\20\07\3E\04\32\AC\40\18\03\FE\18\C8\79\FE\02\20\07\3E\0C\32\AD\40\18\09\FE\1F\20\05\3E\0D\32\AD\40\05\0D\CD\55\41\7E\FE\08\20\16\CD\6A\41\3A\AC\40\FE\05\20\07\3E\04\32\AC\40\18\05\3E\05\32\AC\40\36\80\CD\E0\40\CD\82\41\CD\E0\40\CD\82\41\36\00\18\AA\00\00\E5\C5\42\4B\DB\04\FE\3B\20\08\79\FE\1D\28\0D\0C\18\0A\FE\2F\20\06\79\FE\01\28\01\0D\CD\55\41\36\00\23\36\03\23\36\03\23\36\00\05\CD\55\41\3A\AD\40\FE\0C\20\0F\7E\FE\80\20\0A\3E\0D\32\AD\40\3E\05\32\AC\40\06\02\23\7E\FE\80\20\0C\3E\05\32\AC\40\D9\C1\06\14\C5\D9\00\10\EC\23\3A\AD\40\FE\0D\20\0F\7E\FE\80\20\0A\3E\0C\32\AD\40\3E\05\32\AC\40\59\C1\E1\C9\D5\C5\2A\0C\40\C5\06\00\09\C1\11\21\00\10\03\C1\D1\C9\19\18\F8\E5\2A\0C\40\23\23\23\23\7E\3C\FE\26\28\03\77\18\05\36\1C\2B\18\F2\E1\C9\C5\01\00\09\0B\78\B1\20\FB\C1\C9\24\25\1C
   5 LET DISP=PEEK 16396+256*PEEK 16397
  10 LET BEST=0
  15 CLS 
  20 PRINT "ENTER SPEED 1 TO 9 (1=FASTEST)"
  25 PRINT AT 3,6;"<=5....8=> S=SERVE"
  30 INPUT I
  40 IF I<1 OR I>9 THEN GOTO 30
  50 POKE 16773,I
  60 CLS 
  70 PRINT "\ .0000\..\..\..\..\..BRICK BUSTER\..\..\..\..\..\..\..\..\..\. "
  80 FOR F=1 TO 20
  90 PRINT AT F,0;"\ :";TAB 31;"\: "
 100 NEXT F
 110 FOR F=1 TO 7
 120 PRINT AT F,1;"\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##"
 130 NEXT F
 135 LET B=5
 136 PRINT AT 0,30;B
 140 FOR F=5 TO 25 STEP 5
 150 POKE 16556,5
 160 POKE 16518,F
 170 IF INKEY$<>"S" THEN GOTO 170
 175 LET B=B-1
 176 PRINT AT 0,30;B
 180 RAND USR 16514
 190 PRINT AT 21,0;"                               "
 200 NEXT F
 210 PRINT AT 0,10;"\..GAME  OVER\.."
 220 LET SCORE=0
 230 FOR R=1 TO 4
 240 LET SCORE=SCORE+(PEEK (DISP+R+1)-28)*10**(4-R)
 250 NEXT R
 260 IF SCORE>BEST THEN GOSUB 400
 270 PRINT AT 9,1;"      BEST SCORE IS ";BEST;AT 10,INT ((32-LEN Z$-3)/2);"BY ";Z$
 280 PRINT AT 12,4;"%P%R%E%S%S% %"%P%"% %T%O% %P%L%A%Y% %A%G%A%I%N"
 281 PRINT AT 0,10;"BRICK BUSTER"
 282 FOR Q=0 TO 30
 283 NEXT Q
 284 PRINT AT 12,4;"PRESS ""P"" TO PLAY AGAIN"
 285 PRINT AT 0,10;"\..GAME  OVER\.."
 286 FOR Q=0 TO 30
 287 NEXT Q
 290 IF INKEY$="P" THEN GOTO 15
 300 GOTO 280
 410 LET BEST=SCORE
 420 PRINT AT 2,2;"YOU NOW HAVE THE BEST SCORE"
 430 PRINT AT 4,1;"ENTER YOUR NAME (1-27 LETTERS)"
 440 INPUT Z$
 450 RETURN 
 500 SAVE "1010%0"
 510 RUN 

					
				
			



						

				


Tags


Archived Media, Downloadable, TS 1000




People


No people associated with this content.


					
				


			

			
		
	



	
 
	


	











		Scroll to Top





















			
				E


		Skip to content


			

			

		

		

						

				

											

									

							

					

						
						

				The Authoritative Website
			
				
				
			
					
								
																								

															
												
					
								
			
	
 

		

		

									

													

										

							

					

						
						

				The Authoritative Website
			
				
				
			
					
									
																									

										

						

				
					Main Menu
					
											
									
			
					
									
											
						
	
				

						

			
		
				

			
Log in
		
				

			

				
Sign up
			Sign up
		
					
			
		

			

		

							

				

                                
                                    Home
                                
                                
                             » 
                                    Computer Media
                                    
                                 » 
                                    Brick Buster
                                    
                                
					
				

	

	

		
		
	




	


		
					

				



	
	


	
	
		


			
			
Brick Buster
			
		


	
	
	


							

				

  
Download
  





Date: 198x
Type: Program
Platform(s): TS 1000


					
				
		
		
							

				

  
      
  










Content



  







Appears On


Timex Sinclair Public Domain Library Tape 1002
Assembled by Tim Ward from many sources. Contains programs 10051 – 10121.







Related Products









Related Articles









Related Content









Image Gallery




  
    






Source Code



 
   0 REM \11\10\16\01\0A\16\78\FE\02\20\07\3E\04\32\AC\40\18\03\FE\18\C8\79\FE\02\20\07\3E\0C\32\AD\40\18\09\FE\1F\20\05\3E\0D\32\AD\40\05\0D\CD\55\41\7E\FE\08\20\16\CD\6A\41\3A\AC\40\FE\05\20\07\3E\04\32\AC\40\18\05\3E\05\32\AC\40\36\80\CD\E0\40\CD\82\41\CD\E0\40\CD\82\41\36\00\18\AA\00\00\E5\C5\42\4B\DB\04\FE\3B\20\08\79\FE\1D\28\0D\0C\18\0A\FE\2F\20\06\79\FE\01\28\01\0D\CD\55\41\36\00\23\36\03\23\36\03\23\36\00\05\CD\55\41\3A\AD\40\FE\0C\20\0F\7E\FE\80\20\0A\3E\0D\32\AD\40\3E\05\32\AC\40\06\02\23\7E\FE\80\20\0C\3E\05\32\AC\40\D9\C1\06\14\C5\D9\00\10\EC\23\3A\AD\40\FE\0D\20\0F\7E\FE\80\20\0A\3E\0C\32\AD\40\3E\05\32\AC\40\59\C1\E1\C9\D5\C5\2A\0C\40\C5\06\00\09\C1\11\21\00\10\03\C1\D1\C9\19\18\F8\E5\2A\0C\40\23\23\23\23\7E\3C\FE\26\28\03\77\18\05\36\1C\2B\18\F2\E1\C9\C5\01\00\09\0B\78\B1\20\FB\C1\C9\24\25\1C
   5 LET DISP=PEEK 16396+256*PEEK 16397
  10 LET BEST=0
  15 CLS 
  20 PRINT "ENTER SPEED 1 TO 9 (1=FASTEST)"
  25 PRINT AT 3,6;"<=5....8=> S=SERVE"
  30 INPUT I
  40 IF I<1 OR I>9 THEN GOTO 30
  50 POKE 16773,I
  60 CLS 
  70 PRINT "\ .0000\..\..\..\..\..BRICK BUSTER\..\..\..\..\..\..\..\..\..\. "
  80 FOR F=1 TO 20
  90 PRINT AT F,0;"\ :";TAB 31;"\: "
 100 NEXT F
 110 FOR F=1 TO 7
 120 PRINT AT F,1;"\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##"
 130 NEXT F
 135 LET B=5
 136 PRINT AT 0,30;B
 140 FOR F=5 TO 25 STEP 5
 150 POKE 16556,5
 160 POKE 16518,F
 170 IF INKEY$<>"S" THEN GOTO 170
 175 LET B=B-1
 176 PRINT AT 0,30;B
 180 RAND USR 16514
 190 PRINT AT 21,0;"                               "
 200 NEXT F
 210 PRINT AT 0,10;"\..GAME  OVER\.."
 220 LET SCORE=0
 230 FOR R=1 TO 4
 240 LET SCORE=SCORE+(PEEK (DISP+R+1)-28)*10**(4-R)
 250 NEXT R
 260 IF SCORE>BEST THEN GOSUB 400
 270 PRINT AT 9,1;"      BEST SCORE IS ";BEST;AT 10,INT ((32-LEN Z$-3)/2);"BY ";Z$
 280 PRINT AT 12,4;"%P%R%E%S%S% %"%P%"% %T%O% %P%L%A%Y% %A%G%A%I%N"
 281 PRINT AT 0,10;"BRICK BUSTER"
 282 FOR Q=0 TO 30
 283 NEXT Q
 284 PRINT AT 12,4;"PRESS ""P"" TO PLAY AGAIN"
 285 PRINT AT 0,10;"\..GAME  OVER\.."
 286 FOR Q=0 TO 30
 287 NEXT Q
 290 IF INKEY$="P" THEN GOTO 15
 300 GOTO 280
 410 LET BEST=SCORE
 420 PRINT AT 2,2;"YOU NOW HAVE THE BEST SCORE"
 430 PRINT AT 4,1;"ENTER YOUR NAME (1-27 LETTERS)"
 440 INPUT Z$
 450 RETURN 
 500 SAVE "1010%0"
 510 RUN 

					
				
			



						

				


Tags


Archived Media, Downloadable, TS 1000




People


No people associated with this content.


					
				


			

			
		
	



	
 
	


	











		Scroll to Top





















			
				C\AD\FE itemtype='https://schema.org/Blog' itemscope='itemscope' class="wp-singular computer_media-template-default single single-computer_media postid-57151 wp-custom-logo wp-theme-astra wp-child-theme-astra-child ast-desktop ast-separate-container ast-left-sidebar astra-4.11.3 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.11.2"FE


		Skip to content


			

			

		

		

						

				

											

									

							

					

						
						

				The Authoritative Website
			
				
				
			
					
								
																								

															
												
					
								
			
	
 

		

		

									

													

										

							

					

						
						

				The Authoritative Website
			
				
				
			
					
									
																									

										

						

				
					Main Menu
					
											
									
			
					
									
											
						
	
				

						

			
		
				

			
Log in
		
				

			

				
Sign up
			Sign up
		
					
			
		

			

		

							

				

                                
                                    Home
                                
                                
                             » 
                                    Computer Media
                                    
                                 » 
                                    Brick Buster
                                    
                                
					
				

	

	

		
		
	




	


		
					

				



	
	


	
	
		


			
			
Brick Buster
			
		


	
	
	


							

				

  
Download
  





Date: 198x
Type: Program
Platform(s): TS 1000


					
				
		
		
							

				

  
      
  










Content



  







Appears On


Timex Sinclair Public Domain Library Tape 1002
Assembled by Tim Ward from many sources. Contains programs 10051 – 10121.







Related Products









Related Articles









Related Content









Image Gallery




  
    






Source Code



 
   0 REM \11\10\16\01\0A\16\78\FE\02\20\07\3E\04\32\AC\40\18\03\FE\18\C8\79\FE\02\20\07\3E\0C\32\AD\40\18\09\FE\1F\20\05\3E\0D\32\AD\40\05\0D\CD\55\41\7E\FE\08\20\16\CD\6A\41\3A\AC\40\FE\05\20\07\3E\04\32\AC\40\18\05\3E\05\32\AC\40\36\80\CD\E0\40\CD\82\41\CD\E0\40\CD\82\41\36\00\18\AA\00\00\E5\C5\42\4B\DB\04\FE\3B\20\08\79\FE\1D\28\0D\0C\18\0A\FE\2F\20\06\79\FE\01\28\01\0D\CD\55\41\36\00\23\36\03\23\36\03\23\36\00\05\CD\55\41\3A\AD\40\FE\0C\20\0F\7E\FE\80\20\0A\3E\0D\32\AD\40\3E\05\32\AC\40\06\02\23\7E\FE\80\20\0C\3E\05\32\AC\40\D9\C1\06\14\C5\D9\00\10\EC\23\3A\AD\40\FE\0D\20\0F\7E\FE\80\20\0A\3E\0C\32\AD\40\3E\05\32\AC\40\59\C1\E1\C9\D5\C5\2A\0C\40\C5\06\00\09\C1\11\21\00\10\03\C1\D1\C9\19\18\F8\E5\2A\0C\40\23\23\23\23\7E\3C\FE\26\28\03\77\18\05\36\1C\2B\18\F2\E1\C9\C5\01\00\09\0B\78\B1\20\FB\C1\C9\24\25\1C
   5 LET DISP=PEEK 16396+256*PEEK 16397
  10 LET BEST=0
  15 CLS 
  20 PRINT "ENTER SPEED 1 TO 9 (1=FASTEST)"
  25 PRINT AT 3,6;"<=5....8=> S=SERVE"
  30 INPUT I
  40 IF I<1 OR I>9 THEN GOTO 30
  50 POKE 16773,I
  60 CLS 
  70 PRINT "\ .0000\..\..\..\..\..BRICK BUSTER\..\..\..\..\..\..\..\..\..\. "
  80 FOR F=1 TO 20
  90 PRINT AT F,0;"\ :";TAB 31;"\: "
 100 NEXT F
 110 FOR F=1 TO 7
 120 PRINT AT F,1;"\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##"
 130 NEXT F
 135 LET B=5
 136 PRINT AT 0,30;B
 140 FOR F=5 TO 25 STEP 5
 150 POKE 16556,5
 160 POKE 16518,F
 170 IF INKEY$<>"S" THEN GOTO 170
 175 LET B=B-1
 176 PRINT AT 0,30;B
 180 RAND USR 16514
 190 PRINT AT 21,0;"                               "
 200 NEXT F
 210 PRINT AT 0,10;"\..GAME  OVER\.."
 220 LET SCORE=0
 230 FOR R=1 TO 4
 240 LET SCORE=SCORE+(PEEK (DISP+R+1)-28)*10**(4-R)
 250 NEXT R
 260 IF SCORE>BEST THEN GOSUB 400
 270 PRINT AT 9,1;"      BEST SCORE IS ";BEST;AT 10,INT ((32-LEN Z$-3)/2);"BY ";Z$
 280 PRINT AT 12,4;"%P%R%E%S%S% %"%P%"% %T%O% %P%L%A%Y% %A%G%A%I%N"
 281 PRINT AT 0,10;"BRICK BUSTER"
 282 FOR Q=0 TO 30
 283 NEXT Q
 284 PRINT AT 12,4;"PRESS ""P"" TO PLAY AGAIN"
 285 PRINT AT 0,10;"\..GAME  OVER\.."
 286 FOR Q=0 TO 30
 287 NEXT Q
 290 IF INKEY$="P" THEN GOTO 15
 300 GOTO 280
 410 LET BEST=SCORE
 420 PRINT AT 2,2;"YOU NOW HAVE THE BEST SCORE"
 430 PRINT AT 4,1;"ENTER YOUR NAME (1-27 LETTERS)"
 440 INPUT Z$
 450 RETURN 
 500 SAVE "1010%0"
 510 RUN 

					
				
			



						

				


Tags


Archived Media, Downloadable, TS 1000




People


No people associated with this content.


					
				


			

			
		
	



	
 
	


	











		Scroll to Top





















			
				D\AD


		Skip to content


			

			

		

		

						

				

											

									

							

					

						
						

				The Authoritative Website
			
				
				
			
					
								
																								

															
												
					
								
			
	
 

		

		

									

													

										

							

					

						
						

				The Authoritative Website
			
				
				
			
					
									
																									

										

						

				
					Main Menu
					
											
									
			
					
									
											
						
	
				

						

			
		
				

			
Log in
		
				

			

				
Sign up
			Sign up
		
					
			
		

			

		

							

				

                                
                                    Home
                                
                                
                             » 
                                    Computer Media
                                    
                                 » 
                                    Brick Buster
                                    
                                
					
				

	

	

		
		
	




	


		
					

				



	
	


	
	
		


			
			
Brick Buster
			
		


	
	
	


							

				

  
Download
  





Date: 198x
Type: Program
Platform(s): TS 1000


					
				
		
		
							

				

  
      
  










Content



  







Appears On


Timex Sinclair Public Domain Library Tape 1002
Assembled by Tim Ward from many sources. Contains programs 10051 – 10121.







Related Products









Related Articles









Related Content









Image Gallery




  
    






Source Code



 
   0 REM \11\10\16\01\0A\16\78\FE\02\20\07\3E\04\32\AC\40\18\03\FE\18\C8\79\FE\02\20\07\3E\0C\32\AD\40\18\09\FE\1F\20\05\3E\0D\32\AD\40\05\0D\CD\55\41\7E\FE\08\20\16\CD\6A\41\3A\AC\40\FE\05\20\07\3E\04\32\AC\40\18\05\3E\05\32\AC\40\36\80\CD\E0\40\CD\82\41\CD\E0\40\CD\82\41\36\00\18\AA\00\00\E5\C5\42\4B\DB\04\FE\3B\20\08\79\FE\1D\28\0D\0C\18\0A\FE\2F\20\06\79\FE\01\28\01\0D\CD\55\41\36\00\23\36\03\23\36\03\23\36\00\05\CD\55\41\3A\AD\40\FE\0C\20\0F\7E\FE\80\20\0A\3E\0D\32\AD\40\3E\05\32\AC\40\06\02\23\7E\FE\80\20\0C\3E\05\32\AC\40\D9\C1\06\14\C5\D9\00\10\EC\23\3A\AD\40\FE\0D\20\0F\7E\FE\80\20\0A\3E\0C\32\AD\40\3E\05\32\AC\40\59\C1\E1\C9\D5\C5\2A\0C\40\C5\06\00\09\C1\11\21\00\10\03\C1\D1\C9\19\18\F8\E5\2A\0C\40\23\23\23\23\7E\3C\FE\26\28\03\77\18\05\36\1C\2B\18\F2\E1\C9\C5\01\00\09\0B\78\B1\20\FB\C1\C9\24\25\1C
   5 LET DISP=PEEK 16396+256*PEEK 16397
  10 LET BEST=0
  15 CLS 
  20 PRINT "ENTER SPEED 1 TO 9 (1=FASTEST)"
  25 PRINT AT 3,6;"<=5....8=> S=SERVE"
  30 INPUT I
  40 IF I<1 OR I>9 THEN GOTO 30
  50 POKE 16773,I
  60 CLS 
  70 PRINT "\ .0000\..\..\..\..\..BRICK BUSTER\..\..\..\..\..\..\..\..\..\. "
  80 FOR F=1 TO 20
  90 PRINT AT F,0;"\ :";TAB 31;"\: "
 100 NEXT F
 110 FOR F=1 TO 7
 120 PRINT AT F,1;"\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##"
 130 NEXT F
 135 LET B=5
 136 PRINT AT 0,30;B
 140 FOR F=5 TO 25 STEP 5
 150 POKE 16556,5
 160 POKE 16518,F
 170 IF INKEY$<>"S" THEN GOTO 170
 175 LET B=B-1
 176 PRINT AT 0,30;B
 180 RAND USR 16514
 190 PRINT AT 21,0;"                               "
 200 NEXT F
 210 PRINT AT 0,10;"\..GAME  OVER\.."
 220 LET SCORE=0
 230 FOR R=1 TO 4
 240 LET SCORE=SCORE+(PEEK (DISP+R+1)-28)*10**(4-R)
 250 NEXT R
 260 IF SCORE>BEST THEN GOSUB 400
 270 PRINT AT 9,1;"      BEST SCORE IS ";BEST;AT 10,INT ((32-LEN Z$-3)/2);"BY ";Z$
 280 PRINT AT 12,4;"%P%R%E%S%S% %"%P%"% %T%O% %P%L%A%Y% %A%G%A%I%N"
 281 PRINT AT 0,10;"BRICK BUSTER"
 282 FOR Q=0 TO 30
 283 NEXT Q
 284 PRINT AT 12,4;"PRESS ""P"" TO PLAY AGAIN"
 285 PRINT AT 0,10;"\..GAME  OVER\.."
 286 FOR Q=0 TO 30
 287 NEXT Q
 290 IF INKEY$="P" THEN GOTO 15
 300 GOTO 280
 410 LET BEST=SCORE
 420 PRINT AT 2,2;"YOU NOW HAVE THE BEST SCORE"
 430 PRINT AT 4,1;"ENTER YOUR NAME (1-27 LETTERS)"
 440 INPUT Z$
 450 RETURN 
 500 SAVE "1010%0"
 510 RUN 

					
				
			



						

				


Tags


Archived Media, Downloadable, TS 1000




People


No people associated with this content.


					
				


			

			
		
	



	
 
	


	











		Scroll to Top





















			
				D\CDE\FE\CDAA\AC\FEE\ACE\AC\CD\E0\CD\CD\E0\CD


		Skip to content


			

			

		

		

						

				

											

									

							

					

						
						

				The Authoritative Website
			
				
				
			
					
								
																								

															
												
					
								
			
	
 

		

		

									

													

										

							

					

						
						

				The Authoritative Website
			
				
				
			
					
									
																									

										

						

				
					Main Menu
					
											
									
			
					
									
											
						
	
				

						

			
		
				

			
Log in
		
				

			

				
Sign up
			Sign up
		
					
			
		

			

		

							

				

                                
                                    Home
                                
                                
                             » 
                                    Computer Media
                                    
                                 » 
                                    Brick Buster
                                    
                                
					
				

	

	

		
		
	




	


		
					

				



	
	


	
	
		


			
			
Brick Buster
			
		


	
	
	


							

				

  
Download
  





Date: 198x
Type: Program
Platform(s): TS 1000


					
				
		
		
							

				

  
      
  










Content



  







Appears On


Timex Sinclair Public Domain Library Tape 1002
Assembled by Tim Ward from many sources. Contains programs 10051 – 10121.







Related Products









Related Articles









Related Content









Image Gallery




  
    






Source Code



 
   0 REM \11\10\16\01\0A\16\78\FE\02\20\07\3E\04\32\AC\40\18\03\FE\18\C8\79\FE\02\20\07\3E\0C\32\AD\40\18\09\FE\1F\20\05\3E\0D\32\AD\40\05\0D\CD\55\41\7E\FE\08\20\16\CD\6A\41\3A\AC\40\FE\05\20\07\3E\04\32\AC\40\18\05\3E\05\32\AC\40\36\80\CD\E0\40\CD\82\41\CD\E0\40\CD\82\41\36\00\18\AA\00\00\E5\C5\42\4B\DB\04\FE\3B\20\08\79\FE\1D\28\0D\0C\18\0A\FE\2F\20\06\79\FE\01\28\01\0D\CD\55\41\36\00\23\36\03\23\36\03\23\36\00\05\CD\55\41\3A\AD\40\FE\0C\20\0F\7E\FE\80\20\0A\3E\0D\32\AD\40\3E\05\32\AC\40\06\02\23\7E\FE\80\20\0C\3E\05\32\AC\40\D9\C1\06\14\C5\D9\00\10\EC\23\3A\AD\40\FE\0D\20\0F\7E\FE\80\20\0A\3E\0C\32\AD\40\3E\05\32\AC\40\59\C1\E1\C9\D5\C5\2A\0C\40\C5\06\00\09\C1\11\21\00\10\03\C1\D1\C9\19\18\F8\E5\2A\0C\40\23\23\23\23\7E\3C\FE\26\28\03\77\18\05\36\1C\2B\18\F2\E1\C9\C5\01\00\09\0B\78\B1\20\FB\C1\C9\24\25\1C
   5 LET DISP=PEEK 16396+256*PEEK 16397
  10 LET BEST=0
  15 CLS 
  20 PRINT "ENTER SPEED 1 TO 9 (1=FASTEST)"
  25 PRINT AT 3,6;"<=5....8=> S=SERVE"
  30 INPUT I
  40 IF I<1 OR I>9 THEN GOTO 30
  50 POKE 16773,I
  60 CLS 
  70 PRINT "\ .0000\..\..\..\..\..BRICK BUSTER\..\..\..\..\..\..\..\..\..\. "
  80 FOR F=1 TO 20
  90 PRINT AT F,0;"\ :";TAB 31;"\: "
 100 NEXT F
 110 FOR F=1 TO 7
 120 PRINT AT F,1;"\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##"
 130 NEXT F
 135 LET B=5
 136 PRINT AT 0,30;B
 140 FOR F=5 TO 25 STEP 5
 150 POKE 16556,5
 160 POKE 16518,F
 170 IF INKEY$<>"S" THEN GOTO 170
 175 LET B=B-1
 176 PRINT AT 0,30;B
 180 RAND USR 16514
 190 PRINT AT 21,0;"                               "
 200 NEXT F
 210 PRINT AT 0,10;"\..GAME  OVER\.."
 220 LET SCORE=0
 230 FOR R=1 TO 4
 240 LET SCORE=SCORE+(PEEK (DISP+R+1)-28)*10**(4-R)
 250 NEXT R
 260 IF SCORE>BEST THEN GOSUB 400
 270 PRINT AT 9,1;"      BEST SCORE IS ";BEST;AT 10,INT ((32-LEN Z$-3)/2);"BY ";Z$
 280 PRINT AT 12,4;"%P%R%E%S%S% %"%P%"% %T%O% %P%L%A%Y% %A%G%A%I%N"
 281 PRINT AT 0,10;"BRICK BUSTER"
 282 FOR Q=0 TO 30
 283 NEXT Q
 284 PRINT AT 12,4;"PRESS ""P"" TO PLAY AGAIN"
 285 PRINT AT 0,10;"\..GAME  OVER\.."
 286 FOR Q=0 TO 30
 287 NEXT Q
 290 IF INKEY$="P" THEN GOTO 15
 300 GOTO 280
 410 LET BEST=SCORE
 420 PRINT AT 2,2;"YOU NOW HAVE THE BEST SCORE"
 430 PRINT AT 4,1;"ENTER YOUR NAME (1-27 LETTERS)"
 440 INPUT Z$
 450 RETURN 
 500 SAVE "1010%0"
 510 RUN 

					
				
			



						

				


Tags


Archived Media, Downloadable, TS 1000




People


No people associated with this content.


					
				


			

			
		
	



	
 
	


	











		Scroll to Top





















			
				\AA


		Skip to content


			

			

		

		

						

				

											

									

							

					

						
						

				The Authoritative Website
			
				
				
			
					
								
																								

															
												
					
								
			
	
 

		

		

									

													

										

							

					

						
						

				The Authoritative Website
			
				
				
			
					
									
																									

										

						

				
					Main Menu
					
											
									
			
					
									
											
						
	
				

						

			
		
				

			
Log in
		
				

			

				
Sign up
			Sign up
		
					
			
		

			

		

							

				

                                
                                    Home
                                
                                
                             » 
                                    Computer Media
                                    
                                 » 
                                    Brick Buster
                                    
                                
					
				

	

	

		
		
	




	


		
					

				



	
	


	
	
		


			
			
Brick Buster
			
		


	
	
	


							

				

  
Download
  





Date: 198x
Type: Program
Platform(s): TS 1000


					
				
		
		
							

				

  
      
  










Content



  







Appears On


Timex Sinclair Public Domain Library Tape 1002
Assembled by Tim Ward from many sources. Contains programs 10051 – 10121.







Related Products









Related Articles









Related Content









Image Gallery




  
    






Source Code



 
   0 REM \11\10\16\01\0A\16\78\FE\02\20\07\3E\04\32\AC\40\18\03\FE\18\C8\79\FE\02\20\07\3E\0C\32\AD\40\18\09\FE\1F\20\05\3E\0D\32\AD\40\05\0D\CD\55\41\7E\FE\08\20\16\CD\6A\41\3A\AC\40\FE\05\20\07\3E\04\32\AC\40\18\05\3E\05\32\AC\40\36\80\CD\E0\40\CD\82\41\CD\E0\40\CD\82\41\36\00\18\AA\00\00\E5\C5\42\4B\DB\04\FE\3B\20\08\79\FE\1D\28\0D\0C\18\0A\FE\2F\20\06\79\FE\01\28\01\0D\CD\55\41\36\00\23\36\03\23\36\03\23\36\00\05\CD\55\41\3A\AD\40\FE\0C\20\0F\7E\FE\80\20\0A\3E\0D\32\AD\40\3E\05\32\AC\40\06\02\23\7E\FE\80\20\0C\3E\05\32\AC\40\D9\C1\06\14\C5\D9\00\10\EC\23\3A\AD\40\FE\0D\20\0F\7E\FE\80\20\0A\3E\0C\32\AD\40\3E\05\32\AC\40\59\C1\E1\C9\D5\C5\2A\0C\40\C5\06\00\09\C1\11\21\00\10\03\C1\D1\C9\19\18\F8\E5\2A\0C\40\23\23\23\23\7E\3C\FE\26\28\03\77\18\05\36\1C\2B\18\F2\E1\C9\C5\01\00\09\0B\78\B1\20\FB\C1\C9\24\25\1C
   5 LET DISP=PEEK 16396+256*PEEK 16397
  10 LET BEST=0
  15 CLS 
  20 PRINT "ENTER SPEED 1 TO 9 (1=FASTEST)"
  25 PRINT AT 3,6;"<=5....8=> S=SERVE"
  30 INPUT I
  40 IF I<1 OR I>9 THEN GOTO 30
  50 POKE 16773,I
  60 CLS 
  70 PRINT "\ .0000\..\..\..\..\..BRICK BUSTER\..\..\..\..\..\..\..\..\..\. "
  80 FOR F=1 TO 20
  90 PRINT AT F,0;"\ :";TAB 31;"\: "
 100 NEXT F
 110 FOR F=1 TO 7
 120 PRINT AT F,1;"\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##"
 130 NEXT F
 135 LET B=5
 136 PRINT AT 0,30;B
 140 FOR F=5 TO 25 STEP 5
 150 POKE 16556,5
 160 POKE 16518,F
 170 IF INKEY$<>"S" THEN GOTO 170
 175 LET B=B-1
 176 PRINT AT 0,30;B
 180 RAND USR 16514
 190 PRINT AT 21,0;"                               "
 200 NEXT F
 210 PRINT AT 0,10;"\..GAME  OVER\.."
 220 LET SCORE=0
 230 FOR R=1 TO 4
 240 LET SCORE=SCORE+(PEEK (DISP+R+1)-28)*10**(4-R)
 250 NEXT R
 260 IF SCORE>BEST THEN GOSUB 400
 270 PRINT AT 9,1;"      BEST SCORE IS ";BEST;AT 10,INT ((32-LEN Z$-3)/2);"BY ";Z$
 280 PRINT AT 12,4;"%P%R%E%S%S% %"%P%"% %T%O% %P%L%A%Y% %A%G%A%I%N"
 281 PRINT AT 0,10;"BRICK BUSTER"
 282 FOR Q=0 TO 30
 283 NEXT Q
 284 PRINT AT 12,4;"PRESS ""P"" TO PLAY AGAIN"
 285 PRINT AT 0,10;"\..GAME  OVER\.."
 286 FOR Q=0 TO 30
 287 NEXT Q
 290 IF INKEY$="P" THEN GOTO 15
 300 GOTO 280
 410 LET BEST=SCORE
 420 PRINT AT 2,2;"YOU NOW HAVE THE BEST SCORE"
 430 PRINT AT 4,1;"ENTER YOUR NAME (1-27 LETTERS)"
 440 INPUT Z$
 450 RETURN 
 500 SAVE "1010%0"
 510 RUN 

					
				
			



						

				


Tags


Archived Media, Downloadable, TS 1000




People


No people associated with this content.


					
				


			

			
		
	



	
 
	


	











		Scroll to Top





















			
				


		Skip to content


			

			

		

		

						

				

											

									

							

					

						
						

				The Authoritative Website
			
				
				
			
					
								
																								

															
												
					
								
			
	
 

		

		

									

													

										

							

					

						
						

				The Authoritative Website
			
				
				
			
					
									
																									

										

						

				
					Main Menu
					
											
									
			
					
									
											
						
	
				

						

			
		
				

			
Log in
		
				

			

				
Sign up
			Sign up
		
					
			
		

			

		

							

				

                                
                                    Home
                                
                                
                             » 
                                    Computer Media
                                    
                                 » 
                                    Brick Buster
                                    
                                
					
				

	

	

		
		
	




	


		
					

				



	
	


	
	
		


			
			
Brick Buster
			
		


	
	
	


							

				

  
Download
  





Date: 198x
Type: Program
Platform(s): TS 1000


					
				
		
		
							

				

  
      
  










Content



  







Appears On


Timex Sinclair Public Domain Library Tape 1002
Assembled by Tim Ward from many sources. Contains programs 10051 – 10121.







Related Products









Related Articles









Related Content









Image Gallery




  
    






Source Code



 
   0 REM \11\10\16\01\0A\16\78\FE\02\20\07\3E\04\32\AC\40\18\03\FE\18\C8\79\FE\02\20\07\3E\0C\32\AD\40\18\09\FE\1F\20\05\3E\0D\32\AD\40\05\0D\CD\55\41\7E\FE\08\20\16\CD\6A\41\3A\AC\40\FE\05\20\07\3E\04\32\AC\40\18\05\3E\05\32\AC\40\36\80\CD\E0\40\CD\82\41\CD\E0\40\CD\82\41\36\00\18\AA\00\00\E5\C5\42\4B\DB\04\FE\3B\20\08\79\FE\1D\28\0D\0C\18\0A\FE\2F\20\06\79\FE\01\28\01\0D\CD\55\41\36\00\23\36\03\23\36\03\23\36\00\05\CD\55\41\3A\AD\40\FE\0C\20\0F\7E\FE\80\20\0A\3E\0D\32\AD\40\3E\05\32\AC\40\06\02\23\7E\FE\80\20\0C\3E\05\32\AC\40\D9\C1\06\14\C5\D9\00\10\EC\23\3A\AD\40\FE\0D\20\0F\7E\FE\80\20\0A\3E\0C\32\AD\40\3E\05\32\AC\40\59\C1\E1\C9\D5\C5\2A\0C\40\C5\06\00\09\C1\11\21\00\10\03\C1\D1\C9\19\18\F8\E5\2A\0C\40\23\23\23\23\7E\3C\FE\26\28\03\77\18\05\36\1C\2B\18\F2\E1\C9\C5\01\00\09\0B\78\B1\20\FB\C1\C9\24\25\1C
   5 LET DISP=PEEK 16396+256*PEEK 16397
  10 LET BEST=0
  15 CLS 
  20 PRINT "ENTER SPEED 1 TO 9 (1=FASTEST)"
  25 PRINT AT 3,6;"<=5....8=> S=SERVE"
  30 INPUT I
  40 IF I<1 OR I>9 THEN GOTO 30
  50 POKE 16773,I
  60 CLS 
  70 PRINT "\ .0000\..\..\..\..\..BRICK BUSTER\..\..\..\..\..\..\..\..\..\. "
  80 FOR F=1 TO 20
  90 PRINT AT F,0;"\ :";TAB 31;"\: "
 100 NEXT F
 110 FOR F=1 TO 7
 120 PRINT AT F,1;"\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##"
 130 NEXT F
 135 LET B=5
 136 PRINT AT 0,30;B
 140 FOR F=5 TO 25 STEP 5
 150 POKE 16556,5
 160 POKE 16518,F
 170 IF INKEY$<>"S" THEN GOTO 170
 175 LET B=B-1
 176 PRINT AT 0,30;B
 180 RAND USR 16514
 190 PRINT AT 21,0;"                               "
 200 NEXT F
 210 PRINT AT 0,10;"\..GAME  OVER\.."
 220 LET SCORE=0
 230 FOR R=1 TO 4
 240 LET SCORE=SCORE+(PEEK (DISP+R+1)-28)*10**(4-R)
 250 NEXT R
 260 IF SCORE>BEST THEN GOSUB 400
 270 PRINT AT 9,1;"      BEST SCORE IS ";BEST;AT 10,INT ((32-LEN Z$-3)/2);"BY ";Z$
 280 PRINT AT 12,4;"%P%R%E%S%S% %"%P%"% %T%O% %P%L%A%Y% %A%G%A%I%N"
 281 PRINT AT 0,10;"BRICK BUSTER"
 282 FOR Q=0 TO 30
 283 NEXT Q
 284 PRINT AT 12,4;"PRESS ""P"" TO PLAY AGAIN"
 285 PRINT AT 0,10;"\..GAME  OVER\.."
 286 FOR Q=0 TO 30
 287 NEXT Q
 290 IF INKEY$="P" THEN GOTO 15
 300 GOTO 280
 410 LET BEST=SCORE
 420 PRINT AT 2,2;"YOU NOW HAVE THE BEST SCORE"
 430 PRINT AT 4,1;"ENTER YOUR NAME (1-27 LETTERS)"
 440 INPUT Z$
 450 RETURN 
 500 SAVE "1010%0"
 510 RUN 

					
				
			



						

				


Tags


Archived Media, Downloadable, TS 1000




People


No people associated with this content.


					
				


			

			
		
	



	
 
	


	











		Scroll to Top





















			
				\E5\C5B\DB\FEB\FE itemtype='https://schema.org/Blog' itemscope='itemscope' class="wp-singular computer_media-template-default single single-computer_media postid-57151 wp-custom-logo wp-theme-astra wp-child-theme-astra-child ast-desktop ast-separate-container ast-left-sidebar astra-4.11.3 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.11.2"D


		Skip to content


			

			

		

		

						

				

											

									

							

					

						
						

				The Authoritative Website
			
				
				
			
					
								
																								

															
												
					
								
			
	
 

		

		

									

													

										

							

					

						
						

				The Authoritative Website
			
				
				
			
					
									
																									

										

						

				
					Main Menu
					
											
									
			
					
									
											
						
	
				

						

			
		
				

			
Log in
		
				

			

				
Sign up
			Sign up
		
					
			
		

			

		

							

				

                                
                                    Home
                                
                                
                             » 
                                    Computer Media
                                    
                                 » 
                                    Brick Buster
                                    
                                
					
				

	

	

		
		
	




	


		
					

				



	
	


	
	
		


			
			
Brick Buster
			
		


	
	
	


							

				

  
Download
  





Date: 198x
Type: Program
Platform(s): TS 1000


					
				
		
		
							

				

  
      
  










Content



  







Appears On


Timex Sinclair Public Domain Library Tape 1002
Assembled by Tim Ward from many sources. Contains programs 10051 – 10121.







Related Products









Related Articles









Related Content









Image Gallery




  
    






Source Code



 
   0 REM \11\10\16\01\0A\16\78\FE\02\20\07\3E\04\32\AC\40\18\03\FE\18\C8\79\FE\02\20\07\3E\0C\32\AD\40\18\09\FE\1F\20\05\3E\0D\32\AD\40\05\0D\CD\55\41\7E\FE\08\20\16\CD\6A\41\3A\AC\40\FE\05\20\07\3E\04\32\AC\40\18\05\3E\05\32\AC\40\36\80\CD\E0\40\CD\82\41\CD\E0\40\CD\82\41\36\00\18\AA\00\00\E5\C5\42\4B\DB\04\FE\3B\20\08\79\FE\1D\28\0D\0C\18\0A\FE\2F\20\06\79\FE\01\28\01\0D\CD\55\41\36\00\23\36\03\23\36\03\23\36\00\05\CD\55\41\3A\AD\40\FE\0C\20\0F\7E\FE\80\20\0A\3E\0D\32\AD\40\3E\05\32\AC\40\06\02\23\7E\FE\80\20\0C\3E\05\32\AC\40\D9\C1\06\14\C5\D9\00\10\EC\23\3A\AD\40\FE\0D\20\0F\7E\FE\80\20\0A\3E\0C\32\AD\40\3E\05\32\AC\40\59\C1\E1\C9\D5\C5\2A\0C\40\C5\06\00\09\C1\11\21\00\10\03\C1\D1\C9\19\18\F8\E5\2A\0C\40\23\23\23\23\7E\3C\FE\26\28\03\77\18\05\36\1C\2B\18\F2\E1\C9\C5\01\00\09\0B\78\B1\20\FB\C1\C9\24\25\1C
   5 LET DISP=PEEK 16396+256*PEEK 16397
  10 LET BEST=0
  15 CLS 
  20 PRINT "ENTER SPEED 1 TO 9 (1=FASTEST)"
  25 PRINT AT 3,6;"<=5....8=> S=SERVE"
  30 INPUT I
  40 IF I<1 OR I>9 THEN GOTO 30
  50 POKE 16773,I
  60 CLS 
  70 PRINT "\ .0000\..\..\..\..\..BRICK BUSTER\..\..\..\..\..\..\..\..\..\. "
  80 FOR F=1 TO 20
  90 PRINT AT F,0;"\ :";TAB 31;"\: "
 100 NEXT F
 110 FOR F=1 TO 7
 120 PRINT AT F,1;"\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##"
 130 NEXT F
 135 LET B=5
 136 PRINT AT 0,30;B
 140 FOR F=5 TO 25 STEP 5
 150 POKE 16556,5
 160 POKE 16518,F
 170 IF INKEY$<>"S" THEN GOTO 170
 175 LET B=B-1
 176 PRINT AT 0,30;B
 180 RAND USR 16514
 190 PRINT AT 21,0;"                               "
 200 NEXT F
 210 PRINT AT 0,10;"\..GAME  OVER\.."
 220 LET SCORE=0
 230 FOR R=1 TO 4
 240 LET SCORE=SCORE+(PEEK (DISP+R+1)-28)*10**(4-R)
 250 NEXT R
 260 IF SCORE>BEST THEN GOSUB 400
 270 PRINT AT 9,1;"      BEST SCORE IS ";BEST;AT 10,INT ((32-LEN Z$-3)/2);"BY ";Z$
 280 PRINT AT 12,4;"%P%R%E%S%S% %"%P%"% %T%O% %P%L%A%Y% %A%G%A%I%N"
 281 PRINT AT 0,10;"BRICK BUSTER"
 282 FOR Q=0 TO 30
 283 NEXT Q
 284 PRINT AT 12,4;"PRESS ""P"" TO PLAY AGAIN"
 285 PRINT AT 0,10;"\..GAME  OVER\.."
 286 FOR Q=0 TO 30
 287 NEXT Q
 290 IF INKEY$="P" THEN GOTO 15
 300 GOTO 280
 410 LET BEST=SCORE
 420 PRINT AT 2,2;"YOU NOW HAVE THE BEST SCORE"
 430 PRINT AT 4,1;"ENTER YOUR NAME (1-27 LETTERS)"
 440 INPUT Z$
 450 RETURN 
 500 SAVE "1010%0"
 510 RUN 

					
				
			



						

				


Tags


Archived Media, Downloadable, TS 1000




People


No people associated with this content.


					
				


			

			
		
	



	
 
	


	











		Scroll to Top





















			
				D


		Skip to content


			

			

		

		

						

				

											

									

							

					

						
						

				The Authoritative Website
			
				
				
			
					
								
																								

															
												
					
								
			
	
 

		

		

									

													

										

							

					

						
						

				The Authoritative Website
			
				
				
			
					
									
																									

										

						

				
					Main Menu
					
											
									
			
					
									
											
						
	
				

						

			
		
				

			
Log in
		
				

			

				
Sign up
			Sign up
		
					
			
		

			

		

							

				

                                
                                    Home
                                
                                
                             » 
                                    Computer Media
                                    
                                 » 
                                    Brick Buster
                                    
                                
					
				

	

	

		
		
	




	


		
					

				



	
	


	
	
		


			
			
Brick Buster
			
		


	
	
	


							

				

  
Download
  





Date: 198x
Type: Program
Platform(s): TS 1000


					
				
		
		
							

				

  
      
  










Content



  







Appears On


Timex Sinclair Public Domain Library Tape 1002
Assembled by Tim Ward from many sources. Contains programs 10051 – 10121.







Related Products









Related Articles









Related Content









Image Gallery




  
    






Source Code



 
   0 REM \11\10\16\01\0A\16\78\FE\02\20\07\3E\04\32\AC\40\18\03\FE\18\C8\79\FE\02\20\07\3E\0C\32\AD\40\18\09\FE\1F\20\05\3E\0D\32\AD\40\05\0D\CD\55\41\7E\FE\08\20\16\CD\6A\41\3A\AC\40\FE\05\20\07\3E\04\32\AC\40\18\05\3E\05\32\AC\40\36\80\CD\E0\40\CD\82\41\CD\E0\40\CD\82\41\36\00\18\AA\00\00\E5\C5\42\4B\DB\04\FE\3B\20\08\79\FE\1D\28\0D\0C\18\0A\FE\2F\20\06\79\FE\01\28\01\0D\CD\55\41\36\00\23\36\03\23\36\03\23\36\00\05\CD\55\41\3A\AD\40\FE\0C\20\0F\7E\FE\80\20\0A\3E\0D\32\AD\40\3E\05\32\AC\40\06\02\23\7E\FE\80\20\0C\3E\05\32\AC\40\D9\C1\06\14\C5\D9\00\10\EC\23\3A\AD\40\FE\0D\20\0F\7E\FE\80\20\0A\3E\0C\32\AD\40\3E\05\32\AC\40\59\C1\E1\C9\D5\C5\2A\0C\40\C5\06\00\09\C1\11\21\00\10\03\C1\D1\C9\19\18\F8\E5\2A\0C\40\23\23\23\23\7E\3C\FE\26\28\03\77\18\05\36\1C\2B\18\F2\E1\C9\C5\01\00\09\0B\78\B1\20\FB\C1\C9\24\25\1C
   5 LET DISP=PEEK 16396+256*PEEK 16397
  10 LET BEST=0
  15 CLS 
  20 PRINT "ENTER SPEED 1 TO 9 (1=FASTEST)"
  25 PRINT AT 3,6;"<=5....8=> S=SERVE"
  30 INPUT I
  40 IF I<1 OR I>9 THEN GOTO 30
  50 POKE 16773,I
  60 CLS 
  70 PRINT "\ .0000\..\..\..\..\..BRICK BUSTER\..\..\..\..\..\..\..\..\..\. "
  80 FOR F=1 TO 20
  90 PRINT AT F,0;"\ :";TAB 31;"\: "
 100 NEXT F
 110 FOR F=1 TO 7
 120 PRINT AT F,1;"\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##"
 130 NEXT F
 135 LET B=5
 136 PRINT AT 0,30;B
 140 FOR F=5 TO 25 STEP 5
 150 POKE 16556,5
 160 POKE 16518,F
 170 IF INKEY$<>"S" THEN GOTO 170
 175 LET B=B-1
 176 PRINT AT 0,30;B
 180 RAND USR 16514
 190 PRINT AT 21,0;"                               "
 200 NEXT F
 210 PRINT AT 0,10;"\..GAME  OVER\.."
 220 LET SCORE=0
 230 FOR R=1 TO 4
 240 LET SCORE=SCORE+(PEEK (DISP+R+1)-28)*10**(4-R)
 250 NEXT R
 260 IF SCORE>BEST THEN GOSUB 400
 270 PRINT AT 9,1;"      BEST SCORE IS ";BEST;AT 10,INT ((32-LEN Z$-3)/2);"BY ";Z$
 280 PRINT AT 12,4;"%P%R%E%S%S% %"%P%"% %T%O% %P%L%A%Y% %A%G%A%I%N"
 281 PRINT AT 0,10;"BRICK BUSTER"
 282 FOR Q=0 TO 30
 283 NEXT Q
 284 PRINT AT 12,4;"PRESS ""P"" TO PLAY AGAIN"
 285 PRINT AT 0,10;"\..GAME  OVER\.."
 286 FOR Q=0 TO 30
 287 NEXT Q
 290 IF INKEY$="P" THEN GOTO 15
 300 GOTO 280
 410 LET BEST=SCORE
 420 PRINT AT 2,2;"YOU NOW HAVE THE BEST SCORE"
 430 PRINT AT 4,1;"ENTER YOUR NAME (1-27 LETTERS)"
 440 INPUT Z$
 450 RETURN 
 500 SAVE "1010%0"
 510 RUN 

					
				
			



						

				


Tags


Archived Media, Downloadable, TS 1000




People


No people associated with this content.


					
				


			

			
		
	



	
 
	


	











		Scroll to Top





















			
				C


		Skip to content


			

			

		

		

						

				

											

									

							

					

						
						

				The Authoritative Website
			
				
				
			
					
								
																								

															
												
					
								
			
	
 

		

		

									

													

										

							

					

						
						

				The Authoritative Website
			
				
				
			
					
									
																									

										

						

				
					Main Menu
					
											
									
			
					
									
											
						
	
				

						

			
		
				

			
Log in
		
				

			

				
Sign up
			Sign up
		
					
			
		

			

		

							

				

                                
                                    Home
                                
                                
                             » 
                                    Computer Media
                                    
                                 » 
                                    Brick Buster
                                    
                                
					
				

	

	

		
		
	




	


		
					

				



	
	


	
	
		


			
			
Brick Buster
			
		


	
	
	


							

				

  
Download
  





Date: 198x
Type: Program
Platform(s): TS 1000


					
				
		
		
							

				

  
      
  










Content



  







Appears On


Timex Sinclair Public Domain Library Tape 1002
Assembled by Tim Ward from many sources. Contains programs 10051 – 10121.







Related Products









Related Articles









Related Content









Image Gallery




  
    






Source Code



 
   0 REM \11\10\16\01\0A\16\78\FE\02\20\07\3E\04\32\AC\40\18\03\FE\18\C8\79\FE\02\20\07\3E\0C\32\AD\40\18\09\FE\1F\20\05\3E\0D\32\AD\40\05\0D\CD\55\41\7E\FE\08\20\16\CD\6A\41\3A\AC\40\FE\05\20\07\3E\04\32\AC\40\18\05\3E\05\32\AC\40\36\80\CD\E0\40\CD\82\41\CD\E0\40\CD\82\41\36\00\18\AA\00\00\E5\C5\42\4B\DB\04\FE\3B\20\08\79\FE\1D\28\0D\0C\18\0A\FE\2F\20\06\79\FE\01\28\01\0D\CD\55\41\36\00\23\36\03\23\36\03\23\36\00\05\CD\55\41\3A\AD\40\FE\0C\20\0F\7E\FE\80\20\0A\3E\0D\32\AD\40\3E\05\32\AC\40\06\02\23\7E\FE\80\20\0C\3E\05\32\AC\40\D9\C1\06\14\C5\D9\00\10\EC\23\3A\AD\40\FE\0D\20\0F\7E\FE\80\20\0A\3E\0C\32\AD\40\3E\05\32\AC\40\59\C1\E1\C9\D5\C5\2A\0C\40\C5\06\00\09\C1\11\21\00\10\03\C1\D1\C9\19\18\F8\E5\2A\0C\40\23\23\23\23\7E\3C\FE\26\28\03\77\18\05\36\1C\2B\18\F2\E1\C9\C5\01\00\09\0B\78\B1\20\FB\C1\C9\24\25\1C
   5 LET DISP=PEEK 16396+256*PEEK 16397
  10 LET BEST=0
  15 CLS 
  20 PRINT "ENTER SPEED 1 TO 9 (1=FASTEST)"
  25 PRINT AT 3,6;"<=5....8=> S=SERVE"
  30 INPUT I
  40 IF I<1 OR I>9 THEN GOTO 30
  50 POKE 16773,I
  60 CLS 
  70 PRINT "\ .0000\..\..\..\..\..BRICK BUSTER\..\..\..\..\..\..\..\..\..\. "
  80 FOR F=1 TO 20
  90 PRINT AT F,0;"\ :";TAB 31;"\: "
 100 NEXT F
 110 FOR F=1 TO 7
 120 PRINT AT F,1;"\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##"
 130 NEXT F
 135 LET B=5
 136 PRINT AT 0,30;B
 140 FOR F=5 TO 25 STEP 5
 150 POKE 16556,5
 160 POKE 16518,F
 170 IF INKEY$<>"S" THEN GOTO 170
 175 LET B=B-1
 176 PRINT AT 0,30;B
 180 RAND USR 16514
 190 PRINT AT 21,0;"                               "
 200 NEXT F
 210 PRINT AT 0,10;"\..GAME  OVER\.."
 220 LET SCORE=0
 230 FOR R=1 TO 4
 240 LET SCORE=SCORE+(PEEK (DISP+R+1)-28)*10**(4-R)
 250 NEXT R
 260 IF SCORE>BEST THEN GOSUB 400
 270 PRINT AT 9,1;"      BEST SCORE IS ";BEST;AT 10,INT ((32-LEN Z$-3)/2);"BY ";Z$
 280 PRINT AT 12,4;"%P%R%E%S%S% %"%P%"% %T%O% %P%L%A%Y% %A%G%A%I%N"
 281 PRINT AT 0,10;"BRICK BUSTER"
 282 FOR Q=0 TO 30
 283 NEXT Q
 284 PRINT AT 12,4;"PRESS ""P"" TO PLAY AGAIN"
 285 PRINT AT 0,10;"\..GAME  OVER\.."
 286 FOR Q=0 TO 30
 287 NEXT Q
 290 IF INKEY$="P" THEN GOTO 15
 300 GOTO 280
 410 LET BEST=SCORE
 420 PRINT AT 2,2;"YOU NOW HAVE THE BEST SCORE"
 430 PRINT AT 4,1;"ENTER YOUR NAME (1-27 LETTERS)"
 440 INPUT Z$
 450 RETURN 
 500 SAVE "1010%0"
 510 RUN 

					
				
			



						

				


Tags


Archived Media, Downloadable, TS 1000




People


No people associated with this content.


					
				


			

			
		
	



	
 
	


	











		Scroll to Top





















			
				A\FE


		Skip to content


			

			

		

		

						

				

											

									

							

					

						
						

				The Authoritative Website
			
				
				
			
					
								
																								

															
												
					
								
			
	
 

		

		

									

													

										

							

					

						
						

				The Authoritative Website
			
				
				
			
					
									
																									

										

						

				
					Main Menu
					
											
									
			
					
									
											
						
	
				

						

			
		
				

			
Log in
		
				

			

				
Sign up
			Sign up
		
					
			
		

			

		

							

				

                                
                                    Home
                                
                                
                             » 
                                    Computer Media
                                    
                                 » 
                                    Brick Buster
                                    
                                
					
				

	

	

		
		
	




	


		
					

				



	
	


	
	
		


			
			
Brick Buster
			
		


	
	
	


							

				

  
Download
  





Date: 198x
Type: Program
Platform(s): TS 1000


					
				
		
		
							

				

  
      
  










Content



  







Appears On


Timex Sinclair Public Domain Library Tape 1002
Assembled by Tim Ward from many sources. Contains programs 10051 – 10121.







Related Products









Related Articles









Related Content









Image Gallery




  
    






Source Code



 
   0 REM \11\10\16\01\0A\16\78\FE\02\20\07\3E\04\32\AC\40\18\03\FE\18\C8\79\FE\02\20\07\3E\0C\32\AD\40\18\09\FE\1F\20\05\3E\0D\32\AD\40\05\0D\CD\55\41\7E\FE\08\20\16\CD\6A\41\3A\AC\40\FE\05\20\07\3E\04\32\AC\40\18\05\3E\05\32\AC\40\36\80\CD\E0\40\CD\82\41\CD\E0\40\CD\82\41\36\00\18\AA\00\00\E5\C5\42\4B\DB\04\FE\3B\20\08\79\FE\1D\28\0D\0C\18\0A\FE\2F\20\06\79\FE\01\28\01\0D\CD\55\41\36\00\23\36\03\23\36\03\23\36\00\05\CD\55\41\3A\AD\40\FE\0C\20\0F\7E\FE\80\20\0A\3E\0D\32\AD\40\3E\05\32\AC\40\06\02\23\7E\FE\80\20\0C\3E\05\32\AC\40\D9\C1\06\14\C5\D9\00\10\EC\23\3A\AD\40\FE\0D\20\0F\7E\FE\80\20\0A\3E\0C\32\AD\40\3E\05\32\AC\40\59\C1\E1\C9\D5\C5\2A\0C\40\C5\06\00\09\C1\11\21\00\10\03\C1\D1\C9\19\18\F8\E5\2A\0C\40\23\23\23\23\7E\3C\FE\26\28\03\77\18\05\36\1C\2B\18\F2\E1\C9\C5\01\00\09\0B\78\B1\20\FB\C1\C9\24\25\1C
   5 LET DISP=PEEK 16396+256*PEEK 16397
  10 LET BEST=0
  15 CLS 
  20 PRINT "ENTER SPEED 1 TO 9 (1=FASTEST)"
  25 PRINT AT 3,6;"<=5....8=> S=SERVE"
  30 INPUT I
  40 IF I<1 OR I>9 THEN GOTO 30
  50 POKE 16773,I
  60 CLS 
  70 PRINT "\ .0000\..\..\..\..\..BRICK BUSTER\..\..\..\..\..\..\..\..\..\. "
  80 FOR F=1 TO 20
  90 PRINT AT F,0;"\ :";TAB 31;"\: "
 100 NEXT F
 110 FOR F=1 TO 7
 120 PRINT AT F,1;"\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##"
 130 NEXT F
 135 LET B=5
 136 PRINT AT 0,30;B
 140 FOR F=5 TO 25 STEP 5
 150 POKE 16556,5
 160 POKE 16518,F
 170 IF INKEY$<>"S" THEN GOTO 170
 175 LET B=B-1
 176 PRINT AT 0,30;B
 180 RAND USR 16514
 190 PRINT AT 21,0;"                               "
 200 NEXT F
 210 PRINT AT 0,10;"\..GAME  OVER\.."
 220 LET SCORE=0
 230 FOR R=1 TO 4
 240 LET SCORE=SCORE+(PEEK (DISP+R+1)-28)*10**(4-R)
 250 NEXT R
 260 IF SCORE>BEST THEN GOSUB 400
 270 PRINT AT 9,1;"      BEST SCORE IS ";BEST;AT 10,INT ((32-LEN Z$-3)/2);"BY ";Z$
 280 PRINT AT 12,4;"%P%R%E%S%S% %"%P%"% %T%O% %P%L%A%Y% %A%G%A%I%N"
 281 PRINT AT 0,10;"BRICK BUSTER"
 282 FOR Q=0 TO 30
 283 NEXT Q
 284 PRINT AT 12,4;"PRESS ""P"" TO PLAY AGAIN"
 285 PRINT AT 0,10;"\..GAME  OVER\.."
 286 FOR Q=0 TO 30
 287 NEXT Q
 290 IF INKEY$="P" THEN GOTO 15
 300 GOTO 280
 410 LET BEST=SCORE
 420 PRINT AT 2,2;"YOU NOW HAVE THE BEST SCORE"
 430 PRINT AT 4,1;"ENTER YOUR NAME (1-27 LETTERS)"
 440 INPUT Z$
 450 RETURN 
 500 SAVE "1010%0"
 510 RUN 

					
				
			



						

				


Tags


Archived Media, Downloadable, TS 1000




People


No people associated with this content.


					
				


			

			
		
	



	
 
	


	











		Scroll to Top





















			
				F\FE itemtype='https://schema.org/Blog' itemscope='itemscope' class="wp-singular computer_media-template-default single single-computer_media postid-57151 wp-custom-logo wp-theme-astra wp-child-theme-astra-child ast-desktop ast-separate-container ast-left-sidebar astra-4.11.3 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.11.2" itemtype='https://schema.org/Blog' itemscope='itemscope' class="wp-singular computer_media-template-default single single-computer_media postid-57151 wp-custom-logo wp-theme-astra wp-child-theme-astra-child ast-desktop ast-separate-container ast-left-sidebar astra-4.11.3 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.11.2"


		Skip to content


			

			

		

		

						

				

											

									

							

					

						
						

				The Authoritative Website
			
				
				
			
					
								
																								

															
												
					
								
			
	
 

		

		

									

													

										

							

					

						
						

				The Authoritative Website
			
				
				
			
					
									
																									

										

						

				
					Main Menu
					
											
									
			
					
									
											
						
	
				

						

			
		
				

			
Log in
		
				

			

				
Sign up
			Sign up
		
					
			
		

			

		

							

				

                                
                                    Home
                                
                                
                             » 
                                    Computer Media
                                    
                                 » 
                                    Brick Buster
                                    
                                
					
				

	

	

		
		
	




	


		
					

				



	
	


	
	
		


			
			
Brick Buster
			
		


	
	
	


							

				

  
Download
  





Date: 198x
Type: Program
Platform(s): TS 1000


					
				
		
		
							

				

  
      
  










Content



  







Appears On


Timex Sinclair Public Domain Library Tape 1002
Assembled by Tim Ward from many sources. Contains programs 10051 – 10121.







Related Products









Related Articles









Related Content









Image Gallery




  
    






Source Code



 
   0 REM \11\10\16\01\0A\16\78\FE\02\20\07\3E\04\32\AC\40\18\03\FE\18\C8\79\FE\02\20\07\3E\0C\32\AD\40\18\09\FE\1F\20\05\3E\0D\32\AD\40\05\0D\CD\55\41\7E\FE\08\20\16\CD\6A\41\3A\AC\40\FE\05\20\07\3E\04\32\AC\40\18\05\3E\05\32\AC\40\36\80\CD\E0\40\CD\82\41\CD\E0\40\CD\82\41\36\00\18\AA\00\00\E5\C5\42\4B\DB\04\FE\3B\20\08\79\FE\1D\28\0D\0C\18\0A\FE\2F\20\06\79\FE\01\28\01\0D\CD\55\41\36\00\23\36\03\23\36\03\23\36\00\05\CD\55\41\3A\AD\40\FE\0C\20\0F\7E\FE\80\20\0A\3E\0D\32\AD\40\3E\05\32\AC\40\06\02\23\7E\FE\80\20\0C\3E\05\32\AC\40\D9\C1\06\14\C5\D9\00\10\EC\23\3A\AD\40\FE\0D\20\0F\7E\FE\80\20\0A\3E\0C\32\AD\40\3E\05\32\AC\40\59\C1\E1\C9\D5\C5\2A\0C\40\C5\06\00\09\C1\11\21\00\10\03\C1\D1\C9\19\18\F8\E5\2A\0C\40\23\23\23\23\7E\3C\FE\26\28\03\77\18\05\36\1C\2B\18\F2\E1\C9\C5\01\00\09\0B\78\B1\20\FB\C1\C9\24\25\1C
   5 LET DISP=PEEK 16396+256*PEEK 16397
  10 LET BEST=0
  15 CLS 
  20 PRINT "ENTER SPEED 1 TO 9 (1=FASTEST)"
  25 PRINT AT 3,6;"<=5....8=> S=SERVE"
  30 INPUT I
  40 IF I<1 OR I>9 THEN GOTO 30
  50 POKE 16773,I
  60 CLS 
  70 PRINT "\ .0000\..\..\..\..\..BRICK BUSTER\..\..\..\..\..\..\..\..\..\. "
  80 FOR F=1 TO 20
  90 PRINT AT F,0;"\ :";TAB 31;"\: "
 100 NEXT F
 110 FOR F=1 TO 7
 120 PRINT AT F,1;"\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##"
 130 NEXT F
 135 LET B=5
 136 PRINT AT 0,30;B
 140 FOR F=5 TO 25 STEP 5
 150 POKE 16556,5
 160 POKE 16518,F
 170 IF INKEY$<>"S" THEN GOTO 170
 175 LET B=B-1
 176 PRINT AT 0,30;B
 180 RAND USR 16514
 190 PRINT AT 21,0;"                               "
 200 NEXT F
 210 PRINT AT 0,10;"\..GAME  OVER\.."
 220 LET SCORE=0
 230 FOR R=1 TO 4
 240 LET SCORE=SCORE+(PEEK (DISP+R+1)-28)*10**(4-R)
 250 NEXT R
 260 IF SCORE>BEST THEN GOSUB 400
 270 PRINT AT 9,1;"      BEST SCORE IS ";BEST;AT 10,INT ((32-LEN Z$-3)/2);"BY ";Z$
 280 PRINT AT 12,4;"%P%R%E%S%S% %"%P%"% %T%O% %P%L%A%Y% %A%G%A%I%N"
 281 PRINT AT 0,10;"BRICK BUSTER"
 282 FOR Q=0 TO 30
 283 NEXT Q
 284 PRINT AT 12,4;"PRESS ""P"" TO PLAY AGAIN"
 285 PRINT AT 0,10;"\..GAME  OVER\.."
 286 FOR Q=0 TO 30
 287 NEXT Q
 290 IF INKEY$="P" THEN GOTO 15
 300 GOTO 280
 410 LET BEST=SCORE
 420 PRINT AT 2,2;"YOU NOW HAVE THE BEST SCORE"
 430 PRINT AT 4,1;"ENTER YOUR NAME (1-27 LETTERS)"
 440 INPUT Z$
 450 RETURN 
 500 SAVE "1010%0"
 510 RUN 

					
				
			



						

				


Tags


Archived Media, Downloadable, TS 1000




People


No people associated with this content.


					
				


			

			
		
	



	
 
	


	











		Scroll to Top





















			
				D\CD


		Skip to content


			

			

		

		

						

				

											

									

							

					

						
						

				The Authoritative Website
			
				
				
			
					
								
																								

															
												
					
								
			
	
 

		

		

									

													

										

							

					

						
						

				The Authoritative Website
			
				
				
			
					
									
																									

										

						

				
					Main Menu
					
											
									
			
					
									
											
						
	
				

						

			
		
				

			
Log in
		
				

			

				
Sign up
			Sign up
		
					
			
		

			

		

							

				

                                
                                    Home
                                
                                
                             » 
                                    Computer Media
                                    
                                 » 
                                    Brick Buster
                                    
                                
					
				

	

	

		
		
	




	


		
					

				



	
	


	
	
		


			
			
Brick Buster
			
		


	
	
	


							

				

  
Download
  





Date: 198x
Type: Program
Platform(s): TS 1000


					
				
		
		
							

				

  
      
  










Content



  







Appears On


Timex Sinclair Public Domain Library Tape 1002
Assembled by Tim Ward from many sources. Contains programs 10051 – 10121.







Related Products









Related Articles









Related Content









Image Gallery




  
    






Source Code



 
   0 REM \11\10\16\01\0A\16\78\FE\02\20\07\3E\04\32\AC\40\18\03\FE\18\C8\79\FE\02\20\07\3E\0C\32\AD\40\18\09\FE\1F\20\05\3E\0D\32\AD\40\05\0D\CD\55\41\7E\FE\08\20\16\CD\6A\41\3A\AC\40\FE\05\20\07\3E\04\32\AC\40\18\05\3E\05\32\AC\40\36\80\CD\E0\40\CD\82\41\CD\E0\40\CD\82\41\36\00\18\AA\00\00\E5\C5\42\4B\DB\04\FE\3B\20\08\79\FE\1D\28\0D\0C\18\0A\FE\2F\20\06\79\FE\01\28\01\0D\CD\55\41\36\00\23\36\03\23\36\03\23\36\00\05\CD\55\41\3A\AD\40\FE\0C\20\0F\7E\FE\80\20\0A\3E\0D\32\AD\40\3E\05\32\AC\40\06\02\23\7E\FE\80\20\0C\3E\05\32\AC\40\D9\C1\06\14\C5\D9\00\10\EC\23\3A\AD\40\FE\0D\20\0F\7E\FE\80\20\0A\3E\0C\32\AD\40\3E\05\32\AC\40\59\C1\E1\C9\D5\C5\2A\0C\40\C5\06\00\09\C1\11\21\00\10\03\C1\D1\C9\19\18\F8\E5\2A\0C\40\23\23\23\23\7E\3C\FE\26\28\03\77\18\05\36\1C\2B\18\F2\E1\C9\C5\01\00\09\0B\78\B1\20\FB\C1\C9\24\25\1C
   5 LET DISP=PEEK 16396+256*PEEK 16397
  10 LET BEST=0
  15 CLS 
  20 PRINT "ENTER SPEED 1 TO 9 (1=FASTEST)"
  25 PRINT AT 3,6;"<=5....8=> S=SERVE"
  30 INPUT I
  40 IF I<1 OR I>9 THEN GOTO 30
  50 POKE 16773,I
  60 CLS 
  70 PRINT "\ .0000\..\..\..\..\..BRICK BUSTER\..\..\..\..\..\..\..\..\..\. "
  80 FOR F=1 TO 20
  90 PRINT AT F,0;"\ :";TAB 31;"\: "
 100 NEXT F
 110 FOR F=1 TO 7
 120 PRINT AT F,1;"\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##"
 130 NEXT F
 135 LET B=5
 136 PRINT AT 0,30;B
 140 FOR F=5 TO 25 STEP 5
 150 POKE 16556,5
 160 POKE 16518,F
 170 IF INKEY$<>"S" THEN GOTO 170
 175 LET B=B-1
 176 PRINT AT 0,30;B
 180 RAND USR 16514
 190 PRINT AT 21,0;"                               "
 200 NEXT F
 210 PRINT AT 0,10;"\..GAME  OVER\.."
 220 LET SCORE=0
 230 FOR R=1 TO 4
 240 LET SCORE=SCORE+(PEEK (DISP+R+1)-28)*10**(4-R)
 250 NEXT R
 260 IF SCORE>BEST THEN GOSUB 400
 270 PRINT AT 9,1;"      BEST SCORE IS ";BEST;AT 10,INT ((32-LEN Z$-3)/2);"BY ";Z$
 280 PRINT AT 12,4;"%P%R%E%S%S% %"%P%"% %T%O% %P%L%A%Y% %A%G%A%I%N"
 281 PRINT AT 0,10;"BRICK BUSTER"
 282 FOR Q=0 TO 30
 283 NEXT Q
 284 PRINT AT 12,4;"PRESS ""P"" TO PLAY AGAIN"
 285 PRINT AT 0,10;"\..GAME  OVER\.."
 286 FOR Q=0 TO 30
 287 NEXT Q
 290 IF INKEY$="P" THEN GOTO 15
 300 GOTO 280
 410 LET BEST=SCORE
 420 PRINT AT 2,2;"YOU NOW HAVE THE BEST SCORE"
 430 PRINT AT 4,1;"ENTER YOUR NAME (1-27 LETTERS)"
 440 INPUT Z$
 450 RETURN 
 500 SAVE "1010%0"
 510 RUN 

					
				
			



						

				


Tags


Archived Media, Downloadable, TS 1000




People


No people associated with this content.


					
				


			

			
		
	



	
 
	


	











		Scroll to Top





















			
				


		Skip to content


			

			

		

		

						

				

											

									

							

					

						
						

				The Authoritative Website
			
				
				
			
					
								
																								

															
												
					
								
			
	
 

		

		

									

													

										

							

					

						
						

				The Authoritative Website
			
				
				
			
					
									
																									

										

						

				
					Main Menu
					
											
									
			
					
									
											
						
	
				

						

			
		
				

			
Log in
		
				

			

				
Sign up
			Sign up
		
					
			
		

			

		

							

				

                                
                                    Home
                                
                                
                             » 
                                    Computer Media
                                    
                                 » 
                                    Brick Buster
                                    
                                
					
				

	

	

		
		
	




	


		
					

				



	
	


	
	
		


			
			
Brick Buster
			
		


	
	
	


							

				

  
Download
  





Date: 198x
Type: Program
Platform(s): TS 1000


					
				
		
		
							

				

  
      
  










Content



  







Appears On


Timex Sinclair Public Domain Library Tape 1002
Assembled by Tim Ward from many sources. Contains programs 10051 – 10121.







Related Products









Related Articles









Related Content









Image Gallery




  
    






Source Code



 
   0 REM \11\10\16\01\0A\16\78\FE\02\20\07\3E\04\32\AC\40\18\03\FE\18\C8\79\FE\02\20\07\3E\0C\32\AD\40\18\09\FE\1F\20\05\3E\0D\32\AD\40\05\0D\CD\55\41\7E\FE\08\20\16\CD\6A\41\3A\AC\40\FE\05\20\07\3E\04\32\AC\40\18\05\3E\05\32\AC\40\36\80\CD\E0\40\CD\82\41\CD\E0\40\CD\82\41\36\00\18\AA\00\00\E5\C5\42\4B\DB\04\FE\3B\20\08\79\FE\1D\28\0D\0C\18\0A\FE\2F\20\06\79\FE\01\28\01\0D\CD\55\41\36\00\23\36\03\23\36\03\23\36\00\05\CD\55\41\3A\AD\40\FE\0C\20\0F\7E\FE\80\20\0A\3E\0D\32\AD\40\3E\05\32\AC\40\06\02\23\7E\FE\80\20\0C\3E\05\32\AC\40\D9\C1\06\14\C5\D9\00\10\EC\23\3A\AD\40\FE\0D\20\0F\7E\FE\80\20\0A\3E\0C\32\AD\40\3E\05\32\AC\40\59\C1\E1\C9\D5\C5\2A\0C\40\C5\06\00\09\C1\11\21\00\10\03\C1\D1\C9\19\18\F8\E5\2A\0C\40\23\23\23\23\7E\3C\FE\26\28\03\77\18\05\36\1C\2B\18\F2\E1\C9\C5\01\00\09\0B\78\B1\20\FB\C1\C9\24\25\1C
   5 LET DISP=PEEK 16396+256*PEEK 16397
  10 LET BEST=0
  15 CLS 
  20 PRINT "ENTER SPEED 1 TO 9 (1=FASTEST)"
  25 PRINT AT 3,6;"<=5....8=> S=SERVE"
  30 INPUT I
  40 IF I<1 OR I>9 THEN GOTO 30
  50 POKE 16773,I
  60 CLS 
  70 PRINT "\ .0000\..\..\..\..\..BRICK BUSTER\..\..\..\..\..\..\..\..\..\. "
  80 FOR F=1 TO 20
  90 PRINT AT F,0;"\ :";TAB 31;"\: "
 100 NEXT F
 110 FOR F=1 TO 7
 120 PRINT AT F,1;"\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##"
 130 NEXT F
 135 LET B=5
 136 PRINT AT 0,30;B
 140 FOR F=5 TO 25 STEP 5
 150 POKE 16556,5
 160 POKE 16518,F
 170 IF INKEY$<>"S" THEN GOTO 170
 175 LET B=B-1
 176 PRINT AT 0,30;B
 180 RAND USR 16514
 190 PRINT AT 21,0;"                               "
 200 NEXT F
 210 PRINT AT 0,10;"\..GAME  OVER\.."
 220 LET SCORE=0
 230 FOR R=1 TO 4
 240 LET SCORE=SCORE+(PEEK (DISP+R+1)-28)*10**(4-R)
 250 NEXT R
 260 IF SCORE>BEST THEN GOSUB 400
 270 PRINT AT 9,1;"      BEST SCORE IS ";BEST;AT 10,INT ((32-LEN Z$-3)/2);"BY ";Z$
 280 PRINT AT 12,4;"%P%R%E%S%S% %"%P%"% %T%O% %P%L%A%Y% %A%G%A%I%N"
 281 PRINT AT 0,10;"BRICK BUSTER"
 282 FOR Q=0 TO 30
 283 NEXT Q
 284 PRINT AT 12,4;"PRESS ""P"" TO PLAY AGAIN"
 285 PRINT AT 0,10;"\..GAME  OVER\.."
 286 FOR Q=0 TO 30
 287 NEXT Q
 290 IF INKEY$="P" THEN GOTO 15
 300 GOTO 280
 410 LET BEST=SCORE
 420 PRINT AT 2,2;"YOU NOW HAVE THE BEST SCORE"
 430 PRINT AT 4,1;"ENTER YOUR NAME (1-27 LETTERS)"
 440 INPUT Z$
 450 RETURN 
 500 SAVE "1010%0"
 510 RUN 

					
				
			



						

				


Tags


Archived Media, Downloadable, TS 1000




People


No people associated with this content.


					
				


			

			
		
	



	
 
	


	











		Scroll to Top





















			
				\CDA\AD\FE


		Skip to content


			

			

		

		

						

				

											

									

							

					

						
						

				The Authoritative Website
			
				
				
			
					
								
																								

															
												
					
								
			
	
 

		

		

									

													

										

							

					

						
						

				The Authoritative Website
			
				
				
			
					
									
																									

										

						

				
					Main Menu
					
											
									
			
					
									
											
						
	
				

						

			
		
				

			
Log in
		
				

			

				
Sign up
			Sign up
		
					
			
		

			

		

							

				

                                
                                    Home
                                
                                
                             » 
                                    Computer Media
                                    
                                 » 
                                    Brick Buster
                                    
                                
					
				

	

	

		
		
	




	


		
					

				



	
	


	
	
		


			
			
Brick Buster
			
		


	
	
	


							

				

  
Download
  





Date: 198x
Type: Program
Platform(s): TS 1000


					
				
		
		
							

				

  
      
  










Content



  







Appears On


Timex Sinclair Public Domain Library Tape 1002
Assembled by Tim Ward from many sources. Contains programs 10051 – 10121.







Related Products









Related Articles









Related Content









Image Gallery




  
    






Source Code



 
   0 REM \11\10\16\01\0A\16\78\FE\02\20\07\3E\04\32\AC\40\18\03\FE\18\C8\79\FE\02\20\07\3E\0C\32\AD\40\18\09\FE\1F\20\05\3E\0D\32\AD\40\05\0D\CD\55\41\7E\FE\08\20\16\CD\6A\41\3A\AC\40\FE\05\20\07\3E\04\32\AC\40\18\05\3E\05\32\AC\40\36\80\CD\E0\40\CD\82\41\CD\E0\40\CD\82\41\36\00\18\AA\00\00\E5\C5\42\4B\DB\04\FE\3B\20\08\79\FE\1D\28\0D\0C\18\0A\FE\2F\20\06\79\FE\01\28\01\0D\CD\55\41\36\00\23\36\03\23\36\03\23\36\00\05\CD\55\41\3A\AD\40\FE\0C\20\0F\7E\FE\80\20\0A\3E\0D\32\AD\40\3E\05\32\AC\40\06\02\23\7E\FE\80\20\0C\3E\05\32\AC\40\D9\C1\06\14\C5\D9\00\10\EC\23\3A\AD\40\FE\0D\20\0F\7E\FE\80\20\0A\3E\0C\32\AD\40\3E\05\32\AC\40\59\C1\E1\C9\D5\C5\2A\0C\40\C5\06\00\09\C1\11\21\00\10\03\C1\D1\C9\19\18\F8\E5\2A\0C\40\23\23\23\23\7E\3C\FE\26\28\03\77\18\05\36\1C\2B\18\F2\E1\C9\C5\01\00\09\0B\78\B1\20\FB\C1\C9\24\25\1C
   5 LET DISP=PEEK 16396+256*PEEK 16397
  10 LET BEST=0
  15 CLS 
  20 PRINT "ENTER SPEED 1 TO 9 (1=FASTEST)"
  25 PRINT AT 3,6;"<=5....8=> S=SERVE"
  30 INPUT I
  40 IF I<1 OR I>9 THEN GOTO 30
  50 POKE 16773,I
  60 CLS 
  70 PRINT "\ .0000\..\..\..\..\..BRICK BUSTER\..\..\..\..\..\..\..\..\..\. "
  80 FOR F=1 TO 20
  90 PRINT AT F,0;"\ :";TAB 31;"\: "
 100 NEXT F
 110 FOR F=1 TO 7
 120 PRINT AT F,1;"\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##"
 130 NEXT F
 135 LET B=5
 136 PRINT AT 0,30;B
 140 FOR F=5 TO 25 STEP 5
 150 POKE 16556,5
 160 POKE 16518,F
 170 IF INKEY$<>"S" THEN GOTO 170
 175 LET B=B-1
 176 PRINT AT 0,30;B
 180 RAND USR 16514
 190 PRINT AT 21,0;"                               "
 200 NEXT F
 210 PRINT AT 0,10;"\..GAME  OVER\.."
 220 LET SCORE=0
 230 FOR R=1 TO 4
 240 LET SCORE=SCORE+(PEEK (DISP+R+1)-28)*10**(4-R)
 250 NEXT R
 260 IF SCORE>BEST THEN GOSUB 400
 270 PRINT AT 9,1;"      BEST SCORE IS ";BEST;AT 10,INT ((32-LEN Z$-3)/2);"BY ";Z$
 280 PRINT AT 12,4;"%P%R%E%S%S% %"%P%"% %T%O% %P%L%A%Y% %A%G%A%I%N"
 281 PRINT AT 0,10;"BRICK BUSTER"
 282 FOR Q=0 TO 30
 283 NEXT Q
 284 PRINT AT 12,4;"PRESS ""P"" TO PLAY AGAIN"
 285 PRINT AT 0,10;"\..GAME  OVER\.."
 286 FOR Q=0 TO 30
 287 NEXT Q
 290 IF INKEY$="P" THEN GOTO 15
 300 GOTO 280
 410 LET BEST=SCORE
 420 PRINT AT 2,2;"YOU NOW HAVE THE BEST SCORE"
 430 PRINT AT 4,1;"ENTER YOUR NAME (1-27 LETTERS)"
 440 INPUT Z$
 450 RETURN 
 500 SAVE "1010%0"
 510 RUN 

					
				
			



						

				


Tags


Archived Media, Downloadable, TS 1000




People


No people associated with this content.


					
				


			

			
		
	



	
 
	


	











		Scroll to Top





















			
				C


		Skip to content


			

			

		

		

						

				

											

									

							

					

						
						

				The Authoritative Website
			
				
				
			
					
								
																								

															
												
					
								
			
	
 

		

		

									

													

										

							

					

						
						

				The Authoritative Website
			
				
				
			
					
									
																									

										

						

				
					Main Menu
					
											
									
			
					
									
											
						
	
				

						

			
		
				

			
Log in
		
				

			

				
Sign up
			Sign up
		
					
			
		

			

		

							

				

                                
                                    Home
                                
                                
                             » 
                                    Computer Media
                                    
                                 » 
                                    Brick Buster
                                    
                                
					
				

	

	

		
		
	




	


		
					

				



	
	


	
	
		


			
			
Brick Buster
			
		


	
	
	


							

				

  
Download
  





Date: 198x
Type: Program
Platform(s): TS 1000


					
				
		
		
							

				

  
      
  










Content



  







Appears On


Timex Sinclair Public Domain Library Tape 1002
Assembled by Tim Ward from many sources. Contains programs 10051 – 10121.







Related Products









Related Articles









Related Content









Image Gallery




  
    






Source Code



 
   0 REM \11\10\16\01\0A\16\78\FE\02\20\07\3E\04\32\AC\40\18\03\FE\18\C8\79\FE\02\20\07\3E\0C\32\AD\40\18\09\FE\1F\20\05\3E\0D\32\AD\40\05\0D\CD\55\41\7E\FE\08\20\16\CD\6A\41\3A\AC\40\FE\05\20\07\3E\04\32\AC\40\18\05\3E\05\32\AC\40\36\80\CD\E0\40\CD\82\41\CD\E0\40\CD\82\41\36\00\18\AA\00\00\E5\C5\42\4B\DB\04\FE\3B\20\08\79\FE\1D\28\0D\0C\18\0A\FE\2F\20\06\79\FE\01\28\01\0D\CD\55\41\36\00\23\36\03\23\36\03\23\36\00\05\CD\55\41\3A\AD\40\FE\0C\20\0F\7E\FE\80\20\0A\3E\0D\32\AD\40\3E\05\32\AC\40\06\02\23\7E\FE\80\20\0C\3E\05\32\AC\40\D9\C1\06\14\C5\D9\00\10\EC\23\3A\AD\40\FE\0D\20\0F\7E\FE\80\20\0A\3E\0C\32\AD\40\3E\05\32\AC\40\59\C1\E1\C9\D5\C5\2A\0C\40\C5\06\00\09\C1\11\21\00\10\03\C1\D1\C9\19\18\F8\E5\2A\0C\40\23\23\23\23\7E\3C\FE\26\28\03\77\18\05\36\1C\2B\18\F2\E1\C9\C5\01\00\09\0B\78\B1\20\FB\C1\C9\24\25\1C
   5 LET DISP=PEEK 16396+256*PEEK 16397
  10 LET BEST=0
  15 CLS 
  20 PRINT "ENTER SPEED 1 TO 9 (1=FASTEST)"
  25 PRINT AT 3,6;"<=5....8=> S=SERVE"
  30 INPUT I
  40 IF I<1 OR I>9 THEN GOTO 30
  50 POKE 16773,I
  60 CLS 
  70 PRINT "\ .0000\..\..\..\..\..BRICK BUSTER\..\..\..\..\..\..\..\..\..\. "
  80 FOR F=1 TO 20
  90 PRINT AT F,0;"\ :";TAB 31;"\: "
 100 NEXT F
 110 FOR F=1 TO 7
 120 PRINT AT F,1;"\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##"
 130 NEXT F
 135 LET B=5
 136 PRINT AT 0,30;B
 140 FOR F=5 TO 25 STEP 5
 150 POKE 16556,5
 160 POKE 16518,F
 170 IF INKEY$<>"S" THEN GOTO 170
 175 LET B=B-1
 176 PRINT AT 0,30;B
 180 RAND USR 16514
 190 PRINT AT 21,0;"                               "
 200 NEXT F
 210 PRINT AT 0,10;"\..GAME  OVER\.."
 220 LET SCORE=0
 230 FOR R=1 TO 4
 240 LET SCORE=SCORE+(PEEK (DISP+R+1)-28)*10**(4-R)
 250 NEXT R
 260 IF SCORE>BEST THEN GOSUB 400
 270 PRINT AT 9,1;"      BEST SCORE IS ";BEST;AT 10,INT ((32-LEN Z$-3)/2);"BY ";Z$
 280 PRINT AT 12,4;"%P%R%E%S%S% %"%P%"% %T%O% %P%L%A%Y% %A%G%A%I%N"
 281 PRINT AT 0,10;"BRICK BUSTER"
 282 FOR Q=0 TO 30
 283 NEXT Q
 284 PRINT AT 12,4;"PRESS ""P"" TO PLAY AGAIN"
 285 PRINT AT 0,10;"\..GAME  OVER\.."
 286 FOR Q=0 TO 30
 287 NEXT Q
 290 IF INKEY$="P" THEN GOTO 15
 300 GOTO 280
 410 LET BEST=SCORE
 420 PRINT AT 2,2;"YOU NOW HAVE THE BEST SCORE"
 430 PRINT AT 4,1;"ENTER YOUR NAME (1-27 LETTERS)"
 440 INPUT Z$
 450 RETURN 
 500 SAVE "1010%0"
 510 RUN 

					
				
			



						

				


Tags


Archived Media, Downloadable, TS 1000




People


No people associated with this content.


					
				


			

			
		
	



	
 
	


	











		Scroll to Top





















			
				FE\FE


		Skip to content


			

			

		

		

						

				

											

									

							

					

						
						

				The Authoritative Website
			
				
				
			
					
								
																								

															
												
					
								
			
	
 

		

		

									

													

										

							

					

						
						

				The Authoritative Website
			
				
				
			
					
									
																									

										

						

				
					Main Menu
					
											
									
			
					
									
											
						
	
				

						

			
		
				

			
Log in
		
				

			

				
Sign up
			Sign up
		
					
			
		

			

		

							

				

                                
                                    Home
                                
                                
                             » 
                                    Computer Media
                                    
                                 » 
                                    Brick Buster
                                    
                                
					
				

	

	

		
		
	




	


		
					

				



	
	


	
	
		


			
			
Brick Buster
			
		


	
	
	


							

				

  
Download
  





Date: 198x
Type: Program
Platform(s): TS 1000


					
				
		
		
							

				

  
      
  










Content



  







Appears On


Timex Sinclair Public Domain Library Tape 1002
Assembled by Tim Ward from many sources. Contains programs 10051 – 10121.







Related Products









Related Articles









Related Content









Image Gallery




  
    






Source Code



 
   0 REM \11\10\16\01\0A\16\78\FE\02\20\07\3E\04\32\AC\40\18\03\FE\18\C8\79\FE\02\20\07\3E\0C\32\AD\40\18\09\FE\1F\20\05\3E\0D\32\AD\40\05\0D\CD\55\41\7E\FE\08\20\16\CD\6A\41\3A\AC\40\FE\05\20\07\3E\04\32\AC\40\18\05\3E\05\32\AC\40\36\80\CD\E0\40\CD\82\41\CD\E0\40\CD\82\41\36\00\18\AA\00\00\E5\C5\42\4B\DB\04\FE\3B\20\08\79\FE\1D\28\0D\0C\18\0A\FE\2F\20\06\79\FE\01\28\01\0D\CD\55\41\36\00\23\36\03\23\36\03\23\36\00\05\CD\55\41\3A\AD\40\FE\0C\20\0F\7E\FE\80\20\0A\3E\0D\32\AD\40\3E\05\32\AC\40\06\02\23\7E\FE\80\20\0C\3E\05\32\AC\40\D9\C1\06\14\C5\D9\00\10\EC\23\3A\AD\40\FE\0D\20\0F\7E\FE\80\20\0A\3E\0C\32\AD\40\3E\05\32\AC\40\59\C1\E1\C9\D5\C5\2A\0C\40\C5\06\00\09\C1\11\21\00\10\03\C1\D1\C9\19\18\F8\E5\2A\0C\40\23\23\23\23\7E\3C\FE\26\28\03\77\18\05\36\1C\2B\18\F2\E1\C9\C5\01\00\09\0B\78\B1\20\FB\C1\C9\24\25\1C
   5 LET DISP=PEEK 16396+256*PEEK 16397
  10 LET BEST=0
  15 CLS 
  20 PRINT "ENTER SPEED 1 TO 9 (1=FASTEST)"
  25 PRINT AT 3,6;"<=5....8=> S=SERVE"
  30 INPUT I
  40 IF I<1 OR I>9 THEN GOTO 30
  50 POKE 16773,I
  60 CLS 
  70 PRINT "\ .0000\..\..\..\..\..BRICK BUSTER\..\..\..\..\..\..\..\..\..\. "
  80 FOR F=1 TO 20
  90 PRINT AT F,0;"\ :";TAB 31;"\: "
 100 NEXT F
 110 FOR F=1 TO 7
 120 PRINT AT F,1;"\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##"
 130 NEXT F
 135 LET B=5
 136 PRINT AT 0,30;B
 140 FOR F=5 TO 25 STEP 5
 150 POKE 16556,5
 160 POKE 16518,F
 170 IF INKEY$<>"S" THEN GOTO 170
 175 LET B=B-1
 176 PRINT AT 0,30;B
 180 RAND USR 16514
 190 PRINT AT 21,0;"                               "
 200 NEXT F
 210 PRINT AT 0,10;"\..GAME  OVER\.."
 220 LET SCORE=0
 230 FOR R=1 TO 4
 240 LET SCORE=SCORE+(PEEK (DISP+R+1)-28)*10**(4-R)
 250 NEXT R
 260 IF SCORE>BEST THEN GOSUB 400
 270 PRINT AT 9,1;"      BEST SCORE IS ";BEST;AT 10,INT ((32-LEN Z$-3)/2);"BY ";Z$
 280 PRINT AT 12,4;"%P%R%E%S%S% %"%P%"% %T%O% %P%L%A%Y% %A%G%A%I%N"
 281 PRINT AT 0,10;"BRICK BUSTER"
 282 FOR Q=0 TO 30
 283 NEXT Q
 284 PRINT AT 12,4;"PRESS ""P"" TO PLAY AGAIN"
 285 PRINT AT 0,10;"\..GAME  OVER\.."
 286 FOR Q=0 TO 30
 287 NEXT Q
 290 IF INKEY$="P" THEN GOTO 15
 300 GOTO 280
 410 LET BEST=SCORE
 420 PRINT AT 2,2;"YOU NOW HAVE THE BEST SCORE"
 430 PRINT AT 4,1;"ENTER YOUR NAME (1-27 LETTERS)"
 440 INPUT Z$
 450 RETURN 
 500 SAVE "1010%0"
 510 RUN 

					
				
			



						

				


Tags


Archived Media, Downloadable, TS 1000




People


No people associated with this content.


					
				


			

			
		
	



	
 
	


	











		Scroll to Top





















			
				AE


		Skip to content


			

			

		

		

						

				

											

									

							

					

						
						

				The Authoritative Website
			
				
				
			
					
								
																								

															
												
					
								
			
	
 

		

		

									

													

										

							

					

						
						

				The Authoritative Website
			
				
				
			
					
									
																									

										

						

				
					Main Menu
					
											
									
			
					
									
											
						
	
				

						

			
		
				

			
Log in
		
				

			

				
Sign up
			Sign up
		
					
			
		

			

		

							

				

                                
                                    Home
                                
                                
                             » 
                                    Computer Media
                                    
                                 » 
                                    Brick Buster
                                    
                                
					
				

	

	

		
		
	




	


		
					

				



	
	


	
	
		


			
			
Brick Buster
			
		


	
	
	


							

				

  
Download
  





Date: 198x
Type: Program
Platform(s): TS 1000


					
				
		
		
							

				

  
      
  










Content



  







Appears On


Timex Sinclair Public Domain Library Tape 1002
Assembled by Tim Ward from many sources. Contains programs 10051 – 10121.







Related Products









Related Articles









Related Content









Image Gallery




  
    






Source Code



 
   0 REM \11\10\16\01\0A\16\78\FE\02\20\07\3E\04\32\AC\40\18\03\FE\18\C8\79\FE\02\20\07\3E\0C\32\AD\40\18\09\FE\1F\20\05\3E\0D\32\AD\40\05\0D\CD\55\41\7E\FE\08\20\16\CD\6A\41\3A\AC\40\FE\05\20\07\3E\04\32\AC\40\18\05\3E\05\32\AC\40\36\80\CD\E0\40\CD\82\41\CD\E0\40\CD\82\41\36\00\18\AA\00\00\E5\C5\42\4B\DB\04\FE\3B\20\08\79\FE\1D\28\0D\0C\18\0A\FE\2F\20\06\79\FE\01\28\01\0D\CD\55\41\36\00\23\36\03\23\36\03\23\36\00\05\CD\55\41\3A\AD\40\FE\0C\20\0F\7E\FE\80\20\0A\3E\0D\32\AD\40\3E\05\32\AC\40\06\02\23\7E\FE\80\20\0C\3E\05\32\AC\40\D9\C1\06\14\C5\D9\00\10\EC\23\3A\AD\40\FE\0D\20\0F\7E\FE\80\20\0A\3E\0C\32\AD\40\3E\05\32\AC\40\59\C1\E1\C9\D5\C5\2A\0C\40\C5\06\00\09\C1\11\21\00\10\03\C1\D1\C9\19\18\F8\E5\2A\0C\40\23\23\23\23\7E\3C\FE\26\28\03\77\18\05\36\1C\2B\18\F2\E1\C9\C5\01\00\09\0B\78\B1\20\FB\C1\C9\24\25\1C
   5 LET DISP=PEEK 16396+256*PEEK 16397
  10 LET BEST=0
  15 CLS 
  20 PRINT "ENTER SPEED 1 TO 9 (1=FASTEST)"
  25 PRINT AT 3,6;"<=5....8=> S=SERVE"
  30 INPUT I
  40 IF I<1 OR I>9 THEN GOTO 30
  50 POKE 16773,I
  60 CLS 
  70 PRINT "\ .0000\..\..\..\..\..BRICK BUSTER\..\..\..\..\..\..\..\..\..\. "
  80 FOR F=1 TO 20
  90 PRINT AT F,0;"\ :";TAB 31;"\: "
 100 NEXT F
 110 FOR F=1 TO 7
 120 PRINT AT F,1;"\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##"
 130 NEXT F
 135 LET B=5
 136 PRINT AT 0,30;B
 140 FOR F=5 TO 25 STEP 5
 150 POKE 16556,5
 160 POKE 16518,F
 170 IF INKEY$<>"S" THEN GOTO 170
 175 LET B=B-1
 176 PRINT AT 0,30;B
 180 RAND USR 16514
 190 PRINT AT 21,0;"                               "
 200 NEXT F
 210 PRINT AT 0,10;"\..GAME  OVER\.."
 220 LET SCORE=0
 230 FOR R=1 TO 4
 240 LET SCORE=SCORE+(PEEK (DISP+R+1)-28)*10**(4-R)
 250 NEXT R
 260 IF SCORE>BEST THEN GOSUB 400
 270 PRINT AT 9,1;"      BEST SCORE IS ";BEST;AT 10,INT ((32-LEN Z$-3)/2);"BY ";Z$
 280 PRINT AT 12,4;"%P%R%E%S%S% %"%P%"% %T%O% %P%L%A%Y% %A%G%A%I%N"
 281 PRINT AT 0,10;"BRICK BUSTER"
 282 FOR Q=0 TO 30
 283 NEXT Q
 284 PRINT AT 12,4;"PRESS ""P"" TO PLAY AGAIN"
 285 PRINT AT 0,10;"\..GAME  OVER\.."
 286 FOR Q=0 TO 30
 287 NEXT Q
 290 IF INKEY$="P" THEN GOTO 15
 300 GOTO 280
 410 LET BEST=SCORE
 420 PRINT AT 2,2;"YOU NOW HAVE THE BEST SCORE"
 430 PRINT AT 4,1;"ENTER YOUR NAME (1-27 LETTERS)"
 440 INPUT Z$
 450 RETURN 
 500 SAVE "1010%0"
 510 RUN 

					
				
			



						

				


Tags


Archived Media, Downloadable, TS 1000




People


No people associated with this content.


					
				


			

			
		
	



	
 
	


	











		Scroll to Top





















			
				D\ADE\AC


		Skip to content


			

			

		

		

						

				

											

									

							

					

						
						

				The Authoritative Website
			
				
				
			
					
								
																								

															
												
					
								
			
	
 

		

		

									

													

										

							

					

						
						

				The Authoritative Website
			
				
				
			
					
									
																									

										

						

				
					Main Menu
					
											
									
			
					
									
											
						
	
				

						

			
		
				

			
Log in
		
				

			

				
Sign up
			Sign up
		
					
			
		

			

		

							

				

                                
                                    Home
                                
                                
                             » 
                                    Computer Media
                                    
                                 » 
                                    Brick Buster
                                    
                                
					
				

	

	

		
		
	




	


		
					

				



	
	


	
	
		


			
			
Brick Buster
			
		


	
	
	


							

				

  
Download
  





Date: 198x
Type: Program
Platform(s): TS 1000


					
				
		
		
							

				

  
      
  










Content



  







Appears On


Timex Sinclair Public Domain Library Tape 1002
Assembled by Tim Ward from many sources. Contains programs 10051 – 10121.







Related Products









Related Articles









Related Content









Image Gallery




  
    






Source Code



 
   0 REM \11\10\16\01\0A\16\78\FE\02\20\07\3E\04\32\AC\40\18\03\FE\18\C8\79\FE\02\20\07\3E\0C\32\AD\40\18\09\FE\1F\20\05\3E\0D\32\AD\40\05\0D\CD\55\41\7E\FE\08\20\16\CD\6A\41\3A\AC\40\FE\05\20\07\3E\04\32\AC\40\18\05\3E\05\32\AC\40\36\80\CD\E0\40\CD\82\41\CD\E0\40\CD\82\41\36\00\18\AA\00\00\E5\C5\42\4B\DB\04\FE\3B\20\08\79\FE\1D\28\0D\0C\18\0A\FE\2F\20\06\79\FE\01\28\01\0D\CD\55\41\36\00\23\36\03\23\36\03\23\36\00\05\CD\55\41\3A\AD\40\FE\0C\20\0F\7E\FE\80\20\0A\3E\0D\32\AD\40\3E\05\32\AC\40\06\02\23\7E\FE\80\20\0C\3E\05\32\AC\40\D9\C1\06\14\C5\D9\00\10\EC\23\3A\AD\40\FE\0D\20\0F\7E\FE\80\20\0A\3E\0C\32\AD\40\3E\05\32\AC\40\59\C1\E1\C9\D5\C5\2A\0C\40\C5\06\00\09\C1\11\21\00\10\03\C1\D1\C9\19\18\F8\E5\2A\0C\40\23\23\23\23\7E\3C\FE\26\28\03\77\18\05\36\1C\2B\18\F2\E1\C9\C5\01\00\09\0B\78\B1\20\FB\C1\C9\24\25\1C
   5 LET DISP=PEEK 16396+256*PEEK 16397
  10 LET BEST=0
  15 CLS 
  20 PRINT "ENTER SPEED 1 TO 9 (1=FASTEST)"
  25 PRINT AT 3,6;"<=5....8=> S=SERVE"
  30 INPUT I
  40 IF I<1 OR I>9 THEN GOTO 30
  50 POKE 16773,I
  60 CLS 
  70 PRINT "\ .0000\..\..\..\..\..BRICK BUSTER\..\..\..\..\..\..\..\..\..\. "
  80 FOR F=1 TO 20
  90 PRINT AT F,0;"\ :";TAB 31;"\: "
 100 NEXT F
 110 FOR F=1 TO 7
 120 PRINT AT F,1;"\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##"
 130 NEXT F
 135 LET B=5
 136 PRINT AT 0,30;B
 140 FOR F=5 TO 25 STEP 5
 150 POKE 16556,5
 160 POKE 16518,F
 170 IF INKEY$<>"S" THEN GOTO 170
 175 LET B=B-1
 176 PRINT AT 0,30;B
 180 RAND USR 16514
 190 PRINT AT 21,0;"                               "
 200 NEXT F
 210 PRINT AT 0,10;"\..GAME  OVER\.."
 220 LET SCORE=0
 230 FOR R=1 TO 4
 240 LET SCORE=SCORE+(PEEK (DISP+R+1)-28)*10**(4-R)
 250 NEXT R
 260 IF SCORE>BEST THEN GOSUB 400
 270 PRINT AT 9,1;"      BEST SCORE IS ";BEST;AT 10,INT ((32-LEN Z$-3)/2);"BY ";Z$
 280 PRINT AT 12,4;"%P%R%E%S%S% %"%P%"% %T%O% %P%L%A%Y% %A%G%A%I%N"
 281 PRINT AT 0,10;"BRICK BUSTER"
 282 FOR Q=0 TO 30
 283 NEXT Q
 284 PRINT AT 12,4;"PRESS ""P"" TO PLAY AGAIN"
 285 PRINT AT 0,10;"\..GAME  OVER\.."
 286 FOR Q=0 TO 30
 287 NEXT Q
 290 IF INKEY$="P" THEN GOTO 15
 300 GOTO 280
 410 LET BEST=SCORE
 420 PRINT AT 2,2;"YOU NOW HAVE THE BEST SCORE"
 430 PRINT AT 4,1;"ENTER YOUR NAME (1-27 LETTERS)"
 440 INPUT Z$
 450 RETURN 
 500 SAVE "1010%0"
 510 RUN 

					
				
			



						

				


Tags


Archived Media, Downloadable, TS 1000




People


No people associated with this content.


					
				


			

			
		
	



	
 
	


	











		Scroll to Top





















			
				E\FE


		Skip to content


			

			

		

		

						

				

											

									

							

					

						
						

				The Authoritative Website
			
				
				
			
					
								
																								

															
												
					
								
			
	
 

		

		

									

													

										

							

					

						
						

				The Authoritative Website
			
				
				
			
					
									
																									

										

						

				
					Main Menu
					
											
									
			
					
									
											
						
	
				

						

			
		
				

			
Log in
		
				

			

				
Sign up
			Sign up
		
					
			
		

			

		

							

				

                                
                                    Home
                                
                                
                             » 
                                    Computer Media
                                    
                                 » 
                                    Brick Buster
                                    
                                
					
				

	

	

		
		
	




	


		
					

				



	
	


	
	
		


			
			
Brick Buster
			
		


	
	
	


							

				

  
Download
  





Date: 198x
Type: Program
Platform(s): TS 1000


					
				
		
		
							

				

  
      
  










Content



  







Appears On


Timex Sinclair Public Domain Library Tape 1002
Assembled by Tim Ward from many sources. Contains programs 10051 – 10121.







Related Products









Related Articles









Related Content









Image Gallery




  
    






Source Code



 
   0 REM \11\10\16\01\0A\16\78\FE\02\20\07\3E\04\32\AC\40\18\03\FE\18\C8\79\FE\02\20\07\3E\0C\32\AD\40\18\09\FE\1F\20\05\3E\0D\32\AD\40\05\0D\CD\55\41\7E\FE\08\20\16\CD\6A\41\3A\AC\40\FE\05\20\07\3E\04\32\AC\40\18\05\3E\05\32\AC\40\36\80\CD\E0\40\CD\82\41\CD\E0\40\CD\82\41\36\00\18\AA\00\00\E5\C5\42\4B\DB\04\FE\3B\20\08\79\FE\1D\28\0D\0C\18\0A\FE\2F\20\06\79\FE\01\28\01\0D\CD\55\41\36\00\23\36\03\23\36\03\23\36\00\05\CD\55\41\3A\AD\40\FE\0C\20\0F\7E\FE\80\20\0A\3E\0D\32\AD\40\3E\05\32\AC\40\06\02\23\7E\FE\80\20\0C\3E\05\32\AC\40\D9\C1\06\14\C5\D9\00\10\EC\23\3A\AD\40\FE\0D\20\0F\7E\FE\80\20\0A\3E\0C\32\AD\40\3E\05\32\AC\40\59\C1\E1\C9\D5\C5\2A\0C\40\C5\06\00\09\C1\11\21\00\10\03\C1\D1\C9\19\18\F8\E5\2A\0C\40\23\23\23\23\7E\3C\FE\26\28\03\77\18\05\36\1C\2B\18\F2\E1\C9\C5\01\00\09\0B\78\B1\20\FB\C1\C9\24\25\1C
   5 LET DISP=PEEK 16396+256*PEEK 16397
  10 LET BEST=0
  15 CLS 
  20 PRINT "ENTER SPEED 1 TO 9 (1=FASTEST)"
  25 PRINT AT 3,6;"<=5....8=> S=SERVE"
  30 INPUT I
  40 IF I<1 OR I>9 THEN GOTO 30
  50 POKE 16773,I
  60 CLS 
  70 PRINT "\ .0000\..\..\..\..\..BRICK BUSTER\..\..\..\..\..\..\..\..\..\. "
  80 FOR F=1 TO 20
  90 PRINT AT F,0;"\ :";TAB 31;"\: "
 100 NEXT F
 110 FOR F=1 TO 7
 120 PRINT AT F,1;"\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##"
 130 NEXT F
 135 LET B=5
 136 PRINT AT 0,30;B
 140 FOR F=5 TO 25 STEP 5
 150 POKE 16556,5
 160 POKE 16518,F
 170 IF INKEY$<>"S" THEN GOTO 170
 175 LET B=B-1
 176 PRINT AT 0,30;B
 180 RAND USR 16514
 190 PRINT AT 21,0;"                               "
 200 NEXT F
 210 PRINT AT 0,10;"\..GAME  OVER\.."
 220 LET SCORE=0
 230 FOR R=1 TO 4
 240 LET SCORE=SCORE+(PEEK (DISP+R+1)-28)*10**(4-R)
 250 NEXT R
 260 IF SCORE>BEST THEN GOSUB 400
 270 PRINT AT 9,1;"      BEST SCORE IS ";BEST;AT 10,INT ((32-LEN Z$-3)/2);"BY ";Z$
 280 PRINT AT 12,4;"%P%R%E%S%S% %"%P%"% %T%O% %P%L%A%Y% %A%G%A%I%N"
 281 PRINT AT 0,10;"BRICK BUSTER"
 282 FOR Q=0 TO 30
 283 NEXT Q
 284 PRINT AT 12,4;"PRESS ""P"" TO PLAY AGAIN"
 285 PRINT AT 0,10;"\..GAME  OVER\.."
 286 FOR Q=0 TO 30
 287 NEXT Q
 290 IF INKEY$="P" THEN GOTO 15
 300 GOTO 280
 410 LET BEST=SCORE
 420 PRINT AT 2,2;"YOU NOW HAVE THE BEST SCORE"
 430 PRINT AT 4,1;"ENTER YOUR NAME (1-27 LETTERS)"
 440 INPUT Z$
 450 RETURN 
 500 SAVE "1010%0"
 510 RUN 

					
				
			



						

				


Tags


Archived Media, Downloadable, TS 1000




People


No people associated with this content.


					
				


			

			
		
	



	
 
	


	











		Scroll to Top





















			
				CE\AC\D9\C1\C5\D9


		Skip to content


			

			

		

		

						

				

											

									

							

					

						
						

				The Authoritative Website
			
				
				
			
					
								
																								

															
												
					
								
			
	
 

		

		

									

													

										

							

					

						
						

				The Authoritative Website
			
				
				
			
					
									
																									

										

						

				
					Main Menu
					
											
									
			
					
									
											
						
	
				

						

			
		
				

			
Log in
		
				

			

				
Sign up
			Sign up
		
					
			
		

			

		

							

				

                                
                                    Home
                                
                                
                             » 
                                    Computer Media
                                    
                                 » 
                                    Brick Buster
                                    
                                
					
				

	

	

		
		
	




	


		
					

				



	
	


	
	
		


			
			
Brick Buster
			
		


	
	
	


							

				

  
Download
  





Date: 198x
Type: Program
Platform(s): TS 1000


					
				
		
		
							

				

  
      
  










Content



  







Appears On


Timex Sinclair Public Domain Library Tape 1002
Assembled by Tim Ward from many sources. Contains programs 10051 – 10121.







Related Products









Related Articles









Related Content









Image Gallery




  
    






Source Code



 
   0 REM \11\10\16\01\0A\16\78\FE\02\20\07\3E\04\32\AC\40\18\03\FE\18\C8\79\FE\02\20\07\3E\0C\32\AD\40\18\09\FE\1F\20\05\3E\0D\32\AD\40\05\0D\CD\55\41\7E\FE\08\20\16\CD\6A\41\3A\AC\40\FE\05\20\07\3E\04\32\AC\40\18\05\3E\05\32\AC\40\36\80\CD\E0\40\CD\82\41\CD\E0\40\CD\82\41\36\00\18\AA\00\00\E5\C5\42\4B\DB\04\FE\3B\20\08\79\FE\1D\28\0D\0C\18\0A\FE\2F\20\06\79\FE\01\28\01\0D\CD\55\41\36\00\23\36\03\23\36\03\23\36\00\05\CD\55\41\3A\AD\40\FE\0C\20\0F\7E\FE\80\20\0A\3E\0D\32\AD\40\3E\05\32\AC\40\06\02\23\7E\FE\80\20\0C\3E\05\32\AC\40\D9\C1\06\14\C5\D9\00\10\EC\23\3A\AD\40\FE\0D\20\0F\7E\FE\80\20\0A\3E\0C\32\AD\40\3E\05\32\AC\40\59\C1\E1\C9\D5\C5\2A\0C\40\C5\06\00\09\C1\11\21\00\10\03\C1\D1\C9\19\18\F8\E5\2A\0C\40\23\23\23\23\7E\3C\FE\26\28\03\77\18\05\36\1C\2B\18\F2\E1\C9\C5\01\00\09\0B\78\B1\20\FB\C1\C9\24\25\1C
   5 LET DISP=PEEK 16396+256*PEEK 16397
  10 LET BEST=0
  15 CLS 
  20 PRINT "ENTER SPEED 1 TO 9 (1=FASTEST)"
  25 PRINT AT 3,6;"<=5....8=> S=SERVE"
  30 INPUT I
  40 IF I<1 OR I>9 THEN GOTO 30
  50 POKE 16773,I
  60 CLS 
  70 PRINT "\ .0000\..\..\..\..\..BRICK BUSTER\..\..\..\..\..\..\..\..\..\. "
  80 FOR F=1 TO 20
  90 PRINT AT F,0;"\ :";TAB 31;"\: "
 100 NEXT F
 110 FOR F=1 TO 7
 120 PRINT AT F,1;"\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##"
 130 NEXT F
 135 LET B=5
 136 PRINT AT 0,30;B
 140 FOR F=5 TO 25 STEP 5
 150 POKE 16556,5
 160 POKE 16518,F
 170 IF INKEY$<>"S" THEN GOTO 170
 175 LET B=B-1
 176 PRINT AT 0,30;B
 180 RAND USR 16514
 190 PRINT AT 21,0;"                               "
 200 NEXT F
 210 PRINT AT 0,10;"\..GAME  OVER\.."
 220 LET SCORE=0
 230 FOR R=1 TO 4
 240 LET SCORE=SCORE+(PEEK (DISP+R+1)-28)*10**(4-R)
 250 NEXT R
 260 IF SCORE>BEST THEN GOSUB 400
 270 PRINT AT 9,1;"      BEST SCORE IS ";BEST;AT 10,INT ((32-LEN Z$-3)/2);"BY ";Z$
 280 PRINT AT 12,4;"%P%R%E%S%S% %"%P%"% %T%O% %P%L%A%Y% %A%G%A%I%N"
 281 PRINT AT 0,10;"BRICK BUSTER"
 282 FOR Q=0 TO 30
 283 NEXT Q
 284 PRINT AT 12,4;"PRESS ""P"" TO PLAY AGAIN"
 285 PRINT AT 0,10;"\..GAME  OVER\.."
 286 FOR Q=0 TO 30
 287 NEXT Q
 290 IF INKEY$="P" THEN GOTO 15
 300 GOTO 280
 410 LET BEST=SCORE
 420 PRINT AT 2,2;"YOU NOW HAVE THE BEST SCORE"
 430 PRINT AT 4,1;"ENTER YOUR NAME (1-27 LETTERS)"
 440 INPUT Z$
 450 RETURN 
 500 SAVE "1010%0"
 510 RUN 

					
				
			



						

				


Tags


Archived Media, Downloadable, TS 1000




People


No people associated with this content.


					
				


			

			
		
	



	
 
	


	











		Scroll to Top





















			
				\ECA\AD\FE


		Skip to content


			

			

		

		

						

				

											

									

							

					

						
						

				The Authoritative Website
			
				
				
			
					
								
																								

															
												
					
								
			
	
 

		

		

									

													

										

							

					

						
						

				The Authoritative Website
			
				
				
			
					
									
																									

										

						

				
					Main Menu
					
											
									
			
					
									
											
						
	
				

						

			
		
				

			
Log in
		
				

			

				
Sign up
			Sign up
		
					
			
		

			

		

							

				

                                
                                    Home
                                
                                
                             » 
                                    Computer Media
                                    
                                 » 
                                    Brick Buster
                                    
                                
					
				

	

	

		
		
	




	


		
					

				



	
	


	
	
		


			
			
Brick Buster
			
		


	
	
	


							

				

  
Download
  





Date: 198x
Type: Program
Platform(s): TS 1000


					
				
		
		
							

				

  
      
  










Content



  







Appears On


Timex Sinclair Public Domain Library Tape 1002
Assembled by Tim Ward from many sources. Contains programs 10051 – 10121.







Related Products









Related Articles









Related Content









Image Gallery




  
    






Source Code



 
   0 REM \11\10\16\01\0A\16\78\FE\02\20\07\3E\04\32\AC\40\18\03\FE\18\C8\79\FE\02\20\07\3E\0C\32\AD\40\18\09\FE\1F\20\05\3E\0D\32\AD\40\05\0D\CD\55\41\7E\FE\08\20\16\CD\6A\41\3A\AC\40\FE\05\20\07\3E\04\32\AC\40\18\05\3E\05\32\AC\40\36\80\CD\E0\40\CD\82\41\CD\E0\40\CD\82\41\36\00\18\AA\00\00\E5\C5\42\4B\DB\04\FE\3B\20\08\79\FE\1D\28\0D\0C\18\0A\FE\2F\20\06\79\FE\01\28\01\0D\CD\55\41\36\00\23\36\03\23\36\03\23\36\00\05\CD\55\41\3A\AD\40\FE\0C\20\0F\7E\FE\80\20\0A\3E\0D\32\AD\40\3E\05\32\AC\40\06\02\23\7E\FE\80\20\0C\3E\05\32\AC\40\D9\C1\06\14\C5\D9\00\10\EC\23\3A\AD\40\FE\0D\20\0F\7E\FE\80\20\0A\3E\0C\32\AD\40\3E\05\32\AC\40\59\C1\E1\C9\D5\C5\2A\0C\40\C5\06\00\09\C1\11\21\00\10\03\C1\D1\C9\19\18\F8\E5\2A\0C\40\23\23\23\23\7E\3C\FE\26\28\03\77\18\05\36\1C\2B\18\F2\E1\C9\C5\01\00\09\0B\78\B1\20\FB\C1\C9\24\25\1C
   5 LET DISP=PEEK 16396+256*PEEK 16397
  10 LET BEST=0
  15 CLS 
  20 PRINT "ENTER SPEED 1 TO 9 (1=FASTEST)"
  25 PRINT AT 3,6;"<=5....8=> S=SERVE"
  30 INPUT I
  40 IF I<1 OR I>9 THEN GOTO 30
  50 POKE 16773,I
  60 CLS 
  70 PRINT "\ .0000\..\..\..\..\..BRICK BUSTER\..\..\..\..\..\..\..\..\..\. "
  80 FOR F=1 TO 20
  90 PRINT AT F,0;"\ :";TAB 31;"\: "
 100 NEXT F
 110 FOR F=1 TO 7
 120 PRINT AT F,1;"\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##"
 130 NEXT F
 135 LET B=5
 136 PRINT AT 0,30;B
 140 FOR F=5 TO 25 STEP 5
 150 POKE 16556,5
 160 POKE 16518,F
 170 IF INKEY$<>"S" THEN GOTO 170
 175 LET B=B-1
 176 PRINT AT 0,30;B
 180 RAND USR 16514
 190 PRINT AT 21,0;"                               "
 200 NEXT F
 210 PRINT AT 0,10;"\..GAME  OVER\.."
 220 LET SCORE=0
 230 FOR R=1 TO 4
 240 LET SCORE=SCORE+(PEEK (DISP+R+1)-28)*10**(4-R)
 250 NEXT R
 260 IF SCORE>BEST THEN GOSUB 400
 270 PRINT AT 9,1;"      BEST SCORE IS ";BEST;AT 10,INT ((32-LEN Z$-3)/2);"BY ";Z$
 280 PRINT AT 12,4;"%P%R%E%S%S% %"%P%"% %T%O% %P%L%A%Y% %A%G%A%I%N"
 281 PRINT AT 0,10;"BRICK BUSTER"
 282 FOR Q=0 TO 30
 283 NEXT Q
 284 PRINT AT 12,4;"PRESS ""P"" TO PLAY AGAIN"
 285 PRINT AT 0,10;"\..GAME  OVER\.."
 286 FOR Q=0 TO 30
 287 NEXT Q
 290 IF INKEY$="P" THEN GOTO 15
 300 GOTO 280
 410 LET BEST=SCORE
 420 PRINT AT 2,2;"YOU NOW HAVE THE BEST SCORE"
 430 PRINT AT 4,1;"ENTER YOUR NAME (1-27 LETTERS)"
 440 INPUT Z$
 450 RETURN 
 500 SAVE "1010%0"
 510 RUN 

					
				
			



						

				


Tags


Archived Media, Downloadable, TS 1000




People


No people associated with this content.


					
				


			

			
		
	



	
 
	


	











		Scroll to Top





















			
				D


		Skip to content


			

			

		

		

						

				

											

									

							

					

						
						

				The Authoritative Website
			
				
				
			
					
								
																								

															
												
					
								
			
	
 

		

		

									

													

										

							

					

						
						

				The Authoritative Website
			
				
				
			
					
									
																									

										

						

				
					Main Menu
					
											
									
			
					
									
											
						
	
				

						

			
		
				

			
Log in
		
				

			

				
Sign up
			Sign up
		
					
			
		

			

		

							

				

                                
                                    Home
                                
                                
                             » 
                                    Computer Media
                                    
                                 » 
                                    Brick Buster
                                    
                                
					
				

	

	

		
		
	




	


		
					

				



	
	


	
	
		


			
			
Brick Buster
			
		


	
	
	


							

				

  
Download
  





Date: 198x
Type: Program
Platform(s): TS 1000


					
				
		
		
							

				

  
      
  










Content



  







Appears On


Timex Sinclair Public Domain Library Tape 1002
Assembled by Tim Ward from many sources. Contains programs 10051 – 10121.







Related Products









Related Articles









Related Content









Image Gallery




  
    






Source Code



 
   0 REM \11\10\16\01\0A\16\78\FE\02\20\07\3E\04\32\AC\40\18\03\FE\18\C8\79\FE\02\20\07\3E\0C\32\AD\40\18\09\FE\1F\20\05\3E\0D\32\AD\40\05\0D\CD\55\41\7E\FE\08\20\16\CD\6A\41\3A\AC\40\FE\05\20\07\3E\04\32\AC\40\18\05\3E\05\32\AC\40\36\80\CD\E0\40\CD\82\41\CD\E0\40\CD\82\41\36\00\18\AA\00\00\E5\C5\42\4B\DB\04\FE\3B\20\08\79\FE\1D\28\0D\0C\18\0A\FE\2F\20\06\79\FE\01\28\01\0D\CD\55\41\36\00\23\36\03\23\36\03\23\36\00\05\CD\55\41\3A\AD\40\FE\0C\20\0F\7E\FE\80\20\0A\3E\0D\32\AD\40\3E\05\32\AC\40\06\02\23\7E\FE\80\20\0C\3E\05\32\AC\40\D9\C1\06\14\C5\D9\00\10\EC\23\3A\AD\40\FE\0D\20\0F\7E\FE\80\20\0A\3E\0C\32\AD\40\3E\05\32\AC\40\59\C1\E1\C9\D5\C5\2A\0C\40\C5\06\00\09\C1\11\21\00\10\03\C1\D1\C9\19\18\F8\E5\2A\0C\40\23\23\23\23\7E\3C\FE\26\28\03\77\18\05\36\1C\2B\18\F2\E1\C9\C5\01\00\09\0B\78\B1\20\FB\C1\C9\24\25\1C
   5 LET DISP=PEEK 16396+256*PEEK 16397
  10 LET BEST=0
  15 CLS 
  20 PRINT "ENTER SPEED 1 TO 9 (1=FASTEST)"
  25 PRINT AT 3,6;"<=5....8=> S=SERVE"
  30 INPUT I
  40 IF I<1 OR I>9 THEN GOTO 30
  50 POKE 16773,I
  60 CLS 
  70 PRINT "\ .0000\..\..\..\..\..BRICK BUSTER\..\..\..\..\..\..\..\..\..\. "
  80 FOR F=1 TO 20
  90 PRINT AT F,0;"\ :";TAB 31;"\: "
 100 NEXT F
 110 FOR F=1 TO 7
 120 PRINT AT F,1;"\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##"
 130 NEXT F
 135 LET B=5
 136 PRINT AT 0,30;B
 140 FOR F=5 TO 25 STEP 5
 150 POKE 16556,5
 160 POKE 16518,F
 170 IF INKEY$<>"S" THEN GOTO 170
 175 LET B=B-1
 176 PRINT AT 0,30;B
 180 RAND USR 16514
 190 PRINT AT 21,0;"                               "
 200 NEXT F
 210 PRINT AT 0,10;"\..GAME  OVER\.."
 220 LET SCORE=0
 230 FOR R=1 TO 4
 240 LET SCORE=SCORE+(PEEK (DISP+R+1)-28)*10**(4-R)
 250 NEXT R
 260 IF SCORE>BEST THEN GOSUB 400
 270 PRINT AT 9,1;"      BEST SCORE IS ";BEST;AT 10,INT ((32-LEN Z$-3)/2);"BY ";Z$
 280 PRINT AT 12,4;"%P%R%E%S%S% %"%P%"% %T%O% %P%L%A%Y% %A%G%A%I%N"
 281 PRINT AT 0,10;"BRICK BUSTER"
 282 FOR Q=0 TO 30
 283 NEXT Q
 284 PRINT AT 12,4;"PRESS ""P"" TO PLAY AGAIN"
 285 PRINT AT 0,10;"\..GAME  OVER\.."
 286 FOR Q=0 TO 30
 287 NEXT Q
 290 IF INKEY$="P" THEN GOTO 15
 300 GOTO 280
 410 LET BEST=SCORE
 420 PRINT AT 2,2;"YOU NOW HAVE THE BEST SCORE"
 430 PRINT AT 4,1;"ENTER YOUR NAME (1-27 LETTERS)"
 440 INPUT Z$
 450 RETURN 
 500 SAVE "1010%0"
 510 RUN 

					
				
			



						

				


Tags


Archived Media, Downloadable, TS 1000




People


No people associated with this content.


					
				


			

			
		
	



	
 
	


	











		Scroll to Top





















			
				FE\FE


		Skip to content


			

			

		

		

						

				

											

									

							

					

						
						

				The Authoritative Website
			
				
				
			
					
								
																								

															
												
					
								
			
	
 

		

		

									

													

										

							

					

						
						

				The Authoritative Website
			
				
				
			
					
									
																									

										

						

				
					Main Menu
					
											
									
			
					
									
											
						
	
				

						

			
		
				

			
Log in
		
				

			

				
Sign up
			Sign up
		
					
			
		

			

		

							

				

                                
                                    Home
                                
                                
                             » 
                                    Computer Media
                                    
                                 » 
                                    Brick Buster
                                    
                                
					
				

	

	

		
		
	




	


		
					

				



	
	


	
	
		


			
			
Brick Buster
			
		


	
	
	


							

				

  
Download
  





Date: 198x
Type: Program
Platform(s): TS 1000


					
				
		
		
							

				

  
      
  










Content



  







Appears On


Timex Sinclair Public Domain Library Tape 1002
Assembled by Tim Ward from many sources. Contains programs 10051 – 10121.







Related Products









Related Articles









Related Content









Image Gallery




  
    






Source Code



 
   0 REM \11\10\16\01\0A\16\78\FE\02\20\07\3E\04\32\AC\40\18\03\FE\18\C8\79\FE\02\20\07\3E\0C\32\AD\40\18\09\FE\1F\20\05\3E\0D\32\AD\40\05\0D\CD\55\41\7E\FE\08\20\16\CD\6A\41\3A\AC\40\FE\05\20\07\3E\04\32\AC\40\18\05\3E\05\32\AC\40\36\80\CD\E0\40\CD\82\41\CD\E0\40\CD\82\41\36\00\18\AA\00\00\E5\C5\42\4B\DB\04\FE\3B\20\08\79\FE\1D\28\0D\0C\18\0A\FE\2F\20\06\79\FE\01\28\01\0D\CD\55\41\36\00\23\36\03\23\36\03\23\36\00\05\CD\55\41\3A\AD\40\FE\0C\20\0F\7E\FE\80\20\0A\3E\0D\32\AD\40\3E\05\32\AC\40\06\02\23\7E\FE\80\20\0C\3E\05\32\AC\40\D9\C1\06\14\C5\D9\00\10\EC\23\3A\AD\40\FE\0D\20\0F\7E\FE\80\20\0A\3E\0C\32\AD\40\3E\05\32\AC\40\59\C1\E1\C9\D5\C5\2A\0C\40\C5\06\00\09\C1\11\21\00\10\03\C1\D1\C9\19\18\F8\E5\2A\0C\40\23\23\23\23\7E\3C\FE\26\28\03\77\18\05\36\1C\2B\18\F2\E1\C9\C5\01\00\09\0B\78\B1\20\FB\C1\C9\24\25\1C
   5 LET DISP=PEEK 16396+256*PEEK 16397
  10 LET BEST=0
  15 CLS 
  20 PRINT "ENTER SPEED 1 TO 9 (1=FASTEST)"
  25 PRINT AT 3,6;"<=5....8=> S=SERVE"
  30 INPUT I
  40 IF I<1 OR I>9 THEN GOTO 30
  50 POKE 16773,I
  60 CLS 
  70 PRINT "\ .0000\..\..\..\..\..BRICK BUSTER\..\..\..\..\..\..\..\..\..\. "
  80 FOR F=1 TO 20
  90 PRINT AT F,0;"\ :";TAB 31;"\: "
 100 NEXT F
 110 FOR F=1 TO 7
 120 PRINT AT F,1;"\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##"
 130 NEXT F
 135 LET B=5
 136 PRINT AT 0,30;B
 140 FOR F=5 TO 25 STEP 5
 150 POKE 16556,5
 160 POKE 16518,F
 170 IF INKEY$<>"S" THEN GOTO 170
 175 LET B=B-1
 176 PRINT AT 0,30;B
 180 RAND USR 16514
 190 PRINT AT 21,0;"                               "
 200 NEXT F
 210 PRINT AT 0,10;"\..GAME  OVER\.."
 220 LET SCORE=0
 230 FOR R=1 TO 4
 240 LET SCORE=SCORE+(PEEK (DISP+R+1)-28)*10**(4-R)
 250 NEXT R
 260 IF SCORE>BEST THEN GOSUB 400
 270 PRINT AT 9,1;"      BEST SCORE IS ";BEST;AT 10,INT ((32-LEN Z$-3)/2);"BY ";Z$
 280 PRINT AT 12,4;"%P%R%E%S%S% %"%P%"% %T%O% %P%L%A%Y% %A%G%A%I%N"
 281 PRINT AT 0,10;"BRICK BUSTER"
 282 FOR Q=0 TO 30
 283 NEXT Q
 284 PRINT AT 12,4;"PRESS ""P"" TO PLAY AGAIN"
 285 PRINT AT 0,10;"\..GAME  OVER\.."
 286 FOR Q=0 TO 30
 287 NEXT Q
 290 IF INKEY$="P" THEN GOTO 15
 300 GOTO 280
 410 LET BEST=SCORE
 420 PRINT AT 2,2;"YOU NOW HAVE THE BEST SCORE"
 430 PRINT AT 4,1;"ENTER YOUR NAME (1-27 LETTERS)"
 440 INPUT Z$
 450 RETURN 
 500 SAVE "1010%0"
 510 RUN 

					
				
			



						

				


Tags


Archived Media, Downloadable, TS 1000




People


No people associated with this content.


					
				


			

			
		
	



	
 
	


	











		Scroll to Top





















			
				AE


		Skip to content


			

			

		

		

						

				

											

									

							

					

						
						

				The Authoritative Website
			
				
				
			
					
								
																								

															
												
					
								
			
	
 

		

		

									

													

										

							

					

						
						

				The Authoritative Website
			
				
				
			
					
									
																									

										

						

				
					Main Menu
					
											
									
			
					
									
											
						
	
				

						

			
		
				

			
Log in
		
				

			

				
Sign up
			Sign up
		
					
			
		

			

		

							

				

                                
                                    Home
                                
                                
                             » 
                                    Computer Media
                                    
                                 » 
                                    Brick Buster
                                    
                                
					
				

	

	

		
		
	




	


		
					

				



	
	


	
	
		


			
			
Brick Buster
			
		


	
	
	


							

				

  
Download
  





Date: 198x
Type: Program
Platform(s): TS 1000


					
				
		
		
							

				

  
      
  










Content



  







Appears On


Timex Sinclair Public Domain Library Tape 1002
Assembled by Tim Ward from many sources. Contains programs 10051 – 10121.







Related Products









Related Articles









Related Content









Image Gallery




  
    






Source Code



 
   0 REM \11\10\16\01\0A\16\78\FE\02\20\07\3E\04\32\AC\40\18\03\FE\18\C8\79\FE\02\20\07\3E\0C\32\AD\40\18\09\FE\1F\20\05\3E\0D\32\AD\40\05\0D\CD\55\41\7E\FE\08\20\16\CD\6A\41\3A\AC\40\FE\05\20\07\3E\04\32\AC\40\18\05\3E\05\32\AC\40\36\80\CD\E0\40\CD\82\41\CD\E0\40\CD\82\41\36\00\18\AA\00\00\E5\C5\42\4B\DB\04\FE\3B\20\08\79\FE\1D\28\0D\0C\18\0A\FE\2F\20\06\79\FE\01\28\01\0D\CD\55\41\36\00\23\36\03\23\36\03\23\36\00\05\CD\55\41\3A\AD\40\FE\0C\20\0F\7E\FE\80\20\0A\3E\0D\32\AD\40\3E\05\32\AC\40\06\02\23\7E\FE\80\20\0C\3E\05\32\AC\40\D9\C1\06\14\C5\D9\00\10\EC\23\3A\AD\40\FE\0D\20\0F\7E\FE\80\20\0A\3E\0C\32\AD\40\3E\05\32\AC\40\59\C1\E1\C9\D5\C5\2A\0C\40\C5\06\00\09\C1\11\21\00\10\03\C1\D1\C9\19\18\F8\E5\2A\0C\40\23\23\23\23\7E\3C\FE\26\28\03\77\18\05\36\1C\2B\18\F2\E1\C9\C5\01\00\09\0B\78\B1\20\FB\C1\C9\24\25\1C
   5 LET DISP=PEEK 16396+256*PEEK 16397
  10 LET BEST=0
  15 CLS 
  20 PRINT "ENTER SPEED 1 TO 9 (1=FASTEST)"
  25 PRINT AT 3,6;"<=5....8=> S=SERVE"
  30 INPUT I
  40 IF I<1 OR I>9 THEN GOTO 30
  50 POKE 16773,I
  60 CLS 
  70 PRINT "\ .0000\..\..\..\..\..BRICK BUSTER\..\..\..\..\..\..\..\..\..\. "
  80 FOR F=1 TO 20
  90 PRINT AT F,0;"\ :";TAB 31;"\: "
 100 NEXT F
 110 FOR F=1 TO 7
 120 PRINT AT F,1;"\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##"
 130 NEXT F
 135 LET B=5
 136 PRINT AT 0,30;B
 140 FOR F=5 TO 25 STEP 5
 150 POKE 16556,5
 160 POKE 16518,F
 170 IF INKEY$<>"S" THEN GOTO 170
 175 LET B=B-1
 176 PRINT AT 0,30;B
 180 RAND USR 16514
 190 PRINT AT 21,0;"                               "
 200 NEXT F
 210 PRINT AT 0,10;"\..GAME  OVER\.."
 220 LET SCORE=0
 230 FOR R=1 TO 4
 240 LET SCORE=SCORE+(PEEK (DISP+R+1)-28)*10**(4-R)
 250 NEXT R
 260 IF SCORE>BEST THEN GOSUB 400
 270 PRINT AT 9,1;"      BEST SCORE IS ";BEST;AT 10,INT ((32-LEN Z$-3)/2);"BY ";Z$
 280 PRINT AT 12,4;"%P%R%E%S%S% %"%P%"% %T%O% %P%L%A%Y% %A%G%A%I%N"
 281 PRINT AT 0,10;"BRICK BUSTER"
 282 FOR Q=0 TO 30
 283 NEXT Q
 284 PRINT AT 12,4;"PRESS ""P"" TO PLAY AGAIN"
 285 PRINT AT 0,10;"\..GAME  OVER\.."
 286 FOR Q=0 TO 30
 287 NEXT Q
 290 IF INKEY$="P" THEN GOTO 15
 300 GOTO 280
 410 LET BEST=SCORE
 420 PRINT AT 2,2;"YOU NOW HAVE THE BEST SCORE"
 430 PRINT AT 4,1;"ENTER YOUR NAME (1-27 LETTERS)"
 440 INPUT Z$
 450 RETURN 
 500 SAVE "1010%0"
 510 RUN 

					
				
			



						

				


Tags


Archived Media, Downloadable, TS 1000




People


No people associated with this content.


					
				


			

			
		
	



	
 
	


	











		Scroll to Top





















			
				C\ADE\AC\C1\E1\C9\D5\C5


		Skip to content


			

			

		

		

						

				

											

									

							

					

						
						

				The Authoritative Website
			
				
				
			
					
								
																								

															
												
					
								
			
	
 

		

		

									

													

										

							

					

						
						

				The Authoritative Website
			
				
				
			
					
									
																									

										

						

				
					Main Menu
					
											
									
			
					
									
											
						
	
				

						

			
		
				

			
Log in
		
				

			

				
Sign up
			Sign up
		
					
			
		

			

		

							

				

                                
                                    Home
                                
                                
                             » 
                                    Computer Media
                                    
                                 » 
                                    Brick Buster
                                    
                                
					
				

	

	

		
		
	




	


		
					

				



	
	


	
	
		


			
			
Brick Buster
			
		


	
	
	


							

				

  
Download
  





Date: 198x
Type: Program
Platform(s): TS 1000


					
				
		
		
							

				

  
      
  










Content



  







Appears On


Timex Sinclair Public Domain Library Tape 1002
Assembled by Tim Ward from many sources. Contains programs 10051 – 10121.







Related Products









Related Articles









Related Content









Image Gallery




  
    






Source Code



 
   0 REM \11\10\16\01\0A\16\78\FE\02\20\07\3E\04\32\AC\40\18\03\FE\18\C8\79\FE\02\20\07\3E\0C\32\AD\40\18\09\FE\1F\20\05\3E\0D\32\AD\40\05\0D\CD\55\41\7E\FE\08\20\16\CD\6A\41\3A\AC\40\FE\05\20\07\3E\04\32\AC\40\18\05\3E\05\32\AC\40\36\80\CD\E0\40\CD\82\41\CD\E0\40\CD\82\41\36\00\18\AA\00\00\E5\C5\42\4B\DB\04\FE\3B\20\08\79\FE\1D\28\0D\0C\18\0A\FE\2F\20\06\79\FE\01\28\01\0D\CD\55\41\36\00\23\36\03\23\36\03\23\36\00\05\CD\55\41\3A\AD\40\FE\0C\20\0F\7E\FE\80\20\0A\3E\0D\32\AD\40\3E\05\32\AC\40\06\02\23\7E\FE\80\20\0C\3E\05\32\AC\40\D9\C1\06\14\C5\D9\00\10\EC\23\3A\AD\40\FE\0D\20\0F\7E\FE\80\20\0A\3E\0C\32\AD\40\3E\05\32\AC\40\59\C1\E1\C9\D5\C5\2A\0C\40\C5\06\00\09\C1\11\21\00\10\03\C1\D1\C9\19\18\F8\E5\2A\0C\40\23\23\23\23\7E\3C\FE\26\28\03\77\18\05\36\1C\2B\18\F2\E1\C9\C5\01\00\09\0B\78\B1\20\FB\C1\C9\24\25\1C
   5 LET DISP=PEEK 16396+256*PEEK 16397
  10 LET BEST=0
  15 CLS 
  20 PRINT "ENTER SPEED 1 TO 9 (1=FASTEST)"
  25 PRINT AT 3,6;"<=5....8=> S=SERVE"
  30 INPUT I
  40 IF I<1 OR I>9 THEN GOTO 30
  50 POKE 16773,I
  60 CLS 
  70 PRINT "\ .0000\..\..\..\..\..BRICK BUSTER\..\..\..\..\..\..\..\..\..\. "
  80 FOR F=1 TO 20
  90 PRINT AT F,0;"\ :";TAB 31;"\: "
 100 NEXT F
 110 FOR F=1 TO 7
 120 PRINT AT F,1;"\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##"
 130 NEXT F
 135 LET B=5
 136 PRINT AT 0,30;B
 140 FOR F=5 TO 25 STEP 5
 150 POKE 16556,5
 160 POKE 16518,F
 170 IF INKEY$<>"S" THEN GOTO 170
 175 LET B=B-1
 176 PRINT AT 0,30;B
 180 RAND USR 16514
 190 PRINT AT 21,0;"                               "
 200 NEXT F
 210 PRINT AT 0,10;"\..GAME  OVER\.."
 220 LET SCORE=0
 230 FOR R=1 TO 4
 240 LET SCORE=SCORE+(PEEK (DISP+R+1)-28)*10**(4-R)
 250 NEXT R
 260 IF SCORE>BEST THEN GOSUB 400
 270 PRINT AT 9,1;"      BEST SCORE IS ";BEST;AT 10,INT ((32-LEN Z$-3)/2);"BY ";Z$
 280 PRINT AT 12,4;"%P%R%E%S%S% %"%P%"% %T%O% %P%L%A%Y% %A%G%A%I%N"
 281 PRINT AT 0,10;"BRICK BUSTER"
 282 FOR Q=0 TO 30
 283 NEXT Q
 284 PRINT AT 12,4;"PRESS ""P"" TO PLAY AGAIN"
 285 PRINT AT 0,10;"\..GAME  OVER\.."
 286 FOR Q=0 TO 30
 287 NEXT Q
 290 IF INKEY$="P" THEN GOTO 15
 300 GOTO 280
 410 LET BEST=SCORE
 420 PRINT AT 2,2;"YOU NOW HAVE THE BEST SCORE"
 430 PRINT AT 4,1;"ENTER YOUR NAME (1-27 LETTERS)"
 440 INPUT Z$
 450 RETURN 
 500 SAVE "1010%0"
 510 RUN 

					
				
			



						

				


Tags


Archived Media, Downloadable, TS 1000




People


No people associated with this content.


					
				


			

			
		
	



	
 
	


	











		Scroll to Top





















			
				A


		Skip to content


			

			

		

		

						

				

											

									

							

					

						
						

				The Authoritative Website
			
				
				
			
					
								
																								

															
												
					
								
			
	
 

		

		

									

													

										

							

					

						
						

				The Authoritative Website
			
				
				
			
					
									
																									

										

						

				
					Main Menu
					
											
									
			
					
									
											
						
	
				

						

			
		
				

			
Log in
		
				

			

				
Sign up
			Sign up
		
					
			
		

			

		

							

				

                                
                                    Home
                                
                                
                             » 
                                    Computer Media
                                    
                                 » 
                                    Brick Buster
                                    
                                
					
				

	

	

		
		
	




	


		
					

				



	
	


	
	
		


			
			
Brick Buster
			
		


	
	
	


							

				

  
Download
  





Date: 198x
Type: Program
Platform(s): TS 1000


					
				
		
		
							

				

  
      
  










Content



  







Appears On


Timex Sinclair Public Domain Library Tape 1002
Assembled by Tim Ward from many sources. Contains programs 10051 – 10121.







Related Products









Related Articles









Related Content









Image Gallery




  
    






Source Code



 
   0 REM \11\10\16\01\0A\16\78\FE\02\20\07\3E\04\32\AC\40\18\03\FE\18\C8\79\FE\02\20\07\3E\0C\32\AD\40\18\09\FE\1F\20\05\3E\0D\32\AD\40\05\0D\CD\55\41\7E\FE\08\20\16\CD\6A\41\3A\AC\40\FE\05\20\07\3E\04\32\AC\40\18\05\3E\05\32\AC\40\36\80\CD\E0\40\CD\82\41\CD\E0\40\CD\82\41\36\00\18\AA\00\00\E5\C5\42\4B\DB\04\FE\3B\20\08\79\FE\1D\28\0D\0C\18\0A\FE\2F\20\06\79\FE\01\28\01\0D\CD\55\41\36\00\23\36\03\23\36\03\23\36\00\05\CD\55\41\3A\AD\40\FE\0C\20\0F\7E\FE\80\20\0A\3E\0D\32\AD\40\3E\05\32\AC\40\06\02\23\7E\FE\80\20\0C\3E\05\32\AC\40\D9\C1\06\14\C5\D9\00\10\EC\23\3A\AD\40\FE\0D\20\0F\7E\FE\80\20\0A\3E\0C\32\AD\40\3E\05\32\AC\40\59\C1\E1\C9\D5\C5\2A\0C\40\C5\06\00\09\C1\11\21\00\10\03\C1\D1\C9\19\18\F8\E5\2A\0C\40\23\23\23\23\7E\3C\FE\26\28\03\77\18\05\36\1C\2B\18\F2\E1\C9\C5\01\00\09\0B\78\B1\20\FB\C1\C9\24\25\1C
   5 LET DISP=PEEK 16396+256*PEEK 16397
  10 LET BEST=0
  15 CLS 
  20 PRINT "ENTER SPEED 1 TO 9 (1=FASTEST)"
  25 PRINT AT 3,6;"<=5....8=> S=SERVE"
  30 INPUT I
  40 IF I<1 OR I>9 THEN GOTO 30
  50 POKE 16773,I
  60 CLS 
  70 PRINT "\ .0000\..\..\..\..\..BRICK BUSTER\..\..\..\..\..\..\..\..\..\. "
  80 FOR F=1 TO 20
  90 PRINT AT F,0;"\ :";TAB 31;"\: "
 100 NEXT F
 110 FOR F=1 TO 7
 120 PRINT AT F,1;"\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##"
 130 NEXT F
 135 LET B=5
 136 PRINT AT 0,30;B
 140 FOR F=5 TO 25 STEP 5
 150 POKE 16556,5
 160 POKE 16518,F
 170 IF INKEY$<>"S" THEN GOTO 170
 175 LET B=B-1
 176 PRINT AT 0,30;B
 180 RAND USR 16514
 190 PRINT AT 21,0;"                               "
 200 NEXT F
 210 PRINT AT 0,10;"\..GAME  OVER\.."
 220 LET SCORE=0
 230 FOR R=1 TO 4
 240 LET SCORE=SCORE+(PEEK (DISP+R+1)-28)*10**(4-R)
 250 NEXT R
 260 IF SCORE>BEST THEN GOSUB 400
 270 PRINT AT 9,1;"      BEST SCORE IS ";BEST;AT 10,INT ((32-LEN Z$-3)/2);"BY ";Z$
 280 PRINT AT 12,4;"%P%R%E%S%S% %"%P%"% %T%O% %P%L%A%Y% %A%G%A%I%N"
 281 PRINT AT 0,10;"BRICK BUSTER"
 282 FOR Q=0 TO 30
 283 NEXT Q
 284 PRINT AT 12,4;"PRESS ""P"" TO PLAY AGAIN"
 285 PRINT AT 0,10;"\..GAME  OVER\.."
 286 FOR Q=0 TO 30
 287 NEXT Q
 290 IF INKEY$="P" THEN GOTO 15
 300 GOTO 280
 410 LET BEST=SCORE
 420 PRINT AT 2,2;"YOU NOW HAVE THE BEST SCORE"
 430 PRINT AT 4,1;"ENTER YOUR NAME (1-27 LETTERS)"
 440 INPUT Z$
 450 RETURN 
 500 SAVE "1010%0"
 510 RUN 

					
				
			



						

				


Tags


Archived Media, Downloadable, TS 1000




People


No people associated with this content.


					
				


			

			
		
	



	
 
	


	











		Scroll to Top





















			
				C\C5


		Skip to content


			

			

		

		

						

				

											

									

							

					

						
						

				The Authoritative Website
			
				
				
			
					
								
																								

															
												
					
								
			
	
 

		

		

									

													

										

							

					

						
						

				The Authoritative Website
			
				
				
			
					
									
																									

										

						

				
					Main Menu
					
											
									
			
					
									
											
						
	
				

						

			
		
				

			
Log in
		
				

			

				
Sign up
			Sign up
		
					
			
		

			

		

							

				

                                
                                    Home
                                
                                
                             » 
                                    Computer Media
                                    
                                 » 
                                    Brick Buster
                                    
                                
					
				

	

	

		
		
	




	


		
					

				



	
	


	
	
		


			
			
Brick Buster
			
		


	
	
	


							

				

  
Download
  





Date: 198x
Type: Program
Platform(s): TS 1000


					
				
		
		
							

				

  
      
  










Content



  







Appears On


Timex Sinclair Public Domain Library Tape 1002
Assembled by Tim Ward from many sources. Contains programs 10051 – 10121.







Related Products









Related Articles









Related Content









Image Gallery




  
    






Source Code



 
   0 REM \11\10\16\01\0A\16\78\FE\02\20\07\3E\04\32\AC\40\18\03\FE\18\C8\79\FE\02\20\07\3E\0C\32\AD\40\18\09\FE\1F\20\05\3E\0D\32\AD\40\05\0D\CD\55\41\7E\FE\08\20\16\CD\6A\41\3A\AC\40\FE\05\20\07\3E\04\32\AC\40\18\05\3E\05\32\AC\40\36\80\CD\E0\40\CD\82\41\CD\E0\40\CD\82\41\36\00\18\AA\00\00\E5\C5\42\4B\DB\04\FE\3B\20\08\79\FE\1D\28\0D\0C\18\0A\FE\2F\20\06\79\FE\01\28\01\0D\CD\55\41\36\00\23\36\03\23\36\03\23\36\00\05\CD\55\41\3A\AD\40\FE\0C\20\0F\7E\FE\80\20\0A\3E\0D\32\AD\40\3E\05\32\AC\40\06\02\23\7E\FE\80\20\0C\3E\05\32\AC\40\D9\C1\06\14\C5\D9\00\10\EC\23\3A\AD\40\FE\0D\20\0F\7E\FE\80\20\0A\3E\0C\32\AD\40\3E\05\32\AC\40\59\C1\E1\C9\D5\C5\2A\0C\40\C5\06\00\09\C1\11\21\00\10\03\C1\D1\C9\19\18\F8\E5\2A\0C\40\23\23\23\23\7E\3C\FE\26\28\03\77\18\05\36\1C\2B\18\F2\E1\C9\C5\01\00\09\0B\78\B1\20\FB\C1\C9\24\25\1C
   5 LET DISP=PEEK 16396+256*PEEK 16397
  10 LET BEST=0
  15 CLS 
  20 PRINT "ENTER SPEED 1 TO 9 (1=FASTEST)"
  25 PRINT AT 3,6;"<=5....8=> S=SERVE"
  30 INPUT I
  40 IF I<1 OR I>9 THEN GOTO 30
  50 POKE 16773,I
  60 CLS 
  70 PRINT "\ .0000\..\..\..\..\..BRICK BUSTER\..\..\..\..\..\..\..\..\..\. "
  80 FOR F=1 TO 20
  90 PRINT AT F,0;"\ :";TAB 31;"\: "
 100 NEXT F
 110 FOR F=1 TO 7
 120 PRINT AT F,1;"\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##"
 130 NEXT F
 135 LET B=5
 136 PRINT AT 0,30;B
 140 FOR F=5 TO 25 STEP 5
 150 POKE 16556,5
 160 POKE 16518,F
 170 IF INKEY$<>"S" THEN GOTO 170
 175 LET B=B-1
 176 PRINT AT 0,30;B
 180 RAND USR 16514
 190 PRINT AT 21,0;"                               "
 200 NEXT F
 210 PRINT AT 0,10;"\..GAME  OVER\.."
 220 LET SCORE=0
 230 FOR R=1 TO 4
 240 LET SCORE=SCORE+(PEEK (DISP+R+1)-28)*10**(4-R)
 250 NEXT R
 260 IF SCORE>BEST THEN GOSUB 400
 270 PRINT AT 9,1;"      BEST SCORE IS ";BEST;AT 10,INT ((32-LEN Z$-3)/2);"BY ";Z$
 280 PRINT AT 12,4;"%P%R%E%S%S% %"%P%"% %T%O% %P%L%A%Y% %A%G%A%I%N"
 281 PRINT AT 0,10;"BRICK BUSTER"
 282 FOR Q=0 TO 30
 283 NEXT Q
 284 PRINT AT 12,4;"PRESS ""P"" TO PLAY AGAIN"
 285 PRINT AT 0,10;"\..GAME  OVER\.."
 286 FOR Q=0 TO 30
 287 NEXT Q
 290 IF INKEY$="P" THEN GOTO 15
 300 GOTO 280
 410 LET BEST=SCORE
 420 PRINT AT 2,2;"YOU NOW HAVE THE BEST SCORE"
 430 PRINT AT 4,1;"ENTER YOUR NAME (1-27 LETTERS)"
 440 INPUT Z$
 450 RETURN 
 500 SAVE "1010%0"
 510 RUN 

					
				
			



						

				


Tags


Archived Media, Downloadable, TS 1000




People


No people associated with this content.


					
				


			

			
		
	



	
 
	


	











		Scroll to Top





















			
				\C1


		Skip to content


			

			

		

		

						

				

											

									

							

					

						
						

				The Authoritative Website
			
				
				
			
					
								
																								

															
												
					
								
			
	
 

		

		

									

													

										

							

					

						
						

				The Authoritative Website
			
				
				
			
					
									
																									

										

						

				
					Main Menu
					
											
									
			
					
									
											
						
	
				

						

			
		
				

			
Log in
		
				

			

				
Sign up
			Sign up
		
					
			
		

			

		

							

				

                                
                                    Home
                                
                                
                             » 
                                    Computer Media
                                    
                                 » 
                                    Brick Buster
                                    
                                
					
				

	

	

		
		
	




	


		
					

				



	
	


	
	
		


			
			
Brick Buster
			
		


	
	
	


							

				

  
Download
  





Date: 198x
Type: Program
Platform(s): TS 1000


					
				
		
		
							

				

  
      
  










Content



  







Appears On


Timex Sinclair Public Domain Library Tape 1002
Assembled by Tim Ward from many sources. Contains programs 10051 – 10121.







Related Products









Related Articles









Related Content









Image Gallery




  
    






Source Code



 
   0 REM \11\10\16\01\0A\16\78\FE\02\20\07\3E\04\32\AC\40\18\03\FE\18\C8\79\FE\02\20\07\3E\0C\32\AD\40\18\09\FE\1F\20\05\3E\0D\32\AD\40\05\0D\CD\55\41\7E\FE\08\20\16\CD\6A\41\3A\AC\40\FE\05\20\07\3E\04\32\AC\40\18\05\3E\05\32\AC\40\36\80\CD\E0\40\CD\82\41\CD\E0\40\CD\82\41\36\00\18\AA\00\00\E5\C5\42\4B\DB\04\FE\3B\20\08\79\FE\1D\28\0D\0C\18\0A\FE\2F\20\06\79\FE\01\28\01\0D\CD\55\41\36\00\23\36\03\23\36\03\23\36\00\05\CD\55\41\3A\AD\40\FE\0C\20\0F\7E\FE\80\20\0A\3E\0D\32\AD\40\3E\05\32\AC\40\06\02\23\7E\FE\80\20\0C\3E\05\32\AC\40\D9\C1\06\14\C5\D9\00\10\EC\23\3A\AD\40\FE\0D\20\0F\7E\FE\80\20\0A\3E\0C\32\AD\40\3E\05\32\AC\40\59\C1\E1\C9\D5\C5\2A\0C\40\C5\06\00\09\C1\11\21\00\10\03\C1\D1\C9\19\18\F8\E5\2A\0C\40\23\23\23\23\7E\3C\FE\26\28\03\77\18\05\36\1C\2B\18\F2\E1\C9\C5\01\00\09\0B\78\B1\20\FB\C1\C9\24\25\1C
   5 LET DISP=PEEK 16396+256*PEEK 16397
  10 LET BEST=0
  15 CLS 
  20 PRINT "ENTER SPEED 1 TO 9 (1=FASTEST)"
  25 PRINT AT 3,6;"<=5....8=> S=SERVE"
  30 INPUT I
  40 IF I<1 OR I>9 THEN GOTO 30
  50 POKE 16773,I
  60 CLS 
  70 PRINT "\ .0000\..\..\..\..\..BRICK BUSTER\..\..\..\..\..\..\..\..\..\. "
  80 FOR F=1 TO 20
  90 PRINT AT F,0;"\ :";TAB 31;"\: "
 100 NEXT F
 110 FOR F=1 TO 7
 120 PRINT AT F,1;"\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##"
 130 NEXT F
 135 LET B=5
 136 PRINT AT 0,30;B
 140 FOR F=5 TO 25 STEP 5
 150 POKE 16556,5
 160 POKE 16518,F
 170 IF INKEY$<>"S" THEN GOTO 170
 175 LET B=B-1
 176 PRINT AT 0,30;B
 180 RAND USR 16514
 190 PRINT AT 21,0;"                               "
 200 NEXT F
 210 PRINT AT 0,10;"\..GAME  OVER\.."
 220 LET SCORE=0
 230 FOR R=1 TO 4
 240 LET SCORE=SCORE+(PEEK (DISP+R+1)-28)*10**(4-R)
 250 NEXT R
 260 IF SCORE>BEST THEN GOSUB 400
 270 PRINT AT 9,1;"      BEST SCORE IS ";BEST;AT 10,INT ((32-LEN Z$-3)/2);"BY ";Z$
 280 PRINT AT 12,4;"%P%R%E%S%S% %"%P%"% %T%O% %P%L%A%Y% %A%G%A%I%N"
 281 PRINT AT 0,10;"BRICK BUSTER"
 282 FOR Q=0 TO 30
 283 NEXT Q
 284 PRINT AT 12,4;"PRESS ""P"" TO PLAY AGAIN"
 285 PRINT AT 0,10;"\..GAME  OVER\.."
 286 FOR Q=0 TO 30
 287 NEXT Q
 290 IF INKEY$="P" THEN GOTO 15
 300 GOTO 280
 410 LET BEST=SCORE
 420 PRINT AT 2,2;"YOU NOW HAVE THE BEST SCORE"
 430 PRINT AT 4,1;"ENTER YOUR NAME (1-27 LETTERS)"
 440 INPUT Z$
 450 RETURN 
 500 SAVE "1010%0"
 510 RUN 

					
				
			



						

				


Tags


Archived Media, Downloadable, TS 1000




People


No people associated with this content.


					
				


			

			
		
	



	
 
	


	











		Scroll to Top





















			
				\C1\D1\C9\F8\E5


		Skip to content


			

			

		

		

						

				

											

									

							

					

						
						

				The Authoritative Website
			
				
				
			
					
								
																								

															
												
					
								
			
	
 

		

		

									

													

										

							

					

						
						

				The Authoritative Website
			
				
				
			
					
									
																									

										

						

				
					Main Menu
					
											
									
			
					
									
											
						
	
				

						

			
		
				

			
Log in
		
				

			

				
Sign up
			Sign up
		
					
			
		

			

		

							

				

                                
                                    Home
                                
                                
                             » 
                                    Computer Media
                                    
                                 » 
                                    Brick Buster
                                    
                                
					
				

	

	

		
		
	




	


		
					

				



	
	


	
	
		


			
			
Brick Buster
			
		


	
	
	


							

				

  
Download
  





Date: 198x
Type: Program
Platform(s): TS 1000


					
				
		
		
							

				

  
      
  










Content



  







Appears On


Timex Sinclair Public Domain Library Tape 1002
Assembled by Tim Ward from many sources. Contains programs 10051 – 10121.







Related Products









Related Articles









Related Content









Image Gallery




  
    






Source Code



 
   0 REM \11\10\16\01\0A\16\78\FE\02\20\07\3E\04\32\AC\40\18\03\FE\18\C8\79\FE\02\20\07\3E\0C\32\AD\40\18\09\FE\1F\20\05\3E\0D\32\AD\40\05\0D\CD\55\41\7E\FE\08\20\16\CD\6A\41\3A\AC\40\FE\05\20\07\3E\04\32\AC\40\18\05\3E\05\32\AC\40\36\80\CD\E0\40\CD\82\41\CD\E0\40\CD\82\41\36\00\18\AA\00\00\E5\C5\42\4B\DB\04\FE\3B\20\08\79\FE\1D\28\0D\0C\18\0A\FE\2F\20\06\79\FE\01\28\01\0D\CD\55\41\36\00\23\36\03\23\36\03\23\36\00\05\CD\55\41\3A\AD\40\FE\0C\20\0F\7E\FE\80\20\0A\3E\0D\32\AD\40\3E\05\32\AC\40\06\02\23\7E\FE\80\20\0C\3E\05\32\AC\40\D9\C1\06\14\C5\D9\00\10\EC\23\3A\AD\40\FE\0D\20\0F\7E\FE\80\20\0A\3E\0C\32\AD\40\3E\05\32\AC\40\59\C1\E1\C9\D5\C5\2A\0C\40\C5\06\00\09\C1\11\21\00\10\03\C1\D1\C9\19\18\F8\E5\2A\0C\40\23\23\23\23\7E\3C\FE\26\28\03\77\18\05\36\1C\2B\18\F2\E1\C9\C5\01\00\09\0B\78\B1\20\FB\C1\C9\24\25\1C
   5 LET DISP=PEEK 16396+256*PEEK 16397
  10 LET BEST=0
  15 CLS 
  20 PRINT "ENTER SPEED 1 TO 9 (1=FASTEST)"
  25 PRINT AT 3,6;"<=5....8=> S=SERVE"
  30 INPUT I
  40 IF I<1 OR I>9 THEN GOTO 30
  50 POKE 16773,I
  60 CLS 
  70 PRINT "\ .0000\..\..\..\..\..BRICK BUSTER\..\..\..\..\..\..\..\..\..\. "
  80 FOR F=1 TO 20
  90 PRINT AT F,0;"\ :";TAB 31;"\: "
 100 NEXT F
 110 FOR F=1 TO 7
 120 PRINT AT F,1;"\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##"
 130 NEXT F
 135 LET B=5
 136 PRINT AT 0,30;B
 140 FOR F=5 TO 25 STEP 5
 150 POKE 16556,5
 160 POKE 16518,F
 170 IF INKEY$<>"S" THEN GOTO 170
 175 LET B=B-1
 176 PRINT AT 0,30;B
 180 RAND USR 16514
 190 PRINT AT 21,0;"                               "
 200 NEXT F
 210 PRINT AT 0,10;"\..GAME  OVER\.."
 220 LET SCORE=0
 230 FOR R=1 TO 4
 240 LET SCORE=SCORE+(PEEK (DISP+R+1)-28)*10**(4-R)
 250 NEXT R
 260 IF SCORE>BEST THEN GOSUB 400
 270 PRINT AT 9,1;"      BEST SCORE IS ";BEST;AT 10,INT ((32-LEN Z$-3)/2);"BY ";Z$
 280 PRINT AT 12,4;"%P%R%E%S%S% %"%P%"% %T%O% %P%L%A%Y% %A%G%A%I%N"
 281 PRINT AT 0,10;"BRICK BUSTER"
 282 FOR Q=0 TO 30
 283 NEXT Q
 284 PRINT AT 12,4;"PRESS ""P"" TO PLAY AGAIN"
 285 PRINT AT 0,10;"\..GAME  OVER\.."
 286 FOR Q=0 TO 30
 287 NEXT Q
 290 IF INKEY$="P" THEN GOTO 15
 300 GOTO 280
 410 LET BEST=SCORE
 420 PRINT AT 2,2;"YOU NOW HAVE THE BEST SCORE"
 430 PRINT AT 4,1;"ENTER YOUR NAME (1-27 LETTERS)"
 440 INPUT Z$
 450 RETURN 
 500 SAVE "1010%0"
 510 RUN 

					
				
			



						

				


Tags


Archived Media, Downloadable, TS 1000




People


No people associated with this content.


					
				


			

			
		
	



	
 
	


	











		Scroll to Top





















			
				A


		Skip to content


			

			

		

		

						

				

											

									

							

					

						
						

				The Authoritative Website
			
				
				
			
					
								
																								

															
												
					
								
			
	
 

		

		

									

													

										

							

					

						
						

				The Authoritative Website
			
				
				
			
					
									
																									

										

						

				
					Main Menu
					
											
									
			
					
									
											
						
	
				

						

			
		
				

			
Log in
		
				

			

				
Sign up
			Sign up
		
					
			
		

			

		

							

				

                                
                                    Home
                                
                                
                             » 
                                    Computer Media
                                    
                                 » 
                                    Brick Buster
                                    
                                
					
				

	

	

		
		
	




	


		
					

				



	
	


	
	
		


			
			
Brick Buster
			
		


	
	
	


							

				

  
Download
  





Date: 198x
Type: Program
Platform(s): TS 1000


					
				
		
		
							

				

  
      
  










Content



  







Appears On


Timex Sinclair Public Domain Library Tape 1002
Assembled by Tim Ward from many sources. Contains programs 10051 – 10121.







Related Products









Related Articles









Related Content









Image Gallery




  
    






Source Code



 
   0 REM \11\10\16\01\0A\16\78\FE\02\20\07\3E\04\32\AC\40\18\03\FE\18\C8\79\FE\02\20\07\3E\0C\32\AD\40\18\09\FE\1F\20\05\3E\0D\32\AD\40\05\0D\CD\55\41\7E\FE\08\20\16\CD\6A\41\3A\AC\40\FE\05\20\07\3E\04\32\AC\40\18\05\3E\05\32\AC\40\36\80\CD\E0\40\CD\82\41\CD\E0\40\CD\82\41\36\00\18\AA\00\00\E5\C5\42\4B\DB\04\FE\3B\20\08\79\FE\1D\28\0D\0C\18\0A\FE\2F\20\06\79\FE\01\28\01\0D\CD\55\41\36\00\23\36\03\23\36\03\23\36\00\05\CD\55\41\3A\AD\40\FE\0C\20\0F\7E\FE\80\20\0A\3E\0D\32\AD\40\3E\05\32\AC\40\06\02\23\7E\FE\80\20\0C\3E\05\32\AC\40\D9\C1\06\14\C5\D9\00\10\EC\23\3A\AD\40\FE\0D\20\0F\7E\FE\80\20\0A\3E\0C\32\AD\40\3E\05\32\AC\40\59\C1\E1\C9\D5\C5\2A\0C\40\C5\06\00\09\C1\11\21\00\10\03\C1\D1\C9\19\18\F8\E5\2A\0C\40\23\23\23\23\7E\3C\FE\26\28\03\77\18\05\36\1C\2B\18\F2\E1\C9\C5\01\00\09\0B\78\B1\20\FB\C1\C9\24\25\1C
   5 LET DISP=PEEK 16396+256*PEEK 16397
  10 LET BEST=0
  15 CLS 
  20 PRINT "ENTER SPEED 1 TO 9 (1=FASTEST)"
  25 PRINT AT 3,6;"<=5....8=> S=SERVE"
  30 INPUT I
  40 IF I<1 OR I>9 THEN GOTO 30
  50 POKE 16773,I
  60 CLS 
  70 PRINT "\ .0000\..\..\..\..\..BRICK BUSTER\..\..\..\..\..\..\..\..\..\. "
  80 FOR F=1 TO 20
  90 PRINT AT F,0;"\ :";TAB 31;"\: "
 100 NEXT F
 110 FOR F=1 TO 7
 120 PRINT AT F,1;"\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##"
 130 NEXT F
 135 LET B=5
 136 PRINT AT 0,30;B
 140 FOR F=5 TO 25 STEP 5
 150 POKE 16556,5
 160 POKE 16518,F
 170 IF INKEY$<>"S" THEN GOTO 170
 175 LET B=B-1
 176 PRINT AT 0,30;B
 180 RAND USR 16514
 190 PRINT AT 21,0;"                               "
 200 NEXT F
 210 PRINT AT 0,10;"\..GAME  OVER\.."
 220 LET SCORE=0
 230 FOR R=1 TO 4
 240 LET SCORE=SCORE+(PEEK (DISP+R+1)-28)*10**(4-R)
 250 NEXT R
 260 IF SCORE>BEST THEN GOSUB 400
 270 PRINT AT 9,1;"      BEST SCORE IS ";BEST;AT 10,INT ((32-LEN Z$-3)/2);"BY ";Z$
 280 PRINT AT 12,4;"%P%R%E%S%S% %"%P%"% %T%O% %P%L%A%Y% %A%G%A%I%N"
 281 PRINT AT 0,10;"BRICK BUSTER"
 282 FOR Q=0 TO 30
 283 NEXT Q
 284 PRINT AT 12,4;"PRESS ""P"" TO PLAY AGAIN"
 285 PRINT AT 0,10;"\..GAME  OVER\.."
 286 FOR Q=0 TO 30
 287 NEXT Q
 290 IF INKEY$="P" THEN GOTO 15
 300 GOTO 280
 410 LET BEST=SCORE
 420 PRINT AT 2,2;"YOU NOW HAVE THE BEST SCORE"
 430 PRINT AT 4,1;"ENTER YOUR NAME (1-27 LETTERS)"
 440 INPUT Z$
 450 RETURN 
 500 SAVE "1010%0"
 510 RUN 

					
				
			



						

				


Tags


Archived Media, Downloadable, TS 1000




People


No people associated with this content.


					
				


			

			
		
	



	
 
	


	











		Scroll to Top





















			
				CEC\FE itemtype='https://schema.org/Blog' itemscope='itemscope' class="wp-singular computer_media-template-default single single-computer_media postid-57151 wp-custom-logo wp-theme-astra wp-child-theme-astra-child ast-desktop ast-separate-container ast-left-sidebar astra-4.11.3 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.11.2"C


		Skip to content


			

			

		

		

						

				

											

									

							

					

						
						

				The Authoritative Website
			
				
				
			
					
								
																								

															
												
					
								
			
	
 

		

		

									

													

										

							

					

						
						

				The Authoritative Website
			
				
				
			
					
									
																									

										

						

				
					Main Menu
					
											
									
			
					
									
											
						
	
				

						

			
		
				

			
Log in
		
				

			

				
Sign up
			Sign up
		
					
			
		

			

		

							

				

                                
                                    Home
                                
                                
                             » 
                                    Computer Media
                                    
                                 » 
                                    Brick Buster
                                    
                                
					
				

	

	

		
		
	




	


		
					

				



	
	


	
	
		


			
			
Brick Buster
			
		


	
	
	


							

				

  
Download
  





Date: 198x
Type: Program
Platform(s): TS 1000


					
				
		
		
							

				

  
      
  










Content



  







Appears On


Timex Sinclair Public Domain Library Tape 1002
Assembled by Tim Ward from many sources. Contains programs 10051 – 10121.







Related Products









Related Articles









Related Content









Image Gallery




  
    






Source Code



 
   0 REM \11\10\16\01\0A\16\78\FE\02\20\07\3E\04\32\AC\40\18\03\FE\18\C8\79\FE\02\20\07\3E\0C\32\AD\40\18\09\FE\1F\20\05\3E\0D\32\AD\40\05\0D\CD\55\41\7E\FE\08\20\16\CD\6A\41\3A\AC\40\FE\05\20\07\3E\04\32\AC\40\18\05\3E\05\32\AC\40\36\80\CD\E0\40\CD\82\41\CD\E0\40\CD\82\41\36\00\18\AA\00\00\E5\C5\42\4B\DB\04\FE\3B\20\08\79\FE\1D\28\0D\0C\18\0A\FE\2F\20\06\79\FE\01\28\01\0D\CD\55\41\36\00\23\36\03\23\36\03\23\36\00\05\CD\55\41\3A\AD\40\FE\0C\20\0F\7E\FE\80\20\0A\3E\0D\32\AD\40\3E\05\32\AC\40\06\02\23\7E\FE\80\20\0C\3E\05\32\AC\40\D9\C1\06\14\C5\D9\00\10\EC\23\3A\AD\40\FE\0D\20\0F\7E\FE\80\20\0A\3E\0C\32\AD\40\3E\05\32\AC\40\59\C1\E1\C9\D5\C5\2A\0C\40\C5\06\00\09\C1\11\21\00\10\03\C1\D1\C9\19\18\F8\E5\2A\0C\40\23\23\23\23\7E\3C\FE\26\28\03\77\18\05\36\1C\2B\18\F2\E1\C9\C5\01\00\09\0B\78\B1\20\FB\C1\C9\24\25\1C
   5 LET DISP=PEEK 16396+256*PEEK 16397
  10 LET BEST=0
  15 CLS 
  20 PRINT "ENTER SPEED 1 TO 9 (1=FASTEST)"
  25 PRINT AT 3,6;"<=5....8=> S=SERVE"
  30 INPUT I
  40 IF I<1 OR I>9 THEN GOTO 30
  50 POKE 16773,I
  60 CLS 
  70 PRINT "\ .0000\..\..\..\..\..BRICK BUSTER\..\..\..\..\..\..\..\..\..\. "
  80 FOR F=1 TO 20
  90 PRINT AT F,0;"\ :";TAB 31;"\: "
 100 NEXT F
 110 FOR F=1 TO 7
 120 PRINT AT F,1;"\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##"
 130 NEXT F
 135 LET B=5
 136 PRINT AT 0,30;B
 140 FOR F=5 TO 25 STEP 5
 150 POKE 16556,5
 160 POKE 16518,F
 170 IF INKEY$<>"S" THEN GOTO 170
 175 LET B=B-1
 176 PRINT AT 0,30;B
 180 RAND USR 16514
 190 PRINT AT 21,0;"                               "
 200 NEXT F
 210 PRINT AT 0,10;"\..GAME  OVER\.."
 220 LET SCORE=0
 230 FOR R=1 TO 4
 240 LET SCORE=SCORE+(PEEK (DISP+R+1)-28)*10**(4-R)
 250 NEXT R
 260 IF SCORE>BEST THEN GOSUB 400
 270 PRINT AT 9,1;"      BEST SCORE IS ";BEST;AT 10,INT ((32-LEN Z$-3)/2);"BY ";Z$
 280 PRINT AT 12,4;"%P%R%E%S%S% %"%P%"% %T%O% %P%L%A%Y% %A%G%A%I%N"
 281 PRINT AT 0,10;"BRICK BUSTER"
 282 FOR Q=0 TO 30
 283 NEXT Q
 284 PRINT AT 12,4;"PRESS ""P"" TO PLAY AGAIN"
 285 PRINT AT 0,10;"\..GAME  OVER\.."
 286 FOR Q=0 TO 30
 287 NEXT Q
 290 IF INKEY$="P" THEN GOTO 15
 300 GOTO 280
 410 LET BEST=SCORE
 420 PRINT AT 2,2;"YOU NOW HAVE THE BEST SCORE"
 430 PRINT AT 4,1;"ENTER YOUR NAME (1-27 LETTERS)"
 440 INPUT Z$
 450 RETURN 
 500 SAVE "1010%0"
 510 RUN 

					
				
			



						

				


Tags


Archived Media, Downloadable, TS 1000




People


No people associated with this content.


					
				


			

			
		
	



	
 
	


	











		Scroll to Top





















			
				B\F2\E1\C9\C5 itemtype='https://schema.org/Blog' itemscope='itemscope' class="wp-singular computer_media-template-default single single-computer_media postid-57151 wp-custom-logo wp-theme-astra wp-child-theme-astra-child ast-desktop ast-separate-container ast-left-sidebar astra-4.11.3 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.11.2"


		Skip to content


			

			

		

		

						

				

											

									

							

					

						
						

				The Authoritative Website
			
				
				
			
					
								
																								

															
												
					
								
			
	
 

		

		

									

													

										

							

					

						
						

				The Authoritative Website
			
				
				
			
					
									
																									

										

						

				
					Main Menu
					
											
									
			
					
									
											
						
	
				

						

			
		
				

			
Log in
		
				

			

				
Sign up
			Sign up
		
					
			
		

			

		

							

				

                                
                                    Home
                                
                                
                             » 
                                    Computer Media
                                    
                                 » 
                                    Brick Buster
                                    
                                
					
				

	

	

		
		
	




	


		
					

				



	
	


	
	
		


			
			
Brick Buster
			
		


	
	
	


							

				

  
Download
  





Date: 198x
Type: Program
Platform(s): TS 1000


					
				
		
		
							

				

  
      
  










Content



  







Appears On


Timex Sinclair Public Domain Library Tape 1002
Assembled by Tim Ward from many sources. Contains programs 10051 – 10121.







Related Products









Related Articles









Related Content









Image Gallery




  
    






Source Code



 
   0 REM \11\10\16\01\0A\16\78\FE\02\20\07\3E\04\32\AC\40\18\03\FE\18\C8\79\FE\02\20\07\3E\0C\32\AD\40\18\09\FE\1F\20\05\3E\0D\32\AD\40\05\0D\CD\55\41\7E\FE\08\20\16\CD\6A\41\3A\AC\40\FE\05\20\07\3E\04\32\AC\40\18\05\3E\05\32\AC\40\36\80\CD\E0\40\CD\82\41\CD\E0\40\CD\82\41\36\00\18\AA\00\00\E5\C5\42\4B\DB\04\FE\3B\20\08\79\FE\1D\28\0D\0C\18\0A\FE\2F\20\06\79\FE\01\28\01\0D\CD\55\41\36\00\23\36\03\23\36\03\23\36\00\05\CD\55\41\3A\AD\40\FE\0C\20\0F\7E\FE\80\20\0A\3E\0D\32\AD\40\3E\05\32\AC\40\06\02\23\7E\FE\80\20\0C\3E\05\32\AC\40\D9\C1\06\14\C5\D9\00\10\EC\23\3A\AD\40\FE\0D\20\0F\7E\FE\80\20\0A\3E\0C\32\AD\40\3E\05\32\AC\40\59\C1\E1\C9\D5\C5\2A\0C\40\C5\06\00\09\C1\11\21\00\10\03\C1\D1\C9\19\18\F8\E5\2A\0C\40\23\23\23\23\7E\3C\FE\26\28\03\77\18\05\36\1C\2B\18\F2\E1\C9\C5\01\00\09\0B\78\B1\20\FB\C1\C9\24\25\1C
   5 LET DISP=PEEK 16396+256*PEEK 16397
  10 LET BEST=0
  15 CLS 
  20 PRINT "ENTER SPEED 1 TO 9 (1=FASTEST)"
  25 PRINT AT 3,6;"<=5....8=> S=SERVE"
  30 INPUT I
  40 IF I<1 OR I>9 THEN GOTO 30
  50 POKE 16773,I
  60 CLS 
  70 PRINT "\ .0000\..\..\..\..\..BRICK BUSTER\..\..\..\..\..\..\..\..\..\. "
  80 FOR F=1 TO 20
  90 PRINT AT F,0;"\ :";TAB 31;"\: "
 100 NEXT F
 110 FOR F=1 TO 7
 120 PRINT AT F,1;"\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##"
 130 NEXT F
 135 LET B=5
 136 PRINT AT 0,30;B
 140 FOR F=5 TO 25 STEP 5
 150 POKE 16556,5
 160 POKE 16518,F
 170 IF INKEY$<>"S" THEN GOTO 170
 175 LET B=B-1
 176 PRINT AT 0,30;B
 180 RAND USR 16514
 190 PRINT AT 21,0;"                               "
 200 NEXT F
 210 PRINT AT 0,10;"\..GAME  OVER\.."
 220 LET SCORE=0
 230 FOR R=1 TO 4
 240 LET SCORE=SCORE+(PEEK (DISP+R+1)-28)*10**(4-R)
 250 NEXT R
 260 IF SCORE>BEST THEN GOSUB 400
 270 PRINT AT 9,1;"      BEST SCORE IS ";BEST;AT 10,INT ((32-LEN Z$-3)/2);"BY ";Z$
 280 PRINT AT 12,4;"%P%R%E%S%S% %"%P%"% %T%O% %P%L%A%Y% %A%G%A%I%N"
 281 PRINT AT 0,10;"BRICK BUSTER"
 282 FOR Q=0 TO 30
 283 NEXT Q
 284 PRINT AT 12,4;"PRESS ""P"" TO PLAY AGAIN"
 285 PRINT AT 0,10;"\..GAME  OVER\.."
 286 FOR Q=0 TO 30
 287 NEXT Q
 290 IF INKEY$="P" THEN GOTO 15
 300 GOTO 280
 410 LET BEST=SCORE
 420 PRINT AT 2,2;"YOU NOW HAVE THE BEST SCORE"
 430 PRINT AT 4,1;"ENTER YOUR NAME (1-27 LETTERS)"
 440 INPUT Z$
 450 RETURN 
 500 SAVE "1010%0"
 510 RUN 

					
				
			



						

				


Tags


Archived Media, Downloadable, TS 1000




People


No people associated with this content.


					
				


			

			
		
	



	
 
	


	











		Scroll to Top





















			
				


		Skip to content


			

			

		

		

						

				

											

									

							

					

						
						

				The Authoritative Website
			
				
				
			
					
								
																								

															
												
					
								
			
	
 

		

		

									

													

										

							

					

						
						

				The Authoritative Website
			
				
				
			
					
									
																									

										

						

				
					Main Menu
					
											
									
			
					
									
											
						
	
				

						

			
		
				

			
Log in
		
				

			

				
Sign up
			Sign up
		
					
			
		

			

		

							

				

                                
                                    Home
                                
                                
                             » 
                                    Computer Media
                                    
                                 » 
                                    Brick Buster
                                    
                                
					
				

	

	

		
		
	




	


		
					

				



	
	


	
	
		


			
			
Brick Buster
			
		


	
	
	


							

				

  
Download
  





Date: 198x
Type: Program
Platform(s): TS 1000


					
				
		
		
							

				

  
      
  










Content



  







Appears On


Timex Sinclair Public Domain Library Tape 1002
Assembled by Tim Ward from many sources. Contains programs 10051 – 10121.







Related Products









Related Articles









Related Content









Image Gallery




  
    






Source Code



 
   0 REM \11\10\16\01\0A\16\78\FE\02\20\07\3E\04\32\AC\40\18\03\FE\18\C8\79\FE\02\20\07\3E\0C\32\AD\40\18\09\FE\1F\20\05\3E\0D\32\AD\40\05\0D\CD\55\41\7E\FE\08\20\16\CD\6A\41\3A\AC\40\FE\05\20\07\3E\04\32\AC\40\18\05\3E\05\32\AC\40\36\80\CD\E0\40\CD\82\41\CD\E0\40\CD\82\41\36\00\18\AA\00\00\E5\C5\42\4B\DB\04\FE\3B\20\08\79\FE\1D\28\0D\0C\18\0A\FE\2F\20\06\79\FE\01\28\01\0D\CD\55\41\36\00\23\36\03\23\36\03\23\36\00\05\CD\55\41\3A\AD\40\FE\0C\20\0F\7E\FE\80\20\0A\3E\0D\32\AD\40\3E\05\32\AC\40\06\02\23\7E\FE\80\20\0C\3E\05\32\AC\40\D9\C1\06\14\C5\D9\00\10\EC\23\3A\AD\40\FE\0D\20\0F\7E\FE\80\20\0A\3E\0C\32\AD\40\3E\05\32\AC\40\59\C1\E1\C9\D5\C5\2A\0C\40\C5\06\00\09\C1\11\21\00\10\03\C1\D1\C9\19\18\F8\E5\2A\0C\40\23\23\23\23\7E\3C\FE\26\28\03\77\18\05\36\1C\2B\18\F2\E1\C9\C5\01\00\09\0B\78\B1\20\FB\C1\C9\24\25\1C
   5 LET DISP=PEEK 16396+256*PEEK 16397
  10 LET BEST=0
  15 CLS 
  20 PRINT "ENTER SPEED 1 TO 9 (1=FASTEST)"
  25 PRINT AT 3,6;"<=5....8=> S=SERVE"
  30 INPUT I
  40 IF I<1 OR I>9 THEN GOTO 30
  50 POKE 16773,I
  60 CLS 
  70 PRINT "\ .0000\..\..\..\..\..BRICK BUSTER\..\..\..\..\..\..\..\..\..\. "
  80 FOR F=1 TO 20
  90 PRINT AT F,0;"\ :";TAB 31;"\: "
 100 NEXT F
 110 FOR F=1 TO 7
 120 PRINT AT F,1;"\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##"
 130 NEXT F
 135 LET B=5
 136 PRINT AT 0,30;B
 140 FOR F=5 TO 25 STEP 5
 150 POKE 16556,5
 160 POKE 16518,F
 170 IF INKEY$<>"S" THEN GOTO 170
 175 LET B=B-1
 176 PRINT AT 0,30;B
 180 RAND USR 16514
 190 PRINT AT 21,0;"                               "
 200 NEXT F
 210 PRINT AT 0,10;"\..GAME  OVER\.."
 220 LET SCORE=0
 230 FOR R=1 TO 4
 240 LET SCORE=SCORE+(PEEK (DISP+R+1)-28)*10**(4-R)
 250 NEXT R
 260 IF SCORE>BEST THEN GOSUB 400
 270 PRINT AT 9,1;"      BEST SCORE IS ";BEST;AT 10,INT ((32-LEN Z$-3)/2);"BY ";Z$
 280 PRINT AT 12,4;"%P%R%E%S%S% %"%P%"% %T%O% %P%L%A%Y% %A%G%A%I%N"
 281 PRINT AT 0,10;"BRICK BUSTER"
 282 FOR Q=0 TO 30
 283 NEXT Q
 284 PRINT AT 12,4;"PRESS ""P"" TO PLAY AGAIN"
 285 PRINT AT 0,10;"\..GAME  OVER\.."
 286 FOR Q=0 TO 30
 287 NEXT Q
 290 IF INKEY$="P" THEN GOTO 15
 300 GOTO 280
 410 LET BEST=SCORE
 420 PRINT AT 2,2;"YOU NOW HAVE THE BEST SCORE"
 430 PRINT AT 4,1;"ENTER YOUR NAME (1-27 LETTERS)"
 440 INPUT Z$
 450 RETURN 
 500 SAVE "1010%0"
 510 RUN 

					
				
			



						

				


Tags


Archived Media, Downloadable, TS 1000




People


No people associated with this content.


					
				


			

			
		
	



	
 
	


	











		Scroll to Top





















			
				B\B1\FB\C1\C9 itemtype='https://schema.org/Blog' itemscope='itemscope' class="wp-singular computer_media-template-default single single-computer_media postid-57151 wp-custom-logo wp-theme-astra wp-child-theme-astra-child ast-desktop ast-separate-container ast-left-sidebar astra-4.11.3 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.11.2"C
   5 LET DISP=PEEK 16396+256*PEEK 16397
  10 LET BEST=0
  15 CLS 
  20 PRINT "ENTER SPEED 1 TO 9 (1=FASTEST)"
  25 PRINT AT 3,6;"<=5....8=> S=SERVE"
  30 INPUT I
  40 IF I<1 OR I>9 THEN GOTO 30
  50 POKE 16773,I
  60 CLS 
  70 PRINT "\ .0000\..\..\..\..\..BRICK BUSTER\..\..\..\..\..\..\..\..\..\. "
  80 FOR F=1 TO 20
  90 PRINT AT F,0;"\ :";TAB 31;"\: "
 100 NEXT F
 110 FOR F=1 TO 7
 120 PRINT AT F,1;"\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##\##"
 130 NEXT F
 135 LET B=5
 136 PRINT AT 0,30;B
 140 FOR F=5 TO 25 STEP 5
 150 POKE 16556,5
 160 POKE 16518,F
 170 IF INKEY$<>"S" THEN GOTO 170
 175 LET B=B-1
 176 PRINT AT 0,30;B
 180 RAND USR 16514
 190 PRINT AT 21,0;"                               "
 200 NEXT F
 210 PRINT AT 0,10;"\..GAME  OVER\.."
 220 LET SCORE=0
 230 FOR R=1 TO 4
 240 LET SCORE=SCORE+(PEEK (DISP+R+1)-28)*10**(4-R)
 250 NEXT R
 260 IF SCORE>BEST THEN GOSUB 400
 270 PRINT AT 9,1;"      BEST SCORE IS ";BEST;AT 10,INT ((32-LEN Z$-3)/2);"BY ";Z$
 280 PRINT AT 12,4;"%P%R%E%S%S% %"%P%"% %T%O% %P%L%A%Y% %A%G%A%I%N"
 281 PRINT AT 0,10;"BRICK BUSTER"
 282 FOR Q=0 TO 30
 283 NEXT Q
 284 PRINT AT 12,4;"PRESS ""P"" TO PLAY AGAIN"
 285 PRINT AT 0,10;"\..GAME  OVER\.."
 286 FOR Q=0 TO 30
 287 NEXT Q
 290 IF INKEY$="P" THEN GOTO 15
 300 GOTO 280
 410 LET BEST=SCORE
 420 PRINT AT 2,2;"YOU NOW HAVE THE BEST SCORE"
 430 PRINT AT 4,1;"ENTER YOUR NAME (1-27 LETTERS)"
 440 INPUT Z$
 450 RETURN 
 500 SAVE "1010%0"
 510 RUN