Stellar Run 77
870 LOCATE 11,9:PRINT"You reached" 880 LOCATE 15,11:PRINT INT(e*10)/10 890 LOCATE 11,13:PRINT"light years"
900 LOCATE 5,15:PRINT"PRESS ANY KEY TO R ESTART"
910 IF INKEY$<>"" THEN 910
920 IF INKEY$="" THEN 920
930 GOTO 940
940 REM INITIALISE
950 CLS:FOR A=1 TO 22:PRINT:NEXT 960 REM X AND Y POSITION OF SHIP 970 X=16:FX=X:Y=10:FY=Y
980 REM MISSILE BANK
990 FG=9
1000 REM DISPLAY SHIP
1010 FOR K=0 TO 48:SOUND 1,100-K,2:NEXT 1020 S$=CHR$(231)
1030 LOCATE X+1,Y+1:PRINT S$;
1040 REM VARIABLES
1050 F=0:M=0:D=1:E=0:A=0:B=0:C=0:EE=0.2 1060 X$=CHR$(235)+" "+CHR$(236)+" "+CHR$ (237)+CHR$(238)+CHR$(239)+" "
1070 0$=CHR$(232):P$=CHR$(233):0$=CHR$(2 34)
1080 A$="":FOR K=1 TO 45:A$=A$+CHR$(232) :NEXT
1090 I$="":FOR K=I TO 45:l4=I$+CHR$(234) +" ":NEXT
1100 B$=STRING$(39,32)
1110 C$=SPACE$(5)+P$+SPACE$(5)+P$+SPACE$ (13)+P$+SPACE$(13)+P$+SPACE$(36)+P$+SPAC E$(10)
1120 GOTO 120
1130 REM INSTRUCTIONS
1140 CLS:LOCATE 13,1:PRINT CHR$(24);"STE LLAR RUN";CHR$(24)
1150 LOCATE 1,3:PRINT"You are in command of 'STELLAR TRIPPER' and have discovere d a new galaxy."
1160 PRINT:PRINT"The galaxy is 135 light
years wide and you will have to naviga te your way through the WARP MAZE." 1170 PRINT:PRINT"Each time you play you will be given a slightly different maze