10 DIM A1$[1] 100 RANDOMIZE 110 PRINT 120 PRINT "DO YOU WISH TO SEE THE SHIP'S MANUAL (Y OR N)"; 130 INPUT A1 $ 140 IF A1$ <> "Y" THEN 470 150 PRINT 160 PRINT " STARSHIP COMMANDER'S MANUAL" 170 PRINT 180 PRINT " THE CAPTAIN DECIDES HOW ENERGY IS TO BE DISTRIBUTED." 190 PRINT "UNDAMAGED ENGINES GENERATE 100 STROMS OF ENERGY PER" 200 PRINT "CYCLE. ORDER SPEED IN WARPS. WARP 1 REQUIRES 20 STROMS." 210 PRINT "EACH ADDITIONAL WARP REQUIRES 5 STROMS. MAX SPEED IS" 220 PRINT"WARP 10. CAPTAIN ALLOCATES ENERGY TO PROTECTIVE SHIELDS" 230 PRINT "AND PHASER BANKS IN STROMS. PHASERS ARE COMPUTER AIMED." 240 PRINT "THE SHIP HAS 4 SALVOS OF PHOTON TORPEDOES WHICH REQUIRE" 250 PRINT "NO ENERGY TO LAUNCH. SHIELD MAX IS 50 STROMS." 260 PRINT 270 PRINT "THE CREW HAS BEEN TRAINED FOR THESE TACTICS:" 280 PRINT " (1) STRAIGHT AHEAD ATTACK" 290 PRINT " (2) BREAK-AWAY RETREAT" 300 PRINT " (3) PLAY DEAD" 310 PRINT " (5) (IF YOU WANT A FULL STATUS REPORT FIRST)" 320 PRINT 330 PRINT "FIRING SEQUENCE CODE:" 340 PRINT " (0) NO WEAPONS" 350 PRINT " (1) FIRE PHASERS" 360 PRINT " (2) LAUNCH TORPEDOES" 370 PRINT " (3) FIRE PHASERS AND TORPEDOES" 380 PRINT 390 PRINT "HANDY SPEED CHART:" 400 PRINT " SPEED STROMS SPEED STROMS" 410 PRINT " 1 20 6 45" 420 PRINT " 2 25 7 50" 430 PRINT " 3 30 8 55" 440 PRINT " 4 35 9 60" 450 PRINT " 5 40 10 65" 460 PRINT 470 PRINT 480 PRINT "STARDATE ";.1*INT(10^5*RND(0)) 490 PRINT " CAPTAIN, SENSORS REPORT A KLINGON WARSHIP APPROACHING." 500 PRINT "HE IS A CLASS 3 VESSEL. MAX SPEED - WARP 8, ARMED WITH" 510 PRINT "DISRUPTER BEAMS AND QUANTUM BOMBS. HE IS 500 PARSECS" 520 PRINT "AWAY. MR. SPOCK HAS SOUNDED GENERAL QUARTERS." 530 PRINT 540 PRINT 550 CHAIN "TREK.BAS" 560 END