MULTIMENU
FILE INFORMATION
FILENAME(S): MULTIMENU
FILE TYPE(S): PRG
FILE SIZE: 10.8K
FIRST SEEN: 2025-11-30 21:29:05
APPEARS ON: 1 disk(s)
FILE HASH
9059737656496f4eb6bd6c915e346a22ab335c63b9682de9785b964481897e9d
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TIGA | MULTIMENU | PRG | DuncanTwain | 19 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 40 3B 40 0A 00 97 20 35 33 32 37 32 2C 31 39 |.@;@... 53272,19|
00000010: 3A 97 20 35 33 32 38 31 2C 31 3A 99 20 22 93 90 |:. 53281,1:. "..|
00000020: 22 3A 56 4F B2 31 35 3A 97 20 35 33 32 37 30 2C |":VO.15:. 53270,|
00000030: C2 28 35 33 32 37 30 29 B0 31 36 00 70 40 14 00 |.(53270).16.p@..|
00000040: 44 24 B2 22 13 11 11 11 11 11 11 11 11 11 11 11 |D$."............|
00000050: 11 11 11 11 11 11 11 11 11 11 11 11 11 22 3A 97 |.............":.|
00000060: 20 35 33 32 38 32 2C 30 3A 53 B2 35 34 32 37 32 | 53282,0:S.54272|
00000070: 00 87 40 1E 00 96 A5 52 28 58 29 B2 B5 28 BB 28 |..@....R(X)..(.(|
00000080: 31 29 AC 58 AA 31 29 00 9A 40 28 00 96 A5 54 28 |1).X.1)..@(...T(|
00000090: 58 29 B2 B5 28 58 AD 31 30 29 00 B0 40 32 00 96 |X)..(X.10)..@2..|
000000A0: A5 4D 28 58 29 B2 58 AB 31 30 AC A5 54 28 58 29 |.M(X).X.10..T(X)|
000000B0: 00 D9 40 3C 00 4E 48 B2 39 3A 20 8F 20 4E 55 4D |..@<.NH.9: . NUM|
000000C0: 42 45 52 20 4F 46 20 48 4F 4C 45 53 20 49 4E 20 |BER OF HOLES IN |
000000D0: 53 45 43 54 49 4F 4E 20 32 00 24 41 46 00 86 20 |SECTION 2.$AF.. |
000000E0: 46 25 28 31 2C 4E 48 29 2C 20 4C 4F 43 25 28 4E |F%(1,NH), LOC%(N|
000000F0: 48 29 2C 20 49 28 32 29 2C 20 43 28 32 2C 33 29 |H), I(2), C(2,3)|
00000100: 3A 8F 20 41 43 54 55 41 4C 20 4C 4F 43 41 54 49 |:. ACTUAL LOCATI|
00000110: 4F 4E 2C 20 4C 4F 47 49 43 41 4C 20 4C 4F 43 41 |ON, LOGICAL LOCA|
00000120: 54 49 4F 4E 00 67 41 50 00 81 20 49 B2 20 31 20 |TION.gAP.. I. 1 |
00000130: A4 20 4E 48 3A 20 87 20 46 25 28 30 2C 49 29 2C |. NH: . F%(0,I),|
00000140: 20 46 25 28 31 2C 49 29 3A 82 3A 8F 20 49 4E 54 | F%(1,I):.:. INT|
00000150: 45 52 4D 45 44 49 41 54 45 20 52 45 53 55 4C 54 |ERMEDIATE RESULT|
00000160: 2C 20 43 41 52 52 59 00 7C 41 5A 00 83 20 33 2C |, CARRY.|AZ.. 3,|
00000170: 31 31 2C 36 2C 31 32 2C 32 2C 31 37 00 94 41 64 |11,6,12,2,17..Ad|
00000180: 00 83 20 31 31 2C 31 33 2C 31 36 2C 31 32 2C 31 |.. 11,13,16,12,1|
00000190: 38 2C 31 37 00 AC 41 6E 00 83 20 32 32 2C 31 34 |8,17..An.. 22,14|
000001A0: 2C 32 36 2C 31 35 2C 33 30 2C 31 35 00 CC 41 78 |,26,15,30,15..Ax|
000001B0: 00 96 A5 44 28 58 29 B2 B5 28 BC 28 58 29 AD 32 |...D(X)..(.(X).2|
000001C0: 2E 33 30 32 35 38 35 30 39 AA 31 29 00 E4 41 82 |.30258509.1)..A.|
000001D0: 00 96 A5 41 28 59 29 B2 35 35 32 35 35 AA 58 AA |...A(Y).55255.X.|
000001E0: 34 30 AC 59 00 EF 41 8C 00 89 20 32 30 30 30 00 |40.Y..A... 2000.|
000001F0: 05 42 F4 01 8F 20 53 55 42 52 4F 55 54 49 4E 45 |.B... SUBROUTINE|
00000200: 20 53 4F 4E 47 00 11 42 FE 01 97 20 31 39 38 2C | SONG..B... 198,|
00000210: 30 00 2D 42 08 02 43 53 B2 A5 52 28 38 29 3A 8B |0.-B..CS..R(8):.|
00000220: 20 20 43 53 B2 4C 53 20 A7 20 35 32 30 00 3E 42 | CS.LS . 520.>B|
00000230: 12 02 53 43 B2 2E 35 30 3A 4C 53 B2 43 53 00 77 |..SC..50:LS.CS.w|
00000240: 42 1C 02 42 41 53 45 B2 34 30 39 36 AA 32 35 36 |B..BASE.4096.256|
00000250: AC 43 53 3A 81 20 43 35 B2 53 20 A4 20 53 AA 32 |.CS:. C5.S . S.2|
00000260: 34 3A 97 20 43 35 2C 30 3A 82 3A 8F 20 43 4C 45 |4:. C5,0:.:. CLE|
00000270: 41 52 20 43 48 49 50 00 AE 42 26 02 81 20 43 35 |AR CHIP..B&.. C5|
00000280: B2 30 20 A4 20 56 4F 3A 97 20 53 AA 32 34 2C 43 |.0 . VO:. S.24,C|
00000290: 35 3A 82 3A 8F 20 53 4D 4F 4F 54 48 4C 59 20 49 |5:.:. SMOOTHLY I|
000002A0: 4E 43 52 45 41 53 45 20 56 4F 4C 55 4D 45 00 C8 |NCREASE VOLUME..|
000002B0: 42 30 02 97 20 53 AA 35 2C C2 28 42 41 53 45 AA |B0.. S.5,.(BASE.|
000002C0: 31 29 3A 8F 20 41 2F 44 00 E2 42 3A 02 97 20 53 |1):. A/D..B:.. S|
000002D0: AA 36 2C C2 28 42 41 53 45 AA 32 29 3A 8F 20 53 |.6,.(BASE.2):. S|
000002E0: 2F 52 00 06 43 44 02 57 46 B2 C2 28 42 41 53 45 |/R..CD.WF..(BASE|
000002F0: 29 3A 8B 20 20 57 46 B2 36 35 20 A7 20 97 20 53 |):. WF.65 . . S|
00000300: AA 33 2C 32 35 35 00 23 43 4E 02 4C 54 B2 C2 28 |.3,255.#CN.LT..(|
00000310: 42 41 53 45 AA 33 29 3A 42 41 53 45 B2 42 41 53 |BASE.3):BASE.BAS|
00000320: 45 AA 34 00 47 43 58 02 81 20 43 35 B2 30 20 A4 |E.4.GCX.. C5.0 .|
00000330: 20 32 3A 46 46 25 28 43 35 29 B2 C2 28 42 41 53 | 2:FF%(C5)..(BAS|
00000340: 45 AA 43 35 29 3A 82 00 66 43 62 02 8B 20 43 53 |E.C5):..fCb.. CS|
00000350: 20 A7 20 A1 20 41 24 3A 8B 20 41 24 B2 22 20 22 | . . A$:. A$." "|
00000360: 20 A7 20 36 37 30 00 8B 43 6C 02 8B 20 46 46 25 | . 670..Cl.. FF%|
00000370: 28 30 29 AA 46 46 25 28 31 29 AA 46 46 25 28 32 |(0).FF%(1).FF%(2|
00000380: 29 B2 37 36 35 20 A7 20 36 37 30 00 B0 43 76 02 |).765 . 670..Cv.|
00000390: 97 20 53 AA 31 2C 46 46 25 28 30 29 3A 97 20 53 |. S.1,FF%(0):. S|
000003A0: 2C 46 46 25 28 31 29 3A 97 20 53 AA 34 2C 57 46 |,FF%(1):. S.4,WF|
000003B0: 00 CA 43 80 02 81 20 43 35 B2 31 20 A4 20 46 46 |..C... C5.1 . FF|
000003C0: 25 28 32 29 AC 2E 37 35 3A 82 00 EA 43 8A 02 97 |%(2)..75:...C...|
000003D0: 20 53 AA 34 2C 57 46 AB 31 3A 81 20 43 35 B2 31 | S.4,WF.1:. C5.1|
000003E0: 20 A4 20 4C 54 AC 53 43 3A 82 00 00 44 94 02 42 | . LT.SC:...D..B|
000003F0: 41 53 45 B2 42 41 53 45 AA 33 3A 89 20 36 30 30 |ASE.BASE.3:. 600|
00000400: 00 21 44 9E 02 81 20 43 35 B2 56 4F 20 A4 20 30 |.!D... C5.VO . 0|
00000410: 20 A9 20 AB 31 3A 97 20 53 AA 32 34 2C 43 35 3A | . .1:. S.24,C5:|
00000420: 82 00 3C 44 A8 02 81 20 43 35 B2 53 20 A4 20 53 |..<D... C5.S . S|
00000430: AA 32 34 3A 97 20 43 35 2C 30 3A 82 00 42 44 B2 |.24:. C5,0:..BD.|
00000440: 02 8E 00 5A 44 BC 02 8F 20 53 55 42 52 4F 55 54 |...ZD... SUBROUT|
00000450: 49 4E 45 20 41 20 4E 4F 54 45 00 90 44 C6 02 97 |INE A NOTE..D...|
00000460: 20 53 AA 32 34 2C 56 4F AC 2E 35 3A 97 20 53 AA | S.24,VO..5:. S.|
00000470: 35 2C 39 30 3A 97 20 53 AA 33 2C 31 30 3A 97 20 |5,90:. S.3,10:. |
00000480: 53 AA 32 2C 32 35 30 3A 97 20 53 AA 34 2C 36 35 |S.2,250:. S.4,65|
00000490: 00 BC 44 D0 02 97 20 53 AA 31 2C A5 52 28 31 30 |..D... S.1,.R(10|
000004A0: 30 29 AA 32 30 3A 81 20 43 35 B2 31 20 A4 20 31 |0).20:. C5.1 . 1|
000004B0: 30 3A 82 3A 97 20 53 AA 34 2C 36 34 00 E1 44 DA |0:.:. S.4,64..D.|
000004C0: 02 81 20 43 35 B2 53 20 A4 20 53 AA 35 3A 97 20 |.. C5.S . S.5:. |
000004D0: 43 35 2C 30 3A 82 3A 97 20 53 AA 32 34 2C 30 3A |C5,0:.:. S.24,0:|
000004E0: 8E 00 F4 44 E4 02 8F 45 20 57 52 4F 4E 47 20 53 |...D...E WRONG S|
000004F0: 4F 55 4E 44 00 27 45 EE 02 81 20 43 35 B2 53 20 |OUND.'E... C5.S |
00000500: A4 20 53 AA 32 34 3A 97 20 43 35 2C 30 3A 82 3A |. S.24:. C5,0:.:|
00000510: 81 20 43 35 B2 30 20 A4 20 56 4F 3A 97 20 53 AA |. C5.0 . VO:. S.|
00000520: 32 34 2C 43 35 3A 82 00 47 45 F8 02 97 20 53 AA |24,C5:..GE... S.|
00000530: 35 2C 39 30 3A 97 20 53 AA 33 2C 31 30 3A 97 20 |5,90:. S.3,10:. |
00000540: 53 AA 32 2C 32 35 30 00 7C 45 02 03 97 20 53 AA |S.2,250.|E... S.|
00000550: 34 2C 36 35 3A 97 20 53 AA 31 2C 31 31 3A 97 20 |4,65:. S.1,11:. |
00000560: 53 2C 34 38 3A 81 20 43 35 B2 31 20 A4 20 36 30 |S,48:. C5.1 . 60|
00000570: 30 3A 82 3A 97 20 53 AA 34 2C 36 34 00 B2 45 0C |0:.:. S.4,64..E.|
00000580: 03 97 20 53 AA 34 2C 36 35 3A 97 20 53 AA 31 2C |.. S.4,65:. S.1,|
00000590: 31 30 3A 97 20 53 2C 31 34 33 3A 81 20 43 35 B2 |10:. S,143:. C5.|
000005A0: 31 20 A4 20 36 30 30 3A 82 3A 97 20 53 AA 34 2C |1 . 600:.:. S.4,|
000005B0: 36 34 00 E7 45 16 03 97 20 53 AA 34 2C 36 35 3A |64..E... S.4,65:|
000005C0: 97 20 53 AA 31 2C 39 3A 97 20 53 2C 31 30 34 3A |. S.1,9:. S,104:|
000005D0: 81 20 43 35 B2 31 20 A4 20 36 30 30 3A 82 3A 97 |. C5.1 . 600:.:.|
000005E0: 20 53 AA 34 2C 36 34 00 1D 46 20 03 81 20 43 35 | S.4,64..F .. C5|
000005F0: B2 56 4F 20 A4 20 30 20 A9 20 AB 31 3A 97 20 53 |.VO . 0 . .1:. S|
00000600: AA 32 34 2C 43 35 3A 82 3A 81 20 43 35 B2 53 20 |.24,C5:.:. C5.S |
00000610: A4 20 53 AA 32 33 3A 97 20 43 35 2C 30 00 25 46 |. S.23:. C5,0.%F|
00000620: 2A 03 82 3A 8E 00 3E 46 E8 03 8F 20 53 55 42 52 |*..:..>F... SUBR|
00000630: 4F 55 54 49 4E 45 53 20 53 48 41 50 45 53 00 4B |OUTINES SHAPES.K|
00000640: 46 F2 03 8F 20 52 41 42 42 49 54 00 65 46 FC 03 |F... RABBIT.eF..|
00000650: 99 20 22 12 40 41 11 9D 9D 42 43 11 9D 9D 44 45 |. ".@A...BC...DE|
00000660: 92 22 3B 3A 8E 00 72 46 06 04 8F 20 4E 55 4D 42 |.";:..rF... NUMB|
00000670: 45 52 00 88 46 10 04 8B 20 4E 55 B1 39 20 B0 20 |ER..F... NU.9 . |
00000680: 4E 55 B3 30 20 A7 20 8E 00 C7 46 1A 04 91 20 4E |NU.0 . ...F... N|
00000690: 55 AA 31 20 89 20 31 30 36 30 2C 31 30 37 30 2C |U.1 . 1060,1070,|
000006A0: 31 30 38 30 2C 31 30 39 30 2C 31 31 30 30 2C 31 |1080,1090,1100,1|
000006B0: 31 31 30 2C 31 31 32 30 2C 31 31 33 30 2C 31 31 |110,1120,1130,11|
000006C0: 34 30 2C 31 31 35 30 00 DC 46 24 04 99 20 22 12 |40,1150..F$.. ".|
000006D0: 46 47 11 9D 9D 48 49 92 22 3B 3A 8E 00 F3 46 2E |FG...HI.";:...F.|
000006E0: 04 99 20 22 12 4A 92 B4 11 9D 9D 12 4B 4C 92 22 |.. ".J......KL."|
000006F0: 3B 3A 8E 00 08 47 38 04 99 20 22 12 4D 4E 11 9D |;:...G8.. ".MN..|
00000700: 9D 4F 50 92 22 3B 3A 8E 00 1D 47 42 04 99 20 22 |.OP.";:...GB.. "|
00000710: 12 51 52 11 9D 9D 53 54 92 22 3B 3A 8E 00 32 47 |.QR...ST.";:..2G|
00000720: 4C 04 99 20 22 12 55 56 11 9D 9D 57 58 92 22 3B |L.. ".UV...WX.";|
00000730: 3A 8E 00 47 47 56 04 99 20 22 12 59 5A 11 9D 9D |:..GGV.. ".YZ...|
00000740: 53 5B 92 22 3B 3A 8E 00 5C 47 60 04 99 20 22 12 |S[.";:..\G`.. ".|
00000750: 5C 5D 11 9D 9D 21 54 92 22 3B 3A 8E 00 71 47 6A |\]...!T.";:..qGj|
00000760: 04 99 20 22 12 5E 5F 11 9D 9D 23 24 92 22 3B 3A |.. ".^_...#$.";:|
00000770: 8E 00 86 47 74 04 99 20 22 12 25 26 11 9D 9D 27 |...Gt.. ".%&...'|
00000780: 54 92 22 3B 3A 8E 00 9B 47 7E 04 99 20 22 12 28 |T.";:...G~.. ".(|
00000790: 29 11 9D 9D 2A 49 92 22 3B 3A 8E 00 AF 47 88 04 |)...*I.";:...G..|
000007A0: 8F 20 51 55 45 53 54 49 4F 4E 20 4D 41 52 4B 00 |. QUESTION MARK.|
000007B0: C4 47 92 04 99 20 22 12 2B 4E 11 9D 9D 2C 24 92 |.G... ".+N...,$.|
000007C0: 22 3B 3A 8E 00 D5 47 9C 04 8F 20 4D 55 4C 54 2E |";:...G... MULT.|
000007D0: 20 53 49 47 4E 00 E8 47 A6 04 99 20 22 CD CE 11 | SIGN..G... "...|
000007E0: 9D 9D CE CD 22 3B 3A 8E 00 F3 47 B0 04 8F 20 48 |....";:...G... H|
000007F0: 4F 4C 45 00 01 48 BA 04 99 20 22 A9 DF 22 3B 3A |OLE..H... "..";:|
00000800: 8E 00 11 48 C4 04 8F 20 4C 4F 4E 47 20 48 4F 4C |...H... LONG HOL|
00000810: 45 00 23 48 CE 04 99 20 22 90 12 34 20 35 92 22 |E.#H... "..4 5."|
00000820: 3B 3A 8E 00 30 48 D8 04 8F 20 43 41 52 52 4F 54 |;:..0H... CARROT|
00000830: 00 55 48 E2 04 8D 20 38 30 35 30 3A 99 20 22 1E |.UH... 8050:. ".|
00000840: 12 1D 1D 3D 11 9D 9D 9D 1C 36 37 11 9D 9D 38 39 |...=.....67...89|
00000850: 92 22 3B 3A 8E 00 60 48 D0 07 8F 20 4D 45 4E 55 |.";:..`H... MENU|
00000860: 00 89 48 DA 07 99 20 22 93 22 3B 3A 97 20 35 33 |..H... ".";:. 53|
00000870: 32 38 31 2C 35 3A 52 54 B2 30 3A 57 52 B2 30 3A |281,5:RT.0:WR.0:|
00000880: 4C 41 B2 30 3A 43 41 B2 30 00 B2 48 E4 07 58 4C |LA.0:CA.0..H..XL|
00000890: B2 33 3A 59 4C B2 31 35 3A 8D 20 38 35 37 30 3A |.3:YL.15:. 8570:|
000008A0: 58 4C B2 32 32 3A 59 4C B2 32 30 3A 8D 20 38 35 |XL.22:YL.20:. 85|
000008B0: 37 30 00 DC 48 EE 07 58 4C B2 33 33 3A 59 4C B2 |70..H..XL.33:YL.|
000008C0: 31 35 3A 8D 20 38 35 37 30 3A 58 4C B2 33 36 3A |15:. 8570:XL.36:|
000008D0: 59 4C B2 31 38 3A 8D 20 38 35 37 30 00 0B 49 F8 |YL.18:. 8570..I.|
000008E0: 07 58 B2 38 3A 59 B2 34 3A 8D 20 38 30 35 30 3A |.X.8:Y.4:. 8050:|
000008F0: 99 20 22 90 20 4D 49 43 52 4F 4D 55 4C 54 49 50 |. ". MICROMULTIP|
00000900: 4C 49 43 41 54 49 4F 4E 20 20 22 00 39 49 02 08 |LICATION ".9I..|
00000910: 58 B2 38 3A 59 B2 34 3A 8D 20 38 30 35 30 3A 99 |X.8:Y.4:. 8050:.|
00000920: 20 22 20 4D 49 43 52 4F 4D 55 4C 54 49 50 4C 49 | " MICROMULTIPLI|
00000930: 43 41 54 49 4F 4E 20 20 22 00 3F 49 0C 08 99 00 |CATION ".?I....|
00000940: 5A 49 20 08 99 20 22 1D 1D 1D 1D 1D 1D 1D 20 31 |ZI .. "....... 1|
00000950: 2E 20 52 41 42 42 49 54 53 22 00 60 49 2A 08 99 |. RABBITS".`I*..|
00000960: 00 7B 49 3E 08 99 20 22 1D 1D 1D 1D 1D 1D 1D 20 |.{I>.. "....... |
00000970: 32 2E 20 4E 55 4D 42 45 52 53 22 00 81 49 48 08 |2. NUMBERS"..IH.|
00000980: 99 00 A8 49 5C 08 99 20 22 1D 1D 1D 1D 1D 1D 1D |...I\.. ".......|
00000990: 20 33 2E 20 4D 55 4C 54 49 50 4C 59 49 4E 47 20 | 3. MULTIPLYING |
000009A0: 52 41 42 42 49 54 53 22 00 AE 49 66 08 99 00 D5 |RABBITS"..If....|
000009B0: 49 7A 08 99 20 22 1D 1D 1D 1D 1D 1D 1D 20 34 2E |Iz.. "....... 4.|
000009C0: 20 4D 55 4C 54 49 50 4C 59 49 4E 47 20 4E 55 4D | MULTIPLYING NUM|
000009D0: 42 45 52 53 22 00 DB 49 84 08 99 00 0D 4A 98 08 |BERS"..I.....J..|
000009E0: 99 20 22 1D 1D 1D 1D 1D 1D 1D 05 20 53 2E 20 53 |. "........ S. S|
000009F0: 4F 55 4E 44 20 4F 4E 20 22 3B 3A 8B 20 56 4F B2 |OUND ON ";:. VO.|
00000A00: 30 20 A7 20 99 20 22 9D 9D 46 46 22 3B 00 13 4A |0 . . "..FF";..J|
00000A10: A2 08 99 00 29 4A AC 08 43 53 B2 30 3A 8B 20 56 |....)J..CS.0:. V|
00000A20: 4F 20 A7 20 8D 20 35 33 30 00 5D 4A B6 08 8D 20 |O . . 530.]J... |
00000A30: 38 30 31 30 3A 8B 20 41 24 B2 22 12 22 20 A7 20 |8010:. A$."." . |
00000A40: 97 20 35 33 32 38 31 2C 31 3A 97 20 35 33 32 37 |. 53281,1:. 5327|
00000A50: 32 2C 32 31 3A 99 20 22 93 90 22 3A 80 00 7C 4A |2,21:. "..":..|J|
00000A60: C0 08 8B 20 41 24 B2 22 53 22 20 A7 20 56 4F B2 |... A$."S" . VO.|
00000A70: 31 35 AB 56 4F 3A 89 20 32 30 34 30 00 93 4A CA |15.VO:. 2040..J.|
00000A80: 08 8B 20 41 B1 34 20 B0 20 41 B3 31 20 A7 20 32 |.. A.4 . A.1 . 2|
00000A90: 32 33 30 00 B7 4A D4 08 8D 20 37 30 30 3A 91 20 |230..J... 700:. |
00000AA0: 41 20 89 20 33 30 30 30 2C 34 30 30 30 2C 35 30 |A . 3000,4000,50|
00000AB0: 30 30 2C 36 30 30 30 00 D0 4A B8 0B 8F 20 53 45 |00,6000..J... SE|
00000AC0: 43 54 49 4F 4E 20 31 3A 20 52 41 42 42 49 54 53 |CTION 1: RABBITS|
00000AD0: 00 0C 4B C2 0B 97 20 35 33 32 38 31 2C 35 3A 99 |..K... 53281,5:.|
00000AE0: 20 22 93 90 22 3B 3A 81 20 49 B2 31 20 A4 20 39 | "..";:. I.1 . 9|
00000AF0: 3A 58 B2 34 AC 49 AB 31 3A 59 B2 31 34 AB 32 AC |:X.4.I.1:Y.14.2.|
00000B00: 28 49 B2 32 AC B5 28 49 AD 32 29 29 00 3E 4B CC |(I.2..(I.2)).>K.|
00000B10: 0B 8D 20 38 30 35 30 3A 8D 20 31 32 32 30 3A 82 |.. 8050:. 1220:.|
00000B20: 3A 99 20 22 90 22 3B 3A 58 B2 31 39 3A 59 B2 31 |:. ".";:X.19:Y.1|
00000B30: 3A 8D 20 38 30 35 30 3A 8D 20 31 31 36 30 00 70 |:. 8050:. 1160.p|
00000B40: 4B D6 0B 99 20 44 24 22 20 2A 20 45 4E 54 45 52 |K... D$" * ENTER|
00000B50: 20 4E 55 4D 42 45 52 20 4F 46 20 52 41 42 42 49 | NUMBER OF RABBI|
00000B60: 54 53 20 54 4F 20 41 50 50 45 41 52 20 2A 22 3B |TS TO APPEAR *";|
00000B70: 00 8D 4B E0 0B 8D 20 38 30 31 30 3A 8B 20 41 24 |..K... 8010:. A$|
00000B80: B2 C7 28 31 33 29 20 A7 20 32 30 30 30 00 AA 4B |..(13) . 2000..K|
00000B90: EA 0B 8B 20 41 24 B1 22 39 22 20 B0 20 41 24 B3 |... A$."9" . A$.|
00000BA0: 22 31 22 20 A7 20 33 30 34 30 00 DE 4B F4 0B 8D |"1" . 3040..K...|
00000BB0: 20 37 30 30 3A 8D 20 38 30 39 30 3A 58 B2 31 39 | 700:. 8090:X.19|
00000BC0: 3A 59 B2 31 3A 8D 20 38 30 35 30 3A 4E 55 B2 41 |:Y.1:. 8050:NU.A|
00000BD0: 3A 99 20 22 90 22 3B 3A 8D 20 31 30 33 30 00 11 |:. ".";:. 1030..|
00000BE0: 4C FE 0B 81 20 49 B2 31 20 A4 20 41 3A 58 4C B2 |L... I.1 . A:XL.|
00000BF0: 34 AC 49 AB 31 3A 59 4C B2 31 34 AB 32 AC 28 49 |4.I.1:YL.14.2.(I|
00000C00: B2 32 AC B5 28 49 AD 32 29 29 3A 8D 20 38 35 37 |.2..(I.2)):. 857|
00000C10: 30 00 1D 4C 08 0C 82 3A 99 20 22 90 22 00 5B 4C |0..L...:. ".".[L|
00000C20: 12 0C 81 20 49 B2 31 20 A4 20 41 3A 58 B2 34 AC |... I.1 . A:X.4.|
00000C30: 49 AB 31 3A 59 B2 39 AB 32 AC 28 49 B2 32 AC B5 |I.1:Y.9.2.(I.2..|
00000C40: 28 49 AD 32 29 29 3A 8D 20 38 30 35 30 3A 4E 55 |(I.2)):. 8050:NU|
00000C50: B2 49 3A 8D 20 31 30 33 30 3A 82 00 6D 4C 1C 0C |.I:. 1030:..mL..|
00000C60: 8D 20 38 31 31 30 3A 89 20 33 30 30 30 00 86 4C |. 8110:. 3000..L|
00000C70: A0 0F 8F 20 53 45 43 54 49 4F 4E 20 32 3A 20 4E |... SECTION 2: N|
00000C80: 55 4D 42 45 52 53 00 C1 4C AA 0F 97 20 35 33 32 |UMBERS..L... 532|
00000C90: 38 31 2C 35 3A 99 20 22 93 90 22 3A 81 20 49 B2 |81,5:. "..":. I.|
00000CA0: 31 20 A4 20 4E 48 3A 58 B2 46 25 28 30 2C 49 29 |1 . NH:X.F%(0,I)|
00000CB0: 3A 59 B2 46 25 28 31 2C 49 29 3A 8D 20 38 30 35 |:Y.F%(1,I):. 805|
00000CC0: 30 00 DA 4C B4 0F 8D 20 31 32 32 30 3A 82 3A 8D |0..L... 1220:.:.|
00000CD0: 20 38 34 38 30 3A 43 48 B2 31 00 FC 4C BE 0F 99 | 8480:CH.1..L...|
00000CE0: 20 22 90 22 3B 3A 58 B2 32 39 3A 59 B2 33 3A 8D | ".";:X.29:Y.3:.|
00000CF0: 20 38 30 35 30 3A 8D 20 31 31 36 30 00 2D 4D C8 | 8050:. 1160.-M.|
00000D00: 0F 99 20 44 24 22 20 20 20 20 2A 20 45 4E 54 45 |.. D$" * ENTE|
00000D10: 52 20 4E 55 4D 42 45 52 20 4F 46 20 52 41 42 42 |R NUMBER OF RABB|
00000D20: 49 54 53 20 53 48 4F 57 4E 20 2A 22 3B 00 52 4D |ITS SHOWN *";.RM|
00000D30: D2 0F 8D 20 38 30 31 30 3A 8B 20 41 24 B2 C7 28 |... 8010:. A$..(|
00000D40: 31 33 29 20 A7 20 8D 20 37 30 30 3A 89 20 32 30 |13) . . 700:. 20|
00000D50: 30 30 00 6F 4D DC 0F 8B 20 41 24 B1 22 39 22 20 |00.oM... A$."9" |
00000D60: B0 20 41 24 B3 22 30 22 20 A7 20 34 30 35 30 00 |. A$."0" . 4050.|
00000D70: 9D 4D E6 0F 8D 20 37 30 30 3A 8D 20 38 30 39 30 |.M... 700:. 8090|
00000D80: 3A 58 B2 32 39 3A 59 B2 33 3A 8D 20 38 30 35 30 |:X.29:Y.3:. 8050|
00000D90: 3A 8B 20 41 B2 4E 20 A7 20 34 31 32 30 00 D0 4D |:. A.N . 4120..M|
00000DA0: F0 0F 99 20 22 1C 22 3B 3A 4E 55 B2 41 3A 8D 20 |... ".";:NU.A:. |
00000DB0: 31 30 33 30 3A 43 48 B2 43 48 AA 31 3A 8D 20 37 |1030:CH.CH.1:. 7|
00000DC0: 34 30 3A 8B 20 43 48 B3 34 20 A7 20 34 30 33 30 |40:. CH.4 . 4030|
00000DD0: 00 F2 4D 04 10 99 20 22 90 22 3B 3A 8D 20 38 36 |..M... ".";:. 86|
00000DE0: 32 30 3A 58 B2 32 39 3A 59 B2 33 3A 8D 20 38 30 |20:X.29:Y.3:. 80|
00000DF0: 35 30 00 10 4E 0E 10 4E 55 B2 4E 3A 8D 20 31 30 |50..N..NU.N:. 10|
00000E00: 33 30 3A 8D 20 38 31 31 30 3A 89 20 34 30 31 30 |30:. 8110:. 4010|
00000E10: 00 3B 4E 18 10 99 20 22 90 22 3B 3A 4E 55 B2 4E |.;N... ".";:NU.N|
00000E20: 3A 8D 20 31 30 33 30 3A 8D 20 38 36 32 30 3A 8D |:. 1030:. 8620:.|
00000E30: 20 35 30 30 3A 8D 20 38 31 31 30 00 4E 4E 22 10 | 500:. 8110.NN".|
00000E40: 52 54 B2 52 54 AA 31 3A 89 20 34 30 31 30 00 73 |RT.RT.1:. 4010.s|
00000E50: 4E 88 13 8F 20 53 45 43 54 49 4F 4E 20 33 3A 20 |N... SECTION 3: |
00000E60: 4D 55 4C 54 49 50 4C 59 49 4E 47 20 52 41 42 42 |MULTIPLYING RABB|
00000E70: 49 54 53 00 83 4E 92 13 56 50 B2 32 3A 8D 20 38 |ITS..N..VP.2:. 8|
00000E80: 38 33 30 00 97 4E 9C 13 97 20 35 33 32 38 31 2C |830..N... 53281,|
00000E90: 35 3A 99 20 22 93 22 00 C8 4E A6 13 54 4E B2 A5 |5:. "."..N..TN..|
00000EA0: 52 28 52 54 AA 33 29 3A 42 4E B2 A5 52 28 52 54 |R(RT.3):BN..R(RT|
00000EB0: AA 32 29 3A 8B 20 54 4E B1 39 20 B0 20 42 4E B1 |.2):. TN.9 . BN.|
00000EC0: 36 20 A7 20 35 30 33 30 00 E4 4E B0 13 52 45 B2 |6 . 5030..N..RE.|
00000ED0: 54 4E AC 42 4E 3A 8B 20 52 45 B2 4C 41 20 A7 20 |TN.BN:. RE.LA . |
00000EE0: 35 30 33 30 00 1F 4F BA 13 4C 41 B2 52 45 3A 58 |5030..O..LA.RE:X|
00000EF0: B2 31 32 3A 59 B2 56 50 3A 99 20 22 90 22 3B 3A |.12:Y.VP:. ".";:|
00000F00: 8D 20 38 30 35 30 3A 4E 55 B2 42 4E 3A 8D 20 31 |. 8050:NU.BN:. 1|
00000F10: 30 33 30 3A 58 B2 31 35 3A 8D 20 38 30 35 30 00 |030:X.15:. 8050.|
00000F20: 4F 4F C4 13 8D 20 31 31 38 30 3A 58 B2 31 38 3A |OO... 1180:X.18:|
00000F30: 8D 20 38 30 35 30 3A 4E 55 B2 54 4E 3A 8D 20 31 |. 8050:NU.TN:. 1|
00000F40: 30 33 30 3A 58 B2 32 31 3A 8D 20 38 30 35 30 00 |030:X.21:. 8050.|
00000F50: 7B 4F CE 13 99 20 22 C3 C3 11 9D 9D C3 C3 22 3A |{O... ".......":|
00000F60: 43 48 B2 31 3A 44 49 B2 31 3A 8D 20 38 36 36 30 |CH.1:DI.1:. 8660|
00000F70: 3A 59 B2 37 3A 8D 20 38 37 31 30 00 91 4F D8 13 |:Y.7:. 8710..O..|
00000F80: 8B 20 48 24 B2 22 59 22 20 A7 20 8D 20 38 38 30 |. H$."Y" . . 880|
00000F90: 30 00 CB 4F E2 13 58 4C B2 32 31 AA 33 AC 44 49 |0..O..XL.21.3.DI|
00000FA0: 3A 4C 47 B2 28 52 45 B1 39 29 20 AF 20 28 44 49 |:LG.(RE.9) . (DI|
00000FB0: B2 31 29 3A 8B 20 4C 47 20 A7 20 52 41 B2 A5 54 |.1):. LG . RA..T|
00000FC0: 28 52 45 29 3A 89 20 35 31 31 30 00 D9 4F EC 13 |(RE):. 5110..O..|
00000FD0: 52 41 B2 A5 4D 28 52 45 29 00 FC 4F F6 13 99 20 |RA..M(RE)..O... |
00000FE0: 22 90 22 3B 3A 58 B2 58 4C 3A 59 B2 56 50 3A 8D |".";:X.XL:Y.VP:.|
00000FF0: 20 38 30 35 30 3A 8D 20 31 31 36 30 00 21 50 00 | 8050:. 1160.!P.|
00001000: 14 8D 20 38 30 31 30 3A 8B 20 41 24 B2 C7 28 31 |.. 8010:. A$..(1|
00001010: 33 29 20 A7 20 8D 20 37 30 30 3A 89 20 32 30 30 |3) . . 700:. 200|
00001020: 30 00 3E 50 0A 14 8B 20 41 24 B1 22 39 22 20 B0 |0.>P... A$."9" .|
00001030: 20 41 24 B3 22 30 22 20 A7 20 35 31 32 30 00 5D | A$."0" . 5120.]|
00001040: 50 14 14 8D 20 37 30 30 3A 8D 20 38 30 39 30 3A |P... 700:. 8090:|
00001050: 8B 20 52 41 B2 41 20 A7 20 35 32 33 30 00 9B 50 |. RA.A . 5230..P|
00001060: 1E 14 43 48 B2 43 48 AA 31 3A 99 20 22 1C 22 3B |..CH.CH.1:. ".";|
00001070: 3A 58 B2 58 4C 3A 59 B2 56 50 3A 8D 20 38 30 35 |:X.XL:Y.VP:. 805|
00001080: 30 3A 4E 55 B2 41 3A 8D 20 31 30 33 30 3A 8B 20 |0:NU.A:. 1030:. |
00001090: 43 48 B2 34 20 A7 20 35 31 38 30 00 AA 50 28 14 |CH.4 . 5180..P(.|
000010A0: 44 49 B2 31 3A 8D 20 37 34 30 00 DB 50 32 14 58 |DI.1:. 740..P2.X|
000010B0: B2 32 34 3A 59 B2 56 50 3A 8D 20 38 30 35 30 3A |.24:Y.VP:. 8050:|
000010C0: 99 20 22 20 20 20 20 20 11 9D 9D 9D 9D 9D 20 20 |. " ...... |
000010D0: 20 20 20 22 3A 89 20 35 30 39 30 00 F7 50 3C 14 | ":. 5090..P<.|
000010E0: 8D 20 37 34 30 3A 8B 20 48 24 B2 22 4E 22 20 A7 |. 740:. H$."N" .|
000010F0: 20 8D 20 38 38 30 30 00 31 51 46 14 99 20 22 90 | . 8800.1QF.. ".|
00001100: 22 3B 3A 8B 20 52 45 B3 31 30 20 A7 20 58 B2 32 |";:. RE.10 . X.2|
00001110: 34 3A 59 B2 56 50 3A 8D 20 38 30 35 30 3A 4E 55 |4:Y.VP:. 8050:NU|
00001120: B2 52 45 3A 8D 20 31 30 33 30 3A 89 20 35 32 35 |.RE:. 1030:. 525|
00001130: 30 00 63 51 50 14 58 B2 32 34 3A 59 B2 56 50 3A |0.cQP.X.24:Y.VP:|
00001140: 8D 20 38 30 35 30 3A 4E 55 B2 A5 54 28 52 45 29 |. 8050:NU..T(RE)|
00001150: 3A 8D 20 31 30 33 30 3A 58 B2 32 37 3A 8D 20 38 |:. 1030:X.27:. 8|
00001160: 30 35 30 00 78 51 5A 14 4E 55 B2 A5 4D 28 52 45 |050.xQZ.NU..M(RE|
00001170: 29 3A 8D 20 31 30 33 30 00 83 51 64 14 89 20 35 |):. 1030..Qd.. 5|
00001180: 32 35 30 00 BE 51 6E 14 99 20 22 90 22 3B 3A 58 |250..Qn.. ".";:X|
00001190: B2 58 4C 3A 59 B2 56 50 3A 8D 20 38 30 35 30 3A |.XL:Y.VP:. 8050:|
000011A0: 4E 55 B2 41 3A 8D 20 31 30 33 30 3A 8B 20 4C 47 |NU.A:. 1030:. LG|
000011B0: 20 A7 20 44 49 B2 32 3A 89 20 35 30 39 30 00 DC | . DI.2:. 5090..|
000011C0: 51 78 14 52 54 B2 52 54 AA 31 3A 8B 20 48 24 B2 |Qx.RT.RT.1:. H$.|
000011D0: 22 4E 22 20 A7 20 8D 20 38 38 30 30 00 E6 51 7D |"N" . . 8800..Q}|
000011E0: 14 8D 20 35 30 30 00 FF 51 82 14 99 20 22 90 22 |.. 500..Q... "."|
000011F0: 3B 3A 8D 20 38 31 31 30 3A 89 20 35 30 32 30 00 |;:. 8110:. 5020.|
00001200: 15 52 70 17 8F 20 53 45 43 54 49 4F 4E 20 34 3A |.Rp.. SECTION 4:|
00001210: 20 51 55 49 5A 00 30 52 7A 17 8D 20 38 38 39 30 | QUIZ.0Rz.. 8890|
00001220: 3A 8B 20 41 24 B2 22 43 22 20 A7 20 37 30 30 30 |:. A$."C" . 7000|
00001230: 00 44 52 84 17 97 20 35 33 32 38 31 2C 36 3A 99 |.DR... 53281,6:.|
00001240: 20 22 93 22 00 7D 52 8E 17 54 4E B2 A5 52 28 52 | ".".}R..TN..R(R|
00001250: 54 AC 32 AA 35 29 3A 42 4E B2 A5 52 28 52 54 AC |T.2.5):BN..R(RT.|
00001260: 31 2E 35 AA 33 29 3A 8B 20 54 4E B1 31 32 20 B0 |1.5.3):. TN.12 .|
00001270: 20 42 4E B1 31 32 20 A7 20 36 30 33 30 00 9D 52 | BN.12 . 6030..R|
00001280: 98 17 8B 20 54 4E B3 42 4E 20 A7 20 54 45 B2 54 |... TN.BN . TE.T|
00001290: 4E 3A 54 4E B2 42 4E 3A 42 4E B2 54 45 00 C2 52 |N:TN.BN:BN.TE..R|
000012A0: A2 17 52 45 B2 54 4E AC 42 4E 3A 8B 20 52 45 B1 |..RE.TN.BN:. RE.|
000012B0: 39 39 39 20 B0 20 52 45 B2 4C 41 20 A7 20 36 30 |999 . RE.LA . 60|
000012C0: 33 30 00 F8 52 AC 17 4E 52 B2 31 AB 28 42 4E B1 |30..R..NR.1.(BN.|
000012D0: 39 29 3A 8D 20 39 30 34 30 3A 4C 41 B2 52 45 3A |9):. 9040:LA.RE:|
000012E0: 43 48 B2 31 3A 52 4F B2 31 3A 49 28 31 29 B2 54 |CH.1:RO.1:I(1).T|
000012F0: 4E AC A5 4D 28 42 4E 29 00 12 53 B6 17 49 28 32 |N..M(BN)..S..I(2|
00001300: 29 B2 54 4E AC A5 54 28 42 4E 29 3A 8D 20 38 39 |).TN..T(BN):. 89|
00001310: 35 30 00 39 53 C0 17 8B 20 52 4F B2 31 20 AF 20 |50.9S... RO.1 . |
00001320: 49 28 31 29 B2 30 20 A7 20 4D 44 B2 A5 44 28 54 |I(1).0 . MD..D(T|
00001330: 4E 29 3A 89 20 36 31 30 30 00 4A 53 CA 17 4D 44 |N):. 6100.JS..MD|
00001340: B2 A5 44 28 49 28 52 4F 29 29 00 5E 53 D4 17 44 |..D(I(RO)).^S..D|
00001350: 49 B2 31 3A 59 53 B2 31 30 AA 33 AC 52 4F 00 88 |I.1:YS.10.3.RO..|
00001360: 53 DE 17 58 53 B2 33 34 AB 34 AC 28 44 49 AA 52 |S..XS.34.4.(DI.R|
00001370: 4F 29 3A 91 20 44 49 20 89 20 36 31 32 30 2C 36 |O):. DI . 6120,6|
00001380: 31 33 30 2C 36 31 34 30 00 A0 53 E8 17 52 41 B2 |130,6140..S..RA.|
00001390: A5 4D 28 49 28 52 4F 29 29 3A 89 20 36 31 35 30 |.M(I(RO)):. 6150|
000013A0: 00 BC 53 F2 17 52 41 B2 A5 4D 28 A5 54 28 49 28 |..S..RA..M(.T(I(|
000013B0: 52 4F 29 29 29 3A 89 20 36 31 35 30 00 D1 53 FC |RO))):. 6150..S.|
000013C0: 17 52 41 B2 A5 54 28 A5 54 28 49 28 52 4F 29 29 |.RA..T(.T(I(RO))|
000013D0: 29 00 F0 53 06 18 58 B2 58 53 3A 59 B2 59 53 AA |)..S..X.XS:Y.YS.|
000013E0: 31 3A 8D 20 38 30 35 30 3A 99 20 22 05 CE CD 22 |1:. 8050:. "..."|
000013F0: 00 1C 54 10 18 8D 20 38 30 31 30 3A 8B 20 41 24 |..T... 8010:. A$|
00001400: B2 C7 28 31 33 29 20 A7 20 8D 20 37 30 30 3A 8D |..(13) . . 700:.|
00001410: 20 39 33 30 30 3A 89 20 32 30 30 30 00 39 54 1A | 9300:. 2000.9T.|
00001420: 18 8B 20 41 24 B1 22 39 22 20 B0 20 41 24 B3 22 |.. A$."9" . A$."|
00001430: 30 22 20 A7 20 36 31 36 30 00 58 54 24 18 8D 20 |0" . 6160.XT$.. |
00001440: 37 30 30 3A 8D 20 38 30 39 30 3A 8B 20 52 41 B2 |700:. 8090:. RA.|
00001450: 41 20 A7 20 36 32 35 30 00 86 54 2E 18 99 20 22 |A . 6250..T... "|
00001460: 1C 22 3B 3A 58 B2 58 53 3A 59 B2 59 53 3A 8D 20 |.";:X.XS:Y.YS:. |
00001470: 38 30 35 30 3A 4E 55 B2 41 3A 8D 20 31 30 33 30 |8050:NU.A:. 1030|
00001480: 3A 8D 20 37 34 30 00 A0 54 38 18 43 48 B2 43 48 |:. 740..T8.CH.CH|
00001490: AA 31 3A 8B 20 43 48 B2 32 20 A7 20 36 32 33 30 |.1:. CH.2 . 6230|
000014A0: 00 AE 54 42 18 58 B2 58 53 3A 59 B2 59 53 00 CD |..TB.X.XS:Y.YS..|
000014B0: 54 4C 18 8D 20 38 30 35 30 3A 99 20 22 20 20 11 |TL.. 8050:. " .|
000014C0: 9D 9D 20 20 22 3B 3A 89 20 36 31 35 30 00 0A 55 |.. ";:. 6150..U|
000014D0: 56 18 99 20 22 05 22 3B 3A 81 20 52 4F B2 31 20 |V.. ".";:. RO.1 |
000014E0: A4 20 4E 52 3A 58 4C B2 33 30 AB 34 AC 52 4F 3A |. NR:XL.30.4.RO:|
000014F0: 59 B2 31 30 AA 33 AC 52 4F 3A 4E B2 49 28 52 4F |Y.10.3.RO:N.I(RO|
00001500: 29 3A 8D 20 38 32 37 30 3A 82 00 23 55 60 18 8D |):. 8270:..#U`..|
00001510: 20 39 31 34 30 3A 8D 20 39 32 34 30 3A 89 20 36 | 9140:. 9240:. 6|
00001520: 32 39 30 00 52 55 6A 18 99 20 22 05 22 3B 3A 58 |290.RUj.. ".";:X|
00001530: B2 58 53 3A 59 B2 59 53 3A 8D 20 38 30 35 30 3A |.XS:Y.YS:. 8050:|
00001540: 4E 55 B2 41 3A 8D 20 31 30 33 30 3A 8D 20 39 31 |NU.A:. 1030:. 91|
00001550: 30 30 00 70 55 74 18 8B 20 44 49 B3 B1 4D 44 20 |00.pUt.. DI..MD |
00001560: A7 20 44 49 B2 44 49 AA 31 3A 89 20 36 31 31 30 |. DI.DI.1:. 6110|
00001570: 00 8E 55 7E 18 8B 20 52 4F B3 B1 4E 52 20 A7 20 |..U~.. RO..NR . |
00001580: 52 4F B2 52 4F AA 31 3A 89 20 36 30 38 30 00 A0 |RO.RO.1:. 6080..|
00001590: 55 88 18 8D 20 39 31 34 30 3A 8D 20 39 31 38 30 |U... 9140:. 9180|
000015A0: 00 C0 55 92 18 99 20 22 05 22 3B 3A 8D 20 38 31 |..U... ".";:. 81|
000015B0: 31 30 3A 8D 20 38 30 39 30 3A 89 20 36 30 33 30 |10:. 8090:. 6030|
000015C0: 00 DC 55 58 1B 8F 20 53 45 43 54 49 4F 4E 20 34 |..UX.. SECTION 4|
000015D0: 3A 20 43 41 4C 43 55 4C 41 54 4F 52 00 17 56 62 |: CALCULATOR..Vb|
000015E0: 1B 97 20 35 33 32 38 31 2C 31 3A 99 20 22 93 22 |.. 53281,1:. "."|
000015F0: 3A 43 41 B2 31 3A 4F B2 31 3A 8D 20 38 31 37 30 |:CA.1:O.1:. 8170|
00001600: 3A 99 20 22 1F 22 3B 3A 59 B2 36 3A 8D 20 38 33 |:. ".";:Y.6:. 83|
00001610: 32 30 3A 54 56 B2 4D 00 2D 56 6C 1B 8B 20 41 24 |20:TV.M.-Vl.. A$|
00001620: B2 C7 28 31 33 29 20 A7 20 32 30 30 30 00 5A 56 |..(13) . 2000.ZV|
00001630: 76 1B 58 B2 31 38 3A 59 B2 39 3A 8D 20 38 30 35 |v.X.18:Y.9:. 805|
00001640: 30 3A 99 20 22 1E 22 3B 3A 8B 20 41 24 B2 C7 28 |0:. ".";:. A$..(|
00001650: 31 39 29 20 A7 20 37 30 31 30 00 82 56 80 1B 8D |19) . 7010..V...|
00001660: 20 31 31 38 30 3A 4F B2 32 3A 8D 20 38 31 37 30 | 1180:O.2:. 8170|
00001670: 3A 99 20 22 1F 22 3B 3A 59 B2 39 3A 8D 20 38 33 |:. ".";:Y.9:. 83|
00001680: 32 30 00 9D 56 8A 1B 42 4E B2 4D 3A 8B 20 41 24 |20..V..BN.M:. A$|
00001690: B2 C7 28 31 33 29 20 A7 20 32 30 30 30 00 B3 56 |..(13) . 2000..V|
000016A0: 94 1B 8B 20 41 24 B2 C7 28 31 39 29 20 A7 20 37 |... A$..(19) . 7|
000016B0: 30 31 30 00 F4 56 9E 1B 58 B2 32 32 3A 59 B2 31 |010..V..X.22:Y.1|
000016C0: 31 3A 8D 20 38 30 35 30 3A 99 20 22 1E B9 B9 B9 |1:. 8050:. "....|
000016D0: B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 22 3A 4F B2 33 |...........":O.3|
000016E0: 3A 8D 20 38 31 37 30 3A 59 B2 31 33 3A 4E B2 54 |:. 8170:Y.13:N.T|
000016F0: 56 AC 42 4E 00 06 57 A8 1B 99 20 22 1F 22 3B 3A |V.BN..W... ".";:|
00001700: 8D 20 38 32 37 30 00 23 57 B2 1B 8D 20 38 30 31 |. 8270.#W... 801|
00001710: 30 3A 8B 20 41 24 B2 C7 28 31 33 29 20 A7 20 32 |0:. A$..(13) . 2|
00001720: 30 30 30 00 41 57 BC 1B 8B 20 41 24 B2 C7 28 31 |000.AW... A$..(1|
00001730: 39 29 20 A7 20 8D 20 37 30 30 3A 89 20 37 30 31 |9) . . 700:. 701|
00001740: 30 00 4C 57 C6 1B 89 20 37 30 39 30 00 65 57 40 |0.LW... 7090.eW@|
00001750: 1F 8F 20 53 55 42 52 4F 55 54 49 4E 45 53 20 4D |.. SUBROUTINES M|
00001760: 4F 56 49 4E 47 00 7D 57 4A 1F 8F 20 53 55 42 52 |OVING.}WJ.. SUBR|
00001770: 4F 55 54 49 4E 45 20 47 45 54 20 41 24 00 89 57 |OUTINE GET A$..W|
00001780: 54 1F 97 20 31 39 38 2C 30 00 A1 57 5E 1F A1 20 |T.. 198,0..W^.. |
00001790: 41 24 3A 8B 20 41 24 B2 22 22 20 A7 20 38 30 33 |A$:. A$."" . 803|
000017A0: 30 00 AF 57 68 1F 41 B2 C5 28 41 24 29 3A 8E 00 |0..Wh.A..(A$):..|
000017B0: C7 57 72 1F 8F 20 53 55 42 52 4F 55 54 49 4E 45 |.Wr.. SUBROUTINE|
000017C0: 20 47 4F 54 4F 58 59 00 DA 57 7C 1F 8B 20 59 B2 | GOTOXY..W|.. Y.|
000017D0: 31 20 A7 20 99 20 22 13 22 3B 00 F2 57 86 1F 8B |1 . . ".";..W...|
000017E0: 20 59 B1 31 20 A7 20 97 20 32 31 34 2C 59 AB 32 | Y.1 . . 214,Y.2|
000017F0: 3A 99 00 02 58 90 1F 97 20 32 31 31 2C 58 AB 31 |:...X... 211,X.1|
00001800: 3A 8E 00 20 58 9A 1F 8F 20 53 55 42 52 4F 55 54 |:.. X... SUBROUT|
00001810: 49 4E 45 20 43 4C 45 41 52 20 42 4F 54 54 4F 4D |INE CLEAR BOTTOM|
00001820: 00 55 58 A4 1F 99 20 44 24 22 20 20 20 20 20 20 |.UX... D$" |
00001830: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001840: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001850: 20 22 3B 3A 8E 00 75 58 AE 1F 8F 20 53 55 42 52 | ";:..uX... SUBR|
00001860: 4F 55 54 49 4E 45 20 57 41 49 54 20 46 4F 52 20 |OUTINE WAIT FOR |
00001870: 41 20 4B 45 59 00 AC 58 B8 1F 99 20 44 24 22 20 |A KEY..X... D$" |
00001880: 20 20 20 20 2A 20 50 52 45 53 53 20 41 4E 59 20 | * PRESS ANY |
00001890: 4B 45 59 20 54 4F 20 43 4F 4E 54 49 4E 55 45 20 |KEY TO CONTINUE |
000018A0: 2A 22 3B 3A 8D 20 38 30 31 30 3A 8E 00 C2 58 C2 |*";:. 8010:...X.|
000018B0: 1F 8F 20 53 55 42 52 4F 55 54 49 4E 45 20 57 41 |.. SUBROUTINE WA|
000018C0: 49 54 00 D3 58 CC 1F 54 49 24 B2 22 30 30 30 30 |IT..X..TI$."0000|
000018D0: 30 30 22 00 E8 58 D6 1F 8B 20 54 49 24 B3 57 54 |00"..X... TI$.WT|
000018E0: 24 20 A7 20 38 31 35 30 00 EE 58 E0 1F 8E 00 0D |$ . 8150..X.....|
000018F0: 59 EA 1F 8F 20 53 55 42 52 4F 55 54 49 4E 45 20 |Y... SUBROUTINE |
00001900: 43 41 4C 2E 20 4D 45 53 53 41 47 45 53 00 50 59 |CAL. MESSAGES.PY|
00001910: F4 1F 58 B2 31 3A 59 B2 31 37 3A 8D 20 38 30 35 |..X.1:Y.17:. 805|
00001920: 30 3A 99 20 22 12 1C 20 20 20 20 20 20 20 20 20 |0:. ".. |
00001930: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001940: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00001950: 00 8D 59 FE 1F 8B 20 4F B2 31 20 B0 20 4F B2 32 |..Y... O.1 . O.2|
00001960: 20 A7 20 99 20 22 20 45 4E 54 45 52 20 55 50 20 | . . " ENTER UP |
00001970: 54 4F 20 34 2D 44 49 47 49 54 20 4E 55 4D 42 45 |TO 4-DIGIT NUMBE|
00001980: 52 20 20 20 20 20 20 20 20 20 20 20 22 00 C4 59 |R "..Y|
00001990: 08 20 8B 20 4F B2 31 20 A7 20 99 20 22 20 3C 53 |. . O.1 . . " <S|
000019A0: 50 41 43 45 20 42 41 52 3E 20 46 4F 52 20 4E 45 |PACE BAR> FOR NE|
000019B0: 58 54 20 4E 55 4D 42 45 52 20 20 20 20 20 20 20 |XT NUMBER |
000019C0: 20 20 20 22 00 FB 59 12 20 8B 20 4F B2 32 20 A7 | "..Y. . O.2 .|
000019D0: 20 99 20 22 20 3C 53 50 41 43 45 20 42 41 52 3E | . " <SPACE BAR>|
000019E0: 20 46 4F 52 20 52 45 53 55 4C 54 20 20 20 20 20 | FOR RESULT |
000019F0: 20 20 20 20 20 20 20 20 20 20 22 00 38 5A 1C 20 | ".8Z. |
00001A00: 8B 20 4F B2 31 20 B0 20 4F B2 32 20 A7 20 99 20 |. O.1 . O.2 . . |
00001A10: 22 20 3C 49 4E 53 54 2F 44 45 4C 3E 20 54 4F 20 |" <INST/DEL> TO |
00001A20: 52 45 4D 4F 56 45 20 4C 41 53 54 20 44 49 47 49 |REMOVE LAST DIGI|
00001A30: 54 20 20 20 20 20 20 22 00 67 5A 26 20 99 20 22 |T ".gZ& . "|
00001A40: 20 3C 43 4C 52 2F 48 4F 4D 45 3E 20 54 4F 20 42 | <CLR/HOME> TO B|
00001A50: 45 47 49 4E 20 41 20 4E 45 57 20 50 52 4F 42 4C |EGIN A NEW PROBL|
00001A60: 45 4D 20 20 20 20 22 00 96 5A 30 20 99 20 22 20 |EM "..Z0 . " |
00001A70: 3C 52 45 54 55 52 4E 3E 20 46 4F 52 20 4D 45 4E |<RETURN> FOR MEN|
00001A80: 55 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |U |
00001A90: 20 20 20 20 20 22 00 DB 5A 3A 20 8B 20 4F B2 33 | "..Z: . O.3|
00001AA0: 20 A7 20 81 20 49 B2 31 20 A4 20 33 3A 99 20 22 | . . I.1 . 3:. "|
00001AB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001AC0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001AD0: 20 20 20 20 20 20 20 22 3B 3A 82 00 E1 5A 44 20 | ";:...ZD |
00001AE0: 8E 00 1F 5B 4E 20 8F 20 53 55 42 52 4F 55 54 49 |...[N . SUBROUTI|
00001AF0: 4E 45 20 4F 55 54 50 55 54 20 41 20 4E 55 4D 42 |NE OUTPUT A NUMB|
00001B00: 45 52 3B 20 49 4E 50 55 54 20 58 4C 3A 20 52 49 |ER; INPUT XL: RI|
00001B10: 47 48 54 4D 4F 53 54 20 58 2C 20 59 2C 20 4E 00 |GHTMOST X, Y, N.|
00001B20: 45 5B 58 20 4D 41 58 B2 31 3A 8B 20 4E B1 30 20 |E[X MAX.1:. N.0 |
00001B30: A7 20 4D 41 58 B2 B5 28 BC 28 4E 29 AD BC 28 31 |. MAX..(.(N)..(1|
00001B40: 30 29 AA 31 29 00 7F 5B 62 20 58 B2 58 4C 3A 8D |0).1)..[b X.XL:.|
00001B50: 20 38 30 35 30 3A 81 20 5A 33 B2 31 20 A4 20 4D | 8050:. Z3.1 . M|
00001B60: 41 58 3A 4E 55 B2 A5 4D 28 4E 29 3A 8D 20 31 30 |AX:NU..M(N):. 10|
00001B70: 33 30 3A 99 20 22 91 9D 9D 9D 9D 9D 9D 22 3B 00 |30:. ".......";.|
00001B80: AC 5B 6C 20 4E B2 A5 54 28 4E 29 3A 82 3A 8B 20 |.[l N..T(N):.:. |
00001B90: 4D 41 58 B3 34 20 AF 20 43 41 B2 31 20 A7 20 99 |MAX.4 . CA.1 . .|
00001BA0: 20 22 92 20 20 11 9D 9D 20 20 22 3B 00 B2 5B 76 | ". ... ";..[v|
00001BB0: 20 8E 00 E3 5B 80 20 8F 20 53 55 42 52 4F 55 54 | ...[. . SUBROUT|
00001BC0: 49 4E 45 20 47 45 54 20 41 20 4E 55 4D 42 45 52 |INE GET A NUMBER|
00001BD0: 2C 20 49 4E 50 55 54 20 59 2C 20 4F 55 54 50 55 |, INPUT Y, OUTPU|
00001BE0: 54 20 4D 00 F6 5B 8A 20 4D B2 30 3A 54 4E B2 30 |T M..[. M.0:TN.0|
00001BF0: 3A 58 4C B2 33 34 00 0E 5C 94 20 A1 20 41 24 3A |:XL.34..\. . A$:|
00001C00: 8B 20 41 24 B2 22 22 20 A7 20 38 33 34 30 00 43 |. A$."" . 8340.C|
00001C10: 5C 99 20 41 B2 C5 28 41 24 29 3A 8B 20 41 24 B2 |\. A..(A$):. A$.|
00001C20: C7 28 31 33 29 20 B0 20 41 24 B2 22 20 22 20 B0 |.(13) . A$." " .|
00001C30: 20 41 24 B2 C7 28 31 39 29 20 A7 20 8D 20 37 30 | A$..(19) . . 70|
00001C40: 30 3A 8E 00 61 5C 9E 20 8B 20 41 24 B2 C7 28 32 |0:..a\. . A$..(2|
00001C50: 30 29 20 A7 20 8D 20 37 30 30 3A 89 20 38 33 38 |0) . . 700:. 838|
00001C60: 30 00 7E 5C A8 20 8B 20 41 24 B1 22 39 22 20 B0 |0.~\. . A$."9" .|
00001C70: 20 41 24 B3 22 30 22 20 A7 20 38 33 34 30 00 AF | A$."0" . 8340..|
00001C80: 5C B2 20 8D 20 37 30 30 3A 4D B2 31 30 AC 4D AA |\. . 700:M.10.M.|
00001C90: 41 3A 8B 20 4D B3 31 30 30 30 30 20 A7 20 4E B2 |A:. M.10000 . N.|
00001CA0: 4D 3A 8D 20 38 32 37 30 3A 89 20 38 33 34 30 00 |M:. 8270:. 8340.|
00001CB0: D3 5C BC 20 4D B2 A5 54 28 4D 29 3A 8B 20 41 24 |.\. M..T(M):. A$|
00001CC0: B2 C7 28 32 30 29 20 A7 20 4E B2 4D 3A 8D 20 38 |..(20) . N.M:. 8|
00001CD0: 32 37 30 00 DE 5C C6 20 89 20 38 33 34 30 00 F9 |270..\. . 8340..|
00001CE0: 5C D0 20 8F 20 53 55 42 52 4F 55 54 49 4E 45 20 |\. . SUBROUTINE |
00001CF0: 49 4E 20 52 41 42 42 49 54 00 26 5D DA 20 58 B2 |IN RABBIT.&]. X.|
00001D00: 58 4C 3A 59 B2 59 4C AB 32 3A 8D 20 38 30 35 30 |XL:Y.YL.2:. 8050|
00001D10: 3A 99 20 22 C1 D1 D3 11 9D 9D 9D D6 D7 D8 11 9D |:. "............|
00001D20: 9D 9D DA DB DC 22 00 45 5D E4 20 81 20 59 36 B2 |.....".E]. . Y6.|
00001D30: 30 20 A4 20 32 3A 97 20 A5 41 28 59 4C 29 AA 59 |0 . 2:. .A(YL).Y|
00001D40: 36 2C 39 3A 82 00 66 5D EE 20 8D 20 38 30 35 30 |6,9:..f]. . 8050|
00001D50: 3A 99 20 22 20 20 20 22 3A 59 B2 59 4C AB 31 3A |:. " ":Y.YL.1:|
00001D60: 8D 20 38 30 35 30 00 94 5D F8 20 99 20 22 C1 D1 |. 8050..]. . "..|
00001D70: D3 11 9D 9D 9D A8 AB B1 22 3A 81 20 59 36 B2 30 |........":. Y6.0|
00001D80: 20 A4 20 32 3A 97 20 A5 41 28 59 4C 29 AA 59 36 | . 2:. .A(YL).Y6|
00001D90: 2C 39 3A 82 00 BA 5D 02 21 8D 20 38 30 35 30 3A |,9:...].!. 8050:|
00001DA0: 99 20 22 20 20 20 11 9D 9D 9D 20 20 20 22 3A 59 |. " .... ":Y|
00001DB0: B2 59 4C 3A 8D 20 38 30 35 30 00 E5 5D 0C 21 99 |.YL:. 8050..].!.|
00001DC0: 20 22 05 BF 12 30 31 92 22 3B 3A 81 20 59 36 B2 | "...01.";:. Y6.|
00001DD0: 30 20 A4 20 32 3A 97 20 A5 41 28 59 4C 29 AA 59 |0 . 2:. .A(YL).Y|
00001DE0: 36 2C 39 3A 82 00 F9 5D 16 21 8D 20 38 30 35 30 |6,9:...].!. 8050|
00001DF0: 3A 8D 20 31 32 32 30 3A 8E 00 19 5E 20 21 8F 20 |:. 1220:...^ !. |
00001E00: 53 55 42 52 4F 55 54 49 4E 45 20 47 45 54 20 4E |SUBROUTINE GET N|
00001E10: 20 26 20 4C 4F 43 25 28 29 00 41 5E 2A 21 4E B2 | & LOC%().A^*!N.|
00001E20: A5 52 28 52 54 AA 33 29 3A 54 45 B2 30 3A 8B 20 |.R(RT.3):TE.0:. |
00001E30: 4E B1 39 20 B0 20 4E B2 4C 41 20 A7 20 38 34 39 |N.9 . N.LA . 849|
00001E40: 30 00 61 5E 34 21 4C 41 B2 4E 3A 81 20 49 B2 31 |0.a^4!LA.N:. I.1|
00001E50: 20 A4 20 4E 48 3A 4C 4F 43 25 28 49 29 B2 30 3A | . NH:LOC%(I).0:|
00001E60: 82 00 83 5E 3E 21 81 20 49 B2 31 20 A4 20 4E 48 |...^>!. I.1 . NH|
00001E70: 3A 8B 20 BB 28 31 29 B1 4E AD 32 30 20 A7 20 38 |:. .(1).N.20 . 8|
00001E80: 35 35 30 00 9B 5E 48 21 8B 20 4C 4F 43 25 28 49 |550..^H!. LOC%(I|
00001E90: 29 B3 B1 30 20 A7 20 38 35 35 30 00 AD 5E 52 21 |)..0 . 8550..^R!|
00001EA0: 8B 20 54 45 B2 4E 20 A7 20 38 35 35 30 00 E0 5E |. TE.N . 8550..^|
00001EB0: 5C 21 4C 4F 43 25 28 49 29 B2 31 3A 58 4C B2 46 |\!LOC%(I).1:XL.F|
00001EC0: 25 28 30 2C 49 29 3A 59 4C B2 46 25 28 31 2C 49 |%(0,I):YL.F%(1,I|
00001ED0: 29 3A 8D 20 38 35 37 30 3A 54 45 B2 54 45 AA 31 |):. 8570:TE.TE.1|
00001EE0: 00 F4 5E 66 21 82 3A 8B 20 54 45 B3 4E 20 A7 20 |..^f!.:. TE.N . |
00001EF0: 38 35 31 30 00 FA 5E 70 21 8E 00 16 5F 7A 21 8F |8510..^p!..._z!.|
00001F00: 20 53 55 42 52 4F 55 54 49 4E 45 20 4F 55 54 20 | SUBROUTINE OUT |
00001F10: 52 41 42 42 49 54 00 52 5F 84 21 58 B2 58 4C 3A |RABBIT.R_.!X.XL:|
00001F20: 59 B2 59 4C 3A 8D 20 38 30 35 30 3A 99 20 22 05 |Y.YL:. 8050:. ".|
00001F30: BF 12 30 31 92 22 3B 3A 81 20 59 36 B2 30 20 A4 |..01.";:. Y6.0 .|
00001F40: 20 32 3A 97 20 A5 41 28 59 4C 29 AA 59 36 2C 39 | 2:. .A(YL).Y6,9|
00001F50: 3A 82 00 5C 5F 89 21 8D 20 37 30 30 00 98 5F 8E |:..\_.!. 700.._.|
00001F60: 21 59 B2 59 4C AB 31 3A 8D 20 38 30 35 30 3A 99 |!Y.YL.1:. 8050:.|
00001F70: 20 22 C1 D1 D3 11 9D 9D 9D A8 AB B1 22 3A 81 20 | "..........":. |
00001F80: 59 36 B2 30 20 A4 20 32 3A 97 20 A5 41 28 59 4C |Y6.0 . 2:. .A(YL|
00001F90: 29 AA 59 36 2C 39 3A 82 00 A2 5F 93 21 8D 20 37 |).Y6,9:..._.!. 7|
00001FA0: 30 30 00 CA 5F 98 21 59 B2 59 4C AB 32 3A 8D 20 |00.._.!Y.YL.2:. |
00001FB0: 38 30 35 30 3A 99 20 22 C1 D1 D3 11 9D 9D 9D D6 |8050:. "........|
00001FC0: D7 D8 11 9D 9D 9D DA DB DC 22 00 F1 5F A2 21 81 |.........".._.!.|
00001FD0: 20 59 36 B2 30 20 A4 20 32 3A 97 20 A5 41 28 59 | Y6.0 . 2:. .A(Y|
00001FE0: 4C 29 AA 59 36 2C 39 3A 82 3A 8D 20 37 30 30 3A |L).Y6,9:.:. 700:|
00001FF0: 8E 00 14 60 AC 21 8F 20 53 55 42 52 4F 55 54 49 |...`.!. SUBROUTI|
00002000: 4E 45 20 50 55 54 20 23 53 20 4F 4E 20 52 41 42 |NE PUT #S ON RAB|
00002010: 42 49 54 53 00 3B 60 B6 21 54 45 B2 30 3A 81 20 |BITS.;`.!TE.0:. |
00002020: 49 B2 31 20 A4 20 4E 48 3A 8B 20 4C 4F 43 25 28 |I.1 . NH:. LOC%(|
00002030: 49 29 B2 30 20 A7 20 38 36 35 30 00 71 60 C0 21 |I).0 . 8650.q`.!|
00002040: 58 B2 46 25 28 30 2C 49 29 3A 59 B2 46 25 28 31 |X.F%(0,I):Y.F%(1|
00002050: 2C 49 29 AB 35 3A 8D 20 38 30 35 30 3A 54 45 B2 |,I).5:. 8050:TE.|
00002060: 54 45 AA 31 3A 4E 55 B2 54 45 3A 8D 20 31 30 33 |TE.1:NU.TE:. 103|
00002070: 30 00 79 60 CA 21 82 3A 8E 00 A2 60 D4 21 8F 20 |0.y`.!.:...`.!. |
00002080: 53 55 42 52 4F 55 54 49 4E 45 20 4D 41 4B 45 20 |SUBROUTINE MAKE |
00002090: 48 4F 4C 45 2C 20 49 4E 50 55 54 20 54 4E 2E 20 |HOLE, INPUT TN. |
000020A0: 42 4E 00 D3 60 DE 21 99 20 22 90 22 3B 3A 59 B2 |BN..`.!. ".";:Y.|
000020B0: 39 3A 81 20 49 B2 31 20 A4 20 42 4E 3A 58 B2 32 |9:. I.1 . BN:X.2|
000020C0: 32 AB 32 AC 54 4E 3A 8D 20 38 30 35 30 3A 59 B2 |2.2.TN:. 8050:Y.|
000020D0: 59 AA 33 00 EC 60 E8 21 8D 20 31 32 32 30 3A 8B |Y.3..`.!. 1220:.|
000020E0: 20 54 4E B2 31 20 A7 20 38 37 30 30 00 20 61 F2 | TN.1 . 8700. a.|
000020F0: 21 99 20 22 12 9D 22 3B 3A 81 20 4A B2 32 33 AB |!. "..";:. J.23.|
00002100: 32 AC 54 4E 20 A4 20 31 38 AA 32 AC 54 4E 3A 99 |2.TN . 18.2.TN:.|
00002110: 20 22 20 22 3B 3A 82 3A 99 20 22 12 35 92 22 3B | " ";:.:. ".5.";|
00002120: 00 2E 61 FC 21 8D 20 37 30 30 3A 82 3A 8E 00 57 |..a.!. 700:.:..W|
00002130: 61 06 22 8F 20 53 55 42 52 4F 55 54 49 4E 45 20 |a.". SUBROUTINE |
00002140: 50 55 54 20 52 41 42 42 49 54 2C 20 49 4E 50 55 |PUT RABBIT, INPU|
00002150: 54 20 59 2C 20 54 4E 00 81 61 10 22 58 B2 32 32 |T Y, TN..a."X.22|
00002160: AB 32 AC 54 4E 3A 8D 20 38 30 35 30 3A 99 20 22 |.2.TN:. 8050:. "|
00002170: 05 22 3B 3A 8B 20 54 4E B1 31 20 A7 20 38 37 34 |.";:. TN.1 . 874|
00002180: 30 00 B9 61 1A 22 99 20 22 C1 D1 D3 11 9D 9D 9D |0..a.". ".......|
00002190: D6 D7 D8 11 9D 9D 9D DA DB DC 22 3A 81 20 59 36 |..........":. Y6|
000021A0: B2 30 20 A4 20 32 3A 97 20 A5 41 28 59 AA 32 29 |.0 . 2:. .A(Y.2)|
000021B0: AA 59 36 2C 39 3A 82 3A 8E 00 DD 61 24 22 81 20 |.Y6,9:.:...a$". |
000021C0: 4A B2 31 20 A4 20 54 4E 3A 99 20 22 05 C1 D1 D3 |J.1 . TN:. "....|
000021D0: 11 9D 9D 9D D6 D7 D8 11 9D 9D 9D 22 3B 00 FF 61 |...........";..a|
000021E0: 2E 22 8B 20 4A B2 31 20 A7 20 99 20 22 DA DB A6 |.". J.1 . . "...|
000021F0: 12 90 20 92 91 91 22 3B 3A 89 20 38 37 38 30 00 |.. ...";:. 8780.|
00002200: 1B 62 38 22 8B 20 4A B2 54 4E 20 A7 20 99 20 22 |.b8". J.TN . . "|
00002210: FF DB DC 22 3A 89 20 38 37 38 30 00 35 62 42 22 |...":. 8780.5bB"|
00002220: 99 20 22 FF DB A6 12 90 20 92 91 91 22 3B 3A 89 |. "..... ...";:.|
00002230: 20 38 37 38 30 00 5D 62 4C 22 81 20 59 36 B2 30 | 8780.]bL". Y6.0|
00002240: 20 A4 20 32 3A 97 20 A5 41 28 59 AA 32 29 AA 59 | . 2:. .A(Y.2).Y|
00002250: 36 2C 39 3A 82 3A 58 B2 58 AA 34 3A 82 00 63 62 |6,9:.:X.X.4:..cb|
00002260: 56 22 8E 00 91 62 60 22 8F 20 53 55 42 52 4F 55 |V"...b`". SUBROU|
00002270: 54 49 4E 45 20 50 55 54 20 41 4C 4C 20 52 41 42 |TINE PUT ALL RAB|
00002280: 42 49 54 53 2C 20 49 4E 50 55 54 20 42 4E 2C 54 |BITS, INPUT BN,T|
00002290: 4E 00 AD 62 6A 22 57 54 24 B2 22 30 30 30 30 30 |N..bj"WT$."00000|
000022A0: 31 22 3A 8B 20 42 4E B3 32 20 A7 20 8E 00 DE 62 |1":. BN.2 . ...b|
000022B0: 74 22 59 B2 37 3A 81 20 49 B2 32 20 A4 20 42 4E |t"Y.7:. I.2 . BN|
000022C0: 3A 59 B2 59 AA 33 3A 8D 20 38 31 33 30 3A 8D 20 |:Y.Y.3:. 8130:. |
000022D0: 38 37 31 30 3A 8D 20 37 30 30 3A 82 3A 8E 00 02 |8710:. 700:.:...|
000022E0: 63 7E 22 8F 20 53 55 42 52 4F 55 54 49 4E 45 20 |c~". SUBROUTINE |
000022F0: 41 44 44 20 52 41 42 42 49 54 20 52 45 51 55 45 |ADD RABBIT REQUE|
00002300: 53 54 00 1D 63 88 22 99 20 22 93 22 3A 97 20 35 |ST..c.". ".":. 5|
00002310: 33 32 38 31 2C 34 3A 8D 20 39 33 37 30 00 4D 63 |3281,4:. 9370.Mc|
00002320: 92 22 58 B2 31 31 3A 59 B2 31 31 3A 8D 20 38 30 |."X.11:Y.11:. 80|
00002330: 35 30 3A 99 20 22 90 48 45 4C 50 1D 57 49 54 48 |50:. ".HELP.WITH|
00002340: 1D 4D 55 4C 54 49 50 4C 59 49 4E 47 22 00 8C 63 |.MULTIPLYING"..c|
00002350: 9C 22 58 B2 31 37 3A 59 B2 59 AA 32 3A 8D 20 38 |."X.17:Y.Y.2:. 8|
00002360: 30 35 30 3A 99 20 22 52 41 42 42 49 54 53 3F 22 |050:. "RABBITS?"|
00002370: 3A 58 B2 31 38 3A 59 B2 59 AA 32 3A 8D 20 38 30 |:X.18:Y.Y.2:. 80|
00002380: 35 30 3A 99 20 22 28 59 2F 4E 29 22 00 B2 63 A6 |50:. "(Y/N)"..c.|
00002390: 22 8D 20 38 30 31 30 3A 8B 20 41 24 B3 B1 22 59 |". 8010:. A$.."Y|
000023A0: 22 20 AF 20 41 24 B3 B1 22 4E 22 20 A7 20 38 38 |" . A$.."N" . 88|
000023B0: 37 30 00 C4 63 B0 22 48 24 B2 41 24 3A 8D 20 37 |70..c."H$.A$:. 7|
000023C0: 30 30 3A 8E 00 E8 63 BA 22 8F 20 53 55 42 52 4F |00:...c.". SUBRO|
000023D0: 55 54 49 4E 45 20 51 55 49 5A 20 4F 52 20 43 41 |UTINE QUIZ OR CA|
000023E0: 4C 43 55 4C 41 54 4F 52 00 03 64 C4 22 99 20 22 |LCULATOR..d.". "|
000023F0: 93 22 3A 97 20 35 33 32 38 31 2C 30 3A 8D 20 39 |.":. 53281,0:. 9|
00002400: 33 37 30 00 32 64 CE 22 58 B2 31 30 3A 59 B2 31 |370.2d."X.10:Y.1|
00002410: 32 3A 8D 20 38 30 35 30 3A 99 20 22 05 51 55 49 |2:. 8050:. ".QUI|
00002420: 5A 1D 4F 52 1D 43 41 4C 43 55 4C 41 54 4F 52 20 |Z.OR.CALCULATOR |
00002430: 3F 22 00 51 64 D8 22 58 B2 31 37 3A 59 B2 31 34 |?".Qd."X.17:Y.14|
00002440: 3A 8D 20 38 30 35 30 3A 99 20 22 28 51 2F 43 29 |:. 8050:. "(Q/C)|
00002450: 22 00 77 64 E2 22 8D 20 38 30 31 30 3A 8B 20 41 |".wd.". 8010:. A|
00002460: 24 B3 B1 22 51 22 20 AF 20 41 24 B3 B1 22 43 22 |$.."Q" . A$.."C"|
00002470: 20 A7 20 38 39 33 30 00 83 64 EC 22 8D 20 37 30 | . 8930..d.". 70|
00002480: 30 3A 8E 00 9E 64 F6 22 8F 20 53 55 42 52 4F 55 |0:...d.". SUBROU|
00002490: 54 49 4E 45 20 51 55 49 5A 20 49 4E 49 54 00 D7 |TINE QUIZ INIT..|
000024A0: 64 00 23 99 20 22 13 22 3B 3A 81 20 49 B2 31 20 |d.#. ".";:. I.1 |
000024B0: A4 20 31 39 3A 99 20 22 1D 1D 1D 1D 1D 1D 1D 1D |. 19:. "........|
000024C0: 1D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
000024D0: 20 20 20 20 22 3A 82 00 04 65 0A 23 58 B2 31 38 | ":...e.#X.18|
000024E0: 3A 81 20 59 B2 32 31 20 A4 20 32 32 3A 8D 20 38 |:. Y.21 . 22:. 8|
000024F0: 30 35 30 3A 99 20 22 20 20 20 20 20 20 20 20 20 |050:. " |
00002500: 20 22 3A 82 00 3E 65 14 23 99 20 22 90 22 3B 3A | ":..>e.#. ".";:|
00002510: 81 20 49 B2 33 20 A4 20 33 33 20 A9 20 33 30 3A |. I.3 . 33 . 30:|
00002520: 81 20 4A B2 31 33 20 A4 20 31 39 20 A9 20 33 3A |. J.13 . 19 . 3:|
00002530: 58 B2 49 3A 59 B2 4A 3A 8D 20 38 30 35 30 00 5F |X.I:Y.J:. 8050._|
00002540: 65 1E 23 8D 20 31 32 32 30 3A 82 3A 58 B2 49 AA |e.#. 1220:.:X.I.|
00002550: 33 3A 59 B2 31 38 3A 8D 20 31 32 34 30 3A 82 00 |3:Y.18:. 1240:..|
00002560: 81 65 28 23 58 B2 34 3A 59 B2 32 33 3A 8D 20 38 |.e(#X.4:Y.23:. 8|
00002570: 30 35 30 3A 99 20 22 05 52 49 47 48 54 3D 22 52 |050:. ".RIGHT="R|
00002580: 54 00 9E 65 32 23 58 B2 33 30 3A 8D 20 38 30 35 |T..e2#X.30:. 805|
00002590: 30 3A 99 20 22 57 52 4F 4E 47 3D 22 57 52 00 DA |0:. "WRONG="WR..|
000025A0: 65 3C 23 58 4C B2 32 36 3A 59 B2 36 3A 4E B2 54 |e<#XL.26:Y.6:N.T|
000025B0: 4E 3A 8D 20 38 32 37 30 3A 58 B2 31 38 3A 59 B2 |N:. 8270:X.18:Y.|
000025C0: 39 3A 8D 20 38 30 35 30 3A 8D 20 31 31 38 30 3A |9:. 8050:. 1180:|
000025D0: 58 4C B2 32 36 3A 4E B2 42 4E 00 03 66 46 23 8D |XL.26:N.BN..fF#.|
000025E0: 20 38 32 37 30 3A 58 B2 32 32 3A 59 B2 31 32 3A | 8270:X.22:Y.12:|
000025F0: 8D 20 38 30 35 30 3A 99 20 22 B8 B8 B8 B8 B8 B8 |. 8050:. "......|
00002600: 22 3A 8E 00 24 66 50 23 8F 20 53 55 42 52 4F 55 |":..$fP#. SUBROU|
00002610: 54 49 4E 45 20 43 41 4C 43 55 4C 41 54 45 20 43 |TINE CALCULATE C|
00002620: 41 52 52 59 00 41 66 5A 23 43 28 31 2C 31 29 B2 |ARRY.AfZ#C(1,1).|
00002630: A5 54 28 A5 4D 28 54 4E 29 AC A5 4D 28 42 4E 29 |.T(.M(TN)..M(BN)|
00002640: 29 00 65 66 64 23 43 28 31 2C 32 29 B2 A5 54 28 |).efd#C(1,2)..T(|
00002650: A5 54 28 54 4E 29 AC A5 4D 28 42 4E 29 AA 43 28 |.T(TN)..M(BN).C(|
00002660: 31 2C 31 29 29 00 82 66 6E 23 43 28 32 2C 31 29 |1,1))..fn#C(2,1)|
00002670: B2 A5 54 28 A5 4D 28 54 4E 29 AC A5 54 28 42 4E |..T(.M(TN)..T(BN|
00002680: 29 29 00 A6 66 78 23 43 28 32 2C 32 29 B2 A5 54 |))..fx#C(2,2)..T|
00002690: 28 A5 54 28 54 4E 29 AC A5 54 28 42 4E 29 AA 43 |(.T(TN)..T(BN).C|
000026A0: 28 32 2C 31 29 29 00 AC 66 82 23 8E 00 D9 66 8C |(2,1))..f.#...f.|
000026B0: 23 8F 20 53 55 42 52 4F 55 54 49 4E 45 20 50 55 |#. SUBROUTINE PU|
000026C0: 54 20 43 41 52 52 59 2C 20 49 4E 50 55 54 20 52 |T CARRY, INPUT R|
000026D0: 4F 57 2C 20 44 49 47 49 54 00 1D 67 96 23 58 B2 |OW, DIGIT..g.#X.|
000026E0: 33 30 AB 44 49 AC 34 3A 59 B2 33 3A 8D 20 38 30 |30.DI.4:Y.3:. 80|
000026F0: 35 30 3A 99 20 22 92 20 20 11 9D 9D 20 20 05 22 |50:. ". ... ."|
00002700: 3A 58 B2 32 36 AB 44 49 AC 34 3A 8D 20 38 30 35 |:X.26.DI.4:. 805|
00002710: 30 3A 4E 55 B2 43 28 52 4F 2C 44 49 29 00 3A 67 |0:NU.C(RO,DI).:g|
00002720: A0 23 8B 20 4E 55 B1 30 20 A7 20 99 20 22 05 22 |.#. NU.0 . . "."|
00002730: 3B 3A 8D 20 31 30 33 30 3A 8E 00 40 67 AA 23 8E |;:. 1030:..@g.#.|
00002740: 00 5D 67 B4 23 8F 20 53 55 42 52 4F 55 54 49 4E |.]g.#. SUBROUTIN|
00002750: 45 20 46 49 4E 49 53 48 20 51 55 49 5A 00 6C 67 |E FINISH QUIZ.lg|
00002760: BE 23 8B 20 4E 52 B2 31 20 A7 20 8E 00 A3 67 C8 |.#. NR.1 . ...g.|
00002770: 23 99 20 22 05 22 3A 58 B2 31 34 3A 59 B2 31 36 |#. ".":X.14:Y.16|
00002780: 3A 8D 20 38 30 35 30 3A 99 20 22 BA CC 11 9D 9D |:. 8050:. ".....|
00002790: D0 CF 22 3A 58 B2 31 38 3A 59 B2 58 3A 8D 20 38 |..":X.18:Y.X:. 8|
000027A0: 30 35 30 00 D0 67 D2 23 99 20 22 B8 B8 B8 B8 B8 |050..g.#. ".....|
000027B0: B8 B8 B8 B8 B8 22 3B 3A 58 4C B2 32 36 3A 59 B2 |.....";:XL.26:Y.|
000027C0: 32 31 3A 4E B2 52 45 3A 8D 20 38 32 37 30 3A 8E |21:N.RE:. 8270:.|
000027D0: 00 F6 67 DC 23 8F 20 53 55 42 52 4F 55 54 49 4E |..g.#. SUBROUTIN|
000027E0: 45 20 52 49 47 48 54 20 41 4E 53 57 45 52 20 54 |E RIGHT ANSWER T|
000027F0: 4F 20 51 55 49 5A 00 21 68 E6 23 8D 20 35 30 30 |O QUIZ.!h.#. 500|
00002800: 3A 81 20 49 B2 31 33 20 A4 20 31 39 20 A9 20 33 |:. I.13 . 19 . 3|
00002810: 3A 59 4C B2 49 3A 58 4C B2 33 3A 8D 20 38 35 37 |:YL.I:XL.3:. 857|
00002820: 30 00 54 68 F0 23 8B 20 49 B2 31 39 20 A7 20 58 |0.Th.#. I.19 . X|
00002830: B2 36 3A 59 B2 31 38 3A 8D 20 38 30 35 30 3A 99 |.6:Y.18:. 8050:.|
00002840: 20 22 20 20 20 11 9D 9D 9D 20 20 20 11 9D 9D 9D | " .... ....|
00002850: 20 20 20 22 00 61 68 FA 23 8D 20 38 34 30 30 3A | ".ah.#. 8400:|
00002860: 82 00 9D 68 04 24 52 54 B2 52 54 AA 31 3A 58 B2 |...h.$RT.RT.1:X.|
00002870: 34 3A 59 B2 32 33 3A 81 20 49 B2 31 20 A4 20 31 |4:Y.23:. I.1 . 1|
00002880: 30 3A 8D 20 38 30 35 30 3A 99 20 22 1F 52 49 47 |0:. 8050:. ".RIG|
00002890: 48 54 3D 22 52 54 3A 8D 20 38 30 35 30 00 B3 68 |HT="RT:. 8050..h|
000028A0: 0E 24 99 20 22 05 52 49 47 48 54 3D 22 52 54 3A |.$. ".RIGHT="RT:|
000028B0: 82 3A 8E 00 D9 68 18 24 8F 20 53 55 42 52 4F 55 |.:...h.$. SUBROU|
000028C0: 54 49 4E 45 20 57 52 4F 4E 47 20 41 4E 53 57 45 |TINE WRONG ANSWE|
000028D0: 52 20 54 4F 20 51 55 49 5A 00 FF 68 22 24 81 20 |R TO QUIZ..h"$. |
000028E0: 49 B2 31 33 20 A4 20 31 39 20 A9 20 33 3A 59 4C |I.13 . 19 . 3:YL|
000028F0: B2 49 3A 58 4C B2 33 33 3A 8D 20 38 35 37 30 00 |.I:XL.33:. 8570.|
00002900: 33 69 2C 24 8B 20 49 B2 31 39 20 A7 20 58 B2 33 |3i,$. I.19 . X.3|
00002910: 36 3A 59 B2 31 38 3A 8D 20 38 30 35 30 3A 99 20 |6:Y.18:. 8050:. |
00002920: 22 20 20 20 11 9D 9D 9D 20 20 20 11 9D 9D 9D 20 |" .... .... |
00002930: 20 20 22 00 40 69 36 24 8D 20 38 34 30 30 3A 82 | ".@i6$. 8400:.|
00002940: 00 76 69 40 24 57 52 B2 57 52 AA 31 3A 58 B2 33 |.vi@$WR.WR.1:X.3|
00002950: 30 3A 59 B2 32 33 3A 81 20 49 B2 31 20 A4 20 31 |0:Y.23:. I.1 . 1|
00002960: 30 3A 8D 20 38 30 35 30 3A 99 20 22 1F 57 52 4F |0:. 8050:. ".WRO|
00002970: 4E 47 3D 22 57 52 00 93 69 4A 24 8D 20 38 30 35 |NG="WR..iJ$. 805|
00002980: 30 3A 99 20 22 05 57 52 4F 4E 47 3D 22 57 52 3A |0:. ".WRONG="WR:|
00002990: 82 3A 8E 00 BD 69 54 24 8F 20 53 55 42 52 4F 55 |.:...iT$. SUBROU|
000029A0: 54 49 4E 45 20 44 49 53 50 4C 41 59 20 52 45 53 |TINE DISPLAY RES|
000029B0: 55 4C 54 20 46 52 4F 4D 20 51 55 49 5A 00 F1 69 |ULT FROM QUIZ..i|
000029C0: 5E 24 97 20 35 33 32 38 31 2C 31 3A 99 20 22 93 |^$. 53281,1:. ".|
000029D0: 22 3A 58 B2 31 36 3A 59 B2 35 3A 8D 20 38 30 35 |":X.16:Y.5:. 805|
000029E0: 30 3A 99 20 22 90 59 4F 55 52 20 53 43 4F 52 45 |0:. ".YOUR SCORE|
000029F0: 22 00 0C 6A 68 24 58 B2 32 30 3A 59 B2 37 3A 8D |"..jh$X.20:Y.7:.|
00002A00: 20 38 30 35 30 3A 99 20 22 49 53 22 00 2C 6A 72 | 8050:. "IS".,jr|
00002A10: 24 58 B2 31 37 3A 59 B2 39 3A 8D 20 38 30 35 30 |$X.17:Y.9:. 8050|
00002A20: 3A 99 20 52 54 22 52 49 47 48 54 22 00 4C 6A 7C |:. RT"RIGHT".Lj||
00002A30: 24 58 B2 31 38 3A 59 B2 31 31 3A 8D 20 38 30 35 |$X.18:Y.11:. 805|
00002A40: 30 3A 99 20 22 4F 55 54 20 4F 46 22 00 83 6A 86 |0:. "OUT OF"..j.|
00002A50: 24 58 B2 31 36 3A 59 B2 31 33 3A 8D 20 38 30 35 |$X.16:Y.13:. 805|
00002A60: 30 3A 99 20 57 52 AA 52 54 20 22 50 52 4F 42 4C |0:. WR.RT "PROBL|
00002A70: 45 4D 22 3B 3A 8B 20 57 52 AA 52 54 20 A7 20 99 |EM";:. WR.RT . .|
00002A80: 22 53 22 00 90 6A 90 24 8D 20 38 31 31 30 3A 8E |"S"..j.$. 8110:.|
00002A90: 00 B2 6A 9A 24 8F 20 53 55 42 52 4F 55 54 49 4E |..j.$. SUBROUTIN|
00002AA0: 45 20 43 49 52 43 4C 45 20 4F 46 20 43 41 52 52 |E CIRCLE OF CARR|
00002AB0: 4F 54 00 CC 6A A4 24 81 20 49 B2 2E 31 20 A4 20 |OT..j.$. I..1 . |
00002AC0: 36 2E 32 38 20 A9 20 2E 34 31 38 36 00 FF 6A AE |6.28 . .4186..j.|
00002AD0: 24 58 B2 32 30 AA B5 28 31 35 AC BE 28 49 29 29 |$X.20..(15..(I))|
00002AE0: 3A 59 B2 31 32 AA B5 28 36 AC BF 28 49 29 29 3A |:Y.12..(6..(I)):|
00002AF0: 8D 20 38 30 35 30 3A 8D 20 31 32 34 30 3A 82 00 |. 8050:. 1240:..|
00002B00: 26 6B B8 24 58 4C B2 33 3A 59 4C B2 34 3A 8D 20 |&k.$XL.3:YL.4:. |
00002B10: 38 35 37 30 3A 58 4C B2 33 35 3A 59 4C B2 34 3A |8570:XL.35:YL.4:|
00002B20: 8D 20 38 35 37 30 00 51 6B C2 24 58 4C B2 33 3A |. 8570.Qk.$XL.3:|
00002B30: 59 4C B2 32 33 3A 8D 20 38 35 37 30 3A 58 4C B2 |YL.23:. 8570:XL.|
00002B40: 33 35 3A 59 4C B2 32 33 3A 8D 20 38 35 37 30 3A |35:YL.23:. 8570:|
00002B50: 8E 00 00 00 FF FF 4C |......L |
.@;@... 53272,19:. 53281,1:. "..":VO.15:
. 53270,B(53270).16.P@..D$."............
.............":. 53282,0:S.54272..@....R
(X)..(.(1).X.1)..@(...T(X)..(X.10)..@2..
.M(X).X.10..T(X).Y@<.NH.9: . NUMBER OF H
OLES IN SECTION 2.$AF.. F%(1,NH), LOC%(N
H), I(2), C(2,3):. ACTUAL LOCATION, LOGI
CAL LOCATION.GAP.. I. 1 . NH: . F%(0,I),
F%(1,I):.:. INTERMEDIATE RESULT, CARRY.
|AZ.. 3,11,6,12,2,17..AD.. 11,13,16,12,1
8,17..AN.. 22,14,26,15,30,15.LAX...D(X).
.(.(X).2.30258509.1)..A....A(Y).55255.X.
40.Y..A... 2000..B... SUBROUTINE SONG..B
... 198,0.-B..CS..R(8):. CS.LS . 520.>B
..SC..50:LS.CS.WB..BASE.4096.256.CS:. C5
.S . S.24:. C5,0:.:. CLEAR CHIP..B&.. C5
.0 . VO:. S.24,C5:.:. SMOOTHLY INCREASE
VOLUME.HB0.. S.5,B(BASE.1):. A/D..B:.. S
.6,B(BASE.2):. S/R..CD.WF.B(BASE):. WF.
65 . . S.3,255.#CN.LT.B(BASE.3):BASE.BAS
E.4.GCX.. C5.0 . 2:FF%(C5).B(BASE.C5):..
FCB.. CS . . A$:. A$." " . 670..CL.. FF%
(0).FF%(1).FF%(2).765 . 670..CV.. S.1,FF
%(0):. S,FF%(1):. S.4,WF.JC... C5.1 . FF
%(2)..75:...C... S.4,WF.1:. C5.1 . LT.SC
:...D..BASE.BASE.3:. 600.!D... C5.VO . 0
. .1:. S.24,C5:..<D... C5.S . S.24:. C5
,0:..BD....ZD... SUBROUTINE A NOTE..DF..
S.24,VO..5:. S.5,90:. S.3,10:. S.2,250:
. S.4,65..DP.. S.1,.R(100).20:. C5.1 . 1
0:.:. S.4,64..DZ.. C5.S . S.5:. C5,0:.:.
S.24,0:...D...E WRONG SOUND.'E... C5.S
. S.24:. C5,0:.:. C5.0 . VO:. S.24,C5:..
GE... S.5,90:. S.3,10:. S.2,250.|E... S.
4,65:. S.1,11:. S,48:. C5.1 . 600:.:. S.
4,64..E... S.4,65:. S.1,10:. S,143:. C5.
1 . 600:.:. S.4,64..E... S.4,65:. S.1,9:
. S,104:. C5.1 . 600:.:. S.4,64..F .. C5
.VO . 0 . .1:. S.24,C5:.:. C5.S . S.23:.
C5,0.%F*..:..>F... SUBROUTINES SHAPES.K
F... RABBIT.EF... ".@A...BC...DE.";:..RF
... NUMBER..F... NU.9 . NU.0 . ..GF... N
U.1 . 1060,1070,1080,1090,1100,1110,1120
,1130,1140,1150..F$.. ".FG...HI.";:...F.
.. ".J......KL.";:...G8.. ".MN...OP.";:.
..GB.. ".QR...ST.";:..2GL.. ".UV...WX.";
:..GGV.. ".YZ...S[.";:..\G`.. ".\]...!T.
";:..QGJ.. ".^_...#$.";:...GT.. ".%&...'
T.";:...G~.. ".()...*I.";:...G... QUESTI
ON MARK.DG... ".+N...,$.";:..UG... MULT.
SIGN..G... "MN...NM";:...G... HOLE..H..
. "..";:...HD.. LONG HOLE.#HN.. "..4 5."
;:..0HX.. CARROT.UH... 8050:. "....=....
.67...89.";:..`HP.. MENU..HZ.. ".";:. 53
281,5:RT.0:WR.0:LA.0:CA.0..H..XL.3:YL.15
:. 8570:XL.22:YL.20:. 8570..H..XL.33:YL.
15:. 8570:XL.36:YL.18:. 8570..I..X.8:Y.4
:. 8050:. ". MICROMULTIPLICATION ".9I..
X.8:Y.4:. 8050:. " MICROMULTIPLICATION
".?I....ZI .. "....... 1. RABBITS".`I*..
.{I>.. "....... 2. NUMBERS"..IH....I\..
"....... 3. MULTIPLYING RABBITS"..IF...U
IZ.. "....... 4. MULTIPLYING NUMBERS"..I
.....J... "........ S. SOUND ON ";:. VO.
0 . . "..FF";..J....)J..CS.0:. VO . . 53
0.]J... 8010:. A$."." . . 53281,1:. 5327
2,21:. "..":..|J... A$."S" . VO.15.VO:.
2040..JJ.. A.4 . A.1 . 2230..JT.. 700:.
A . 3000,4000,5000,6000.PJ... SECTION 1:
RABBITS..KB.. 53281,5:. "..";:. I.1 . 9
:X.4.I.1:Y.14.2.(I.2..(I.2)).>KL.. 8050:
. 1220:.:. ".";:X.19:Y.1:. 8050:. 1160.P
KV.. D$" * ENTER NUMBER OF RABBITS TO AP
PEAR *";..K... 8010:. A$.G(13) . 2000..K
... A$."9" . A$."1" . 3040..K... 700:. 8
090:X.19:Y.1:. 8050:NU.A:. ".";:. 1030..
L... I.1 . A:XL.4.I.1:YL.14.2.(I.2..(I.2
)):. 8570..L...:. ".".[L... I.1 . A:X.4.
I.1:Y.9.2.(I.2..(I.2)):. 8050:NU.I:. 103
0:..ML... 8110:. 3000..L .. SECTION 2: N
UMBERS.AL... 53281,5:. "..":. I.1 . NH:X
.F%(0,I):Y.F%(1,I):. 8050.ZL... 1220:.:.
8480:CH.1..L... ".";:X.29:Y.3:. 8050:.
1160.-MH.. D$" * ENTER NUMBER OF RABB
ITS SHOWN *";.RMR.. 8010:. A$.G(13) . .
700:. 2000.OM... A$."9" . A$."0" . 4050.
.M... 700:. 8090:X.29:Y.3:. 8050:. A.N .
4120.PM... ".";:NU.A:. 1030:CH.CH.1:. 7
40:. CH.4 . 4030..M... ".";:. 8620:X.29:
Y.3:. 8050..N..NU.N:. 1030:. 8110:. 4010
.;N... ".";:NU.N:. 1030:. 8620:. 500:. 8
110.NN".RT.RT.1:. 4010.SN... SECTION 3:
MULTIPLYING RABBITS..N..VP.2:. 8830..N..
. 53281,5:. ".".HN..TN..R(RT.3):BN..R(RT
.2):. TN.9 . BN.6 . 5030..N..RE.TN.BN:.
RE.LA . 5030..O..LA.RE:X.12:Y.VP:. ".";:
. 8050:NU.BN:. 1030:X.15:. 8050.OOD.. 11
80:X.18:. 8050:NU.TN:. 1030:X.21:. 8050.
{ON.. "CC...CC":CH.1:DI.1:. 8660:Y.7:. 8
710..OX.. H$."Y" . . 8800.KO..XL.21.3.DI
:LG.(RE.9) . (DI.1):. LG . RA..T(RE):. 5
110.YO..RA..M(RE)..O... ".";:X.XL:Y.VP:.
8050:. 1160.!P... 8010:. A$.G(13) . . 7
00:. 2000.>P... A$."9" . A$."0" . 5120.]
P... 700:. 8090:. RA.A . 5230..P..CH.CH.
1:. ".";:X.XL:Y.VP:. 8050:NU.A:. 1030:.
CH.4 . 5180..P(.DI.1:. 740..P2.X.24:Y.VP
:. 8050:. " ...... ":. 5090..P<.
. 740:. H$."N" . . 8800.1QF.. ".";:. RE.
10 . X.24:Y.VP:. 8050:NU.RE:. 1030:. 525
0.CQP.X.24:Y.VP:. 8050:NU..T(RE):. 1030:
X.27:. 8050.XQZ.NU..M(RE):. 1030..QD.. 5
250..QN.. ".";:X.XL:Y.VP:. 8050:NU.A:. 1
030:. LG . DI.2:. 5090..QX.RT.RT.1:. H$.
"N" . . 8800..Q}.. 500..Q... ".";:. 8110
:. 5020..RP.. SECTION 4: QUIZ.0RZ.. 8890
:. A$."C" . 7000.DR... 53281,6:. ".".}R.
.TN..R(RT.2.5):BN..R(RT.1.5.3):. TN.12 .
BN.12 . 6030..R... TN.BN . TE.TN:TN.BN:
BN.TE.BR..RE.TN.BN:. RE.999 . RE.LA . 60
30..R..NR.1.(BN.9):. 9040:LA.RE:CH.1:RO.
1:I(1).TN..M(BN)..S..I(2).TN..T(BN):. 89
50.9S... RO.1 . I(1).0 . MD..D(TN):. 610
0.JSJ.MD..D(I(RO)).^ST.DI.1:YS.10.3.RO..
S..XS.34.4.(DI.RO):. DI . 6120,6130,6140
. S..RA..M(I(RO)):. 6150..S..RA..M(.T(I(
RO))):. 6150.QS..RA..T(.T(I(RO)))..S..X.
XS:Y.YS.1:. 8050:. ".NM"..T... 8010:. A$
.G(13) . . 700:. 9300:. 2000.9T... A$."9
" . A$."0" . 6160.XT$.. 700:. 8090:. RA.
A . 6250..T... ".";:X.XS:Y.YS:. 8050:NU.
A:. 1030:. 740. T8.CH.CH.1:. CH.2 . 6230
..TB.X.XS:Y.YS.MTL.. 8050:. " ... ";:.
6150..UV.. ".";:. RO.1 . NR:XL.30.4.RO:
Y.10.3.RO:N.I(RO):. 8270:..#U`.. 9140:.
9240:. 6290.RUJ.. ".";:X.XS:Y.YS:. 8050:
NU.A:. 1030:. 9100.PUT.. DI..MD . DI.DI.
1:. 6110..U~.. RO..NR . RO.RO.1:. 6080.
U... 9140:. 9180..U... ".";:. 8110:. 809
0:. 6030..UX.. SECTION 4: CALCULATOR..VB
.. 53281,1:. ".":CA.1:O.1:. 8170:. ".";:
Y.6:. 8320:TV.M.-VL.. A$.G(13) . 2000.ZV
V.X.18:Y.9:. 8050:. ".";:. A$.G(19) . 70
10..V... 1180:O.2:. 8170:. ".";:Y.9:. 83
20..V..BN.M:. A$.G(13) . 2000..V... A$.G
(19) . 7010..V..X.22:Y.11:. 8050:. "....
...........":O.3:. 8170:Y.13:N.TV.BN..W.
.. ".";:. 8270.#W... 8010:. A$.G(13) . 2
000.AW... A$.G(19) . . 700:. 7010.LWF..
7090.EW@.. SUBROUTINES MOVING.}WJ.. SUBR
OUTINE GET A$..WT.. 198,0..W^.. A$:. A$.
"" . 8030..WH.A.E(A$):..GWR.. SUBROUTINE
GOTOXY.ZW|.. Y.1 . . ".";..W... Y.1 . .
214,Y.2:...X... 211,X.1:.. X... SUBROUT
INE CLEAR BOTTOM.UX... D$"
";:..UX... SUBR
OUTINE WAIT FOR A KEY..X... D$" * PR
ESS ANY KEY TO CONTINUE *";:. 8010:..BXB
.. SUBROUTINE WAIT.SXL.TI$."000000"..XV.
. TI$.WT$ . 8150..X.....Y... SUBROUTINE
CAL. MESSAGES.PY..X.1:Y.17:. 8050:. "..
"
..Y... O.1 . O.2 . . " ENTER UP TO 4-DIG
IT NUMBER ".DY. . O.1 . . " <S
PACE BAR> FOR NEXT NUMBER "..Y.
. O.2 . . " <SPACE BAR> FOR RESULT
".8Z. . O.1 . O.2 . . " <INST/
DEL> TO REMOVE LAST DIGIT ".GZ& . "
<CLR/HOME> TO BEGIN A NEW PROBLEM ".
.Z0 . " <RETURN> FOR MENU
"..Z: . O.3 . . I.1 . 3:. "
";:...ZD
...[N . SUBROUTINE OUTPUT A NUMBER; INPU
T XL: RIGHTMOST X, Y, N.E[X MAX.1:. N.0
. MAX..(.(N)..(10).1).[B X.XL:. 8050:.
Z3.1 . MAX:NU..M(N):. 1030:. ".......";.
.[L N..T(N):.:. MAX.4 . CA.1 . . ". ...
";..[V ...[. . SUBROUTINE GET A NUMBER
, INPUT Y, OUTPUT M..[. M.0:TN.0:XL.34..
\. . A$:. A$."" . 8340.C\. A.E(A$):. A$.
G(13) . A$." " . A$.G(19) . . 700:..A\.
. A$.G(20) . . 700:. 8380.~\. . A$."9" .
A$."0" . 8340..\. . 700:M.10.M.A:. M.10
000 . N.M:. 8270:. 8340.S\. M..T(M):. A$
.G(20) . N.M:. 8270..\F . 8340..\P . SUB
ROUTINE IN RABBIT.&]Z X.XL:Y.YL.2:. 8050
:. "AQS....VWX....Z..".E]. . Y6.0 . 2:.
.A(YL).Y6,9:..F]. . 8050:. " ":Y.YL.1:
. 8050..]. . "AQS.......":. Y6.0 . 2:. .
A(YL).Y6,9:...].!. 8050:. " .... ":Y
.YL:. 8050..].!. "...01.";:. Y6.0 . 2:.
.A(YL).Y6,9:...].!. 8050:. 1220:...^ !.
SUBROUTINE GET N & LOC%().A^*!N..R(RT.3)
:TE.0:. N.9 . N.LA . 8490.A^4!LA.N:. I.1
. NH:LOC%(I).0:...^>!. I.1 . NH:. .(1).
N.20 . 8550..^H!. LOC%(I)..0 . 8550..^R!
. TE.N . 8550..^\!LOC%(I).1:XL.F%(0,I):Y
L.F%(1,I):. 8570:TE.TE.1..^F!.:. TE.N .
8510..^P!..._Z!. SUBROUTINE OUT RABBIT.R
_.!X.XL:Y.YL:. 8050:. "...01.";:. Y6.0 .
2:. .A(YL).Y6,9:..\_.!. 700.._.!Y.YL.1:
. 8050:. "AQS.......":. Y6.0 . 2:. .A(YL
).Y6,9:..._.!. 700.J_.!Y.YL.2:. 8050:. "
AQS....VWX....Z..".._.!. Y6.0 . 2:. .A(Y
L).Y6,9:.:. 700:...`.!. SUBROUTINE PUT #
S ON RABBITS.;`.!TE.0:. I.1 . NH:. LOC%(
I).0 . 8650.Q`.!X.F%(0,I):Y.F%(1,I).5:.
8050:TE.TE.1:NU.TE:. 1030.Y`J!.:...`T!.
SUBROUTINE MAKE HOLE, INPUT TN. BN.S`.!.
".";:Y.9:. I.1 . BN:X.22.2.TN:. 8050:Y.
Y.3..`.!. 1220:. TN.1 . 8700. A.!. "..";
:. J.23.2.TN . 18.2.TN:. " ";:.:. ".5.";
..A.!. 700:.:..WA.". SUBROUTINE PUT RABB
IT, INPUT Y, TN..A."X.22.2.TN:. 8050:. "
.";:. TN.1 . 8740..A.". "AQS....VWX....Z
..":. Y6.0 . 2:. .A(Y.2).Y6,9:.:...A$".
J.1 . TN:. ".AQS....VWX....";..A.". J.1
. . "Z.... ...";:. 8780..B8". J.TN . . "
...":. 8780.5BB". "..... ...";:. 8780.]B
L". Y6.0 . 2:. .A(Y.2).Y6,9:.:X.X.4:..CB
V"...B`". SUBROUTINE PUT ALL RABBITS, IN
PUT BN,TN..BJ"WT$."000001":. BN.2 . ...B
T"Y.7:. I.2 . BN:Y.Y.3:. 8130:. 8710:. 7
00:.:...C~". SUBROUTINE ADD RABBIT REQUE
ST..C.". ".":. 53281,4:. 9370.MC."X.11:Y
.11:. 8050:. ".HELP.WITH.MULTIPLYING"..C
."X.17:Y.Y.2:. 8050:. "RABBITS?":X.18:Y.
Y.2:. 8050:. "(Y/N)"..C.". 8010:. A$.."Y
" . A$.."N" . 8870.DC."H$.A$:. 700:...C.
". SUBROUTINE QUIZ OR CALCULATOR..DD". "
.":. 53281,0:. 9370.2DN"X.10:Y.12:. 8050
:. ".QUIZ.OR.CALCULATOR ?".QDX"X.17:Y.14
:. 8050:. "(Q/C)".WD.". 8010:. A$.."Q" .
A$.."C" . 8930..D.". 700:...D.". SUBROU
TINE QUIZ INIT.WD.#. ".";:. I.1 . 19:. "
......... ":...E.#X.18
:. Y.21 . 22:. 8050:. " ":..>E.
#. ".";:. I.3 . 33 . 30:. J.13 . 19 . 3:
X.I:Y.J:. 8050._E.#. 1220:.:X.I.3:Y.18:.
1240:...E(#X.4:Y.23:. 8050:. ".RIGHT="R
T..E2#X.30:. 8050:. "WRONG="WR.ZE<#XL.26
:Y.6:N.TN:. 8270:X.18:Y.9:. 8050:. 1180:
XL.26:N.BN..FF#. 8270:X.22:Y.12:. 8050:.
"......":..$FP#. SUBROUTINE CALCULATE C
ARRY.AFZ#C(1,1)..T(.M(TN)..M(BN)).EFD#C(
1,2)..T(.T(TN)..M(BN).C(1,1))..FN#C(2,1)
..T(.M(TN)..T(BN))..FX#C(2,2)..T(.T(TN).
.T(BN).C(2,1))..F.#..YF.#. SUBROUTINE PU
T CARRY, INPUT ROW, DIGIT..G.#X.30.DI.4:
Y.3:. 8050:. ". ... .":X.26.DI.4:. 805
0:NU.C(RO,DI).:G #. NU.0 . . ".";:. 1030
:..@G.#..]G.#. SUBROUTINE FINISH QUIZ.LG
.#. NR.1 . ...GH#. ".":X.14:Y.16:. 8050:
. ".L...PO":X.18:Y.X:. 8050.PGR#. ".....
.....";:XL.26:Y.21:N.RE:. 8270:...G.#. S
UBROUTINE RIGHT ANSWER TO QUIZ.!H.#. 500
:. I.13 . 19 . 3:YL.I:XL.3:. 8570.TH.#.
I.19 . X.6:Y.18:. 8050:. " .... ....
".AH.#. 8400:...H.$RT.RT.1:X.4:Y.23:.
I.1 . 10:. 8050:. ".RIGHT="RT:. 8050..H
.$. ".RIGHT="RT:.:..YH.$. SUBROUTINE WRO
NG ANSWER TO QUIZ..H"$. I.13 . 19 . 3:YL
.I:XL.33:. 8570.3I,$. I.19 . X.36:Y.18:.
8050:. " .... .... ".@I6$. 8400:.
.VI@$WR.WR.1:X.30:Y.23:. I.1 . 10:. 8050
:. ".WRONG="WR..IJ$. 8050:. ".WRONG="WR:
.:...IT$. SUBROUTINE DISPLAY RESULT FROM
QUIZ..I^$. 53281,1:. ".":X.16:Y.5:. 805
0:. ".YOUR SCORE"..JH$X.20:Y.7:. 8050:.
"IS".,JR$X.17:Y.9:. 8050:. RT"RIGHT".LJ|
$X.18:Y.11:. 8050:. "OUT OF"..J.$X.16:Y.
13:. 8050:. WR.RT "PROBLEM";:. WR.RT . .
"S"..J.$. 8110:...J.$. SUBROUTINE CIRCLE
OF CARROT.LJ.$. I..1 . 6.28 . .4186..J.
$X.20..(15..(I)):Y.12..(6..(I)):. 8050:.
1240:..&K.$XL.3:YL.4:. 8570:XL.35:YL.4:
. 8570.QKB$XL.3:YL.23:. 8570:XL.35:YL.23
:. 8570:......L
> CLICK IMAGE PREVIEW FOR FULL MODAL