5 REM HPCMD.ECB
   10 REM ***********HP BASIC PROGRAM LIBRARY****************
   11 REM
   12 REM STTR1:STAR TREK
   13 REM NAME CHANGED TO STRTRK 6/25
   14 REM 36243 REV A --2/73
   15 REM
   16 REM ************CONTRIBUTED PROGRAM***********************
   17 REM *                                                    *
   18 REM * STAR TREK: BY MIKE MAYFIELD, CENTERLINE ENGINEER'G *
   19 REM *     TYPED IN BY ERIK OREDSON, BASIC PROGRAMER      *
   20 REM *                                                    *
   21 REM ******************************************************
   25 REM
 5890 PRINT "          <*> = ENTERPRISE"
 5891 PRINT "          +++ = KLINGON"
 5892 PRINT "          >!< = STARBASE"
 5900 PRINT "           *  = STAR"
 5910 PRINT "COMMAND 0 = WARP ENGINE CONTROL"
 5920 PRINT "  COURSE IS IN A CIRCULAR NUMERICAL";TAB(48);"4  3  2"
 5930 PRINT "  VECTOR ARRANGEMENT AS SHOWN.";TAB(49);"\ ^ /"
 5940 PRINT "  USED. THEREFORE COURSE 1.5 IS";TAB(47);"5 ------ 1"
 5950 PRINT "  HALFWAY BETWEEN 1 AND 2";TAB(50);"/^\"
 5960 PRINT "  A VECTOR OF 9 IS UNDEFINED, BUT";TAB(49);"/ ^ \"
 5970 PRINT "  VALUES MAY APROACH 9.";TAB(48);"6  7  8"
 5980 PRINT "  ONE WARP FACTOR IS THE SIZE OF ONE QUADRANT. THEREFORE"
 5990 PRINT "  TO GET FROM QUADRANT 6,5 TO 5,5 YOU WOULD USE COURSE"
 6000 PRINT "  3 WARP FACTOR 1."
 6005 PRINT
 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 VITAL INFORMATION."
 6045 PRINT
 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 OF XXX. WHERE THE ONES DIGIT IS THE"
 6090 PRINT "  NUMBER OF STARS, THE TENS IS THE NUMBER OF STARBASES"
 6100 PRINT "  AND THE HUNDREDS DIGIT IS THE NUMBER OF KLINGONS."
 6105 PRINT
 6110 PRINT "COMMAND 3 = PHASER CONTROL"
 6120 PRINT "  ALLOWS YOU TO DESTROY KLINGONS BY HITTING THEM WITH"
 6130 PRINT "  LARGE NUMBERS OF ENERGY UNITS, IN ORDER TO DEPLETE"
 6140 PRINT "  THEIR SHIELD POWER. REM EMBER THAT IF YOU SHOOT AT THEM,"
 6150 PRINT "  THEY WILL SHOOT RIGHT BACK AT -> YOU."
 6155 PRINT
 6160 PRINT "COMMAND 4 = PHOTON TORPEDO CONTROL"
 6170 PRINT "  COURSE IS THE SAME AS WARP ENGINE CONTROL."
 6180 PRINT "  IF YOU HIT THE KLINGON, HE IS DESTROYED AND CAN'T FIRE"
 6190 PRINT "  BACK AT YOU. BUT IF YOU MISS, HE WILL SHOOT HIS PHASERS"
 6200 PRINT "  BACK AT ->YOU."
 6210 PRINT "  NOTE: THE LIBRARY COMPUTER (COMMAND 7) HAS AN OPTION"
 6220 PRINT "  TO COMPUTE THE TORPEDO TRAJECTORY FOR YOU."
 6225 PRINT
 6230 PRINT "COMMAND 5 = SHIELD CONTROL "
 6240 PRINT "  DEFINES THE NUMBER OF ENERGY UNITS TO BE ASSIGNED TO THE"
 6245 PRINT "  ENTERPRISES SHIELDS. ENERGY IS TAKEN FROM THE SHIPS"
 6247 PRINT
 6250 PRINT "COMMAND 6 = DAMAGE CONTROL REPORT"
 6260 PRINT "  GIVES THE STATE OF REPAIR OF ALL DEVICES. A STATE OF REPAIR"
 6270 PRINT "  LESS THAN ZERO SHOWS THAT THE DEVICE IS TEMPRARILY"
 6280 PRINT "  DAMAGED."
 6282 PRINT
 6285 PRINT "COMMAND 7 = LIBRARY COMPUTER"
 6290 PRINT "  THE LIBRARY COMPUTER HAS THE FOUR FOLLOWING OPTIONS:"
 6300 PRINT "     OPTION 0 = CUMULATIVE GALACTIC RECORD"
 6310 PRINT "      SHOWS THE COMPUTERS MEMORY CONTAINING THE RESULTS OF "
 6320 PRINT "      ALL PREVIOUS LONG RANGE SENSOR SCANS"
 6330 PRINT "     OPTION 1 = STATUS REPORT"
 6340 PRINT "       SHOWS THE NUMBER OF KLINGONS, STARDATES, ANS STARBASES"
 6350 PRINT "       LEFT"
 6351 PRINT "  OPTION 2 = PHOTON TORPEDO TRAJECTORY DATA"
 6360 PRINT "       GIVES TRAJECTORY AND DISTANCE BETWEEN THE ENTERPRISE"
 6370 PRINT "       AND ALL KLINGONS IN YOUR QUADRANT"
 6371 PRINT "  OPTION 3 = CALCULATOR"
 6372 PRINT "       ALLOWS YOU TO CALCULATE COURSE AND DIRECTION"
 6373 PRINT "       BETWEEN ANY TWO POINTS"
 6380 REM ...CHAIN*STAR-TREK
 6390 END