Orbit  "ORBIT"   SHOOTING AND BOMBING  1 G=0: H=0: 6000p:6000p (? 21,0;" *** READY - PRESS ANY KEY ***": 0 d! 4: 6: 0: n 1: 14,14;"";15,6;"";15,13 ;"";16,6;"";16,12 ;"";16,26;"" xh 17,2;"";17,6;"";17,11 ;"";17,26;"" j 18,2;"";18,6;"";18,10 ;"";18,26;"" / L=10 18: L,21;"": L S L=19 21: 3;L,0;"":L   STARTING VARIABLES  L=6: SHIP LINE  C=0: SHIP COLUMN & E=0: NO ENEMY FIGHTERS - YET ! B=0: NOT DROPPING BOMBS  F=0: LASERS NOT FIRING $ SN=5: NUMBER OF SPACESHIPS " , MAIN LOOP 1 GRAPHICS IN 310 AND 320 68 N=1 SN: 20,N*2; 0;"": N @ 0: L,C;"" T A$= Y Z DROP BOMBS [ ^. B=0 A$="0" BL=L: BC=C: B=1 c d FIRE LASERS e h A$="1" 3000 r L,C;" " |1 L=L+(A$="6")*(L<18)-(A$="7")*(L>0) % C=C+1-(32 C>30) B F=0 ƥ>.9ffff F=1: G=(*10 ):H=31   CRASH INTO BUILDING?   (L,C)=491 600X  0: 0: L,C;""  B 2000  F 1000: FIGHTER?  F=-1 600X  340T X< N=1 6: L,C;N;"": .01z# =,N*4:N b L,C;" " l- 20,0; 3;"" v) SN=SN-1: SN=0 700  F=0 670 D N=H 0 -1: (G,N)=491 3100 : 670  , G,H ARE LINE & COLUMN VARIABLES OF ALIENS  . G,N;"": .02{# =,25: G,N;" ":N / F=0: L=6: C=0:300,    MOVE ALIENS  A G,H;" ": H=H-1+(32 H<1): G=G+(L>G)-(L480 21004  BL,BC;""  4 BL=19 2200 >H T=1 3: BL,BC;"*": .01z# =,10 : BL,BC;" ": T  B=0:  LASERS   C>24  3: 1 C(),L() : 480,0 ( 1: C(),L():480,0  0: (G,H)513 H F=0: N=3 6:G,H; N;"":.02{# =,N*5: N & G,H;" ":  p 7: 0: z 2,13 ;"ORBIT" b 5,2;"YOU ARE IN ORBIT AROUND THE ";7,2;"PLANET XERON. YOUR TASK IS " ` 9 ,2;"FLATTEN THE BUILDINGS, AND TO";11 ,2;"BEAT OFF ENEMY FIGHTERS." o 14,2;"CONTROLS:";16,3;"6 UP 7 DOWN";18,3;"1 FIRE LASERS 0 DROP BOMBS"  GRAPHICS 1 N=1 3: G$: WHICH GRAPHIC LETTER 5 R=0 7: B: NUMBER DEFINING EACH ROW  G$+R,B: R:N  SPACESHIP O "A",0,224,124|,502,255,124|,0,0  BOMB O "B",480,480,208,252,30,30,14,0 $ ALIEN FIGHTER .Q "C",0,60<,118v,173,247,126~,36$,66B 8 FUNCTION DEFINITION V L()=171-L*8 ` C()=C*8+8 j