basic101 0.1.0

data/test/integration/tests/basic_computer_games/life2.output

@@ -0,0 +1,113 @@
+                                 LIFE2
+               CREATIVE COMPUTING  MORRISTOWN, NEW JERSEY
+
+
+
+          U.B. LIFE GAME
+
+PLAYER 1  - 3 LIVE PIECES.
+X,Y
+XXXXXX
+X,Y
+XXXXXX
+X,Y
+XXXXXX
+
+PLAYER 2  - 3 LIVE PIECES.
+X,Y
+XXXXXX
+X,Y
+XXXXXX
+X,Y
+XXXXXX
+
+ 0  1  2  3  4  5  0 
+ 1  *              1 
+ 2     *           2 
+ 3     #  *        3 
+ 4        #        4 
+ 5           #     5 
+ 0  1  2  3  4  5  0 
+
+ 0  1  2  3  4  5  0 
+ 1                 1 
+ 2  *  *  *        2 
+ 3     #  *        3 
+ 4     #  #  #     4 
+ 5                 5 
+ 0  1  2  3  4  5  0 
+
+PLAYER 1 X,Y
+XXXXXX
+
+
+PLAYER 2 X,Y
+XXXXXX
+
+
+ 0  1  2  3  4  5  0 
+ 1        *        1 
+ 2  *        *     2 
+ 3                 3 
+ 4     #     #     4 
+ 5        #  #     5 
+ 0  1  2  3  4  5  0 
+
+PLAYER 1 X,Y
+XXXXXX
+
+
+PLAYER 2 X,Y
+XXXXXX
+ILLEGAL COORDS. RETYPE
+X,Y
+XXXXXX
+ILLEGAL COORDS. RETYPE
+X,Y
+XXXXXX
+
+
+ 0  1  2  3  4  5  0 
+ 1     *  *  *     1 
+ 2     *  #  *     2 
+ 3     #     #     3 
+ 4           #  #  4 
+ 5        #  #  *  5 
+ 0  1  2  3  4  5  0 
+
+PLAYER 1 X,Y
+XXXXXX
+
+
+PLAYER 2 X,Y
+XXXXXX
+
+
+ 0  1  2  3  4  5  0 
+ 1  *           #  1 
+ 2                 2 
+ 3     #           3 
+ 4                 4 
+ 5        #     *  5 
+ 0  1  2  3  4  5  0 
+
+PLAYER 1 X,Y
+XXXXXX
+ILLEGAL COORDS. RETYPE
+X,Y
+XXXXXX
+
+
+PLAYER 2 X,Y
+XXXXXX
+
+
+ 0  1  2  3  4  5  0 
+ 1                 1 
+ 2                 2 
+ 3                 3 
+ 4        #  #     4 
+ 5           #     5 
+ 0  1  2  3  4  5  0 
+PLAYER 2 IS THE WINNER
+Error on line 575: Undefined line number 800

data/test/integration/tests/basic_computer_games/litquiz.bas

@@ -0,0 +1,49 @@
+1 PRINT TAB(25);"LITERATURE QUIZ"
+2 PRINT TAB(15);"CREATIVE COMPUTING  MORRISTOWN, NEW JERSEY"
+3 PRINT:PRINT:PRINT
+5 R=0
+10 PRINT "TEST YOUR KNOWLEDGE OF CHILDREN'S LITERATURE."
+12 PRINT: PRINT "THIS IS A MULTIPLE-CHOICE QUIZ."
+13 PRINT "TYPE A 1, 2, 3, OR 4 AFTER THE QUESTION MARK."
+15 PRINT: PRINT "GOOD LUCK!": PRINT: PRINT
+40 PRINT "IN PINOCCHIO, WHAT WAS THE NAME OF THE CAT"
+42 PRINT "1)TIGGER, 2)CICERO, 3)FIGARO, 4)GUIPETTO";
+43 INPUT A: IF A=3 THEN 46
+44 PRINT "SORRY...FIGARO WAS HIS NAME.": GOTO 50
+46 PRINT "VERY GOOD!  HERE'S ANOTHER."
+47 R=R+1
+50 PRINT: PRINT
+51 PRINT "FROM WHOSE GARDEN DID BUGS BUNNY STEAL THE CARROTS?"
+52 PRINT "1)MR. NIXON'S, 2)ELMER FUDD'S, 3)CLEM JUDD'S, 4)STROMBOLI'S";
+53 INPUT A: IF A=2 THEN 56
+54 PRINT "TOO BAD...IT WAS ELMER FUDD'S GARDEN.": GOTO 60
+56 PRINT "PRETTY GOOD!"
+57 R=R+1
+60 PRINT: PRINT
+61 PRINT "IN THE WIZARD OF OS, DOROTHY'S DOG WAS NAMED"
+62 PRINT "1)CICERO, 2)TRIXIA, 3)KING, 4)TOTO";
+63 INPUT A: IF A=4 THEN 66
+64 PRINT "BACK TO THE BOOKS,...TOTO WAS HIS NAME.": GOTO 70
+66 PRINT "YEA!  YOU'RE A REAL LITERATURE GIANT."
+67 R=R+1
+70 PRINT:PRINT
+71 PRINT "WHO WAS THE FAIR MAIDEN WHO ATE THE POISON APPLE"
+72 PRINT "1)SLEEPING BEAUTY, 2)CINDERELLA, 3)SNOW WHITE, 4)WENDY";
+73 INPUT A: IF A=3 THEN 76
+74 PRINT "OH, COME ON NOW...IT WAS SNOW WHITE."
+75 GOTO 80
+76 PRINT "GOOD MEMORY!"
+77 R=R+1
+80 PRINT:PRINT
+85 IF R=4 THEN 100
+90 IF R<2 THEN 200
+92 PRINT "NOT BAD, BUT YOU MIGHT SPEND A LITTLE MORE TIME"
+94 PRINT "READING THE NURSERY GREATS."
+96 STOP
+100 PRINT "WOW!  THAT'S SUPER!  YOU REALLY KNOW YOUR NURSERY"
+110 PRINT "YOUR NEXT QUIZ WILL BE ON 2ND CENTURY CHINESE"
+120 PRINT "LITERATURE (HA, HA, HA)"
+130 STOP
+200 PRINT "UGH.  THAT WAS DEFINITELY NOT TOO SWIFT.  BACK TO"
+205 PRINT "NURSERY SCHOOL FOR YOU, MY FRIEND."
+999 END

data/test/integration/tests/basic_computer_games/litquiz.input

@@ -0,0 +1,4 @@
+2
+2
+4
+3

data/test/integration/tests/basic_computer_games/litquiz.output

@@ -0,0 +1,36 @@
+                         LITERATURE QUIZ
+               CREATIVE COMPUTING  MORRISTOWN, NEW JERSEY
+
+
+
+TEST YOUR KNOWLEDGE OF CHILDREN'S LITERATURE.
+
+THIS IS A MULTIPLE-CHOICE QUIZ.
+TYPE A 1, 2, 3, OR 4 AFTER THE QUESTION MARK.
+
+GOOD LUCK!
+
+
+IN PINOCCHIO, WHAT WAS THE NAME OF THE CAT
+1)TIGGER, 2)CICERO, 3)FIGARO, 4)GUIPETTO? 2
+SORRY...FIGARO WAS HIS NAME.
+
+
+FROM WHOSE GARDEN DID BUGS BUNNY STEAL THE CARROTS?
+1)MR. NIXON'S, 2)ELMER FUDD'S, 3)CLEM JUDD'S, 4)STROMBOLI'S? 2
+PRETTY GOOD!
+
+
+IN THE WIZARD OF OS, DOROTHY'S DOG WAS NAMED
+1)CICERO, 2)TRIXIA, 3)KING, 4)TOTO? 4
+YEA!  YOU'RE A REAL LITERATURE GIANT.
+
+
+WHO WAS THE FAIR MAIDEN WHO ATE THE POISON APPLE
+1)SLEEPING BEAUTY, 2)CINDERELLA, 3)SNOW WHITE, 4)WENDY? 3
+GOOD MEMORY!
+
+
+NOT BAD, BUT YOU MIGHT SPEND A LITTLE MORE TIME
+READING THE NURSERY GREATS.
+Break in line 96

data/test/integration/tests/basic_computer_games/love.bas

@@ -0,0 +1,34 @@
+2 PRINT TAB(33);"LOVE"
+4 PRINT TAB(15);"CREATIVE COMPUTING  MORRISTOWN, NEW JERSEY"
+6 PRINT: PRINT: PRINT
+20 PRINT "A TRIBUTE TO THE GREAT AMERICAN ARTIST, ROBERT INDIANA."
+30 PRINT "HIS GREATEST WORK WILL BE REPRODUCED WITH A MESSAGE OF"
+40 PRINT "YOUR CHOICE UP TO 60 CHARACTERS.  IF YOU CAN'T THINK OF"
+50 PRINT "A MESSAGE, SIMPLE TYPE THE WORD 'LOVE'": PRINT
+60 INPUT "YOUR MESSAGE, PLEASE";A$: L=LEN(A$)
+70 DIM T$(120): FOR I=1 TO 10: PRINT: NEXT I
+100 FOR J=0 TO INT(60/L)
+110 FOR I=1 TO L
+120 T$(J*L+I)=MID$(A$,I,1)
+130 NEXT I: NEXT J
+140 C=0
+200 A1=1: P=1: C=C+1: IF C=37 THEN 999
+205 PRINT
+210 READ A: A1=A1+A: IF P=1 THEN 300
+240 FOR I=1 TO A: PRINT " ";: NEXT I: P=1: GOTO 400
+300 FOR I=A1-A TO A1-1: PRINT T$(I);: NEXT I: P=0
+400 IF A1>60 THEN 200
+410 GOTO 210
+600 DATA 60,1,12,26,9,12,3,8,24,17,8,4,6,23,21,6,4,6,22,12,5,6,5
+610 DATA 4,6,21,11,8,6,4,4,6,21,10,10,5,4,4,6,21,9,11,5,4
+620 DATA 4,6,21,8,11,6,4,4,6,21,7,11,7,4,4,6,21,6,11,8,4
+630 DATA 4,6,19,1,1,5,11,9,4,4,6,19,1,1,5,10,10,4,4,6,18,2,1,6,8,11,4
+640 DATA 4,6,17,3,1,7,5,13,4,4,6,15,5,2,23,5,1,29,5,17,8
+650 DATA 1,29,9,9,12,1,13,5,40,1,1,13,5,40,1,4,6,13,3,10,6,12,5,1
+660 DATA 5,6,11,3,11,6,14,3,1,5,6,11,3,11,6,15,2,1
+670 DATA 6,6,9,3,12,6,16,1,1,6,6,9,3,12,6,7,1,10
+680 DATA 7,6,7,3,13,6,6,2,10,7,6,7,3,13,14,10,8,6,5,3,14,6,6,2,10
+690 DATA 8,6,5,3,14,6,7,1,10,9,6,3,3,15,6,16,1,1
+700 DATA 9,6,3,3,15,6,15,2,1,10,6,1,3,16,6,14,3,1,10,10,16,6,12,5,1
+710 DATA 11,8,13,27,1,11,8,13,27,1,60
+999 FOR I=1 TO 10: PRINT: NEXT I: END

data/test/integration/tests/basic_computer_games/love.input

@@ -0,0 +1 @@
+ILIKEHIPPIES

data/test/integration/tests/basic_computer_games/love.output

@@ -0,0 +1,67 @@
+                                 LOVE
+               CREATIVE COMPUTING  MORRISTOWN, NEW JERSEY
+
+
+
+A TRIBUTE TO THE GREAT AMERICAN ARTIST, ROBERT INDIANA.
+HIS GREATEST WORK WILL BE REPRODUCED WITH A MESSAGE OF
+YOUR CHOICE UP TO 60 CHARACTERS.  IF YOU CAN'T THINK OF
+A MESSAGE, SIMPLE TYPE THE WORD 'LOVE'
+
+YOUR MESSAGE, PLEASE? ILIKEHIPPIES
+
+
+
+
+
+
+
+
+
+
+
+ILIKEHIPPIESILIKEHIPPIESILIKEHIPPIESILIKEHIPPIESILIKEHIPPIES
+I            LIKEHIPPIESILIKEHIPPIESILI         ILIKEHIPPIES
+ILI        SILIKEHIPPIESILIKEHIPPIE                 EHIPPIES
+ILIK      ESILIKEHIPPIESILIKEHIPP                     IPPIES
+ILIK      ESILIKEHIPPIESILIKEHIP            PIESI      PPIES
+ILIK      ESILIKEHIPPIESILIKEHI           IPPIESIL      PIES
+ILIK      ESILIKEHIPPIESILIKEHI          HIPPIESILI     PIES
+ILIK      ESILIKEHIPPIESILIKEHI         EHIPPIESILI     PIES
+ILIK      ESILIKEHIPPIESILIKEHI        KEHIPPIESIL      PIES
+ILIK      ESILIKEHIPPIESILIKEHI       IKEHIPPIESI       PIES
+ILIK      ESILIKEHIPPIESILIKEHI      LIKEHIPPIES        PIES
+ILIK      ESILIKEHIPPIESILIKE I     ILIKEHIPPIE         PIES
+ILIK      ESILIKEHIPPIESILIKE I     ILIKEHIPPI          PIES
+ILIK      ESILIKEHIPPIESILIK  I      LIKEHIPP           PIES
+ILIK      ESILIKEHIPPIESILI   I       IKEHI             PIES
+ILIK      ESILIKEHIPPIESI     IP                       PPIES
+I                             IPPIE                 EHIPPIES
+I                             IPPIESILI         ILIKEHIPPIES
+I             IKEHI                                        S
+I             IKEHI                                        S
+ILIK      ESILIKEHIPPIE   IKEHIPPIES      IPPIESILIKEH     S
+ILIKE      SILIKEHIPPI   LIKEHIPPIES      IPPIESILIKEHIP   S
+ILIKE      SILIKEHIPPI   LIKEHIPPIES      IPPIESILIKEHIPP  S
+ILIKEH      ILIKEHIPP   ILIKEHIPPIES      IPPIESILIKEHIPPI S
+ILIKEH      ILIKEHIPP   ILIKEHIPPIES      IPPIESI IKEHIPPIES
+ILIKEHI      LIKEHIP   SILIKEHIPPIES      IPPIES  IKEHIPPIES
+ILIKEHI      LIKEHIP   SILIKEHIPPIES              IKEHIPPIES
+ILIKEHIP      IKEHI   ESILIKEHIPPIES      IPPIES  IKEHIPPIES
+ILIKEHIP      IKEHI   ESILIKEHIPPIES      IPPIESI IKEHIPPIES
+ILIKEHIPP      KEH   IESILIKEHIPPIES      IPPIESILIKEHIPPI S
+ILIKEHIPP      KEH   IESILIKEHIPPIES      IPPIESILIKEHIPP  S
+ILIKEHIPPI      E   PIESILIKEHIPPIES      IPPIESILIKEHIP   S
+ILIKEHIPPI          PIESILIKEHIPPIES      IPPIESILIKEH     S
+ILIKEHIPPIE        PPIESILIKEHIP                           S
+ILIKEHIPPIE        PPIESILIKEHIP                           S
+ILIKEHIPPIESILIKEHIPPIESILIKEHIPPIESILIKEHIPPIESILIKEHIPPIES
+
+
+
+
+
+
+
+
+

data/test/integration/tests/basic_computer_games/lunar.bas

@@ -0,0 +1,48 @@
+10 PRINT TAB(33);"LUNAR"
+20 PRINT TAB(15);"CREATIVE COMPUTING MORRISTOWN, NEW JERSEY" 
+25 PRINT:PRINT:PRINT
+30 PRINT "THIS IS A COMPUTER SIMULATION OF AN APOLLO LUNAR" 
+40 PRINT "LANDING CAPSULE.": PRINT: PRINT
+50 PRINT "THE ON-BOARD COMPUTER HAS FAILED (IT WAS MADE BY" 
+60 PRINT "XEROX) SO YOU HAVE TO LAND THE CAPSULE MANUALLY."
+70 PRINT: PRINT "SET BURN RATE OF RETRO ROCKETS TO ANY VALUE BETWEEN" 
+80 PRINT "0 (FREE FALL) AND 200 (MAXIMUM BURN) POUNDS PER SECOND." 
+90 PRINT "SET NEW BURN RATE EVERY 10 SECONDS.": PRINT 
+100 PRINT "CAPSULE WEIGHT 32,500 LBS; FUEL WEIGHT 16,500 LBS."
+110 PRINT: PRINT: PRINT: PRINT "GOOD LUCK"
+120 L=0
+130 PRINT: PRINT "SEC","MI + FT","MPH","LB FUEL","BURN RATE":PRINT 
+140 A=120:V=1:M=33000:N=16500:G=1E-03:Z=1.8
+150 PRINT L,INT(A);INT(5280*(A-INT(A))),3600*V,M-N,:INPUT K:T=10 
+160 IF M-N<1E-03 THEN 240
+170 IF T<1E-03 THEN 150
+180 S=T: IF M>=N+S*K THEN 200
+190 S=(M-N)/K
+200 GOSUB 420: IF I<=O THEN 340
+210 IF V<=0 THEN 230
+220 IF J<0 THEN 370
+230 GOSUB 330: GOTO 160
+240 PRINT "FUEL OUT AT";L;"SECONDS":S=(-V+SQR(V*V+2*A*G))/G
+250 V=V+G*S: L=L+S
+260 W=3600*V: PRINT "ON MOON AT";L;"SECONDS - IMPACT VELOCITY";W;"MPH" 
+274 IF W<=1.2 THEN PRINT "PERFECT LANDING!": GOTO 440 
+280 IF W<=10 THEN PRINT "GOOD LANDING (COULD RE BETTER)":GOTO 440 
+282 IF W>60 THEN 300
+284 PRINT "CRAFT DAMAGE... YOU'RE STRANDED HERE UNTIL A RESCUE" 
+286 PRINT "PARTY ARRIVES. HOPE YOU HAVE ENOUGH OXYGEN!" 
+288 GOTO 440
+300 PRINT "SORRY THERE NERE NO SURVIVORS. YOU BLOW IT!"
+310 PRINT "IN FACT, YOU BLASTED A NEW LUNAR CRATER";W*.227;"FEET DEEP!"
+320 GOTO 440
+330 L=L+S: T=T-S: M=M-S*K: A=I: V=J: RETURN
+340 IF S<5E-03 THEN 260
+350 D=V+SQR(V*V+2*A*(G-Z*K/M)):S=2*A/D
+360 GOSUB 420: GOSUB 330: GOTO 340
+370 W=(1-M*G/(Z*K))/2: S=M*V/(Z*K*(W+SQR(W*W+V/Z)))+.05:GOSUB 420
+380 IF I<=0 THEN 340
+390 GOSUB 330: IF J>0 THEN 160
+400 IF V>0 THEN 370
+410 GOTO 160
+420 Q=S*K/M: J=V+G*S+Z*(-Q-Q*Q/2-Q^3/3-Q^4/4-Q^5/5)
+430 I=A-G*S*S/2-V*S+Z*S*(Q/2+Q^2/6+Q^3/12+Q^4/20+Q^5/30):RETURN
+440 PRINT:PRINT:PRINT:PRINT "TRY AGAIN??": GOTO 70

data/test/integration/tests/basic_computer_games/lunar.input

@@ -0,0 +1,87 @@
+0
+0
+0
+0
+100
+100
+100
+100
+100
+100
+100
+100
+100
+100
+100
+0
+0
+0
+100
+100
+100
+100
+100
+100
+100
+100
+100
+100
+100
+100
+100
+100
+0
+0
+100
+100
+100
+100
+100
+100
+100
+100
+100
+100
+100
+100
+100
+100
+100
+100
+0
+0
+20
+0
+10
+0
+5
+6
+6
+7
+0
+0
+100
+100
+100
+100
+100
+100
+100
+100
+100
+100
+100
+100
+100
+100
+100
+20
+10
+10
+10
+10
+10
+10
+10
+50
+10

data/test/integration/tests/basic_computer_games/lunar.output

@@ -0,0 +1,195 @@
+                                 LUNAR
+               CREATIVE COMPUTING MORRISTOWN, NEW JERSEY
+
+
+
+THIS IS A COMPUTER SIMULATION OF AN APOLLO LUNAR
+LANDING CAPSULE.
+
+
+THE ON-BOARD COMPUTER HAS FAILED (IT WAS MADE BY
+XEROX) SO YOU HAVE TO LAND THE CAPSULE MANUALLY.
+
+SET BURN RATE OF RETRO ROCKETS TO ANY VALUE BETWEEN
+0 (FREE FALL) AND 200 (MAXIMUM BURN) POUNDS PER SECOND.
+SET NEW BURN RATE EVERY 10 SECONDS.
+
+CAPSULE WEIGHT 32,500 LBS; FUEL WEIGHT 16,500 LBS.
+
+
+
+GOOD LUCK
+
+SEC           MI + FT       MPH           LB FUEL       BURN RATE
+
+ 0             120  0        3600          16500        ? 0
+ 10            109  5016     3636          16500        ? 0
+ 20            99  4224      3672          16500        ? 0
+ 30            89  2904      3708          16500        ? 0
+ 40            79  1056      3744          16500        ? 100
+ 50            69  134       3580.6        15500        ? 100
+ 60            59  1656      3410.868      14500        ? 100
+ 70            50  435       3234.39       13500        ? 100
+ 80            41  1855      3050.708      12500        ? 100
+ 90            33  745       2859.316      11500        ? 100
+ 100           25  2502      2659.654      10500        ? 100
+ 110           18  1972      2451.097      9500         ? 100
+ 120           11  4570      2232.946      8500         ? 100
+ 130           5  5163       2004.42       7500         ? 100
+ 140           0  3909       1764.634      6500         ? 100
+ON MOON AT 141.5269 SECONDS - IMPACT VELOCITY 1726.968 MPH
+SORRY THERE NERE NO SURVIVORS. YOU BLOW IT!
+IN FACT, YOU BLASTED A NEW LUNAR CRATER 392.0218 FEET DEEP!
+
+
+
+TRY AGAIN??
+
+SET BURN RATE OF RETRO ROCKETS TO ANY VALUE BETWEEN
+0 (FREE FALL) AND 200 (MAXIMUM BURN) POUNDS PER SECOND.
+SET NEW BURN RATE EVERY 10 SECONDS.
+
+CAPSULE WEIGHT 32,500 LBS; FUEL WEIGHT 16,500 LBS.
+
+
+
+GOOD LUCK
+
+SEC           MI + FT       MPH           LB FUEL       BURN RATE
+
+ 0             120  0        3600          16500        ? 0
+ 10            109  5016     3636          16500        ? 0
+ 20            99  4224      3672          16500        ? 0
+ 30            89  2904      3708          16500        ? 100
+ 40            79  2510      3544.6        15500        ? 100
+ 50            69  4560      3374.868      14500        ? 100
+ 60            60  3867      3198.39       13500        ? 100
+ 70            52  535       3014.708      12500        ? 100
+ 80            43  5233      2823.316      11500        ? 100
+ 90            36  2238      2623.654      10500        ? 100
+ 100           29  2236      2415.097      9500         ? 100
+ 110           23  82        2196.946      8500         ? 100
+ 120           17  1203      1968.42       7500         ? 100
+ 130           12  477       1728.634      6500         ? 100
+ 140           7  3357       1476.586      5500         ? 100
+ 150           3  4750       1211.136      4500         ? 100
+ 160           0  4862       930.9762      3500         ? 100
+ON MOON AT 163.7841 SECONDS - IMPACT VELOCITY 820.8196 MPH
+SORRY THERE NERE NO SURVIVORS. YOU BLOW IT!
+IN FACT, YOU BLASTED A NEW LUNAR CRATER 186.326 FEET DEEP!
+
+
+
+TRY AGAIN??
+
+SET BURN RATE OF RETRO ROCKETS TO ANY VALUE BETWEEN
+0 (FREE FALL) AND 200 (MAXIMUM BURN) POUNDS PER SECOND.
+SET NEW BURN RATE EVERY 10 SECONDS.
+
+CAPSULE WEIGHT 32,500 LBS; FUEL WEIGHT 16,500 LBS.
+
+
+
+GOOD LUCK
+
+SEC           MI + FT       MPH           LB FUEL       BURN RATE
+
+ 0             120  0        3600          16500        ? 0
+ 10            109  5016     3636          16500        ? 0
+ 20            99  4224      3672          16500        ? 100
+ 30            89  4358      3508.6        15500        ? 100
+ 40            80  1656      3338.868      14500        ? 100
+ 50            71  1491      3162.39       13500        ? 100
+ 60            62  3967      2978.708      12500        ? 100
+ 70            54  3913      2787.316      11500        ? 100
+ 80            47  1446      2587.654      10500        ? 100
+ 90            40  1972      2379.097      9500         ? 100
+ 100           34  346       2160.946      8500         ? 100
+ 110           28  1995      1932.42       7500         ? 100
+ 120           23  1797      1692.634      6500         ? 100
+ 130           18  5205      1440.586      5500         ? 100
+ 140           15  1846      1175.136      4500         ? 100
+ 150           12  2486      894.9762      3500         ? 100
+ 160           10  2072      598.5957      2500         ? 100
+ 170           9  855        284.2401      1500         ? 100
+ 180           8  4392      -50.14642      500          ? 0
+ 190           8  4864      -14.14642      500          ? 0
+ 200           8  4807       21.85358      500          ? 20
+ 210           8  4784      -18.8337       300          ? 0
+ 220           8  4796       17.1663       300          ? 10
+ 230           8  4564       14.47961      200          ? 0
+ 240           8  4088       50.47961      200          ? 5
+ 250           8  3226       67.04931      150          ? 6
+ 260           8  2150       79.65579      90           ? 6
+ 270           8  889        92.1775       30           ? 7
+FUEL OUT AT 274.2857 SECONDS
+ON MOON AT 377.3643 SECONDS - IMPACT VELOCITY 466.9177 MPH
+SORRY THERE NERE NO SURVIVORS. YOU BLOW IT!
+IN FACT, YOU BLASTED A NEW LUNAR CRATER 105.9903 FEET DEEP!
+
+
+
+TRY AGAIN??
+
+SET BURN RATE OF RETRO ROCKETS TO ANY VALUE BETWEEN
+0 (FREE FALL) AND 200 (MAXIMUM BURN) POUNDS PER SECOND.
+SET NEW BURN RATE EVERY 10 SECONDS.
+
+CAPSULE WEIGHT 32,500 LBS; FUEL WEIGHT 16,500 LBS.
+
+
+
+GOOD LUCK
+
+SEC           MI + FT       MPH           LB FUEL       BURN RATE
+
+ 0             120  0        3600          16500        ? 0
+ 10            109  5016     3636          16500        ? 0
+ 20            99  4224      3672          16500        ? 100
+ 30            89  4358      3508.6        15500        ? 100
+ 40            80  1656      3338.868      14500        ? 100
+ 50            71  1491      3162.39       13500        ? 100
+ 60            62  3967      2978.708      12500        ? 100
+ 70            54  3913      2787.316      11500        ? 100
+ 80            47  1446      2587.654      10500        ? 100
+ 90            40  1972      2379.097      9500         ? 100
+ 100           34  346       2160.946      8500         ? 100
+ 110           28  1995      1932.42       7500         ? 100
+ 120           23  1797      1692.634      6500         ? 100
+ 130           18  5205      1440.586      5500         ? 100
+ 140           15  1846      1175.136      4500         ? 100
+ 150           12  2486      894.9762      3500         ? 100
+ 160           10  2072      598.5957      2500         ? 100
+ 170           9  855        284.2401      1500         ? 20
+ 180           8  2232       247.8371      1300         ? 10
+ 190           7  3880       247.33        1200         ? 10
+ 200           7  258        246.616       1100         ? 10
+ 210           6  1927       245.6928      1000         ? 10
+ 220           5  3612       244.558       900          ? 10
+ 230           5  35         243.2092      800          ? 10
+ 240           4  1759       241.6439      700          ? 10
+ 250           3  3508       239.8595      600          ? 50
+ 260           3  1129       83.56057      100          ? 10
+FUEL OUT AT 270 SECONDS
+ON MOON AT 328.108 SECONDS - IMPACT VELOCITY 289.5952 MPH
+SORRY THERE NERE NO SURVIVORS. YOU BLOW IT!
+IN FACT, YOU BLASTED A NEW LUNAR CRATER 65.7381 FEET DEEP!
+
+
+
+TRY AGAIN??
+
+SET BURN RATE OF RETRO ROCKETS TO ANY VALUE BETWEEN
+0 (FREE FALL) AND 200 (MAXIMUM BURN) POUNDS PER SECOND.
+SET NEW BURN RATE EVERY 10 SECONDS.
+
+CAPSULE WEIGHT 32,500 LBS; FUEL WEIGHT 16,500 LBS.
+
+
+
+GOOD LUCK
+
+SEC           MI + FT       MPH           LB FUEL       BURN RATE
+
+ 0             120  0        3600          16500        ? 
+Error on line 150: No more input