SUBPROGRAM XX/1
FILE INFORMATION
FILENAME(S): SUBPROGRAM XX/1
FILE TYPE(S): PRG
FILE SIZE: 6K
FIRST SEEN: 2025-11-30 21:22:20
APPEARS ON: 1 disk(s)
FILE HASH
d516bf219f5236788afbe30790edc7ecd6556b9b2f5db85215b6fc7e80842b07
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| NERO SOFT 162B | SUBPROGRAM XX/1 | PRG | DuncanTwain | 15 | 4 | 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: 31 3A 97 38 37 30 2C 30 00 80 08 0B 00 97 35 31 |1:.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 31 00 C4 08 22 00 53 50 20 B2 20 31 3A 4E |X/1...".SP . 1:N|
000000B0: 53 20 B2 20 33 3A 52 52 25 20 B2 20 33 3A 4E 51 |S . 3:RR% . 3: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 78 09 78 00 3A 00 97 09 96 00 4A 20 B2 | 0.x.x.:.....J .|
00000180: 20 4A 20 AA 20 31 3A 8B 20 4A 20 B1 20 4E 53 20 | J . 1:. J . NS |
00000190: A7 20 4A 20 B2 20 31 00 B0 09 A0 00 91 20 4A 20 |. J . 1...... J |
000001A0: 8D 20 31 30 31 30 2C 31 31 31 30 2C 31 32 31 30 |. 1010,1110,1210|
000001B0: 00 C2 09 A5 00 8D 20 34 30 31 30 3A 8D 20 35 30 |...... 4010:. 50|
000001C0: 31 30 00 D4 09 AA 00 8B 20 4B 20 B3 B1 30 20 A7 |10...... K ..0 .|
000001D0: 20 32 31 35 00 09 0A B4 00 26 43 4F 2C 35 3A 26 | 215.....&CO,5:&|
000001E0: 44 45 2C 31 2C 31 2C 34 30 2C 31 35 3A 26 46 49 |DE,1,1,40,15:&FI|
000001F0: 3A 26 43 4F 2C 36 39 3A 26 44 45 2C 32 2C 32 2C |:&CO,69:&DE,2,2,|
00000200: 33 39 2C 31 34 3A 26 46 49 00 26 0A BE 00 26 43 |39,14:&FI.&...&C|
00000210: 4F 2C 32 37 3A 26 44 45 2C 32 2C 32 2C 33 39 2C |O,27:&DE,2,2,39,|
00000220: 31 34 3A 26 46 49 00 30 0A C3 00 4B 20 B2 20 31 |14:&FI.0...K . 1|
00000230: 00 5F 0A D7 00 26 53 59 2C 31 3A 26 50 43 2C 34 |._...&SY,1:&PC,4|
00000240: 2C 33 3A 26 54 58 2C 4C 24 28 33 29 3A 26 50 43 |,3:&TX,L$(3):&PC|
00000250: 2C 34 2C 34 3A 26 54 58 2C 4C 24 28 33 31 29 00 |,4,4:&TX,L$(31).|
00000260: 88 0A DC 00 26 50 43 2C 34 2C 35 3A 26 54 58 2C |....&PC,4,5:&TX,|
00000270: 4C 24 28 33 32 29 3A 26 50 43 2C 34 2C 36 3A 26 |L$(32):&PC,4,6:&|
00000280: 54 58 2C 4C 24 28 34 29 00 C7 0A E1 00 26 50 43 |TX,L$(4).....&PC|
00000290: 2C 34 2C 37 20 3A 26 54 58 2C 4C 24 28 34 31 29 |,4,7 :&TX,L$(41)|
000002A0: 3A 26 50 43 2C 34 2C 38 20 3A 26 54 58 2C 4C 24 |:&PC,4,8 :&TX,L$|
000002B0: 28 34 32 29 3A 26 50 43 2C 34 2C 39 20 3A 26 54 |(42):&PC,4,9 :&T|
000002C0: 58 2C 4C 24 28 35 29 00 06 0B E3 00 26 50 43 2C |X,L$(5).....&PC,|
000002D0: 34 2C 31 30 3A 26 54 58 2C 4C 24 28 35 31 29 3A |4,10:&TX,L$(51):|
000002E0: 26 50 43 2C 34 2C 31 31 3A 26 54 58 2C 4C 24 28 |&PC,4,11:&TX,L$(|
000002F0: 35 32 29 3A 26 50 43 2C 34 2C 31 32 3A 26 54 58 |52):&PC,4,12:&TX|
00000300: 2C 4C 24 28 36 29 00 32 0B E5 00 26 50 43 2C 34 |,L$(6).2...&PC,4|
00000310: 2C 31 33 3A 26 54 58 2C 4C 24 28 36 31 29 3A 26 |,13:&TX,L$(61):&|
00000320: 50 43 2C 34 2C 31 34 3A 26 54 58 2C 4C 24 28 36 |PC,4,14:&TX,L$(6|
00000330: 32 29 00 55 0B FA 00 26 43 4F 2C 31 36 30 3A 26 |2).U...&CO,160:&|
00000340: 44 45 2C 31 2C 31 36 2C 31 30 2C 31 37 3A 26 46 |DE,1,16,10,17:&F|
00000350: 49 3A 26 4E 4F 00 68 0B 02 01 26 50 43 2C 32 2C |I:&NO.h...&PC,2,|
00000360: 31 36 3A 26 53 59 2C 32 00 77 0B 03 01 4C 24 20 |16:&SY,2.w...L$ |
00000370: B2 20 22 32 31 1D 22 00 8D 0B 04 01 26 20 45 4E |. "21.".....& EN|
00000380: 53 2C 4C 24 2C 33 2C 54 25 2C 41 4C 25 00 A1 0B |S,L$,3,T%,AL%...|
00000390: 05 01 8B 20 41 4C 25 20 B2 20 30 20 A7 20 32 36 |... AL% . 0 . 26|
000003A0: 30 00 B6 0B 06 01 4C 24 20 B2 20 20 C8 20 28 4C |0.....L$ . . (L|
000003B0: 24 2C 41 4C 25 29 00 CF 0B 08 01 8B 20 20 C6 20 |$,AL%)...... . |
000003C0: 28 4C 24 29 20 B2 20 33 20 20 A7 20 32 37 32 00 |(L$) . 3 . 272.|
000003D0: 08 0C 09 01 8B 28 28 4C 24 B3 22 31 22 29 B0 28 |.....((L$."1").(|
000003E0: 4C 24 B1 22 34 22 29 29 A7 3A 26 50 43 2C 32 2C |L$."4")).:&PC,2,|
000003F0: 31 36 3A 26 53 59 2C 32 3A 26 54 58 2C 22 20 20 |16:&SY,2:&TX," |
00000400: 20 20 22 3A 89 32 35 38 00 12 0C 0A 01 89 20 32 | ":.258...... 2|
00000410: 38 30 00 47 0C 10 01 26 52 45 3A 26 53 59 2C 32 |80.G...&RE:&SY,2|
00000420: 3A 26 50 43 2C 39 2C 35 3A 26 54 58 2C 22 C2 59 |:&PC,9,5:&TX,".Y|
00000430: 45 22 3A 9E 31 39 33 34 31 3A 93 22 48 45 4C 4C |E":.19341:."HELL|
00000440: 4F 48 49 31 22 2C 38 00 78 0C 18 01 8B 20 4C 24 |OHI1",8.x.... L$|
00000450: 20 B2 20 4C 24 28 31 29 20 B0 20 4C 24 20 B2 20 | . L$(1) . L$ . |
00000460: 4C 24 28 32 29 20 A7 20 41 58 24 20 B2 20 22 59 |L$(2) . AX$ . "Y|
00000470: 45 53 22 3A 89 32 38 32 00 8E 0C 19 01 41 58 24 |ES":.282.....AX$|
00000480: 20 B2 20 22 4E 4F 22 3A 20 89 20 32 39 30 00 DE | . "NO": . 290..|
00000490: 0C 1A 01 26 50 43 2C 32 2C 31 36 3A 26 54 58 2C |...&PC,2,16:&TX,|
000004A0: 22 20 20 20 20 20 20 22 3A 26 20 53 59 2C 32 3A |" ":& SY,2:|
000004B0: 26 43 4F 2C 31 36 3A 26 44 45 2C 31 2C 31 36 2C |&CO,16:&DE,1,16,|
000004C0: 34 30 2C 31 37 3A 26 46 49 3A 26 50 43 2C 31 36 |40,17:&FI:&PC,16|
000004D0: 2C 31 36 3A 26 54 58 2C 22 C7 4F 4F 44 22 00 05 |,16:&TX,".OOD"..|
000004E0: 0D 1B 01 81 20 49 20 B2 20 31 36 30 20 A4 20 34 |.... I . 160 . 4|
000004F0: 38 20 A9 20 20 AB 20 38 3A 20 26 20 54 4E 2C 49 |8 . . 8: & TN,I|
00000500: 2C 31 3A 20 82 00 2D 0D 1D 01 26 50 43 2C 31 36 |,1: ..-...&PC,16|
00000510: 2C 31 36 3A 26 54 58 2C 22 20 20 20 20 20 20 22 |,16:&TX," "|
00000520: 3A 26 53 59 2C 31 3A 20 89 20 33 30 30 00 4D 0D |:&SY,1: . 300.M.|
00000530: 22 01 81 20 49 20 B2 20 31 20 A4 20 35 3A 20 26 |".. I . 1 . 5: &|
00000540: 20 54 4E 2C 32 35 35 2C 31 30 3A 20 82 00 89 0D | TN,255,10: ....|
00000550: 23 01 26 53 50 2C 32 32 30 3A 20 26 53 59 2C 31 |#.&SP,220: &SY,1|
00000560: 3A 26 43 4F 2C 31 36 3A 26 44 45 2C 31 32 2C 31 |:&CO,16:&DE,12,1|
00000570: 35 2C 34 30 2C 31 35 3A 26 46 49 3A 26 4E 4F 3A |5,40,15:&FI:&NO:|
00000580: 26 50 43 2C 31 32 2C 31 35 00 CB 0D 24 01 8B 20 |&PC,12,15...$.. |
00000590: C3 28 4C 24 28 31 29 29 20 B1 20 31 20 A7 20 3A |.(L$(1)) . 1 . :|
000005A0: 26 54 58 2C 22 D4 48 45 20 43 4F 52 52 45 43 54 |&TX,".HE CORRECT|
000005B0: 20 41 4E 53 57 45 52 53 20 41 52 45 3A 20 22 AA | ANSWERS ARE: ".|
000005C0: 4C 24 28 31 29 3A 89 20 32 39 34 00 F4 0D 25 01 |L$(1):. 294...%.|
000005D0: 26 20 54 58 2C 22 D4 48 45 20 43 4F 52 52 45 43 |& TX,".HE CORREC|
000005E0: 54 20 41 4E 53 57 45 52 20 49 53 3A 20 22 AA 4C |T ANSWER IS: ".L|
000005F0: 24 28 31 29 00 08 0E 26 01 97 20 31 39 38 2C 30 |$(1)...&.. 198,0|
00000600: 3A 26 53 50 2C 32 35 35 00 1D 0E 27 01 A1 20 52 |:&SP,255...'.. R|
00000610: 24 3A 8B 20 52 24 B2 22 22 A7 32 39 35 00 34 0E |$:. R$."".295.4.|
00000620: 28 01 8B 20 C6 28 52 24 29 B3 B1 20 31 33 20 A7 |(.. .(R$).. 13 .|
00000630: 20 32 39 35 00 6F 0E 29 01 26 50 43 2C 34 2C 31 | 295.o.).&PC,4,1|
00000640: 35 3A 26 54 58 2C 22 20 20 20 20 20 20 20 20 20 |5:&TX," |
00000650: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000660: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 | ".|
00000670: 97 0E 2A 01 26 53 59 2C 32 3A 26 50 43 2C 31 2C |..*.&SY,2:&PC,1,|
00000680: 31 36 3A 26 54 58 2C 22 20 20 20 20 20 20 20 20 |16:&TX," |
00000690: 22 3A 26 53 59 2C 31 00 B5 0E 2B 01 26 43 4F 2C |":&SY,1...+.&CO,|
000006A0: 35 3A 26 44 45 2C 31 32 2C 31 35 2C 34 30 2C 31 |5:&DE,12,15,40,1|
000006B0: 35 3A 26 46 49 00 C4 0E 2C 01 8F 20 20 53 43 4F |5:&FI...,.. SCO|
000006C0: 52 49 4E 47 00 F7 0E 31 01 8B 20 28 41 58 24 20 |RING...1.. (AX$ |
000006D0: B2 20 22 59 45 53 22 29 20 A7 20 52 20 B2 20 52 |. "YES") . R . R|
000006E0: 20 AA 20 31 3A 52 52 20 B2 20 52 52 20 AA 20 31 | . 1:RR . RR . 1|
000006F0: 3A 57 52 20 B2 20 30 00 2D 0F 36 01 8B 20 28 41 |:WR . 0.-.6.. (A|
00000700: 58 24 20 B3 20 20 B1 20 22 59 45 53 22 29 20 A7 |X$ . . "YES") .|
00000710: 20 57 20 B2 20 57 20 AA 20 31 3A 57 52 20 B2 20 | W . W . 1:WR . |
00000720: 57 52 20 AA 20 31 3A 52 52 20 B2 20 30 00 38 0F |WR . 1:RR . 0.8.|
00000730: 40 01 8D 20 35 30 31 30 00 6D 0F 4A 01 8B 20 52 |@.. 5010.m.J.. R|
00000740: 52 20 B1 B2 20 52 52 25 20 A7 20 41 32 20 B2 20 |R .. RR% . A2 . |
00000750: 37 3A 97 38 37 30 2C 41 32 3A 97 38 38 36 2C 57 |7:.870,A2:.886,W|
00000760: 3A 97 39 30 31 2C 52 3A 89 36 30 30 30 00 AF 0F |:.901,R:.6000...|
00000770: 54 01 8B 20 28 57 52 20 B1 B2 20 35 29 20 B0 20 |T.. (WR .. 5) . |
00000780: 28 57 20 B1 B2 20 31 38 29 20 A7 20 41 32 20 B2 |(W .. 18) . A2 .|
00000790: 20 35 3A 97 38 37 30 2C 41 32 3A 9E 31 39 33 34 | 5:.870,A2:.1934|
000007A0: 31 3A 93 22 48 45 4C 4C 4F 48 49 31 22 2C 38 00 |1:."HELLOHI1",8.|
000007B0: F5 0F 59 01 81 49 B2 30 A4 31 32 3A 26 50 43 2C |..Y..I.0.12:&PC,|
000007C0: 31 2C 32 AA 49 3A 26 54 58 2C 22 20 20 20 20 20 |1,2.I:&TX," |
000007D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000007E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000007F0: 20 20 22 3A 82 00 3B 10 66 01 81 49 B2 30 A4 34 | ":..;.f..I.0.4|
00000800: 3A 26 50 43 2C 31 2C 32 31 AA 49 3A 26 54 58 2C |:&PC,1,21.I:&TX,|
00000810: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
00000820: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000830: 20 20 20 20 20 20 20 20 22 3A 82 00 45 10 72 01 | ":..E.r.|
00000840: 89 20 31 32 30 00 5F 10 E8 03 8F 20 20 44 41 54 |. 120._.... DAT|
00000850: 41 20 46 4F 52 20 51 55 45 53 54 49 4F 4E 53 00 |A FOR QUESTIONS.|
00000860: 7B 10 F2 03 4C 24 28 31 29 20 B2 20 22 32 22 3A |{...L$(1) . "2":|
00000870: 4C 24 28 32 29 20 B2 20 22 20 22 00 A7 10 FC 03 |L$(2) . " ".....|
00000880: 4C 24 28 33 29 20 B2 22 31 2D D3 4F 4D 45 20 50 |L$(3) ."1-.OME P|
00000890: 4C 41 4E 54 53 20 41 52 45 20 50 41 52 54 49 43 |LANTS ARE PARTIC|
000008A0: 55 4C 41 52 4C 59 22 00 D0 10 01 04 4C 24 28 33 |ULARLY".....L$(3|
000008B0: 31 29 B2 22 20 20 57 45 4C 4C 2D 53 55 49 54 45 |1)." WELL-SUITE|
000008C0: 44 20 54 4F 20 54 48 45 20 50 4C 41 43 45 53 22 |D TO THE PLACES"|
000008D0: 00 F2 10 06 04 4C 24 28 33 32 29 20 B2 20 22 20 |.....L$(32) . " |
000008E0: 20 57 48 45 52 45 20 54 48 45 59 20 4C 49 56 45 | WHERE THEY LIVE|
000008F0: 2E 22 00 20 11 0B 04 4C 24 28 34 29 B2 22 32 2D |.". ...L$(4)."2-|
00000900: C4 45 53 45 52 54 20 50 4C 41 4E 54 53 20 48 41 |.ESERT PLANTS HA|
00000910: 56 45 20 53 50 45 43 49 41 4C 20 46 45 41 2D 22 |VE SPECIAL FEA-"|
00000920: 00 4E 11 10 04 4C 24 28 34 31 29 20 B2 20 22 20 |.N...L$(41) . " |
00000930: 20 54 55 52 45 53 20 54 48 41 54 20 48 45 4C 50 | TURES THAT HELP|
00000940: 20 54 48 45 4D 20 53 55 52 56 49 56 45 22 00 7E | THEM SURVIVE".~|
00000950: 11 15 04 4C 24 28 34 32 29 B2 22 20 20 57 41 54 |...L$(42)." WAT|
00000960: 45 52 20 53 48 4F 52 54 41 47 45 53 2C 20 57 49 |ER SHORTAGES, WI|
00000970: 4E 44 2C 20 41 4E 44 20 48 45 41 54 2E 22 00 AD |ND, AND HEAT."..|
00000980: 11 16 04 4C 24 28 35 29 B2 22 33 2D D4 48 45 20 |...L$(5)."3-.HE |
00000990: CE 49 47 48 54 2D C2 4C 4F 4F 4D 49 4E 47 20 C3 |.IGHT-.LOOMING .|
000009A0: 45 52 45 55 53 20 53 54 4F 52 45 53 22 00 D9 11 |EREUS STORES"...|
000009B0: 1A 04 4C 24 28 35 31 29 B2 22 20 20 57 41 54 45 |..L$(51)." WATE|
000009C0: 52 20 49 4E 20 41 20 42 55 4C 42 20 4F 46 20 49 |R IN A BULB OF I|
000009D0: 54 53 20 52 4F 4F 54 2E 22 00 F8 11 1C 04 4C 24 |TS ROOT.".....L$|
000009E0: 28 35 32 29 B2 22 20 20 20 20 20 20 20 20 20 20 |(52)." |
000009F0: 20 20 20 20 20 20 20 22 00 26 12 1F 04 4C 24 28 | ".&...L$(|
00000A00: 36 29 B2 22 34 2D D0 4C 41 4E 54 53 20 4C 4F 53 |6)."4-.LANTS LOS|
00000A10: 45 20 57 41 54 45 52 20 54 48 52 4F 55 47 48 20 |E WATER THROUGH |
00000A20: 54 48 45 49 52 22 00 3D 12 20 04 4C 24 28 36 31 |THEIR".=. .L$(61|
00000A30: 29 B2 22 20 20 4C 45 41 56 45 53 2E 22 00 60 12 |)." LEAVES.".`.|
00000A40: 24 04 4C 24 28 36 32 29 20 B2 20 22 20 20 20 20 |$.L$(62) . " |
00000A50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A0 22 | ."|
00000A60: 00 7B 12 38 04 4C 24 28 31 30 29 B2 22 D2 45 41 |.{.8.L$(10).".EA|
00000A70: 44 20 D3 54 4F 52 59 20 31 2E 22 00 AD 12 39 04 |D .TORY 1."...9.|
00000A80: 4C 24 28 31 31 29 B2 22 D4 59 50 45 20 54 48 45 |L$(11).".YPE THE|
00000A90: 20 4E 55 4D 42 45 52 20 4F 46 20 54 48 45 20 4F | NUMBER OF THE O|
00000AA0: 4E 45 20 53 54 41 54 45 4D 45 4E 54 22 00 DD 12 |NE STATEMENT"...|
00000AB0: 3A 04 4C 24 28 31 32 29 B2 22 54 48 41 54 20 42 |:.L$(12)."THAT B|
00000AC0: 45 53 54 20 45 58 50 52 45 53 53 45 53 20 54 48 |EST EXPRESSES TH|
00000AD0: 45 20 4D 41 49 4E 20 49 44 45 41 2E 22 00 FF 12 |E MAIN IDEA."...|
00000AE0: 3B 04 4C 24 28 31 33 29 B2 22 C8 49 54 20 D2 C5 |;.L$(13).".IT ..|
00000AF0: D4 D5 D2 CE 20 54 4F 20 47 4F 20 4F 4E 2E 22 00 |.... TO GO ON.".|
00000B00: 05 13 42 04 8E 00 22 13 56 04 4C 24 28 31 29 20 |..B...".V.L$(1) |
00000B10: B2 20 22 31 22 20 3A 4C 24 28 32 29 20 B2 20 22 |. "1" :L$(2) . "|
00000B20: 20 22 00 4F 13 60 04 4C 24 28 33 29 20 B2 20 22 | ".O.`.L$(3) . "|
00000B30: 31 2D D4 48 45 20 C3 45 52 45 55 53 20 53 54 4F |1-.HE .EREUS STO|
00000B40: 52 45 53 20 57 41 54 45 52 20 49 4E 20 41 22 00 |RES WATER IN A".|
00000B50: 70 13 65 04 4C 24 28 33 31 29 B2 22 20 20 42 55 |p.e.L$(31)." BU|
00000B60: 4C 42 20 4F 46 20 49 54 53 20 52 4F 4F 54 2E 22 |LB OF ITS ROOT."|
00000B70: 00 8E 13 67 04 4C 24 28 33 32 29 B2 22 20 20 20 |...g.L$(32)." |
00000B80: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 B8 | "..|
00000B90: 13 6A 04 4C 24 28 34 29 20 B2 20 22 32 2D D0 4C |.j.L$(4) . "2-.L|
00000BA0: 41 4E 54 53 20 4C 4F 53 45 20 57 41 54 45 52 20 |ANTS LOSE WATER |
00000BB0: 54 48 52 4F 55 47 48 22 00 D5 13 6F 04 4C 24 28 |THROUGH"...o.L$(|
00000BC0: 34 31 29 B2 22 20 20 54 48 45 49 52 20 4C 45 41 |41)." THEIR LEA|
00000BD0: 56 45 53 2E 22 00 F3 13 71 04 4C 24 28 34 32 29 |VES."...q.L$(42)|
00000BE0: B2 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |." |
00000BF0: 20 20 22 00 1D 14 74 04 4C 24 28 35 29 20 B2 20 | "...t.L$(5) . |
00000C00: 22 33 2D CF 4E 45 20 D3 41 47 55 41 52 4F 20 45 |"3-.NE .AGUARO E|
00000C10: 58 50 41 4E 44 45 44 20 46 52 4F 4D 22 00 3D 14 |XPANDED FROM".=.|
00000C20: 79 04 4C 24 28 35 31 29 B2 22 20 20 33 31 20 54 |y.L$(51)." 31 T|
00000C30: 4F 20 34 37 20 49 4E 43 48 45 53 2E 22 00 64 14 |O 47 INCHES.".d.|
00000C40: 7A 04 4C 24 28 35 32 29 B2 22 20 20 20 20 20 20 |z.L$(52)." |
00000C50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000C60: 20 20 20 22 00 82 14 7E 04 4C 24 28 36 29 20 B2 | "...~.L$(6) .|
00000C70: 20 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | " |
00000C80: 20 22 00 A1 14 83 04 4C 24 28 36 31 29 20 B2 20 | ".....L$(61) . |
00000C90: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
00000CA0: 22 00 C1 14 88 04 4C 24 28 36 32 29 20 B2 20 22 |".....L$(62) . "|
00000CB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000CC0: 22 00 E9 14 9C 04 4C 24 28 31 30 29 B2 22 D7 48 |".....L$(10).".H|
00000CD0: 49 43 48 20 4F 4E 45 20 4F 46 20 54 48 45 53 45 |ICH ONE OF THESE|
00000CE0: 20 44 45 54 41 49 4C 53 22 00 0E 15 9D 04 4C 24 | DETAILS".....L$|
00000CF0: 28 31 31 29 B2 22 53 55 50 50 4F 52 54 53 20 54 |(11)."SUPPORTS T|
00000D00: 48 45 20 4D 41 49 4E 20 49 44 45 41 3F 22 00 2C |HE MAIN IDEA?".,|
00000D10: 15 9E 04 4C 24 28 31 32 29 B2 22 D4 59 50 45 20 |...L$(12).".YPE |
00000D20: 49 54 53 20 4E 55 4D 42 45 52 2E 22 00 4E 15 9F |ITS NUMBER.".N..|
00000D30: 04 4C 24 28 31 33 29 B2 22 C8 49 54 20 D2 C5 D4 |.L$(13).".IT ...|
00000D40: D5 D2 CE 20 54 4F 20 47 4F 20 4F 4E 2E 22 00 54 |... TO GO ON.".T|
00000D50: 15 A6 04 8E 00 72 15 BA 04 4C 24 28 31 29 20 B2 |.....r...L$(1) .|
00000D60: 20 22 31 32 22 3A 4C 24 28 32 29 20 B2 20 22 32 | "12":L$(2) . "2|
00000D70: 31 22 00 9E 15 C4 04 4C 24 28 33 29 20 B2 20 22 |1".....L$(3) . "|
00000D80: 31 2D C3 41 43 54 55 53 45 53 20 53 54 4F 52 45 |1-.ACTUSES STORE|
00000D90: 20 48 55 47 45 20 41 4D 4F 55 4E 54 53 22 00 C8 | HUGE AMOUNTS"..|
00000DA0: 15 C9 04 4C 24 28 33 31 29 B2 22 20 20 4F 46 20 |...L$(31)." OF |
00000DB0: 57 41 54 45 52 20 49 4E 20 54 48 45 49 52 20 54 |WATER IN THEIR T|
00000DC0: 49 53 53 55 45 53 2E 22 00 F6 15 CE 04 4C 24 28 |ISSUES.".....L$(|
00000DD0: 33 32 29 20 B2 20 22 20 20 20 20 20 20 20 20 20 |32) . " |
00000DE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000DF0: 20 20 20 20 20 22 00 22 16 D3 04 4C 24 28 34 29 | "."...L$(4)|
00000E00: B2 22 32 2D D3 4F 4D 45 20 43 41 43 54 55 53 45 |."2-.OME CACTUSE|
00000E10: 53 20 53 45 4E 44 20 52 4F 4F 54 53 20 44 45 45 |S SEND ROOTS DEE|
00000E20: 50 22 00 4C 16 D8 04 4C 24 28 34 31 29 20 B2 20 |P".L...L$(41) . |
00000E30: 22 20 20 49 4E 54 4F 20 54 48 45 20 53 4F 49 4C |" INTO THE SOIL|
00000E40: 20 57 48 45 52 45 20 54 48 45 59 22 00 71 16 DD | WHERE THEY".q..|
00000E50: 04 4C 24 28 34 32 29 B2 22 20 20 46 49 4E 44 20 |.L$(42)." FIND |
00000E60: 54 48 45 20 57 41 54 45 52 20 54 41 42 4C 45 2E |THE WATER TABLE.|
00000E70: 22 00 87 16 DE 04 4C 24 28 35 29 B2 22 20 20 20 |".....L$(5)." |
00000E80: 20 20 20 20 20 20 22 00 B4 16 E2 04 4C 24 28 35 | ".....L$(5|
00000E90: 31 29 B2 22 33 2D D2 49 47 48 54 20 41 46 54 45 |1)."3-.IGHT AFTE|
00000EA0: 52 20 41 20 48 45 41 56 59 20 52 41 49 4E 2C 20 |R A HEAVY RAIN, |
00000EB0: 54 48 45 22 00 D1 16 E7 04 4C 24 28 35 32 29 B2 |THE".....L$(52).|
00000EC0: 22 20 20 53 45 45 44 53 20 53 50 52 4F 55 54 2E |" SEEDS SPROUT.|
00000ED0: 22 00 F3 16 EC 04 4C 24 28 36 29 20 B2 20 22 20 |".....L$(6) . " |
00000EE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000EF0: 20 20 22 00 17 17 F1 04 4C 24 28 36 31 29 20 B2 | ".....L$(61) .|
00000F00: 20 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | " |
00000F10: 20 20 20 20 20 20 22 00 3B 17 F6 04 4C 24 28 36 | ".;...L$(6|
00000F20: 32 29 20 B2 20 22 20 20 20 20 20 20 20 20 20 20 |2) . " |
00000F30: 20 20 20 20 20 20 20 20 20 20 22 00 5A 17 00 05 | ".Z...|
00000F40: 4C 24 28 31 30 29 B2 22 D7 48 49 43 48 20 54 57 |L$(10).".HICH TW|
00000F50: 4F 20 44 45 54 41 49 4C 53 22 00 7E 17 01 05 4C |O DETAILS".~...L|
00000F60: 24 28 31 31 29 B2 22 53 55 50 50 4F 52 54 20 54 |$(11)."SUPPORT T|
00000F70: 48 45 20 4D 41 49 4E 20 49 44 45 41 3F 22 00 A7 |HE MAIN IDEA?"..|
00000F80: 17 02 05 4C 24 28 31 32 29 B2 22 D4 59 50 45 20 |...L$(12).".YPE |
00000F90: 54 48 45 49 52 20 4E 55 4D 42 45 52 53 20 41 4E |THEIR NUMBERS AN|
00000FA0: 44 20 54 48 45 4E 22 00 C9 17 03 05 4C 24 28 31 |D THEN".....L$(1|
00000FB0: 33 29 B2 22 C8 49 54 20 D2 C5 D4 D5 D2 CE 20 54 |3).".IT ...... T|
00000FC0: 4F 20 47 4F 20 4F 4E 2E 22 00 CF 17 0A 05 8E 00 |O GO ON.".......|
00000FD0: E1 17 B8 0B 8F 20 20 50 41 55 53 45 20 53 55 42 |..... PAUSE SUB|
00000FE0: 53 00 E7 17 C2 0B 8E 00 ED 17 CC 0B 8E 00 0C 18 |S...............|
00000FF0: A0 0F 8F 20 20 49 4E 53 54 52 55 43 54 49 4F 4E |... INSTRUCTION|
00001000: 53 20 41 4E 44 20 42 4C 4F 41 44 53 00 18 18 AA |S AND BLOADS....|
00001010: 0F 26 53 50 2C 32 32 30 00 45 18 B6 0F 26 53 59 |.&SP,220.E...&SY|
00001020: 2C 31 3A 26 43 4F 2C 31 36 3A 26 44 45 2C 31 2C |,1:&CO,16:&DE,1,|
00001030: 32 31 2C 34 30 2C 32 33 3A 26 46 49 3A 26 50 43 |21,40,23:&FI:&PC|
00001040: 2C 31 2C 32 31 00 54 18 B8 0F 26 54 58 2C 4C 24 |,1,21.T...&TX,L$|
00001050: 28 31 30 29 00 6C 18 BA 0F 26 50 43 2C 31 2C 32 |(10).l...&PC,1,2|
00001060: 32 3A 26 54 58 2C 4C 24 28 31 31 29 00 84 18 BB |2:&TX,L$(11)....|
00001070: 0F 26 50 43 2C 31 2C 32 33 3A 26 54 58 2C 4C 24 |.&PC,1,23:&TX,L$|
00001080: 28 31 32 29 00 B8 18 BD 0F 26 43 4F 2C 31 36 30 |(12).....&CO,160|
00001090: 3A 26 44 45 2C 31 2C 32 35 2C 34 30 2C 32 35 3A |:&DE,1,25,40,25:|
000010A0: 26 46 49 3A 26 50 43 2C 31 31 2C 32 35 3A 26 54 |&FI:&PC,11,25:&T|
000010B0: 58 2C 4C 24 28 31 33 29 00 C4 18 D2 0F 26 53 50 |X,L$(13).....&SP|
000010C0: 2C 32 35 35 00 CA 18 24 13 8E 00 DF 18 88 13 8F |,255...$........|
000010D0: 20 20 44 49 53 50 4C 41 59 20 53 43 4F 52 45 00 | DISPLAY SCORE.|
000010E0: 0E 19 92 13 3A 26 53 59 2C 31 3A 26 43 4F 2C 31 |....:&SY,1:&CO,1|
000010F0: 36 30 3A 26 44 45 2C 31 2C 31 38 2C 34 30 2C 32 |60:&DE,1,18,40,2|
00001100: 30 3A 26 46 49 3A 26 50 43 2C 31 2C 31 39 00 3B |0:&FI:&PC,1,19.;|
00001110: 19 93 13 26 54 58 2C 22 C7 4F 41 4C 20 3D 20 33 |...&TX,".OAL = 3|
00001120: 20 52 49 47 48 54 20 49 4E 20 41 20 52 4F 57 2E | RIGHT IN A ROW.|
00001130: 20 20 D9 4F 55 20 48 41 56 45 22 00 5C 19 9C 13 | .OU HAVE".\...|
00001140: 3A 26 53 59 2C 32 3A 26 49 4E 3A 26 50 43 2C 33 |:&SY,2:&IN:&PC,3|
00001150: 37 2C 31 38 3A 26 54 58 2C 22 20 22 00 6E 19 9D |7,18:&TX," ".n..|
00001160: 13 52 52 24 B2 C7 20 28 52 52 AA 34 38 29 00 85 |.RR$.. (RR.48)..|
00001170: 19 A6 13 3A 26 50 43 2C 33 37 2C 31 39 3A 26 54 |...:&PC,37,19:&T|
00001180: 58 2C 52 52 24 00 94 19 B0 13 3A 26 4E 4F 3A 26 |X,RR$.....:&NO:&|
00001190: 53 59 2C 31 00 9A 19 E2 13 8E 00 B4 19 70 17 26 |SY,1.........p.&|
000011A0: 20 52 45 3A 26 44 4B 2C 22 49 2E 43 4C 4F 43 4B | RE:&DK,"I.CLOCK|
000011B0: 53 22 2C 31 00 E2 19 74 17 26 43 4F 2C 32 30 38 |S",1...t.&CO,208|
000011C0: 3A 26 44 45 2C 32 30 2C 31 2C 34 30 2C 32 35 3A |:&DE,20,1,40,25:|
000011D0: 26 46 49 3A 26 53 59 2C 32 3A 26 50 43 2C 32 30 |&FI:&SY,2:&PC,20|
000011E0: 2C 36 00 28 1A 76 17 26 54 58 2C 22 C9 54 27 53 |,6.(.v.&TX,".T'S|
000011F0: 22 20 3A 26 50 43 2C 32 30 2C 39 3A 26 54 58 2C |" :&PC,20,9:&TX,|
00001200: 22 C8 4F 57 44 59 22 20 3A 26 50 43 2C 32 30 2C |".OWDY" :&PC,20,|
00001210: 31 32 3A 26 54 58 2C 22 C4 4F 4F 44 59 22 3A 26 |12:&TX,".OODY":&|
00001220: 50 43 2C 32 30 2C 31 35 00 39 1A 78 17 26 54 58 |PC,20,15.9.x.&TX|
00001230: 2C 22 D4 49 4D 45 21 21 22 00 6A 1A 7A 17 81 49 |,".IME!!".j.z..I|
00001240: B2 31 32 A4 34 A9 AB 31 3A 26 44 50 2C 31 2C 34 |.12.4..1:&DP,1,4|
00001250: 2C 49 3A 82 3A 81 49 B2 34 A4 31 32 A9 31 3A 26 |,I:.:.I.4.12.1:&|
00001260: 44 50 2C 31 2C 34 2C 49 3A 82 00 AE 1A 82 17 26 |DP,1,4,I:......&|
00001270: 54 4E 2C 32 30 38 2C 35 3A 26 54 4E 2C 32 30 38 |TN,208,5:&TN,208|
00001280: 2C 32 30 3A 26 54 4E 2C 32 30 38 2C 35 3A 26 54 |,20:&TN,208,5:&T|
00001290: 4E 2C 32 30 30 2C 31 30 3A 26 54 4E 2C 31 39 36 |N,200,10:&TN,196|
000012A0: 2C 31 30 3A 26 54 4E 2C 31 39 32 2C 35 30 00 BE |,10:&TN,192,50..|
000012B0: 1A 84 17 81 20 49 20 B2 20 31 20 A4 20 32 00 FF |.... I . 1 . 2..|
000012C0: 1A 86 17 26 54 4E 2C 31 38 30 2C 35 3A 26 54 4E |...&TN,180,5:&TN|
000012D0: 2C 31 38 34 2C 35 3A 26 54 4E 2C 31 38 30 2C 35 |,184,5:&TN,180,5|
000012E0: 3A 26 54 4E 2C 31 36 30 2C 35 3A 26 54 4E 2C 31 |:&TN,160,5:&TN,1|
000012F0: 38 30 2C 35 3A 26 54 4E 2C 31 39 32 2C 33 30 00 |80,5:&TN,192,30.|
00001300: 40 1B 88 17 26 54 4E 2C 31 39 32 2C 35 3A 26 54 |@...&TN,192,5:&T|
00001310: 4E 2C 31 39 36 2C 35 3A 26 54 4E 2C 31 39 32 2C |N,196,5:&TN,192,|
00001320: 35 3A 26 54 4E 2C 31 38 30 2C 35 3A 26 54 4E 2C |5:&TN,180,5:&TN,|
00001330: 31 39 32 2C 35 3A 26 54 4E 2C 32 30 38 2C 33 30 |192,5:&TN,208,30|
00001340: 00 83 1B 8A 17 26 54 4E 2C 31 39 32 2C 35 3A 26 |.....&TN,192,5:&|
00001350: 54 4E 2C 32 30 30 2C 35 3A 26 54 4E 2C 32 30 38 |TN,200,5:&TN,208|
00001360: 2C 35 3A 26 54 4E 2C 32 30 30 2C 35 20 3A 26 54 |,5:&TN,200,5 :&T|
00001370: 4E 2C 32 30 30 2C 35 20 3A 26 54 4E 2C 32 30 30 |N,200,5 :&TN,200|
00001380: 2C 32 30 00 C4 1B 8C 17 26 54 4E 2C 31 38 38 2C |,20.....&TN,188,|
00001390: 35 3A 26 54 4E 2C 31 39 32 2C 35 3A 26 54 4E 2C |5:&TN,192,5:&TN,|
000013A0: 32 30 30 2C 35 3A 26 54 4E 2C 31 38 30 2C 35 3A |200,5:&TN,180,5:|
000013B0: 26 54 4E 2C 31 39 32 2C 35 3A 26 54 4E 2C 32 30 |&TN,192,5:&TN,20|
000013C0: 38 2C 33 30 00 F7 1B 8E 17 82 3A 81 49 B2 31 32 |8,30......:.I.12|
000013D0: A4 34 A9 AB 31 3A 26 44 50 2C 31 2C 34 2C 49 3A |.4..1:&DP,1,4,I:|
000013E0: 82 3A 81 49 B2 34 A4 31 32 A9 31 3A 26 44 50 2C |.:.I.4.12.1:&DP,|
000013F0: 31 2C 34 2C 49 3A 82 00 35 1C A2 17 26 52 45 3A |1,4,I:..5...&RE:|
00001400: 81 49 B2 31 A4 39 3A 26 43 4F 2C 49 AA 33 3A 26 |.I.1.9:&CO,I.3:&|
00001410: 44 45 2C 49 2C 49 2C 34 31 AB 49 2C 32 36 AB 49 |DE,I,I,41.I,26.I|
00001420: 3A 26 46 49 3A 82 3A 26 53 59 2C 32 3A 26 50 43 |:&FI:.:&SY,2:&PC|
00001430: 2C 39 2C 31 33 00 6E 1C AC 17 26 54 58 2C 22 C3 |,9,13.n...&TX,".|
00001440: 41 55 53 45 2D C5 46 46 45 43 54 22 3A 8D 36 32 |AUSE-.FFECT":.62|
00001450: 30 30 3A 9E 31 39 33 34 31 3A 93 22 53 55 42 50 |00:.19341:."SUBP|
00001460: 52 4F 47 52 41 4D 20 58 58 2F 32 22 2C 38 00 9E |ROGRAM XX/2",8..|
00001470: 1C 38 18 A0 31 35 3A 9F 31 35 2C 38 2C 31 35 2C |.8..15:.15,8,15,|
00001480: 22 53 30 3A 22 AA 4E 46 24 3A A0 31 35 3A 26 42 |"S0:".NF$:.15:&B|
00001490: 53 2C 4E 46 24 2C 38 36 38 2C 36 33 3A 8E 00 00 |S,NF$,868,63:...|
000014A0: 00 31 29 20 B2 20 22 20 20 20 20 20 20 20 20 20 |.1) . " |
000014B0: 20 20 20 20 20 20 20 20 20 20 20 22 00 6A 1A F6 | ".j..|
000014C0: 04 4C 24 28 36 32 29 20 B2 20 22 20 20 20 20 20 |.L$(62) . " |
000014D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
000014E0: 00 89 1A 00 05 4C 24 28 31 30 29 B2 22 D7 48 49 |.....L$(10).".HI|
000014F0: 43 48 20 54 57 4F 20 44 45 54 41 49 4C 53 22 00 |CH TWO DETAILS".|
00001500: AD 1A 01 05 4C 24 28 31 31 29 B2 22 53 55 50 50 |....L$(11)."SUPP|
00001510: 4F 52 54 20 54 48 45 20 4D 41 49 4E 20 49 44 45 |ORT THE MAIN IDE|
00001520: 41 3F 22 00 D6 1A 02 05 4C 24 28 31 32 29 B2 22 |A?".....L$(12)."|
00001530: D4 59 50 45 20 54 48 45 49 52 20 4E 55 4D 42 45 |.YPE THEIR NUMBE|
00001540: 52 53 20 41 4E 44 20 54 48 45 4E 22 00 F8 1A 03 |RS AND THEN"....|
00001550: 05 4C 24 28 31 33 29 B2 22 C8 49 54 20 D2 C5 D4 |.L$(13).".IT ...|
00001560: D5 D2 CE 20 54 4F 20 47 4F 20 4F 4E 2E 22 00 FE |... TO GO ON."..|
00001570: 1A 0A 05 8E 00 10 1B B8 0B 8F 20 20 50 41 55 53 |.......... PAUS|
00001580: 45 20 53 55 42 53 00 16 1B C2 0B 8E 00 1C 1B CC |E SUBS..........|
00001590: 0B 8E 00 3B 1B A0 0F 8F 20 20 49 4E 53 54 52 55 |...;.... INSTRU|
000015A0: 43 54 49 4F 4E 53 20 41 4E 44 20 42 4C 4F 41 44 |CTIONS AND BLOAD|
000015B0: 53 00 47 1B AA 0F 26 53 50 2C 32 32 30 00 74 1B |S.G...&SP,220.t.|
000015C0: B6 0F 26 53 59 2C 31 3A 26 43 4F 2C 31 36 3A 26 |..&SY,1:&CO,16:&|
000015D0: 44 45 2C 31 2C 32 31 2C 34 30 2C 32 33 3A 26 46 |DE,1,21,40,23:&F|
000015E0: 49 3A 26 50 43 2C 31 2C 32 31 00 83 1B B8 0F 26 |I:&PC,1,21.....&|
000015F0: 54 58 2C 4C 24 28 31 30 29 00 9B 1B BA 0F 26 50 |TX,L$(10).....&P|
00001600: 43 2C 31 2C 32 32 3A 26 54 58 2C 4C 24 28 31 31 |C,1,22:&TX,L$(11|
00001610: 29 00 B3 1B BB 0F 26 50 43 2C 31 2C 32 33 3A 26 |).....&PC,1,23:&|
00001620: 54 58 2C 4C 24 28 31 32 29 00 E7 1B BD 0F 26 43 |TX,L$(12).....&C|
00001630: 4F 2C 31 36 30 3A 26 44 45 2C 31 2C 32 35 2C 34 |O,160:&DE,1,25,4|
00001640: 30 2C 32 35 3A 26 46 49 3A 26 50 43 2C 31 31 2C |0,25:&FI:&PC,11,|
00001650: 32 35 3A 26 54 58 2C 4C 24 28 31 33 29 00 F3 1B |25:&TX,L$(13)...|
00001660: D2 0F 26 53 50 2C 32 35 35 00 F9 1B 24 13 8E 00 |..&SP,255...$...|
00001670: 0E 1C 88 13 8F 20 20 44 49 53 50 4C 41 59 20 53 |..... DISPLAY S|
00001680: 43 4F 52 45 00 3C 1C 92 13 26 53 59 2C 31 3A 26 |CORE.<...&SY,1:&|
00001690: 43 4F 2C 31 36 30 3A 26 44 45 2C 31 2C 31 39 2C |CO,160:&DE,1,19,|
000016A0: 34 30 2C 32 30 3A 26 46 49 3A 26 50 43 2C 31 2C |40,20:&FI:&PC,1,|
000016B0: 31 39 00 69 1C 93 13 26 54 58 2C 22 C7 4F 41 4C |19.i...&TX,".OAL|
000016C0: 20 3D 20 33 20 52 49 47 48 54 20 49 4E 20 41 20 | = 3 RIGHT IN A |
000016D0: 52 4F 57 2E 20 20 D9 4F 55 20 48 41 56 45 22 00 |ROW. .OU HAVE".|
000016E0: 7C 1C 9C 13 26 20 53 59 2C 32 3A 26 20 43 4C 2C ||...& SY,2:& CL,|
000016F0: 34 30 00 98 1C 9D 13 52 52 24 20 B2 20 20 C7 20 |40.....RR$ . . |
00001700: 28 52 52 AA 34 38 29 3A 20 26 20 49 4E 56 00 C0 |(RR.48): & INV..|
00001710: 1C A6 13 81 20 4A 4A 20 B2 20 30 20 A4 20 52 52 |.... JJ . 0 . RR|
00001720: 3A 20 26 50 43 2C 33 37 2C 31 39 3A 26 54 58 2C |: &PC,37,19:&TX,|
00001730: 52 52 24 3A 20 82 00 DF 1C B0 13 26 20 4E 4F 3A |RR$: ......& NO:|
00001740: 20 26 20 43 4C 2C 30 3A 20 26 20 44 49 2C 30 3A | & CL,0: & DI,0:|
00001750: 26 53 59 2C 31 00 E5 1C E2 13 8E 00 00 00 2C 31 |&SY,1.........,1|
00001760: 2C 31 39 00 69 1C 93 13 26 54 58 2C 22 C7 4F 41 |,19.i...&TX,".OA|
00001770: 4C 20 3D 20 33 20 52 49 47 48 54 20 49 4E 20 41 |L = 3 RIGHT IN A|
00001780: 20 52 4F 57 2E 20 20 D9 4F 55 20 48 41 56 45 22 | ROW. .OU HAVE"|
00001790: 00 7C 1C 9C 13 26 20 53 59 2C 32 3A 26 20 43 4C |.|...& SY,2:& CL|
000017A0: 2C 34 30 00 98 1C 9D 13 52 52 24 20 B2 20 20 C7 |,40.....RR$ . .|
000017B0: 20 28 52 52 AA 34 38 29 3A 20 26 20 49 4E 56 00 | (RR.48): & INV.|
000017C0: C0 1C A6 13 81 20 4A 4A 20 B2 20 30 20 A4 20 52 |..... JJ . 0 . R|
000017D0: 52 3A 20 26 50 43 2C 33 37 2C 31 39 3A 26 54 58 |R: &PC,37,19:&TX|
000017E0: 2C 52 52 24 3A 20 82 00 DF 1C B0 13 26 20 4E 4F |,RR$: ......& NO|
000017F0: 3A 20 26 20 43 4C 2C 30 3A 20 26 20 44 49 2C 30 |: & CL,0: & DI,0|
00001800: 3A 26 53 59 2C 31 00 E5 1C E2 13 8E 00 00 00 |:&SY,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,1:.870,0......51,B(55):.
52,B(56)......19328...... SUBPROGRAM X
X/1.D.".SP . 1:NS . 3:RR% . 3: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.X.X.:.....J . J . 1:. J . NS
. J . 1... .. J . 1010,1110,1210.B.... 4
010:. 5010.T.... K ..0 . 215.....&CO,5:&
DE,1,1,40,15:&FI:&CO,69:&DE,2,2,39,14:&F
I.&...&CO,27:&DE,2,2,39,14:&FI.0.C.K . 1
._.W.&SY,1:&PC,4,3:&TX,L$(3):&PC,4,4:&TX
,L$(31).....&PC,4,5:&TX,L$(32):&PC,4,6:&
TX,L$(4).G...&PC,4,7 :&TX,L$(41):&PC,4,8
:&TX,L$(42):&PC,4,9 :&TX,L$(5).....&PC,
4,10:&TX,L$(51):&PC,4,11:&TX,L$(52):&PC,
4,12:&TX,L$(6).2...&PC,4,13:&TX,L$(61):&
PC,4,14:&TX,L$(62).U...&CO,160:&DE,1,16,
10,17:&FI:&NO.H...&PC,2,16:&SY,2.W...L$
. "21.".....& ENS,L$,3,T%,AL%...... AL%
. 0 . 260.....L$ . H (L$,AL%).O.... F
(L$) . 3 . 272......((L$."1").(L$."4"))
.:&PC,2,16:&SY,2:&TX," ":.258...... 2
80.G...&RE:&SY,2:&PC,9,5:&TX,"BYE":.1934
1:."HELLOHI1",8.X.... L$ . L$(1) . L$ .
L$(2) . AX$ . "YES":.282.....AX$ . "NO":
. 290.....&PC,2,16:&TX," ":& SY,2:
&CO,16:&DE,1,16,40,17:&FI:&PC,16,16:&TX,
"GOOD"...... I . 160 . 48 . . 8: & TN,I
,1: ..-...&PC,16,16:&TX," ":&SY,1:
. 300.M.".. I . 1 . 5: & TN,255,10: ....
#.&SP,220: &SY,1:&CO,16:&DE,12,15,40,15:
&FI:&NO:&PC,12,15.K.$.. C(L$(1)) . 1 . :
&TX,"THE CORRECT ANSWERS ARE: ".L$(1):.
294...%.& TX,"THE CORRECT ANSWER IS: ".L
$(1)...&.. 198,0:&SP,255...'.. R$:. R$."
".295.4.(.. F(R$).. 13 . 295.O.).&PC,4,1
5:&TX,"
"...*.&SY,2:&PC,1,16:&TX,"
":&SY,1...+.&CO,5:&DE,12,15,40,15:&FI.D.
,.. SCORING...1.. (AX$ . "YES") . R . R
. 1:RR . RR . 1:WR . 0.-.6.. (AX$ . .
"YES") . W . W . 1:WR . WR . 1:RR . 0.8.
@.. 5010.M.J.. RR .. RR% . A2 . 7:.870,A
2:.886,W:.901,R:.6000...T.. (WR .. 5) .
(W .. 18) . A2 . 5:.870,A2:.19341:."HELL
OHI1",8...Y..I.0.12:&PC,1,2.I:&TX,"
":..;.
F..I.0.4:&PC,1,21.I:&TX,"
":..E.R.. 120._.
... DATA FOR QUESTIONS.{...L$(1) . "2":
L$(2) . " ".....L$(3) ."1-SOME PLANTS AR
E PARTICULARLY".P...L$(31)." WELL-SUITE
D TO THE PLACES".....L$(32) . " WHERE T
HEY LIVE.". ...L$(4)."2-DESERT PLANTS HA
VE SPECIAL FEA-".N...L$(41) . " TURES T
HAT HELP THEM SURVIVE".~...L$(42)." WAT
ER SHORTAGES, WIND, AND HEAT.".....L$(5)
."3-THE NIGHT-BLOOMING CEREUS STORES".Y.
..L$(51)." WATER IN A BULB OF ITS ROOT.
".....L$(52)." ".&...L$(
6)."4-PLANTS LOSE WATER THROUGH THEIR".=
. .L$(61)." LEAVES.".`.$.L$(62) . "
".{.8.L$(10)."READ STORY
1."...9.L$(11)."TYPE THE NUMBER OF THE O
NE STATEMENT"...:.L$(12)."THAT BEST EXPR
ESSES THE MAIN IDEA."...;.L$(13)."HIT RE
TURN TO GO ON."...B...".V.L$(1) . "1" :L
$(2) . " ".O.`.L$(3) . "1-THE CEREUS STO
RES WATER IN A".P.E.L$(31)." BULB OF IT
S ROOT."...G.L$(32)." "..
.J.L$(4) . "2-PLANTS LOSE WATER THROUGH"
.U.O.L$(41)." THEIR LEAVES."...Q.L$(42)
." "...T.L$(5) . "3-ONE S
AGUARO EXPANDED FROM".=.Y.L$(51)." 31 T
O 47 INCHES.".D.Z.L$(52)."
"...~.L$(6) . "
".....L$(61) . " ".A...L$
(62) . " ".....L$(10)."WH
ICH ONE OF THESE DETAILS".....L$(11)."SU
PPORTS THE MAIN IDEA?".,...L$(12)."TYPE
ITS NUMBER.".N...L$(13)."HIT RETURN TO G
O ON.".T.....R...L$(1) . "12":L$(2) . "2
1"...D.L$(3) . "1-CACTUSES STORE HUGE AM
OUNTS".H.I.L$(31)." OF WATER IN THEIR T
ISSUES."...N.L$(32) . "
".".S.L$(4)."2-SOME CACTUSE
S SEND ROOTS DEEP".L.X.L$(41) . " INTO
THE SOIL WHERE THEY".Q...L$(42)." FIND
THE WATER TABLE.".....L$(5)." ".
....L$(51)."3-RIGHT AFTER A HEAVY RAIN,
THE".Q...L$(52)." SEEDS SPROUT.".....L$
(6) . " ".....L$(61) .
" ".;...L$(62) . "
".Z...L$(10)."WHICH TW
O DETAILS".~...L$(11)."SUPPORT THE MAIN
IDEA?".....L$(12)."TYPE THEIR NUMBERS AN
D THEN".I...L$(13)."HIT RETURN TO GO ON.
".O.......... PAUSE SUBS...B.....L.....
.. INSTRUCTIONS AND BLOADS.....&SP,220
.E...&SY,1:&CO,16:&DE,1,21,40,23:&FI:&PC
,1,21.T...&TX,L$(10).L...&PC,1,22:&TX,L$
(11).....&PC,1,23:&TX,L$(12).....&CO,160
:&DE,1,25,40,25:&FI:&PC,11,25:&TX,L$(13)
.D.R.&SP,255.J.$........ DISPLAY SCORE.
....:&SY,1:&CO,160:&DE,1,18,40,20:&FI:&P
C,1,19.;...&TX,"GOAL = 3 RIGHT IN A ROW.
YOU HAVE".\...:&SY,2:&IN:&PC,37,18:&TX
," ".N...RR$.G (RR.48).....:&PC,37,19:&T
X,RR$.....:&NO:&SY,1.........P.& RE:&DK,
"I.CLOCKS",1...T.&CO,208:&DE,20,1,40,25:
&FI:&SY,2:&PC,20,6.(.V.&TX,"IT'S" :&PC,2
0,9:&TX,"HOWDY" :&PC,20,12:&TX,"DOODY":&
PC,20,15.9.X.&TX,"TIME!!".J.Z..I.12.4..1
:&DP,1,4,I:.:.I.4.12.1:&DP,1,4,I:......&
TN,208,5:&TN,208,20:&TN,208,5:&TN,200,10
:&TN,196,10:&TN,192,50...... I . 1 . 2..
...&TN,180,5:&TN,184,5:&TN,180,5:&TN,160
,5:&TN,180,5:&TN,192,30.@...&TN,192,5:&T
N,196,5:&TN,192,5:&TN,180,5:&TN,192,5:&T
N,208,30.....&TN,192,5:&TN,200,5:&TN,208
,5:&TN,200,5 :&TN,200,5 :&TN,200,20.D...
&TN,188,5:&TN,192,5:&TN,200,5:&TN,180,5:
&TN,192,5:&TN,208,30......:.I.12.4..1:&D
P,1,4,I:.:.I.4.12.1:&DP,1,4,I:..5...&RE:
.I.1.9:&CO,I.3:&DE,I,I,41.I,26.I:&FI:.:&
SY,2:&PC,9,13.N...&TX,"CAUSE-EFFECT":.62
00:.19341:."SUBPROGRAM XX/2",8...8. 15:.
15,8,15,"S0:".NF$: 15:&BS,NF$,868,63:...
.1) . " ".J...L$(62)
. " ".....L$(10)."WHI
CH TWO DETAILS".....L$(11)."SUPPORT THE
MAIN IDEA?".V...L$(12)."TYPE THEIR NUMBE
RS AND THEN".....L$(13)."HIT RETURN TO G
O ON."............ PAUSE SUBS...B.....L
...;. .. INSTRUCTIONS AND BLOADS.G...&S
P,220.T...&SY,1:&CO,16:&DE,1,21,40,23:&F
I:&PC,1,21.....&TX,L$(10).....&PC,1,22:&
TX,L$(11).....&PC,1,23:&TX,L$(12).....&C
O,160:&DE,1,25,40,25:&FI:&PC,11,25:&TX,L
$(13)...R.&SP,255...$........ DISPLAY S
CORE.<...&SY,1:&CO,160:&DE,1,19,40,20:&F
I:&PC,1,19.I...&TX,"GOAL = 3 RIGHT IN A
ROW. YOU HAVE".|...& SY,2:& CL,40.....R
R$ . G (RR.48): & INV...... JJ . 0 . RR
: &PC,37,19:&TX,RR$: ......& NO: & CL,0:
& DI,0:&SY,1.........,1,19.I...&TX,"GOA
L = 3 RIGHT IN A ROW. YOU HAVE".|...& S
Y,2:& CL,40.....RR$ . G (RR.48): & INV.
..... JJ . 0 . RR: &PC,37,19:&TX,RR$: ..
....& NO: & CL,0: & DI,0:&SY,1.........
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL