SUBPROGRAM XX/8
FILE INFORMATION
FILENAME(S): SUBPROGRAM XX/8
FILE TYPE(S): PRG
FILE SIZE: 5.2K
FIRST SEEN: 2025-11-30 21:22:20
APPEARS ON: 1 disk(s)
FILE HASH
9af218ab74fc8084c3c2ae07b1bb9787ad925c47c22a30dd65244c67bb71bfe7
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| NERO SOFT 162B | SUBPROGRAM XX/8 | PRG | DuncanTwain | 24 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 2F 08 02 00 97 34 35 2C C2 28 31 37 34 29 |../....45,.(174)| 00000010: 3A 97 34 36 2C C2 28 31 37 35 29 3A 97 34 37 2C |:.46,.(175):.47,| 00000020: C2 28 34 35 29 3A 97 34 38 2C C2 28 34 36 29 00 |.(45):.48,.(46).| 00000030: 47 08 03 00 97 34 39 2C C2 28 34 35 29 3A 97 35 |G....49,.(45):.5| 00000040: 30 2C C2 28 34 36 29 00 68 08 0A 00 97 35 35 2C |0,.(46).h....55,| 00000050: 32 35 35 3A 97 35 36 2C 36 33 3A 97 38 36 39 2C |255:.56,63:.869,| 00000060: 38 3A 97 38 37 30 2C 30 00 80 08 0B 00 97 35 31 |8:.870,0......51| 00000070: 2C C2 28 35 35 29 3A 97 35 32 2C C2 28 35 36 29 |,.(55):.52,.(56)| 00000080: 00 8B 08 19 00 9E 31 39 33 32 38 00 A3 08 1E 00 |......19328.....| 00000090: 8F 20 20 20 53 55 42 50 52 4F 47 52 41 4D 20 58 |. SUBPROGRAM X| 000000A0: 58 2F 33 00 C4 08 22 00 53 50 20 B2 20 38 3A 4E |X/3...".SP . 8:N| 000000B0: 53 20 B2 20 35 3A 52 52 25 20 B2 20 35 3A 4E 51 |S . 5:RR% . 5:NQ| 000000C0: 20 B2 20 31 00 D6 08 28 00 53 54 25 20 B2 20 33 | . 1...(.ST% . 3| 000000D0: 3A 20 26 20 52 45 00 E4 08 2C 00 4C 24 20 B2 20 |: & RE...,.L$ . | 000000E0: 22 20 20 22 00 26 09 32 00 4C 31 B2 C2 28 38 37 |" ".&.2.L1..(87| 000000F0: 31 29 3A 4E 31 24 B2 22 22 3A 81 49 B2 31 A4 4C |1):N1$."":.I.1.L| 00000100: 31 3A 4E 31 24 B2 4E 31 24 AA C7 28 C2 28 49 AA |1:N1$.N1$..(.(I.| 00000110: 38 37 31 29 29 3A 82 3A 4E 46 24 B2 22 53 52 46 |871)):.:NF$."SRF| 00000120: 2D 22 AA 4E 31 24 00 3C 09 3C 00 86 20 4C 24 28 |-".N1$.<.<.. L$(| 00000130: 31 30 30 29 2C 49 58 24 28 31 30 29 00 55 09 46 |100),IX$(10).U.F| 00000140: 00 57 52 20 B2 20 30 3A 52 4E 20 B2 20 30 3A 4A |.WR . 0:RN . 0:J| 00000150: 20 B2 20 30 3A 00 72 09 50 00 52 20 B2 20 30 3A | . 0:.r.P.R . 0:| 00000160: 52 52 20 B2 20 30 3A 58 20 B2 20 30 3A 4B 20 B2 |RR . 0:X . 0:K .| 00000170: 20 30 00 84 09 64 00 8D 20 34 30 31 30 3A 8D 20 | 0...d.. 4010:. | 00000180: 35 30 31 30 00 B9 09 65 00 26 43 4F 2C 35 3A 26 |5010...e.&CO,5:&| 00000190: 44 45 2C 31 2C 31 2C 34 30 2C 31 35 3A 26 46 49 |DE,1,1,40,15:&FI| 000001A0: 3A 26 43 4F 2C 36 39 3A 26 44 45 2C 32 2C 32 2C |:&CO,69:&DE,2,2,| 000001B0: 33 39 2C 31 34 3A 26 46 49 00 D6 09 66 00 26 43 |39,14:&FI...f.&C| 000001C0: 4F 2C 32 37 3A 26 44 45 2C 32 2C 32 2C 33 39 2C |O,27:&DE,2,2,39,| 000001D0: 31 34 3A 26 46 49 00 DC 09 78 00 3A 00 FC 09 82 |14:&FI...x.:....| 000001E0: 00 8B 20 52 4E 20 B2 20 30 20 A7 20 4A 20 B2 20 |.. RN . 0 . J . | 000001F0: 4A 20 AA 20 31 3A 20 89 20 31 35 30 00 19 0A 8C |J . 1: . 150....| 00000200: 00 4A B2 B5 28 4E 53 AC BB 28 31 29 AA 31 29 3A |.J..(NS..(1).1):| 00000210: 8B 4A B2 4A 31 A7 31 34 30 00 34 0A 96 00 4A 31 |.J.J1.140.4...J1| 00000220: B2 4A 3A 20 8B 20 4A B1 B2 4E 53 20 A7 20 52 4E |.J: . J..NS . RN| 00000230: 20 B2 20 31 00 57 0A A0 00 91 20 4A 20 8D 20 31 | . 1.W.... J . 1| 00000240: 30 31 30 2C 31 31 31 30 2C 31 32 31 30 2C 31 33 |010,1110,1210,13| 00000250: 31 30 2C 31 34 31 30 00 86 0A D7 00 26 53 59 2C |10,1410.....&SY,| 00000260: 31 3A 26 50 43 2C 33 2C 33 3A 26 54 58 2C 4C 24 |1:&PC,3,3:&TX,L$| 00000270: 28 32 29 3A 26 50 43 2C 33 2C 34 3A 26 54 58 2C |(2):&PC,3,4:&TX,| 00000280: 4C 24 28 32 31 29 00 D6 0A DC 00 26 50 43 2C 35 |L$(21).....&PC,5| 00000290: 2C 36 3A 26 54 58 2C 4C 24 28 33 29 3A 26 50 43 |,6:&TX,L$(3):&PC| 000002A0: 2C 35 2C 37 20 3A 26 54 58 2C 4C 24 28 33 31 29 |,5,7 :&TX,L$(31)| 000002B0: 3A 26 50 43 2C 35 2C 39 3A 26 54 58 2C 4C 24 28 |:&PC,5,9:&TX,L$(| 000002C0: 34 29 3A 26 50 43 2C 35 2C 31 30 3A 26 54 58 2C |4):&PC,5,10:&TX,| 000002D0: 4C 24 28 34 31 29 00 01 0B DE 00 26 50 43 2C 35 |L$(41).....&PC,5| 000002E0: 2C 31 32 3A 26 54 58 2C 4C 24 28 35 29 3A 26 50 |,12:&TX,L$(5):&P| 000002F0: 43 2C 35 2C 31 33 3A 26 54 58 2C 4C 24 28 35 31 |C,5,13:&TX,L$(51| 00000300: 29 00 1F 0B FA 00 26 43 4F 2C 31 36 30 3A 26 44 |).....&CO,160:&D| 00000310: 45 2C 31 2C 31 36 2C 38 2C 31 38 3A 26 46 49 00 |E,1,16,8,18:&FI.| 00000320: 32 0B 02 01 26 50 43 2C 32 2C 31 36 3A 26 53 59 |2...&PC,2,16:&SY| 00000330: 2C 32 00 3F 0B 03 01 4C 24 20 B2 20 22 31 22 00 |,2.?...L$ . "1".| 00000340: 55 0B 04 01 26 20 45 4E 53 2C 4C 24 2C 31 2C 54 |U...& ENS,L$,1,T| 00000350: 25 2C 41 4C 25 00 67 0B 05 01 8B 20 41 4C 25 B2 |%,AL%.g.... AL%.| 00000360: 30 20 A7 20 32 36 30 00 83 0B 06 01 26 53 59 2C |0 . 260.....&SY,| 00000370: 31 3A 20 4C 24 20 B2 20 20 C8 20 28 4C 24 2C 41 |1: L$ . . (L$,A| 00000380: 4C 25 29 00 9C 0B 08 01 8B 20 20 C6 20 28 4C 24 |L%)...... . (L$| 00000390: 29 20 B2 20 33 20 20 A7 20 32 37 32 00 DF 0B 09 |) . 3 . 272....| 000003A0: 01 8B 28 28 4C 24 B3 B1 22 31 22 29 AF 28 4C 24 |..((L$.."1").(L$| 000003B0: B3 B1 22 32 22 29 AF 28 4C 24 B3 B1 22 33 22 29 |.."2").(L$.."3")| 000003C0: 29 A7 3A 26 50 43 2C 32 2C 31 36 3A 26 53 59 2C |).:&PC,2,16:&SY,| 000003D0: 32 3A 26 54 58 2C 22 20 20 22 3A 89 32 35 38 00 |2:&TX," ":.258.| 000003E0: E9 0B 0C 01 89 20 32 38 30 00 1E 0C 10 01 26 52 |..... 280.....&R| 000003F0: 45 3A 26 53 59 2C 32 3A 26 50 43 2C 39 2C 35 3A |E:&SY,2:&PC,9,5:| 00000400: 26 54 58 2C 22 C2 59 45 22 3A 9E 31 39 33 34 31 |&TX,".YE":.19341| 00000410: 3A 93 22 48 45 4C 4C 4F 48 49 31 22 2C 38 00 42 |:."HELLOHI1",8.B| 00000420: 0C 18 01 8B 20 4C 24 20 B2 20 4C 24 28 31 29 20 |.... L$ . L$(1) | 00000430: A7 20 41 58 24 20 B2 20 22 59 45 53 22 3A 89 32 |. AX$ . "YES":.2| 00000440: 38 32 00 58 0C 19 01 41 58 24 20 B2 20 22 4E 4F |82.X...AX$ . "NO| 00000450: 22 3A 20 89 20 32 39 30 00 93 0C 1A 01 26 20 53 |": . 290.....& S| 00000460: 59 2C 32 3A 26 43 4F 2C 31 36 3A 26 44 45 2C 32 |Y,2:&CO,16:&DE,2| 00000470: 35 2C 31 36 2C 34 30 2C 31 37 3A 26 46 49 3A 26 |5,16,40,17:&FI:&| 00000480: 50 43 2C 33 33 2C 31 36 3A 26 54 58 2C 22 C7 4F |PC,33,16:&TX,".O| 00000490: 4F 44 22 00 BA 0C 1B 01 81 20 49 20 B2 20 31 36 |OD"...... I . 16| 000004A0: 30 20 A4 20 34 38 20 A9 20 20 AB 20 38 3A 20 26 |0 . 48 . . 8: &| 000004B0: 20 54 4E 2C 49 2C 31 3A 20 82 00 FA 0C 1D 01 26 | TN,I,1: ......&| 000004C0: 50 43 2C 33 33 2C 31 36 3A 26 54 58 2C 22 20 20 |PC,33,16:&TX," | 000004D0: 20 20 20 20 22 3A 26 50 43 2C 32 2C 31 36 3A 26 | ":&PC,2,16:&| 000004E0: 54 58 2C 22 20 20 20 20 20 20 20 20 22 3A 26 53 |TX," ":&S| 000004F0: 59 2C 31 3A 20 89 20 33 30 30 00 1A 0D 22 01 81 |Y,1: . 300..."..| 00000500: 20 49 20 B2 20 31 20 A4 20 35 3A 20 26 20 54 4E | I . 1 . 5: & TN| 00000510: 2C 32 35 35 2C 31 30 3A 20 82 00 5D 0D 24 01 26 |,255,10: ..].$.&| 00000520: 53 59 2C 32 3A 26 43 4F 2C 31 39 32 3A 26 44 45 |SY,2:&CO,192:&DE| 00000530: 2C 35 2C 31 36 2C 36 2C 31 37 3A 26 46 49 3A 81 |,5,16,6,17:&FI:.| 00000540: 49 B2 31 A4 31 30 3A 26 4E 4F 3A 26 50 43 2C 35 |I.1.10:&NO:&PC,5| 00000550: 2C 31 36 3A 26 54 58 2C 4C 24 28 31 29 00 89 0D |,16:&TX,L$(1)...| 00000560: 25 01 8D 20 33 39 39 3A 26 49 4E 3A 26 50 43 2C |%.. 399:&IN:&PC,| 00000570: 35 2C 31 36 3A 26 54 58 2C 4C 24 28 31 29 3A 8D |5,16:&TX,L$(1):.| 00000580: 33 39 39 3A 82 3A 26 4E 4F 00 94 0D 26 01 97 31 |399:.:&NO...&..1| 00000590: 39 38 2C 30 00 AD 0D 28 01 A1 20 52 24 3A 8B 20 |98,0...(.. R$:. | 000005A0: 52 24 B3 B1 C7 28 31 33 29 A7 32 39 36 00 CA 0D |R$...(13).296...| 000005B0: 29 01 3A 26 50 43 2C 31 2C 31 36 3A 26 54 58 2C |).:&PC,1,16:&TX,| 000005C0: 22 20 20 20 20 20 20 20 20 22 00 D9 0D 2C 01 8F |" "...,..| 000005D0: 20 20 53 43 4F 52 49 4E 47 00 0C 0E 31 01 8B 20 | SCORING...1.. | 000005E0: 28 41 58 24 20 B2 20 22 59 45 53 22 29 20 A7 20 |(AX$ . "YES") . | 000005F0: 52 20 B2 20 52 20 AA 20 31 3A 52 52 20 B2 20 52 |R . R . 1:RR . R| 00000600: 52 20 AA 20 31 3A 57 52 20 B2 20 30 00 42 0E 36 |R . 1:WR . 0.B.6| 00000610: 01 8B 20 28 41 58 24 20 B3 20 20 B1 20 22 59 45 |.. (AX$ . . "YE| 00000620: 53 22 29 20 A7 20 57 20 B2 20 57 20 AA 20 31 3A |S") . W . W . 1:| 00000630: 57 52 20 B2 20 57 52 20 AA 20 31 3A 52 52 20 B2 |WR . WR . 1:RR .| 00000640: 20 30 00 4D 0E 40 01 8D 20 35 30 31 30 00 84 0E | 0.M.@.. 5010...| 00000650: 4A 01 8B 20 52 52 20 B1 20 20 B2 20 52 52 25 20 |J.. RR . . RR% | 00000660: A7 20 41 32 20 B2 20 37 3A 97 38 37 30 2C 41 32 |. A2 . 7:.870,A2| 00000670: 3A 97 38 39 33 2C 57 3A 97 39 30 38 2C 52 3A 89 |:.893,W:.908,R:.| 00000680: 36 30 30 30 00 C6 0E 54 01 8B 20 28 57 52 20 B1 |6000...T.. (WR .| 00000690: B2 20 35 29 20 B0 20 28 57 20 B1 B2 20 31 38 29 |. 5) . (W .. 18)| 000006A0: 20 A7 20 41 32 20 B2 20 35 3A 97 38 37 30 2C 41 | . A2 . 5:.870,A| 000006B0: 32 3A 9E 31 39 33 34 31 3A 93 22 48 45 4C 4C 4F |2:.19341:."HELLO| 000006C0: 48 49 31 22 2C 38 00 0C 0F 59 01 81 49 B2 30 A4 |HI1",8...Y..I.0.| 000006D0: 31 31 3A 26 50 43 2C 31 2C 33 AA 49 3A 26 54 58 |11:&PC,1,3.I:&TX| 000006E0: 2C 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |," | 000006F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000700: 20 20 20 20 20 20 20 20 20 22 3A 82 00 16 0F 72 | ":....r| 00000710: 01 89 20 31 32 30 00 1C 0F 8F 01 8E 00 36 0F E8 |.. 120.......6..| 00000720: 03 8F 20 20 44 41 54 41 20 46 4F 52 20 51 55 45 |.. DATA FOR QUE| 00000730: 53 54 49 4F 4E 53 00 46 0F F2 03 4C 24 28 31 29 |STIONS.F...L$(1)| 00000740: 20 B2 20 22 32 22 00 79 0F FC 03 4C 24 28 32 29 | . "2".y...L$(2)| 00000750: 20 B2 20 22 D7 48 49 43 48 20 57 4F 52 44 20 41 | . ".HICH WORD A| 00000760: 54 20 54 48 45 20 42 45 47 49 4E 4E 49 4E 47 20 |T THE BEGINNING | 00000770: 4F 46 20 D0 41 52 41 2D 22 00 AA 0F 01 04 4C 24 |OF .ARA-".....L$| 00000780: 28 32 31 29 B2 22 47 52 41 50 48 20 32 20 43 4F |(21)."GRAPH 2 CO| 00000790: 4E 4E 45 43 54 53 20 49 54 20 54 4F 20 D0 41 52 |NNECTS IT TO .AR| 000007A0: 41 47 52 41 50 48 20 31 3F 22 00 C2 0F 06 04 4C |AGRAPH 1?".....L| 000007B0: 24 28 33 29 20 B2 20 22 31 2E 20 C8 45 41 4C 54 |$(3) . "1. .EALT| 000007C0: 48 22 00 E2 0F 0B 04 4C 24 28 33 31 29 B2 22 20 |H".....L$(31)." | 000007D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000007E0: 20 22 00 FA 0F 10 04 4C 24 28 34 29 B2 22 32 2E | ".....L$(4)."2.| 000007F0: 20 D2 45 53 43 55 45 52 53 22 00 17 10 15 04 4C | .ESCUERS".....L| 00000800: 24 28 34 31 29 B2 22 20 20 20 20 20 20 20 20 20 |$(41)." | 00000810: 20 20 20 20 20 20 22 00 2B 10 1A 04 4C 24 28 35 | ".+...L$(5| 00000820: 29 B2 22 33 2E 20 D3 45 41 4C 22 00 40 10 1F 04 |)."3. .EAL".@...| 00000830: 4C 24 28 35 31 29 B2 22 20 20 20 20 20 20 20 22 |L$(51)." "| 00000840: 00 46 10 42 04 8E 00 56 10 56 04 4C 24 28 31 29 |.F.B...V.V.L$(1)| 00000850: 20 B2 20 22 33 22 00 86 10 60 04 4C 24 28 32 29 | . "3"...`.L$(2)| 00000860: 20 B2 20 22 C9 4E 20 D0 41 52 41 47 52 41 50 48 | . ".N .ARAGRAPH| 00000870: 20 32 2C 20 57 48 41 54 20 44 4F 20 54 48 45 20 | 2, WHAT DO THE | 00000880: 57 4F 52 44 53 22 00 B0 10 6A 04 4C 24 28 32 31 |WORDS"...j.L$(21| 00000890: 29 20 B2 20 22 27 53 49 43 4B 20 46 4F 55 4E 44 |) . "'SICK FOUND| 000008A0: 4C 49 4E 47 27 20 52 45 46 45 52 20 54 4F 3F 22 |LING' REFER TO?"| 000008B0: 00 C8 10 6F 04 4C 24 28 33 29 B2 22 31 2E 20 C5 |...o.L$(3)."1. .| 000008C0: 4C 45 50 48 41 4E 54 22 00 E6 10 74 04 4C 24 28 |LEPHANT"...t.L$(| 000008D0: 33 31 29 20 B2 20 22 20 20 20 20 20 20 20 20 20 |31) . " | 000008E0: 20 20 20 20 20 22 00 FC 10 79 04 4C 24 28 34 29 | "...y.L$(4)| 000008F0: B2 22 32 2E 20 C2 4F 42 43 41 54 22 00 14 11 7E |."2. .OBCAT"...~| 00000900: 04 4C 24 28 34 31 29 B2 22 20 20 20 20 20 20 20 |.L$(41)." | 00000910: 20 20 20 22 00 2C 11 83 04 4C 24 28 35 29 B2 22 | ".,...L$(5)."| 00000920: 33 2E 20 C2 45 48 45 4D 4F 54 48 22 00 44 11 88 |3. .EHEMOTH".D..| 00000930: 04 4C 24 28 35 31 29 B2 22 20 20 20 20 20 20 20 |.L$(51)." | 00000940: 20 20 20 22 00 4A 11 A6 04 8E 00 5A 11 BA 04 4C | ".J.....Z...L| 00000950: 24 28 31 29 20 B2 20 22 31 22 00 8D 11 C4 04 4C |$(1) . "1".....L| 00000960: 24 28 32 29 20 B2 20 22 D7 48 49 43 48 20 57 4F |$(2) . ".HICH WO| 00000970: 52 44 20 41 54 20 54 48 45 20 42 45 47 49 4E 4E |RD AT THE BEGINN| 00000980: 49 4E 47 20 4F 46 20 D0 41 52 41 2D 22 00 BE 11 |ING OF .ARA-"...| 00000990: C9 04 4C 24 28 32 31 29 B2 22 47 52 41 50 48 20 |..L$(21)."GRAPH | 000009A0: 33 20 43 4F 4E 4E 45 43 54 53 20 49 54 20 54 4F |3 CONNECTS IT TO| 000009B0: 20 D0 41 52 41 47 52 41 50 48 20 32 3F 22 00 D4 | .ARAGRAPH 2?"..| 000009C0: 11 CE 04 4C 24 28 33 29 20 B2 20 22 31 2E 20 D4 |...L$(3) . "1. .| 000009D0: 48 41 54 22 00 FC 11 D3 04 4C 24 28 33 31 29 B2 |HAT".....L$(31).| 000009E0: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" | 000009F0: 20 20 20 20 20 20 20 20 20 20 20 22 00 14 12 D8 | "....| 00000A00: 04 4C 24 28 34 29 B2 22 32 2E 20 C2 45 48 45 4D |.L$(4)."2. .EHEM| 00000A10: 4F 54 48 22 00 2D 12 DD 04 4C 24 28 34 31 29 B2 |OTH".-...L$(41).| 00000A20: 22 20 20 20 20 20 20 20 20 20 20 20 22 00 43 12 |" ".C.| 00000A30: E2 04 4C 24 28 35 29 B2 22 33 2E 20 C8 45 41 4C |..L$(5)."3. .EAL| 00000A40: 54 48 22 00 5B 12 E7 04 4C 24 28 35 31 29 B2 22 |TH".[...L$(51)."| 00000A50: 20 20 20 20 20 20 20 20 20 20 22 00 61 12 0A 05 | ".a...| 00000A60: 8E 00 71 12 1E 05 4C 24 28 31 29 20 B2 20 22 33 |..q...L$(1) . "3| 00000A70: 22 00 A0 12 28 05 4C 24 28 32 29 20 B2 20 22 C9 |"...(.L$(2) . ".| 00000A80: 4E 20 D0 41 52 41 47 52 41 50 48 20 33 2C 20 57 |N .ARAGRAPH 3, W| 00000A90: 48 41 54 20 57 41 53 20 27 45 41 53 49 45 52 22 |HAT WAS 'EASIER"| 00000AA0: 00 BF 12 32 05 4C 24 28 32 31 29 B2 20 22 53 41 |...2.L$(21). "SA| 00000AB0: 49 44 20 54 48 41 4E 20 44 4F 4E 45 27 3F 22 00 |ID THAN DONE'?".| 00000AC0: E3 12 3C 05 4C 24 28 33 29 20 B2 20 22 31 2E 20 |..<.L$(3) . "1. | 00000AD0: D2 45 4C 45 41 53 49 4E 47 20 C2 45 48 45 4D 4F |.ELEASING .EHEMO| 00000AE0: 54 48 22 00 0C 13 46 05 4C 24 28 33 31 29 20 B2 |TH"...F.L$(31) .| 00000AF0: 20 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | " | 00000B00: 20 20 20 20 20 20 20 20 20 20 20 22 00 3B 13 4B | ".;.K| 00000B10: 05 4C 24 28 34 29 B2 22 32 2E 20 CE 55 52 53 49 |.L$(4)."2. .URSI| 00000B20: 4E 47 20 C2 45 48 45 4D 4F 54 48 20 42 41 43 4B |NG .EHEMOTH BACK| 00000B30: 20 54 4F 20 48 45 41 4C 54 48 22 00 53 13 50 05 | TO HEALTH".S.P.| 00000B40: 4C 24 28 34 31 29 B2 22 20 20 20 20 20 20 20 20 |L$(41)." | 00000B50: 20 20 22 00 78 13 55 05 4C 24 28 35 29 B2 22 33 | ".x.U.L$(5)."3| 00000B60: 2E 20 CF 50 45 52 41 54 49 4E 47 20 4F 4E 20 C2 |. .PERATING ON .| 00000B70: 45 48 45 4D 4F 54 48 22 00 8E 13 5A 05 4C 24 28 |EHEMOTH"...Z.L$(| 00000B80: 35 31 29 B2 22 20 20 20 20 20 20 20 20 22 00 94 |51)." "..| 00000B90: 13 6E 05 8E 00 A4 13 82 05 4C 24 28 31 29 20 B2 |.n.......L$(1) .| 00000BA0: 20 22 31 22 00 D8 13 8C 05 4C 24 28 32 29 20 B2 | "1".....L$(2) .| 00000BB0: 20 22 C9 4E 20 D0 41 52 41 47 52 41 50 48 20 34 | ".N .ARAGRAPH 4| 00000BC0: 2C 20 57 48 41 54 20 57 41 53 20 54 48 45 20 53 |, WHAT WAS THE S| 00000BD0: 4F 4C 55 54 49 4F 4E 22 00 FE 13 96 05 4C 24 28 |OLUTION".....L$(| 00000BE0: 32 31 29 B2 22 52 45 41 43 48 45 44 20 42 59 20 |21)."REACHED BY | 00000BF0: C4 52 2E 20 CD 43 C4 4F 4E 41 4C 44 3F 22 00 28 |.R. .C.ONALD?".(| 00000C00: 14 A0 05 4C 24 28 33 29 20 B2 20 22 31 2E 20 C8 |...L$(3) . "1. .| 00000C10: 45 20 53 45 57 45 44 20 42 41 43 4B 20 C2 45 48 |E SEWED BACK .EH| 00000C20: 45 4D 4F 54 48 27 53 22 00 46 14 AA 05 4C 24 28 |EMOTH'S".F...L$(| 00000C30: 33 31 29 B2 20 22 20 20 20 20 45 59 45 4C 49 44 |31). " EYELID| 00000C40: 53 2E 20 20 20 22 00 71 14 AF 05 4C 24 28 34 29 |S. ".q...L$(4)| 00000C50: B2 22 32 2E 20 C8 45 20 4C 45 54 20 4E 41 54 55 |."2. .E LET NATU| 00000C60: 52 45 20 54 41 4B 45 20 43 41 52 45 20 4F 46 20 |RE TAKE CARE OF | 00000C70: 22 00 8F 14 B4 05 4C 24 28 34 31 29 B2 22 20 20 |".....L$(41)." | 00000C80: 20 20 54 48 45 20 50 52 4F 42 4C 45 4D 2E 22 00 | THE PROBLEM.".| 00000C90: B9 14 B9 05 4C 24 28 35 29 B2 22 33 2E 20 C8 45 |....L$(5)."3. .E| 00000CA0: 20 4C 45 54 20 C2 45 48 45 4D 4F 54 48 20 52 45 | LET .EHEMOTH RE| 00000CB0: 47 41 49 4E 20 48 49 53 22 00 D4 14 BE 05 4C 24 |GAIN HIS".....L$| 00000CC0: 28 35 31 29 B2 22 20 20 20 20 53 54 52 45 4E 47 |(51)." STRENG| 00000CD0: 54 48 2E 22 00 DA 14 D2 05 8E 00 EC 14 B8 0B 8F |TH."............| 00000CE0: 20 20 50 41 55 53 45 20 53 55 42 53 00 F2 14 C2 | PAUSE SUBS....| 00000CF0: 0B 8E 00 F8 14 CC 0B 8E 00 17 15 A0 0F 8F 20 20 |.............. | 00000D00: 49 4E 53 54 52 55 43 54 49 4F 4E 53 20 41 4E 44 |INSTRUCTIONS AND| 00000D10: 20 42 4C 4F 41 44 53 00 23 15 AA 0F 26 53 50 2C | BLOADS.#...&SP,| 00000D20: 32 32 30 00 50 15 B6 0F 26 53 59 2C 31 3A 26 43 |220.P...&SY,1:&C| 00000D30: 4F 2C 31 36 3A 26 44 45 2C 31 2C 32 31 2C 34 30 |O,16:&DE,1,21,40| 00000D40: 2C 32 33 3A 26 46 49 3A 26 50 43 2C 31 2C 32 31 |,23:&FI:&PC,1,21| 00000D50: 00 68 15 B8 0F 26 54 58 2C 22 D2 45 41 44 20 D3 |.h...&TX,".EAD .| 00000D60: 54 4F 52 59 20 34 2E 22 00 98 15 BA 0F 26 50 43 |TORY 4.".....&PC| 00000D70: 2C 31 2C 32 32 3A 26 54 58 2C 22 D4 48 45 4E 2C |,1,22:&TX,".HEN,| 00000D80: 20 54 59 50 45 20 54 48 45 20 4E 55 4D 42 45 52 | TYPE THE NUMBER| 00000D90: 20 4F 46 20 54 48 45 22 00 BB 15 BB 0F 26 50 43 | OF THE".....&PC| 00000DA0: 2C 31 2C 32 33 3A 26 54 58 2C 22 43 4F 52 52 45 |,1,23:&TX,"CORRE| 00000DB0: 43 54 20 41 4E 53 57 45 52 2E 22 00 FF 15 BD 0F |CT ANSWER.".....| 00000DC0: 26 43 4F 2C 31 36 30 3A 26 44 45 2C 31 2C 32 35 |&CO,160:&DE,1,25| 00000DD0: 2C 34 30 2C 32 35 3A 26 46 49 3A 26 50 43 2C 31 |,40,25:&FI:&PC,1| 00000DE0: 31 2C 32 35 3A 26 54 58 2C 22 C8 49 54 20 D2 C5 |1,25:&TX,".IT ..| 00000DF0: D4 D5 D2 CE 20 54 4F 20 47 4F 20 4F 4E 2E 22 00 |.... TO GO ON.".| 00000E00: 0B 16 D2 0F 26 53 50 2C 32 35 35 00 11 16 24 13 |....&SP,255...$.| 00000E10: 8E 00 26 16 88 13 8F 20 20 44 49 53 50 4C 41 59 |..&.... DISPLAY| 00000E20: 20 53 43 4F 52 45 00 55 16 92 13 3A 26 53 59 2C | SCORE.U...:&SY,| 00000E30: 31 3A 26 43 4F 2C 31 36 30 3A 26 44 45 2C 31 2C |1:&CO,160:&DE,1,| 00000E40: 31 38 2C 34 30 2C 32 30 3A 26 46 49 3A 26 50 43 |18,40,20:&FI:&PC| 00000E50: 2C 31 2C 31 39 00 82 16 93 13 26 54 58 2C 22 C7 |,1,19.....&TX,".| 00000E60: 4F 41 4C 20 3D 20 35 20 52 49 47 48 54 20 49 4E |OAL = 5 RIGHT IN| 00000E70: 20 41 20 52 4F 57 2E 20 20 D9 4F 55 20 48 41 56 | A ROW. .OU HAV| 00000E80: 45 22 00 A3 16 9C 13 3A 26 53 59 2C 32 3A 26 49 |E".....:&SY,2:&I| 00000E90: 4E 3A 26 50 43 2C 33 37 2C 31 38 3A 26 54 58 2C |N:&PC,37,18:&TX,| 00000EA0: 22 20 22 00 B4 16 9D 13 52 52 24 B2 C7 28 52 52 |" ".....RR$..(RR| 00000EB0: AA 34 38 29 00 CB 16 A6 13 3A 26 50 43 2C 33 37 |.48).....:&PC,37| 00000EC0: 2C 31 39 3A 26 54 58 2C 52 52 24 00 DA 16 B0 13 |,19:&TX,RR$.....| 00000ED0: 3A 26 4E 4F 3A 26 53 59 2C 31 00 E0 16 E2 13 8E |:&NO:&SY,1......| 00000EE0: 00 FA 16 70 17 26 20 52 45 3A 26 44 4B 2C 22 49 |...p.& RE:&DK,"I| 00000EF0: 2E 47 52 41 50 45 53 22 2C 31 00 2A 17 72 17 26 |.GRAPES",1.*.r.&| 00000F00: 44 50 2C 31 2C 33 2C 32 3A 26 44 50 2C 31 2C 32 |DP,1,3,2:&DP,1,2| 00000F10: 35 2C 32 3A 26 44 50 2C 31 2C 33 2C 31 35 3A 26 |5,2:&DP,1,3,15:&| 00000F20: 44 50 2C 31 2C 32 35 2C 31 35 00 65 17 74 17 26 |DP,1,25,15.e.t.&| 00000F30: 43 4F 2C 31 37 36 3A 26 44 45 2C 36 2C 31 30 2C |CO,176:&DE,6,10,| 00000F40: 33 32 2C 31 36 3A 26 46 49 3A 26 53 59 2C 32 3A |32,16:&FI:&SY,2:| 00000F50: 26 50 43 2C 36 2C 31 32 3A 26 54 58 2C 22 C7 4F |&PC,6,12:&TX,".O| 00000F60: 20 C7 55 4D 22 00 81 17 76 17 26 50 43 2C 39 2C | .UM"...v.&PC,9,| 00000F70: 31 34 3A 26 54 58 2C 22 41 20 C7 52 41 50 45 21 |14:&TX,"A .RAPE!| 00000F80: 22 00 91 17 7E 17 81 20 49 20 B2 20 31 20 A4 20 |"...~.. I . 1 . | 00000F90: 32 00 D3 17 80 17 26 54 4E 2C 31 39 32 2C 31 30 |2.....&TN,192,10| 00000FA0: 3A 26 54 4E 2C 31 39 32 2C 35 3A 26 54 4E 2C 31 |:&TN,192,5:&TN,1| 00000FB0: 39 32 2C 35 3A 26 54 4E 2C 31 39 32 2C 31 30 3A |92,5:&TN,192,10:| 00000FC0: 26 54 4E 2C 31 39 32 2C 35 3A 26 54 4E 2C 31 39 |&TN,192,5:&TN,19| 00000FD0: 32 2C 35 00 15 18 82 17 26 54 4E 2C 31 39 32 2C |2,5.....&TN,192,| 00000FE0: 31 30 3A 26 54 4E 2C 31 39 32 2C 35 3A 26 54 4E |10:&TN,192,5:&TN| 00000FF0: 2C 31 39 32 2C 35 3A 26 54 4E 2C 31 39 32 2C 31 |,192,5:&TN,192,1| 00001000: 30 3A 26 54 4E 2C 31 39 32 2C 35 3A 26 54 4E 2C |0:&TN,192,5:&TN,| 00001010: 31 39 32 2C 35 00 62 18 84 17 26 54 4E 2C 31 38 |192,5.b...&TN,18| 00001020: 34 2C 31 30 3A 26 54 4E 2C 31 38 34 2C 35 3A 26 |4,10:&TN,184,5:&| 00001030: 54 4E 2C 31 38 34 2C 35 3A 26 54 4E 2C 32 30 34 |TN,184,5:&TN,204| 00001040: 2C 31 30 3A 26 54 4E 2C 32 30 34 2C 35 3A 26 54 |,10:&TN,204,5:&T| 00001050: 4E 2C 32 30 34 2C 35 3A 26 54 4E 2C 31 38 34 2C |N,204,5:&TN,184,| 00001060: 33 30 00 71 18 86 17 26 54 4E 2C 31 39 32 2C 31 |30.q...&TN,192,1| 00001070: 30 00 B3 18 88 17 26 54 4E 2C 31 39 36 2C 31 30 |0.....&TN,196,10| 00001080: 3A 26 54 4E 2C 31 39 36 2C 35 3A 26 54 4E 2C 31 |:&TN,196,5:&TN,1| 00001090: 39 36 2C 35 3A 26 54 4E 2C 31 39 36 2C 31 30 3A |96,5:&TN,196,10:| 000010A0: 26 54 4E 2C 31 39 36 2C 35 3A 26 54 4E 2C 31 39 |&TN,196,5:&TN,19| 000010B0: 36 2C 35 00 F5 18 8A 17 26 54 4E 2C 31 39 36 2C |6,5.....&TN,196,| 000010C0: 31 30 3A 26 54 4E 2C 31 39 36 2C 35 3A 26 54 4E |10:&TN,196,5:&TN| 000010D0: 2C 31 39 36 2C 35 3A 26 54 4E 2C 31 39 36 2C 31 |,196,5:&TN,196,1| 000010E0: 30 3A 26 54 4E 2C 31 39 36 2C 35 3A 26 54 4E 2C |0:&TN,196,5:&TN,| 000010F0: 31 39 36 2C 35 00 39 19 8C 17 26 54 4E 2C 32 31 |196,5.9...&TN,21| 00001100: 32 2C 31 30 3A 26 54 4E 2C 32 31 32 2C 35 3A 26 |2,10:&TN,212,5:&| 00001110: 54 4E 2C 32 31 32 2C 35 3A 26 54 4E 2C 32 30 34 |TN,212,5:&TN,204| 00001120: 2C 31 30 3A 26 54 4E 2C 31 39 36 2C 31 30 3A 26 |,10:&TN,196,10:&| 00001130: 54 4E 2C 31 39 32 2C 33 30 00 6A 19 8D 17 81 4C |TN,192,30.j....L| 00001140: B2 32 A4 31 35 A9 31 3A 26 44 50 2C 31 2C 32 35 |.2.15.1:&DP,1,25| 00001150: 2C 4C 3A 82 3A 81 4D B2 33 A4 32 35 A9 31 3A 26 |,L:.:.M.3.25.1:&| 00001160: 44 50 2C 31 2C 4D 2C 32 3A 82 00 9A 19 8E 17 82 |DP,1,M,2:.......| 00001170: 3A 81 4D B2 33 A4 32 35 A9 31 3A 26 44 50 2C 31 |:.M.3.25.1:&DP,1| 00001180: 2C 4D 2C 32 3A 82 3A 26 44 50 2C 31 2C 33 2C 32 |,M,2:.:&DP,1,3,2| 00001190: 3A 81 50 B2 31 A4 31 35 30 30 00 DA 19 A2 17 82 |:.P.1.1500......| 000011A0: 3A 26 52 45 3A 81 49 B2 31 A4 39 3A 26 43 4F 2C |:&RE:.I.1.9:&CO,| 000011B0: 49 AA 33 3A 26 44 45 2C 49 2C 49 2C 34 31 AB 49 |I.3:&DE,I,I,41.I| 000011C0: 2C 32 36 AB 49 3A 26 46 49 3A 82 3A 26 53 59 2C |,26.I:&FI:.:&SY,| 000011D0: 32 3A 26 50 43 2C 39 2C 31 33 00 13 1A AC 17 26 |2:&PC,9,13.....&| 000011E0: 54 58 2C 22 D0 41 52 41 47 52 41 50 48 49 4E 47 |TX,".ARAGRAPHING| 000011F0: 22 3A 8D 36 32 30 30 3A 9E 31 39 33 34 31 3A 93 |":.6200:.19341:.| 00001200: 22 53 55 42 50 52 4F 47 52 41 4D 20 58 58 2F 39 |"SUBPROGRAM XX/9| 00001210: 22 2C 38 00 43 1A 38 18 A0 31 35 3A 9F 31 35 2C |",8.C.8..15:.15,| 00001220: 38 2C 31 35 2C 22 53 30 3A 22 AA 4E 46 24 3A A0 |8,15,"S0:".NF$:.| 00001230: 31 35 3A 26 42 53 2C 4E 46 24 2C 38 36 38 2C 36 |15:&BS,NF$,868,6| 00001240: 33 3A 8E 00 00 00 B2 22 20 20 20 20 54 48 45 20 |3:....." THE | 00001250: 50 52 4F 42 4C 45 4D 2E 22 00 18 17 B9 05 4C 24 |PROBLEM.".....L$| 00001260: 28 35 29 B2 22 33 2E 20 C8 45 20 4C 45 54 20 C2 |(5)."3. .E LET .| 00001270: 45 48 45 4D 4F 54 48 20 52 45 47 41 49 4E 20 48 |EHEMOTH REGAIN H| 00001280: 49 53 22 00 33 17 BE 05 4C 24 28 35 31 29 B2 22 |IS".3...L$(51)."| 00001290: 20 20 20 20 53 54 52 45 4E 47 54 48 2E 22 00 39 | STRENGTH.".9| 000012A0: 17 D2 05 8E 00 4B 17 B8 0B 8F 20 20 50 41 55 53 |.....K.... PAUS| 000012B0: 45 20 53 55 42 53 00 51 17 C2 0B 8E 00 57 17 CC |E SUBS.Q.....W..| 000012C0: 0B 8E 00 76 17 A0 0F 8F 20 20 49 4E 53 54 52 55 |...v.... INSTRU| 000012D0: 43 54 49 4F 4E 53 20 41 4E 44 20 42 4C 4F 41 44 |CTIONS AND BLOAD| 000012E0: 53 00 82 17 AA 0F 26 53 50 2C 32 32 30 00 AF 17 |S.....&SP,220...| 000012F0: B6 0F 26 53 59 2C 31 3A 26 43 4F 2C 31 36 3A 26 |..&SY,1:&CO,16:&| 00001300: 44 45 2C 31 2C 32 31 2C 34 30 2C 32 33 3A 26 46 |DE,1,21,40,23:&F| 00001310: 49 3A 26 50 43 2C 31 2C 32 31 00 C7 17 B8 0F 26 |I:&PC,1,21.....&| 00001320: 54 58 2C 22 D2 45 41 44 20 D3 54 4F 52 59 20 34 |TX,".EAD .TORY 4| 00001330: 2E 22 00 F7 17 BA 0F 26 50 43 2C 31 2C 32 32 3A |.".....&PC,1,22:| 00001340: 26 54 58 2C 22 D4 48 45 4E 2C 20 54 59 50 45 20 |&TX,".HEN, TYPE | 00001350: 54 48 45 20 4E 55 4D 42 45 52 20 4F 46 20 54 48 |THE NUMBER OF TH| 00001360: 45 22 00 1A 18 BB 0F 26 50 43 2C 31 2C 32 33 3A |E".....&PC,1,23:| 00001370: 26 54 58 2C 22 43 4F 52 52 45 43 54 20 41 4E 53 |&TX,"CORRECT ANS| 00001380: 57 45 52 2E 22 00 5E 18 BD 0F 26 43 4F 2C 31 36 |WER.".^...&CO,16| 00001390: 30 3A 26 44 45 2C 31 2C 32 35 2C 34 30 2C 32 35 |0:&DE,1,25,40,25| 000013A0: 3A 26 46 49 3A 26 50 43 2C 31 31 2C 32 35 3A 26 |:&FI:&PC,11,25:&| 000013B0: 54 58 2C 22 C8 49 54 20 D2 C5 D4 D5 D2 CE 20 54 |TX,".IT ...... T| 000013C0: 4F 20 47 4F 20 4F 4E 2E 22 00 6A 18 D2 0F 26 53 |O GO ON.".j...&S| 000013D0: 50 2C 32 35 35 00 70 18 24 13 8E 00 85 18 88 13 |P,255.p.$.......| 000013E0: 8F 20 20 44 49 53 50 4C 41 59 20 53 43 4F 52 45 |. DISPLAY SCORE| 000013F0: 00 B3 18 92 13 26 53 59 2C 31 3A 26 43 4F 2C 31 |.....&SY,1:&CO,1| 00001400: 36 30 3A 26 44 45 2C 31 2C 31 39 2C 34 30 2C 32 |60:&DE,1,19,40,2| 00001410: 30 3A 26 46 49 3A 26 50 43 2C 31 2C 31 39 00 E0 |0:&FI:&PC,1,19..| 00001420: 18 93 13 26 54 58 2C 22 C7 4F 41 4C 20 3D 20 35 |...&TX,".OAL = 5| 00001430: 20 52 49 47 48 54 20 49 4E 20 41 20 52 4F 57 2E | RIGHT IN A ROW.| 00001440: 20 20 D9 4F 55 20 48 41 56 45 22 00 F4 18 9C 13 | .OU HAVE".....| 00001450: 26 20 53 59 2C 32 3A 20 26 20 43 4C 2C 34 30 00 |& SY,2: & CL,40.| 00001460: 10 19 9D 13 52 52 24 20 B2 20 20 C7 20 28 52 52 |....RR$ . . (RR| 00001470: AA 34 38 29 3A 20 26 20 49 4E 56 00 38 19 A6 13 |.48): & INV.8...| 00001480: 81 20 4A 4A 20 B2 20 30 20 A4 20 52 52 3A 20 26 |. JJ . 0 . RR: &| 00001490: 50 43 2C 33 37 2C 31 39 3A 26 54 58 2C 52 52 24 |PC,37,19:&TX,RR$| 000014A0: 3A 20 82 00 57 19 B0 13 26 20 4E 4F 3A 20 26 20 |: ..W...& NO: & | 000014B0: 43 4C 2C 30 3A 20 26 20 44 49 2C 30 3A 26 53 59 |CL,0: & DI,0:&SY| 000014C0: 2C 31 00 5D 19 E2 13 8E 00 00 00 |,1.]....... |
../....45,B(174):.46,B(175):.47,B(45):.4
8,B(46).G....49,B(45):.50,B(46).H....55,
255:.56,63:.869,8:.870,0......51,B(55):.
52,B(56)......19328...... SUBPROGRAM X
X/3.D.".SP . 8:NS . 5:RR% . 5:NQ . 1.V.(
.ST% . 3: & RE...,.L$ . " ".&.2.L1.B(87
1):N1$."":.I.1.L1:N1$.N1$.G(B(I.871)):.:
NF$."SRF-".N1$.<.<.. L$(100),IX$(10).U.F
.WR . 0:RN . 0:J . 0:.R.P.R . 0:RR . 0:X
. 0:K . 0...D.. 4010:. 5010...E.&CO,5:&
DE,1,1,40,15:&FI:&CO,69:&DE,2,2,39,14:&F
I.V.F.&CO,27:&DE,2,2,39,14:&FI...X.:....
.. RN . 0 . J . J . 1: . 150.....J..(NS.
.(1).1):.J.J1.140.4...J1.J: . J..NS . RN
. 1.W. .. J . 1010,1110,1210,1310,1410.
..W.&SY,1:&PC,3,3:&TX,L$(2):&PC,3,4:&TX,
L$(21).V...&PC,5,6:&TX,L$(3):&PC,5,7 :&T
X,L$(31):&PC,5,9:&TX,L$(4):&PC,5,10:&TX,
L$(41).....&PC,5,12:&TX,L$(5):&PC,5,13:&
TX,L$(51).....&CO,160:&DE,1,16,8,18:&FI.
2...&PC,2,16:&SY,2.?...L$ . "1".U...& EN
S,L$,1,T%,AL%.G.... AL%.0 . 260.....&SY,
1: L$ . H (L$,AL%)...... F (L$) . 3 .
272......((L$.."1").(L$.."2").(L$.."3")
).:&PC,2,16:&SY,2:&TX," ":.258...... 28
0.....&RE:&SY,2:&PC,9,5:&TX,"BYE":.19341
:."HELLOHI1",8.B.... L$ . L$(1) . AX$ .
"YES":.282.X...AX$ . "NO": . 290.....& S
Y,2:&CO,16:&DE,25,16,40,17:&FI:&PC,33,16
:&TX,"GOOD"...... I . 160 . 48 . . 8: &
TN,I,1: ......&PC,33,16:&TX," ":&P
C,2,16:&TX," ":&SY,1: . 300..."..
I . 1 . 5: & TN,255,10: ..].$.&SY,2:&CO
,192:&DE,5,16,6,17:&FI:.I.1.10:&NO:&PC,5
,16:&TX,L$(1)...%.. 399:&IN:&PC,5,16:&TX
,L$(1):.399:.:&NO...&..198,0...(.. R$:.
R$..G(13).296.J.).:&PC,1,16:&TX,"
".Y.,.. SCORING...1.. (AX$ . "YES") .
R . R . 1:RR . RR . 1:WR . 0.B.6.. (AX$
. . "YES") . W . W . 1:WR . WR . 1:RR .
0.M.@.. 5010...J.. RR . . RR% . A2 . 7
:.870,A2:.893,W:.908,R:.6000.F.T.. (WR .
. 5) . (W .. 18) . A2 . 5:.870,A2:.19341
:."HELLOHI1",8...Y..I.0.11:&PC,1,3.I:&TX
,"
":....R.. 120.......6.... DATA FOR QUE
STIONS.F...L$(1) . "2".Y...L$(2) . "WHIC
H WORD AT THE BEGINNING OF PARA-".....L$
(21)."GRAPH 2 CONNECTS IT TO PARAGRAPH 1
?".B...L$(3) . "1. HEALTH".....L$(31)."
".....L$(4)."2. RESCUER
S".....L$(41)." ".+...L$(5
)."3. SEAL".@...L$(51)." ".F.B...V
.V.L$(1) . "3"...`.L$(2) . "IN PARAGRAPH
2, WHAT DO THE WORDS"...J.L$(21) . "'SI
CK FOUNDLING' REFER TO?".H.O.L$(3)."1. E
LEPHANT"...T.L$(31) . " "..
.Y.L$(4)."2. BOBCAT"...~.L$(41)."
".,...L$(5)."3. BEHEMOTH".D...L$(51).
" ".J.....Z...L$(1) . "1"...D.L
$(2) . "WHICH WORD AT THE BEGINNING OF P
ARA-"...I.L$(21)."GRAPH 3 CONNECTS IT TO
PARAGRAPH 2?".T.N.L$(3) . "1. THAT"...S
.L$(31)." "...X
.L$(4)."2. BEHEMOTH".-...L$(41)."
".C...L$(5)."3. HEALTH".[...L$(51)."
".A.....Q...L$(1) . "3". .(.L$
(2) . "IN PARAGRAPH 3, WHAT WAS 'EASIER"
...2.L$(21). "SAID THAN DONE'?"...<.L$(3
) . "1. RELEASING BEHEMOTH"...F.L$(31) .
" ".;.K.L$(4)."
2. NURSING BEHEMOTH BACK TO HEALTH".S.P.
L$(41)." ".X.U.L$(5)."3. OPERAT
ING ON BEHEMOTH"...Z.L$(51)." "..
.N.......L$(1) . "1".X...L$(2) . "IN PAR
AGRAPH 4, WHAT WAS THE SOLUTION".....L$(
21)."REACHED BY DR. MCDONALD?".(. .L$(3)
. "1. HE SEWED BACK BEHEMOTH'S".F...L$(
31). " EYELIDS. ".Q...L$(4)."2. HE
LET NATURE TAKE CARE OF ".....L$(41)."
THE PROBLEM.".....L$(5)."3. HE LET BEH
EMOTH REGAIN HIS".T...L$(51)." STRENG
TH.".Z.R........ PAUSE SUBS...B.....L..
... .. INSTRUCTIONS AND BLOADS.#...&SP,
220.P...&SY,1:&CO,16:&DE,1,21,40,23:&FI:
&PC,1,21.H...&TX,"READ STORY 4.".....&PC
,1,22:&TX,"THEN, TYPE THE NUMBER OF THE"
.....&PC,1,23:&TX,"CORRECT ANSWER.".....
&CO,160:&DE,1,25,40,25:&FI:&PC,11,25:&TX
,"HIT RETURN TO GO ON."...R.&SP,255...$.
..&.... DISPLAY SCORE.U...:&SY,1:&CO,16
0:&DE,1,18,40,20:&FI:&PC,1,19.....&TX,"G
OAL = 5 RIGHT IN A ROW. YOU HAVE".....:
&SY,2:&IN:&PC,37,18:&TX," ".....RR$.G(RR
.48).K...:&PC,37,19:&TX,RR$.Z...:&NO:&SY
,1.........P.& RE:&DK,"I.GRAPES",1.*.R.&
DP,1,3,2:&DP,1,25,2:&DP,1,3,15:&DP,1,25,
15.E.T.&CO,176:&DE,6,10,32,16:&FI:&SY,2:
&PC,6,12:&TX,"GO GUM"...V.&PC,9,14:&TX,"
A GRAPE!"...~.. I . 1 . 2.S...&TN,192,10
:&TN,192,5:&TN,192,5:&TN,192,10:&TN,192,
5:&TN,192,5.....&TN,192,10:&TN,192,5:&TN
,192,5:&TN,192,10:&TN,192,5:&TN,192,5.B.
..&TN,184,10:&TN,184,5:&TN,184,5:&TN,204
,10:&TN,204,5:&TN,204,5:&TN,184,30.Q...&
TN,192,10.....&TN,196,10:&TN,196,5:&TN,1
96,5:&TN,196,10:&TN,196,5:&TN,196,5.....
&TN,196,10:&TN,196,5:&TN,196,5:&TN,196,1
0:&TN,196,5:&TN,196,5.9...&TN,212,10:&TN
,212,5:&TN,212,5:&TN,204,10:&TN,196,10:&
TN,192,30.J....L.2.15.1:&DP,1,25,L:.:.M.
3.25.1:&DP,1,M,2:.......:.M.3.25.1:&DP,1
,M,2:.:&DP,1,3,2:.P.1.1500.Z....:&RE:.I.
1.9:&CO,I.3:&DE,I,I,41.I,26.I:&FI:.:&SY,
2:&PC,9,13.....&TX,"PARAGRAPHING":.6200:
.19341:."SUBPROGRAM XX/9",8.C.8. 15:.15,
8,15,"S0:".NF$: 15:&BS,NF$,868,63:....."
THE PROBLEM.".....L$(5)."3. HE LET B
EHEMOTH REGAIN HIS".3...L$(51)." STRE
NGTH.".9.R...K.... PAUSE SUBS.Q.B...W.L
...V. .. INSTRUCTIONS AND BLOADS.....&S
P,220.....&SY,1:&CO,16:&DE,1,21,40,23:&F
I:&PC,1,21.G...&TX,"READ STORY 4.".....&
PC,1,22:&TX,"THEN, TYPE THE NUMBER OF TH
E".....&PC,1,23:&TX,"CORRECT ANSWER.".^.
..&CO,160:&DE,1,25,40,25:&FI:&PC,11,25:&
TX,"HIT RETURN TO GO ON.".J.R.&SP,255.P.
$........ DISPLAY SCORE.....&SY,1:&CO,1
60:&DE,1,19,40,20:&FI:&PC,1,19.....&TX,"
GOAL = 5 RIGHT IN A ROW. YOU HAVE".....
& SY,2: & CL,40.....RR$ . G (RR.48): &
INV.8.... JJ . 0 . RR: &PC,37,19:&TX,RR$
: ..W...& NO: & CL,0: & DI,0:&SY,1.]....
...
> CLICK IMAGE PREVIEW FOR FULL MODAL