100 REM ...STTRK.ECB  ...LAST CHANGE  02-21-81  R.E.H.
  110 PRINT "&K": CURSOR 4,1
  120 PRINT TAB(18);"*^*^*^*^*^*^*^*^*^*^*^*"
  130 PRINT TAB(17);"*^*                   *^*"
  140 PRINT TAB(16);"*^*      S T T R K      *^*"
  150 PRINT TAB(17);"*^*                   *^*"
  160 PRINT TAB(18);"*^*^*^*^*^*^*^*^*^*^*^*": PRINT
  170 PRINT
  180 REM.... AUTHOR/IMPLEMENTOR - ?/J. LIGHT
  190 REM....LAST REVISED JULY 1972...JJL
  200 LET S$="      "
  210 PRINT ,"( Description is for STR6 or STTR )&J"
  220 PRINT "YOU ARE IN COMMAND OF THE ENTERPRISE"
  230 PRINT
  240 PRINT "DO YOU WANT A DESCRIPTION OF THE GAME";
  250 INPUT (1,100)A$
  260 IF A$="N" THEN 1180 ELSE  PRINT "&K"
  270 PRINT
  280 PRINT "THIS GAME SIMULATES A BATTLE BETWEEN THE STARSHIP"
  290 PRINT "ENTERPRISE AND ONE OR MORE ENEMY STARSHIPS."
  300 PRINT "THE OBJECT OF THE GAME IS TO DESTROY THE ENEMY SHIP"
  310 PRINT "WITH AS LITTLE DAMAGE TO THE ENTERPRISE AS POSSIBLE."
  320 PRINT "LIKEWISE, THE ENEMY IS TRYING TO DESTROY THE"
  330 PRINT "ENTERPRISE WITH AS LITTLE DAMAGE TO HIS OWN SHIP"
  340 PRINT "AS POSSIBLE."
  350 PRINT
  360 PRINT "BOTH SHIPS HAVE EQUAL WEAPONS AND APPROXIMATELY"
  370 PRINT "EQUAL TOP SPEED.  DEFENSIVE ABILITIES ARE ALSO"
  380 PRINT "ROUGHLY EQUAL.  WEAPONS AND DEFENSES ARE DESCRIBED"
  390 PRINT "BELOW:"
  400 PRINT "TYPE IN ANY LETTER TO CONTINUE";
  410 INPUT (1,200)A$
  420 PRINT "&K&J",S$,S$;"WEAPONS"
  430 PRINT
  440 PRINT "  TYPE   RANGE(MGM)   EFFECTIVE   RELATIVE    # SHOTS"
  450 PRINT "                        ANGLE     STRENGTH   AVAILABLE"
  460 PRINT "PHASER    0-400       ABS(A)<90      5       INFINITE"
  470 PRINT "PHASER    0-400       ABS(A)>90      4       INFINITE"
  480 PRINT "TORPEDO   300-700     ABS(A)<90      3       INFINITE"
  490 PRINT "TORPEDO   300-700     ABS(A)>90      2       INFINITE"
  500 PRINT "PROBE     0-1500         ALL      INFINITE      10"
  510 PRINT
  520 PRINT "TYPE IN ANY LETTER TO CONTINUE";
  530 INPUT (1,200)A$: PRINT "&K"
  540 PRINT "PHASER AND TORPEDO HITS ARE MORE LIKELY WHEN THE"
  550 PRINT "RANGE IS NEAREST TO 200 AND 500 MGM, RESPECTIVELY,"
  560 PRINT "AND WHEN THE BEARING OF THE ENEMY IS NEAREST TO"
  570 PRINT "0, -180, OR 180 DEGREES."
  580 PRINT
  590 PRINT "THE POSSIBILITY OF A PROBE HIT DEPENDS ONLY ON"
  600 PRINT "THE RANGE. (A PROBE HIT ALWAYS RESULTS IN TOTAL"
  610 PRINT "DESTRUCTION OF THE SHIP IT HITS AND MAY DESTROY"
  620 PRINT "THE OTHER SHIP)."
  630 PRINT : INPUT (1,200)" *** MORE ? ---=>",A$: PRINT "&K"
  640 PRINT "THE RADIUS OF THE EXPLOSION RESULTING FROM EITHER"
  650 PRINT "A SUICIDE OR A PROBE HIT IS ROUGHLY PROPORTIONAL"
  660 PRINT "TO THE AVERAGE SHIELD STRENGTH OF THE DESTROYED"
  670 PRINT "VESSEL.  SINCE IT MAY BE AS LARGE AS 600 MGM,"
  680 PRINT "BOTH SHIPS MAY BE DESTROYED BY THE SAME EXPLOSION."
  690 PRINT
  700 PRINT "TYPE IN ANY LETTER TO CONTINUE";
  710 INPUT (1,200)A$
  720 PRINT "&K",S$,S$;"DEFENSES"
  730 PRINT
  740 PRINT "EACH SHIP HAS FOUR SHIELDS WHICH ABSORB THE ENERGY"
  750 PRINT "FROM HITS MADE UPON THEM.  IN DOING SO, THEIR"
  760 PRINT "ABSORBTION ABILITY IS REDUCED BY AN AMOUNT PROPORTIONAL"
  770 PRINT "TO THE SEVERITY OF THE HIT.  A DIRECT HIT IS TWICE AS"
  780 PRINT "POWERFUL AS THE AVERAGE HIT.  THE SHIELD WHICH IS HIT"
  790 PRINT "IS DETERMINED RANDOMLY UNLESS THE SHIELDS COMMAND"
  800 PRINT "HAS BEEN GIVEN.  THIS COMMAND CAUSES THE STRONGEST"
  810 PRINT "SHIELD TO BE PLACED TOWARD THE ENEMY AND TO BE KEPT"
  820 PRINT "FACING THE ENEMY UNTIL ANOTHER SHIELDS COMMAND IS"
  830 PRINT "GIVEN.  A HIT ON A ZERO STRENGTH SHIELD RESULTS IN"
  840 PRINT "TOTAL DESTRUCTION."
  850 PRINT "&JTYPE IN ANY LETTER TO CONTINUE";
  860 INPUT (1,200)A$
  870 PRINT "&K",S$,S$;"MOVEMENT"
  880 PRINT
  890 PRINT "EACH VESSEL MOVES IN THE DIRECTION IT IS POINTING"
  900 PRINT "UP TO THE MAXIMUM DISTANCE POSSIBLE FOR IT."
  910 PRINT "(MAXIMUM MOVEMENT DISTANCE DEPENDS ON AVERAGE"
  920 PRINT "SHIELD STRENGTH).  THIS USUALLY CAUSES NO PROBLEM"
  930 PRINT "SINCE A SHIP MAY BE TURNED ANY NUMBER OF DEGREES"
  940 PRINT "WITHOUT PENALTY.  HOWEVER, A SHIP MAY NOT MOVE"
  950 PRINT "AND FIRE IN THE SAME TURN.  ALSO, WHEN A SHIP"
  960 PRINT "DOES NOT MOVE VOLUNTARILY, INERTIA CARRIES IT"
  970 PRINT "25 MGM PER TURN IN THE DIRECTION IT IS FACING."
  980 PRINT "&JTYPE IN ANY LETTER TO CONTINUE";
  990 INPUT (1,250)A$
 1000 PRINT "&K&J"
 1010 PRINT S$,S$;"COMMANDS"
 1020 PRINT
 1030 PRINT "THE COMMANDS RANGE (1), TURN (8), DAMAGE (9),"
 1040 PRINT "SHIELDS (10), CHANCES (11), AND COMMANDS (12) ARE"
 1050 PRINT "FREE MOVES, THAT IS,THE ENEMY DOES NOT TAKE HIS"
 1060 PRINT "TURN AFTER ONE OF THESE COMMANDS IS GIVEN."
 1070 PRINT "ALL OTHER COMMANDS COST A TURN."
 1080 PRINT
 1090 PRINT "THE BLUFF (13) AND THE SURRENDER (16) COMMANDS ALWAYS"
 1100 PRINT "FAIL WHEN THEY ARE GIVEN MORE THAN ONCE IN A GAME."
 1110 PRINT
 1120 PRINT "IF YOU WISH TO REPEAT A COMMAND, TYPE A CARRIAGE RETURN."
 1130 PRINT : INPUT (1,200)" *** MORE ? ---=>",A$: PRINT "&K"
 1140 PRINT "IF YOU GIVE THE MOVE (7) COMMAND AND DECIDE THAT YOU"
 1150 PRINT "REALLY WANT TO GIVE A DIFFERENT COMMAND, TYPE ANY"
 1160 PRINT "NEGATIVE NUMBER AND THEN TYPE THE CORRECT COMMAND."
 1170 PRINT
 1180 REM.... CHAIN* STMAIN
 1190 END