8-Bit Software Online Conversion

One Liner - Listing

10REM Starship Traveller 20REM (C) 1996 Jon Ripley 30REM This program is PD 40REM Please DO NOT ALTER this progra m 50MODE4:L=L+1:PRINTTAB(14,14)"LEVEL:" ;L:A=GET:VDU33041;4364;7296;4609;3111;71 80;7681;294;12:FORX=1TOL+15:PRINTTAB(RND (36)+1,RND(29)-1)"*":NEXT:X=48:Y=212+RND (512):REPEATI=1*INKEY-99-1*NOTINKEY-99:X =X+4:Y=Y+I:IFPOINT(X,Y)=1PRINTTAB(14,14) "GOODBYE!"ELSEPLOT69,X,Y:UNTILX>1279:OSC LI"FX15":PRINTTAB(14,14)"WELL DONE":A=GE T:GOTO10