Top 10k strings from lunarbug.tap in <root> / bin / z80 / software / ZxTapGames.zip / games /

Back to the directory listing

   3 cx,cy;"   ";
   3 ,cy;"   ";
   3              
   2 Variables 
   2 SET UP SCREEN
   2 ********************
   1 x,y;"   ";
   1 x$="BONUS = "+
   1 o$="                                     
   1 fuel=fuel-.
   1 fuel+" x "+
   1 buggy=buggy-1
   1 buggy     
   1 b$="      "
   1 Wait for a key to be pressed
   1 This routine moves buggy across screen into position at line 8500
   1 This routine comes into play once you've lost a life. Line 9210 blows moon lander/buggy to smithereens, line 9240 checks you've still some lives in hand, line 9250 rubs out lander from score
   1 Sets up initial screen attributes
   1 Set up landscape for buggy part of game. The second bank of UDGs is used via system variable 23675 (see lines 10-24)
   1 Set up lander screen details. Line 7005 selects first bank of UDG data
   1 Set up initial variables and attributes for lander part of game
   1 Set up UDGs. This is different from usual method as 42 characters defined - twice as many as normal. These are addressed as two banks of 21 UDGs by changing system variable UDG(23675)
   1 SET UP VARIABLES
   1 SET UP UDG'S
   1 SET UP LANDSCAPE
   1 Routine to fire a shot from buggy. This will only be of use after level 2
   1 Routine to blast moon lander off into space
   1 Routine draws white lines OVER whole screen - thus, instructions are made to materialise as if by magic
   1 Prints buggy from second bank of UDG data
   1 Print score. Line 9015 checks for buggy's gun being fired. Throughout  routine, if you've reached level 3 or over, a check is made to see if you've managed to hit alien with laser blast; also to see if buggy has hit a hole in track. If level is a multiple of 4 then a larger bonus is awarded. The routine then GO TOs to line 8900 for next move
   1 Print number of moon landers left
   1 Print instructions using black INK and black PAPER
   1 PRINT AND MOVE LANDER
   1 PRINT & MOVE MAN & LAND
   1 Lines 9210-9260
   1 Lines 9060-9110
   1 Lines 9012-9052
   1 Lines 8910-8970
   1 Lines 8605-8800
   1 Lines 8510-8600
   1 Lines 8505-8585
   1 Lines 84-88
   1 Lines 8170-8270
   1 Lines 8090-8140
   1 Lines 7875-8060
   1 Lines 7610-7870
   1 Lines 76-77
   1 Lines 7580-7600
   1 Lines 7570-7575
   1 Lines 7510-7556
   1 Lines 7355-7380
   1 Lines 7310-7350
   1 Lines 7005-7040
   1 Lines 68-72
   1 Lines 6010-6060
   1 Lines 44-64
   1 Lines 30-36
   1 Lines 14-22
   1 Line numbers            highlighted in green have had  coding deleted                   
   1 Lander has landed, so underneath of landing bay is printed up on-screen. This is done using a call to 3582 of ROM which scrolls screen and attributes up one whole screen line
   1 LOSE A LIFE
   1 INSTRUCTIONS
   1 FIRE A SHOT
   1 Erases old buggy and prints in new position
   1 Erase old lander and print in new position
   1 End of the game routine. You'll be asked if you want to play again, and whether you want to see instructions for play
   1 Draw screen. Lines 7335 and 7340 dimension a$ to size of screen minus top line (21*32=672). The screen is then filled with characters from element 311 onwards and, finally, a$ is printed
   1 Draw screen containing buggy part of game, inlcuding score, "buggys left", etc
   1 Comprise data for two sets of UDGs
   1 Coding highlighted in  green has been inserted by me
   1 Check if there's been a crash, or whether you've managed to land successfully
   1 Cause lander to move down 18 lines of screen, one at a time, until it reaches bottom
   1 Calculate and print bonus details - this depends on landing position and how much fuel is left in tank
   1 ;"___________"
   1 ;"SCORE ";s;"    LEVEL ";lev,
   1 ;"SCORE ";s,"LEVEL ";lev,,,,,,,
   1 ;"PRESS i FOR INSTRUCTIONS"
   1 ;"PRESS A KEY TO PLAY";
   1 ;"PLEASE WAIT"
   1 ;"OR q TO QUIT"
   1 ;"LUNAR BUGGY"
   1 ;"LANDERS LEFT",,
   1 ;"GAME OVER":
   1 ;"FUEL ";fuel
   1 ;"BUGGYS LEFT         "
   1 ;"BONUS = 5000":
   1 , which store buggy's position
   1 )="          
   1 ''"To do this use keys-"
   1 '"The object is to first land yourmoon lander and get to your moonbuggy.Then you have to get to   the next moon lander in your    lunar buggy."
   1 '"PROGRAM BY ROBERT STOCKTON"
   1 '"ENHANCEMENTS BY JIM GRIMWOOD"
   1 "Good Luck. Press a key to play"
   1 "BUGGY UDG'S BY ANDRE TABRIZIFAR"
   1 "9-Left   0-Right"
   1 "2-Fire(only the buggy has a gun)The buggy jumps higher the      further forward you are."
   1 "1-Thrust or Jump"
   1  store old buggy position. Lines 8915 and 8920 draw land which is level-dependent; it gets much harder after 2nd level. Lines 8930 and 8940 read keyboard and update variables 
   1  position and velocity(
   1  are used to contain last position of lander. Keyboard is then read and note taken of change of 
   1            ";
   1                        Program reorganised and enhanced by Jim Grimwood
   1                                       "
   1                                                            
   1                                             
   1                
   1