10 COM Z$[72],G[8,8],C[9,2],K[3,3],N[3],Z[8,8],D[8] 20 COM C$[6],D$[72],E$[24],A$[3],Q$[72],R$[72],S$[48],X$[8] 30 COM T,T0,T7,T9,D0,E,E0,P,P0,S,S1,S2,S3,S8,S9,H,H8,Q1,Q2 40 COM Z1,Z2,Z3,R1,R2,C1,C2,W1,X,Y,X1,X2,A,N,B3,B9,K3,K7,K9,O9,O8 50 REM STTR1C 100 GOTO O9 OF 5820 5820 PRINT " INSTRUCTIONS:" 5830 PRINT "<*> = ENTERPRISE" 5840 PRINT "+++ = KLINGON" 5850 PRINT ">!< = STARBASE" 5860 PRINT " * = STAR" 5870 PRINT "COMMAND 0 = WARP ENGINE CONTROL" 5880 PRINT " 'COURSE' IS IN A CIRCULAR NUMERICAL 4 3 2" 5890 PRINT " VECTOR ARRANGEMENT AS SHOWN. \ ^ /" 5900 PRINT " INTERGER AND REAL VALUES MAY BE \^/" 5910 PRINT " USED. THEREFORE COURSE 1.5 IS 5 ----- 1" 5920 PRINT " HALF WAY BETWEEN 1 AND 2. /^\" 5930 PRINT " / ^ \" 5940 PRINT " A VECTOR OF 9 IS UNDEFINED, BUT 6 7 8" 5950 PRINT " VALUES MAY APPROACH 9." 5960 PRINT " COURSE" 5970 PRINT " ONE 'WARP FACTOR' IS THE SIZE OF" 5980 PRINT " ONE QUADRANT. THEREFORE TO GET" 5990 PRINT " FROM QUADRANT 6,5 TO 5,5 YOU WOULD" 6000 PRINT " USE COURSE 3, WARP FACTOR 1" 6010 PRINT "COMMAND 1 = SHORT RANGE SENSOR SCAN" 6020 PRINT " PRINTS THE QUADRANT YOU ARE CURRENTLY IN, INCLUDING" 6030 PRINT " STARS, KLINGONS, STARBASES, AND THE ENTERPRISE; ALONG" 6040 PRINT " WITH OTHER PERTINATE INFORMATION." 6050 PRINT "COMMAND 2 = LONG RANGE SENSOR SCAN" 6060 PRINT " SHOWS CONDITIONS IN SPACE FOR ONE QUADRANT ON EACH SIDE" 6070 PRINT " OF THE ENTERPRISE IN THE MIDDLE OF THE SCAN. THE SCAN" 6080 PRINT " IS CODED IN THE FORM XXX, WHERE THE UNITS DIGIT IS THE" 6090 PRINT " NUMBER OF STARS, THE TENS DIGIT IS THE NUMBER OF STAR-" 6100 PRINT " BASES, THE HUNDREDS DIGIT IS THE NUMBER OF KLINGONS." 6110 PRINT "COMMAND 3 = PHASER CONTROL" 6120 PRINT " ALLOWS YOU TO DESTROY THE KLINGONS BY HITTING HIM WITH" 6130 PRINT " SUITABLY LARGE NUMBERS OF ENERGY UNITS TO DEPLETE HIS " 6140 PRINT " SHIELD POWER. KEEP IN MIND THAT WHEN YOU SHOOT AT" 6150 PRINT " HIM, HE GONNA DO IT TO YOU TOO." 6160 PRINT "COMMAND 4 = PHOTON TORPEDO CONTROL" 6170 PRINT " COURSE IS THE SAME AS USED IN WARP ENGINE CONTROL" 6180 PRINT " IF YOU HIT THE KLINGON, HE IS DESTROYED AND CANNOT FIRE" 6190 PRINT " BACK AT YOU. IF YOU MISS, HE WILL SHOOT HIS PHASERS AT" 6200 PRINT " YOU." 6210 PRINT " NOTE: THE LIBRARY COMPUTER (COMMAND 7) HAS AN OPTION" 6220 PRINT " TO COMPUTE TORPEDO TRAJECTORY FOR YOU (OPTION 2)." 6230 PRINT "COMMAND 5 = SHIELD CONTROL" 6240 PRINT " DEFINES NUMBER OF ENERGY UNITS TO BE ASSIGNED TO SHIELDS" 6250 PRINT " ENERGY IS TAKEN FROM TOTAL SHIP'S ENERGY." 6260 PRINT "COMMAND 6 = DAMAGE CONTROL REPORT" 6270 PRINT " GIVES STATE OF REPAIRS OF ALL DEVICES. A STATE OF REPAIR" 6280 PRINT " LESS THAN ZERO SHOWS THAT THAT DEVICE IS TEMPORARALY" 6290 PRINT " DAMAGED." 6300 PRINT "COMMAND 7 = LIBRARY COMPUTER" 6310 PRINT " THE LIBRARY COMPUTER CONTAINS THREE OPTIONS:" 6320 PRINT " OPTION 0 = CUMULATIVE GALACTIC RECORD" 6330 PRINT " SHOWS COMPUTER MEMORY OF THE RESULTS OF ALL PREVIOUS" 6340 PRINT " LONG RANGE SENSOR SCANS" 6350 PRINT " OPTION 1 = STATUS REPORT" 6360 PRINT " SHOWS NUMBER OF KLINGONS, STARDATES AND STARBASES" 6370 PRINT " LEFT." 6380 PRINT " OPTION 2 = PHOTON TORPEDO DATA" 6390 PRINT " GIVES TRAJECTORY AND DISTANCE BETWEEN THE ENTERPRISE" 6400 PRINT " AND ALL KLINGONS IN YOUR QUADRANT" 6410 CHAIN "STTR1A" 9999 END