10 REM CMDS.ECB 15 REM......GALAXY INSTRUCTIONS.....RALPH HOPKINS....EAGAN MINN. 8-1-79 20 DIM Z$(60): REM......as implemented on the UTS700 30 FOR X=1 TO 60: LET Z$=Z$+"=": NEXT X 40 PRINT TAB(5);"* * [G] * :G: >G< .* * >B< *" 50 PRINT TAB(5);"*X* ^Z^" 60 PRINT TAB(5);"* * G A L A X Y * *" 70 PRINT TAB(5);">G< :I: [REV.-A)" 80 PRINT TAB(5);"* +R+ * *[ ) * * -=- * :E: * [8-3-79)" 90 FOR X=1 TO 6: PRINT : NEXT X 100 PRINT " PREPARE YOURSELF FOR THE GREATEST MISSION A STARFLEET" 110 PRINT " COMMANDER MAY BE ASKED TO PERFORM: DEFENCE OF THE GALAXY#" 120 PRINT 130 PRINT " YOU WILL BE IN COMMAND OF FROM 1 TO 5 STARSHIPS. EACH" 140 PRINT " SHIP WILL CARRY ONE SHUTTLECRAFT PLUS AN ARSENEL OF WEAPONS" 150 PRINT " TO USE IN THE DEFENSE OF THE FEDERATION." 160 FOR X=1 TO 3: PRINT : NEXT X 170 PRINT " *** THESE ARE YOUR SHIPS ***": PRINT : PRINT 180 PRINT TAB(5);" = ENTERPRISE";TAB(30);":E: = IT:S SHUTTLE-CRAFT" 190 PRINT TAB(5);" = LEXINGTON";TAB(30);":L: = IT:S SHUTTLE-CRAFT" 200 PRINT TAB(5);" = REPUBLIC";TAB(30);":R: = IT:S SHUTTLE-CRAFT" 210 PRINT TAB(5);" = INTERPRID";TAB(30);":I: = IT:S SHUTTLE-CRAFT" 220 PRINT TAB(5);" = HOOD";TAB(30);":H: = IT:S SHUTTLE-CRAFT" 230 FOR X=1 TO 4: PRINT : NEXT X 240 PRINT TAB(5);"=== ARRANGED AGAINST YOU MAY INCLUDE THE FOLLOWING ===" 250 PRINT 260 PRINT TAB(5);" = KLINGON WARSHIP" 270 PRINT TAB(5);"<=> = KLINGON BATTLE CRUISER" 280 PRINT TAB(5);"+R+ = ROMULANS" 290 PRINT TAB(5);"^Z^ = ZORPH SHIPS" 300 PRINT TAB(5);"*X* = XEONITES" 310 PRINT TAB(5);"[G] = GORN STARSHIPS" 320 PRINT TAB(5);"+G+ = GORN RECON OR SHUTTLE CRAFT" 330 PRINT TAB(5);">G< = GORN BASE SHIPS" 340 PRINT TAB(5);" . = THEOLITE MINES" 350 FOR X=1 TO 3: PRINT : NEXT X 360 PRINT TAB(10);"=== OTHER SYMBOLS YOU WILL SEE INCLUDE: ===": PRINT 370 PRINT TAB(5);">B< = ONE OF YOUR BASES" 380 PRINT TAB(5);" * = A STAR" 390 PRINT TAB(5);"(#) = DESTROYED STARS" 400 PRINT TAB(5);"( ) = A BLACK HOLE" 410 PRINT TAB(5);" = = SPACE DEBREE" 420 PRINT Z$: FOR X=1 TO 3: PRINT : NEXT X 430 PRINT " THIS WILL SOON PROVE TO BE A GAME OF STRAGEDY AS WELL" 440 PRINT " AS SURVIVAL. AFTER *ALL* OF YOUR STARSHIPS MOVE ONE TIME," 450 PRINT " THEN THE ALIENS WILL GET TO MOVE. THIS CYCLE WILL BE" 460 PRINT " DEFINED AS ONE STARDATE. A SINGLE SHIP WILL HAVE MORE" 470 PRINT " STARDATES AS WELL AS A MORE DEFENSIVE STRAGEDY.": PRINT 480 PRINT " SEVERALL SHIPS WILL ALLOW YOU TO CO-ORDINATE A MORE" 490 PRINT " AGGRESIVE STRAGEDY AGAINST THE ALIENS. YOU WILL FIND THAT" 500 PRINT " YOU HAVE FEWER BASES AND LESS STARDATES. ALSO NOTE THAT" 510 PRINT " ENERGY ON BASES AS WELL AS ALL WEAPONS IS LIMITED. THERE" 520 PRINT " ARE NO LIMITLESS SUPPLIES OR WEAPONS.": PRINT : PRINT : PRINT 530 PRINT Z$: FOR X=1 TO 3: PRINT : NEXT X 540 PRINT " SHUTTLE-CRAFT CAN MOVE UP TO 1/2 A QUADRANT PER TURN" 550 PRINT " THEY CAN CARRY A SINGLE ANTI-MATTER BOMB AS THAT IS THEIR" 560 PRINT " ONLY POSSIBLE WEAPON. ALSO THEY ONLY CAN TIE INTO" 570 PRINT " A BASE TO DO LONG RANGE SCANNING. IN SHORT, THEY ARE" 580 PRINT " QUITE LIMITED. BUT IF YOU ARE LOSING, YOU BETTER USE" 590 PRINT " THEM FOR WHAT LITTLE THEY ARE WORTH.": PRINT : PRINT 600 PRINT Z$: FOR X=1 TO 3: PRINT : NEXT X 610 PRINT "COMMAND 0 = WARP ENGINES": PRINT : PRINT 620 PRINT "COURSE IS A CIRCULAR VECTOR AS SHOWN.",TAB(50);"4 3 2" 630 PRINT "REAL VALUES MAY BE USED. FOR EXAMPLE,";TAB(51);"\ : /" 640 PRINT "1.5 WOULD BE HALFWAY BETWEEN 1 AND 2";TAB(52);"\:/" 650 PRINT TAB(48);"5 ------- 1" 660 PRINT "A :WARP FACTOR: IS THE SIZE OF ONE QUADRANT.";TAB(52);"/:\" 670 PRINT "REAL VALUES MAY BE USED. FOR EXAMPLE,";TAB(51);"/ : \" 680 PRINT TAB(50);"6 7 8": PRINT : PRINT : PRINT 690 PRINT "COMMAND 1 = SHORT RANGE SCAN": PRINT 700 PRINT "DISPLAYS THE QUADRANT THAT YOU ARE IN." 710 PRINT TAB(15);"FOR EXAMPLE;": PRINT : PRINT 720 PRINT TAB(5);"X-1--2--3--4--5--6--7--8--9-10 XXX" 730 PRINT TAB(5);"X X 0 STARDATES LEFT 21" 740 PRINT TAB(5);"X X 1 CONDITION: RED" 750 PRINT TAB(5);"X X 2 QUADRANT 3 6" 760 PRINT TAB(5);"X X 3 SECTOR 3 4" 770 PRINT TAB(5);"X * * X 4 ENERGY: 650" 780 PRINT TAB(5);"X X 5 SHIELDS: 900" 790 PRINT TAB(5);"X >B< * +R+ X 6 PHOTONS: 3" 800 PRINT TAB(5);"X X 7 ANTI-MATTER BOMB 1" 810 PRINT TAB(5);"X X 8 ANTI-MATTER PROBE 0" 820 PRINT TAB(5);"X *X* X 9 * SCOUTING PROBE 2" 830 PRINT TAB(5);"X-1--2--3--4--5--6--7--8--9-10 XXX"; 840 PRINT " NEXT COMMAND (0 TO 10) ---=>": PRINT : PRINT : PRINT 850 PRINT "COMPUTOR OPTION (2) WILL CALCULATE TRAJECTORIES BETWEEN TWO POINTS" 860 PRINT "COMPUTOR OPTION (3) WILL DISPLAY TRAJECTORIES TO ALL ALIENS." 870 PRINT "COMPUTOR OPTION (8) WILL GIVE A REPORT OF THE QUADRANT CONTENTS." 880 FOR X=1 TO 6: PRINT : NEXT X 890 PRINT "COMMAND 2 = LONG RANGE SCAN": PRINT 910 PRINT "OF STARS, 10:S THE NUMBER OF STARBASES, AND 100:S ARE" 920 PRINT "THE NUMBER OF KLINGONS OR OTHER ALIENS.": PRINT 930 PRINT TAB(15);"FOR EXAMPLE:": PRINT : PRINT 940 PRINT TAB(9);"7 3 6": PRINT 950 PRINT TAB(9);"4 313 105": PRINT 960 PRINT TAB(9);"104 4 1": PRINT : PRINT : PRINT 970 PRINT "COMMAND 3 = PHAZERS.": PRINT 980 PRINT "YOU MAY DESTROY THE KLINGON BY USING ENOUGH PHASOR." 990 PRINT "POWER AS TO DEPLETE HIS SHIELDS. KEEP IN MIND THAT WHEN" 1000 PRINT "YOU FIRE AT HIM, HE GONNA DO IT TO YOU, TOO#": PRINT 1010 PRINT "COMPUTOR OPTION (6) WILL SET PHAZERS ON MANUAL OR AUTOMATIC." 1020 PRINT : PRINT 1030 PRINT "COMMAND 4 = PHOTON TORPEDOES.": PRINT 1040 PRINT "COURSE IS SAME AS WITH WARP ENGINES. THE LIBRARY" 1050 PRINT "COMPUTER CAN COMPUTE THE TRAJECTORY FOR YOU (OPTION 3)" 1060 PRINT "COMPUTOR OPTION (7) WILL SET PHOTONS ON MANUAL OR AUTOMATIC." 1070 PRINT : PRINT 1080 PRINT "COMMAND 5 = SHIELDS": PRINT 1090 PRINT "DEFINES THE AMOUNT OF ENERGY TO BE ASSIGNED TO SHIELDS." 1100 PRINT : PRINT 1110 PRINT "COMMAND 6 = COMMUNICATIONS": PRINT 1120 PRINT " ENGINEERING WILL GIVE YOU A REPORT ON THE STATUS OF ALL" 1130 PRINT " SYSTEMS. A NEGATIVE NUMBER INDICATES DAMAGE. IF YOU ARE" 1140 PRINT " DOCKED AT A BASE >B< , THEN YOU ALSO GET A BASE SUPPLY" 1150 PRINT " STATUS.": PRINT : PRINT 1160 PRINT "COMMAND 7 = LIBRARY COMPUTER" 1170 PRINT " OPTION 0 = MAP OF THE GALAXY": PRINT 1180 PRINT " ALL LONG RANGE SCANS FROM ALL SHIPS ARE SHOWN ON" 1190 PRINT " THE SAME MAP. ALSO THE SHIP LOCATIONS ARE LISTED" 1200 PRINT " ON THE RIGHT OF THE MAP. THE * SHOWS WHICH SHIP IS" 1210 PRINT " MOVING NEXT. THE EXAMPLE SHOWS 3 6 *" 1220 PRINT : PRINT 1230 PRINT "XXXX---1---2---3---4---5---6---7---8---9--10--XXXX" 1240 PRINT " 1 X 0 0 0 0 0 0 0 0 0 0 X 1 3 6 *" 1250 PRINT " 2 X 0 0 0 0 7 3 6 0 0 0 X 2" 1260 PRINT " 3 X 0 0 0 0 4 313 105 0 0 0 X 3 2 7" 1270 PRINT " 4 X 0 0 0 0 104 4 1 0 0 0 X 4" 1280 PRINT " 5 X 0 0 0 0 0 0 0 0 0 0 X 5" 1290 PRINT " 6 X 0 0 0 0 0 0 0 0 0 0 X 6" 1300 PRINT " 7 X 0 0 0 0 0 0 0 0 0 0 X 7" 1310 PRINT " 8 X 0 0 0 0 0 0 0 0 0 0 X 8" 1320 PRINT " 9 X 0 0 0 0 0 0 0 0 0 0 X 9" 1330 PRINT " 10X 0 0 0 0 0 0 0 0 0 0 X 10" 1340 PRINT "XXXX---1---2---3---4---5---6---7---8---9--10--XXXX"; 1350 PRINT " NEXT CMD ---=>": PRINT : PRINT : PRINT : PRINT 1360 PRINT " *** ALIENS THAT MOVE RESET ANY SCANNED QUADRANTS TO 0 #" 1370 FOR X=1 TO 3: PRINT : NEXT X 1380 PRINT " OPTION 1 = GAME STATUS": PRINT 1390 PRINT " REPORTS HOW MANY STARSHIPS, BASES, AND ALIENS REMAIN." 1400 PRINT : PRINT 1410 PRINT " OPTION 2 = TRAJECTORY CALCULATOR": PRINT 1430 PRINT " OPTION 3 = PHOTON TORPEDO DATA" 1440 PRINT " GIVES COURSE BETWEEN TWO POINTS.": PRINT : PRINT 1450 PRINT " OPTION 4 = RETRIEVE SHUTTLE CRAFT": PRINT 1460 PRINT " OPTION 5 = POINT-TO-POINT WARP TRAVEL" 1470 PRINT " THE COMPUTOR GIVES YOU PINPOINT NAVIGATION. BUT" 1480 PRINT " IT ALSO USES MORE ENERGY!": PRINT 1490 PRINT " OPTION 6 = SET PHASERS ON MANUAL OR AUTOMATIC": PRINT 1500 PRINT " MANUAL FIRING ALLOWS YOU TO PICK YOUR TARGET SECTOR" 1510 PRINT " AUTOMATIC FIRING IS DONE BY THE COMPUTOR. ENERGY TO" 1520 PRINT " FIRE IS DIVIDED BETWEEN ALL ALIENS PRESENT.": PRINT 1530 PRINT " OPTION 7 = SET PHOTONS ON MANUAL OR AUTOMATIC": PRINT 1540 PRINT " MANUAL FIRING ALLOWS YOU TO SET YOUR OWN PHOTON" 1550 PRINT " COURSE." 1560 PRINT " AUTOMATIC FIRING IS DONE BY THE COMPUTOR." 1570 PRINT " THE COMPUTOR WILL RAPID-FIRE PHOTONS TO ALL ALIENS" 1580 PRINT " DETECTED IN THE QUADRANT.": PRINT 1590 PRINT " OPTION 8 = SHORT RANGE SCAN ANALYSIS": PRINT 1600 PRINT " REPORTS ON WHAT IS PRESENT IN YOUR QUADRANT." 1610 PRINT : PRINT 1620 PRINT "COMMAND 8 = UNCLOAKING DEVICE": PRINT 1630 PRINT " THIS DEVICE ALLOWS YOU TO UNCLOAK ANY INVISIBLE ROMULANS" 1640 PRINT " +R+ THAT ARE IN YOUR QUADRANT. NOTE THAT SHUTTLE-CRAFT" 1650 PRINT " ARE HELPLESS AGAINST CLOAKED ROMULANS.": PRINT : PRINT : PRINT 1660 PRINT "COMMAND 9 = SPECIAL WEAPONS": PRINT 1670 PRINT " OPTION 1 = ANTI-MATTER BOMB": PRINT 1680 PRINT " USED TO DETONATE STARS WHICH IN TURN WILL DETONATE" 1690 PRINT " ANY STAR WITHIN TWO SECTORS. OF COURSE EVERYTHING" 1700 PRINT " ELSE WITHIN TWO SECTORS IS JUST PLAIN GONE##" 1710 PRINT : PRINT 1720 PRINT " OPTION 2 = ANTI-MATTER PROBE": PRINT 1730 PRINT " COURSE DIRECTIONS ARE THE SAME AS A WARP MOVE." 1740 PRINT " THIS LITTLE BEAUTY WILL WIPE OUT ANY AJOINING" 1750 PRINT " QUADRANT. IF YOUR NOT CAREFUL TO AVOID STARS" 1760 PRINT " IN YOUR QUADRANT, THEN YOU WILL BE WIPED OUT###" 1770 PRINT : PRINT 1780 PRINT " OPTION 3 = * SCOUTING PROBE": PRINT 1790 PRINT " COURSE DIRECTIONS ARE THE SAME AS A WARP MOVE." 1800 PRINT " THIS ALLOWS YOU TO SCAN UP TO 10 QUADRANTS ON THE" 1810 PRINT " GALAXY MAP FOR ALIENS." 1820 PRINT " OPTION 4 = LAUNCH SHUTTLE-CRAFT": PRINT 1830 PRINT " OPTION 5 = ARM SHUTTLE-CRAFT": PRINT 1840 PRINT " ALLOWS YOU TO ARM THE SHUTTLE WITH 1 ANTI-MATTER BOMB" 1850 PRINT 1860 PRINT " OPTION 6 = USE TRACTOR BEAM": PRINT 1870 PRINT " THE TRACTOR BEAM IS CAPABLE OF CAPTURING WEAK ALIENS." 1880 PRINT " YOU SPEND A LOT OF ENERGY TO MAKE A CAPTURE BUT" 1890 PRINT " YOU ALSO DESTROY THE SHIP AS WELL GAIN SOME IF ITS" 1900 PRINT " ENERGY AND SOMETIMES WEAPONS AS WELL." 1910 FOR X=1 TO 4: PRINT : NEXT X 1920 PRINT "COMMAND 10 = CHANGE SHIPS": PRINT 1930 PRINT " THIS COMMAND PASSES THE MOVE ON TO THE NEXT SHIP." 1940 PRINT " THE ADVANTAGE OF THIS WILL DEPEND UPON YOUR BATTLE" 1950 PRINT " TACTICS. BECAUSE THE ALIENS MOVE, YOU CAN GAIN THE" 1960 PRINT " ADVANTAGE OF AMBUSH!": PRINT : PRINT 1970 PRINT Z$: PRINT 1980 PRINT TAB(20);"* END OF INSTRUCTIONS *" 1990 END