ALPA AID
FILE INFORMATION
FILENAME(S): ALPA AID
FILE TYPE(S): PRG
FILE SIZE: 11.7K
FIRST SEEN: 2025-12-02 00:01:58
APPEARS ON: 1 disk(s)
FILE HASH
27c2cacf3ee9a3028b51dcdb7ba6c5999c65dc217a42522398edaa37e0d09bdc
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DE GROOT | ALPA AID | PRG | earthshaker | 11 | 12 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 33 08 00 00 8F 22 14 14 14 14 14 14 20 20 |..3...."...... |
00000010: 20 20 20 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | ************|
00000020: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000030: 2A 2A 2A 00 65 08 01 00 8F 22 14 14 14 14 14 14 |***.e...."......|
00000040: 20 20 20 20 20 20 2A 20 20 20 47 45 54 59 50 54 | * GETYPT|
00000050: 20 44 4F 4F 52 20 4A 42 20 53 4F 46 54 57 41 52 | DOOR JB SOFTWAR|
00000060: 45 20 20 20 2A 00 8B 08 02 00 8F 20 2A 2A 2A 2A |E *...... ****|
00000070: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000080: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 B1 08 03 00 |***********.....|
00000090: 8F 20 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 |. * |
000000A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000B0: 2A 00 D7 08 04 00 8F 20 2A 20 20 20 20 20 20 20 |*...... * |
000000C0: 20 20 20 41 20 4C 20 50 20 41 20 20 20 20 20 20 | A L P A |
000000D0: 20 20 20 20 20 20 2A 00 FD 08 05 00 8F 20 2A 20 | *...... * |
000000E0: 20 20 20 20 50 2E 52 4F 53 48 41 4D 2C 20 31 32 | P.ROSHAM, 12|
000000F0: 2F 34 2F 31 39 38 34 20 20 20 20 20 2A 00 23 09 |/4/1984 *.#.|
00000100: 06 00 8F 20 2A 20 20 20 20 20 20 20 20 41 4E 44 |... * AND|
00000110: 20 44 41 4E 4E 59 20 44 41 56 49 53 20 20 20 20 | DANNY DAVIS |
00000120: 20 20 2A 00 49 09 07 00 8F 20 2A 20 20 20 20 20 | *.I.... * |
00000130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000140: 20 20 20 20 20 20 20 20 2A 00 6F 09 08 00 8F 20 | *.o.... |
00000150: 2A 20 20 20 20 20 41 53 53 45 4D 42 4C 59 20 4C |* ASSEMBLY L|
00000160: 41 4E 47 55 41 47 45 20 20 20 20 20 20 20 2A 00 |ANGUAGE *.|
00000170: 95 09 09 00 8F 20 2A 20 20 20 20 20 20 50 52 4F |..... * PRO|
00000180: 47 52 41 4D 4D 49 4E 47 20 41 49 44 20 20 20 20 |GRAMMING AID |
00000190: 20 20 20 20 2A 00 BA 09 0A 00 8F 2A 20 20 20 20 | *......* |
000001A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000001B0: 20 20 20 20 20 20 20 20 20 2A 00 DF 09 0B 00 8F | *......|
000001C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000001D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
000001E0: F2 09 0C 00 4B B2 35 33 32 38 30 3A 20 89 20 32 |....K.53280: . 2|
000001F0: 37 32 00 07 0A 0D 00 97 4B 2C 31 3A 97 4B AA 31 |72......K,1:.K.1|
00000200: 2C 31 3A 99 22 05 22 00 1A 0A 0E 00 8F 20 50 52 |,1:."."...... PR|
00000210: 4F 43 45 53 53 20 4C 49 4E 45 00 20 0A 0F 00 8F |OCESS LINE. ....|
00000220: 00 32 0A 10 00 46 B2 30 3A 46 4D B2 30 3A 45 52 |.2...F.0:FM.0:ER|
00000230: B2 30 00 41 0A 11 00 81 4A B2 50 31 20 A4 20 50 |.0.A....J.P1 . P|
00000240: 32 00 58 0A 12 00 8B 20 43 24 28 4A 2C 31 29 B2 |2.X.... C$(J,1).|
00000250: 22 20 20 22 A7 20 33 33 00 88 0A 13 00 43 4F 24 |" ". 33.....CO$|
00000260: B2 43 24 28 4A 2C 31 29 3A 8B 43 24 28 4A 2C 32 |.C$(J,1):.C$(J,2|
00000270: 29 B3 B1 22 20 20 22 A7 20 43 4F 24 B2 43 4F 24 |).." ". CO$.CO$|
00000280: AA 43 24 28 4A 2C 32 29 00 AC 0A 14 00 8B 43 24 |.C$(J,2)......C$|
00000290: 28 4A 2C 33 29 B3 B1 22 20 20 22 A7 20 43 4F 24 |(J,3).." ". CO$|
000002A0: B2 43 4F 24 AA 43 24 28 4A 2C 33 29 00 B5 0A 15 |.CO$.C$(J,3)....|
000002B0: 00 8D 33 35 34 00 C4 0A 16 00 8B 20 45 52 B1 30 |..354...... ER.0|
000002C0: A7 20 33 33 00 D6 0A 17 00 8B 20 4A B3 31 30 30 |. 33...... J.100|
000002D0: A7 99 22 20 22 3B 00 E7 0A 18 00 8B 20 4A B3 31 |.." ";...... J.1|
000002E0: 30 A7 99 22 20 22 3B 00 F5 0A 19 00 99 20 4A 3B |0.." ";...... J;|
000002F0: 22 3A 20 22 3B 00 11 0B 1A 00 8B 20 C8 28 43 24 |": ";...... .(C$|
00000300: 28 4A 2C 32 29 2C 31 29 B2 22 4C 22 20 A7 20 32 |(J,2),1)."L" . 2|
00000310: 38 00 19 0B 1B 00 89 32 39 00 43 0B 1C 00 99 43 |8......29.C....C|
00000320: 24 28 4A 2C 31 29 AA 22 20 22 AA 43 24 28 4A 2C |$(J,1)." ".C$(J,|
00000330: 32 29 AA 43 24 28 4A 2C 33 29 3B 22 20 22 3B 3A |2).C$(J,3);" ";:|
00000340: 89 33 30 00 69 0B 1D 00 99 43 24 28 4A 2C 31 29 |.30.i....C$(J,1)|
00000350: 3B 22 20 22 3B 43 24 28 4A 2C 32 29 3B 22 20 22 |;" ";C$(J,2);" "|
00000360: 3B 43 24 28 4A 2C 33 29 3B 00 73 0B 1E 00 46 B2 |;C$(J,3);.s...F.|
00000370: 46 AA 31 00 80 0B 1F 00 99 A6 38 29 3B 44 49 24 |F.1.......8);DI$|
00000380: 00 90 0B 20 00 8B 20 46 B2 32 32 20 A7 89 33 34 |... .. F.22 ..34|
00000390: 00 98 0B 21 00 82 20 4A 00 9E 0B 22 00 8E 00 A4 |...!.. J..."....|
000003A0: 0B 23 00 8F 00 B7 0B 24 00 8F 20 4D 41 49 4E 20 |.#.....$.. MAIN |
000003B0: 52 4F 55 54 49 4E 45 00 DF 0B 25 00 41 24 B2 22 |ROUTINE...%.A$."|
000003C0: 22 3A 85 22 43 4F 4D 4D 41 4E 44 20 4F 52 20 4C |":."COMMAND OR L|
000003D0: 49 4E 45 28 23 23 23 29 20 3A 20 22 3B 41 24 00 |INE(###) : ";A$.|
000003E0: F6 0B 26 00 8B 20 C8 28 41 24 2C 31 29 B1 22 39 |..&.. .(A$,1)."9|
000003F0: 22 20 89 31 31 38 00 1D 0C 27 00 99 22 91 22 3B |" .118...'..".";|
00000400: 3A 81 49 B2 31 A4 33 36 3A 99 22 20 22 3B 3A 82 |:.I.1.36:." ";:.|
00000410: 49 3A 99 C7 28 31 33 29 3B 22 91 22 3B 00 31 0C |I:..(13);".";.1.|
00000420: 28 00 8B C8 28 41 24 2C 31 29 B3 22 30 22 89 33 |(...(A$,1)."0".3|
00000430: 37 00 42 0C 29 00 4B 24 B2 22 22 3A 81 4B B2 31 |7.B.).K$."":.K.1|
00000440: A4 34 00 58 0C 2A 00 8B CA 28 41 24 2C 4B 2C 31 |.4.X.*...(A$,K,1|
00000450: 29 B2 22 20 22 89 34 37 00 8C 0C 2B 00 8B 20 CA |)." ".47...+.. .|
00000460: 28 41 24 2C 4B 2C 31 29 B2 22 22 20 A7 20 41 24 |(A$,K,1)."" . A$|
00000470: B2 22 20 20 20 20 20 20 20 20 20 22 3A 4A B2 C5 |." ":J..|
00000480: 28 4B 24 29 3A 4E B2 4A 3A 89 35 36 00 C4 0C 2C |(K$):N.J:.56...,|
00000490: 00 8B CA 28 41 24 2C 4B 2C 31 29 B1 22 39 22 B0 |...(A$,K,1)."9".|
000004A0: CA 28 41 24 2C 4B 2C 31 29 B3 22 30 22 A7 99 22 |.(A$,K,1)."0".."|
000004B0: 49 4E 56 41 4C 49 44 20 4C 49 4E 45 20 23 22 3A |INVALID LINE #":|
000004C0: 89 20 33 37 00 D8 0C 2D 00 4B 24 B2 4B 24 AA CA |. 37...-.K$.K$..|
000004D0: 28 41 24 2C 4B 2C 31 29 00 E0 0C 2E 00 82 20 4B |(A$,K,1)...... K|
000004E0: 00 00 0D 2F 00 8B 4B B2 35 B0 C5 28 4B 24 29 B2 |.../..K.5..(K$).|
000004F0: 5A 45 B0 C5 28 4B 24 29 B1 4C 4E 20 89 20 33 37 |ZE..(K$).LN . 37|
00000500: 00 10 0D 30 00 4A B2 C5 28 4B 24 29 3A 4E B2 4A |...0.J..(K$):N.J|
00000510: 00 27 0D 31 00 41 24 B2 C9 28 41 24 2C 28 C3 28 |.'.1.A$..(A$,(.(|
00000520: 41 24 29 AB 4B 29 29 00 33 0D 32 00 88 20 4B 24 |A$).K)).3.2.. K$|
00000530: B2 22 22 00 42 0D 33 00 81 4B B2 31 A4 C3 28 41 |."".B.3..K.1..(A|
00000540: 24 29 00 67 0D 34 00 8B 20 CA 28 41 24 2C 4B 2C |$).g.4.. .(A$,K,|
00000550: 31 29 B3 B1 22 20 22 A7 4B 24 B2 4B 24 AA CA 28 |1).." ".K$.K$..(|
00000560: 41 24 2C 4B 2C 31 29 00 6F 0D 35 00 82 20 4B 00 |A$,K,1).o.5.. K.|
00000570: 79 0D 36 00 41 24 B2 4B 24 00 91 0D 37 00 8B 20 |y.6.A$.K$...7.. |
00000580: C8 28 41 24 2C 31 29 B2 22 4C 22 A7 20 89 20 33 |.(A$,1)."L". . 3|
00000590: 37 00 9F 0D 38 00 81 49 B2 31 A4 35 20 A9 32 00 |7...8..I.1.5 .2.|
000005A0: AE 0D 39 00 4B B2 B5 28 49 AD 32 AA 31 29 00 C4 |..9.K..(I.2.1)..|
000005B0: 0D 3A 00 43 24 28 4A 2C 4B 29 B2 CA 28 41 24 2C |.:.C$(J,K)..(A$,|
000005C0: 49 2C 32 29 00 E2 0D 3B 00 43 24 28 4A 2C 4B 29 |I,2)...;.C$(J,K)|
000005D0: B2 C8 28 43 24 28 4A 2C 4B 29 AA 22 20 20 22 2C |..(C$(J,K)." ",|
000005E0: 32 29 00 EA 0D 3C 00 82 20 49 00 01 0E 3D 00 8B |2)...<.. I...=..|
000005F0: 20 43 24 28 4E 2C 4F 45 29 B2 22 20 20 22 A7 36 | C$(N,OE)." ".6|
00000600: 35 00 11 0E 3E 00 8B 20 4E B3 54 50 A7 54 50 B2 |5...>.. N.TP.TP.|
00000610: 4E 00 21 0E 3F 00 8B 20 4E B1 42 50 A7 42 50 B2 |N.!.?.. N.BP.BP.|
00000620: 4E 00 29 0E 40 00 89 37 32 00 39 0E 41 00 8B 4E |N.).@..72.9.A..N|
00000630: B3 B1 42 50 20 89 20 36 38 00 58 0E 42 00 8B 20 |..BP . 68.X.B.. |
00000640: 42 50 B2 31 20 B0 20 43 24 28 42 50 2C 31 29 B3 |BP.1 . C$(BP,1).|
00000650: B1 22 20 20 22 89 37 32 00 6A 0E 43 00 42 50 B2 |." ".72.j.C.BP.|
00000660: 42 50 AB 4F 45 3A 89 20 36 36 00 7B 0E 44 00 8B |BP.OE:. 66.{.D..|
00000670: 20 4E B3 B1 54 50 20 89 20 37 32 00 95 0E 45 00 | N..TP . 72...E.|
00000680: 8B 20 43 24 28 54 50 2C 4F 45 29 B3 B1 22 20 20 |. C$(TP,OE).." |
00000690: 22 A7 89 37 32 00 BA 0E 46 00 8B 20 54 50 B3 B1 |"..72...F.. TP..|
000006A0: 42 50 20 AF 20 54 50 B3 B1 4C 4E 20 A7 54 50 B2 |BP . TP..LN .TP.|
000006B0: 54 50 AA 4F 45 3A 89 20 36 39 00 C4 0E 47 00 54 |TP.OE:. 69...G.T|
000006C0: 50 B2 4F 45 00 CD 0E 48 00 50 50 B2 4E 00 E4 0E |P.OE...H.PP.N...|
000006D0: 49 00 8B 20 4E B3 54 50 20 A7 20 50 50 B2 54 50 |I.. N.TP . PP.TP|
000006E0: 3A 89 37 38 00 EE 0E 4A 00 4E 55 B2 5A 45 00 07 |:.78...J.NU.ZE..|
000006F0: 0F 4B 00 8B 20 50 50 B2 54 50 20 B0 20 4E 55 B2 |.K.. PP.TP . NU.|
00000700: 30 20 A7 89 20 37 38 00 26 0F 4C 00 8B 20 43 24 |0 .. 78.&.L.. C$|
00000710: 28 50 50 2C 4F 45 29 B3 B1 22 20 20 22 A7 4E 55 |(PP,OE).." ".NU|
00000720: B2 4E 55 AA 4F 45 00 37 0F 4D 00 50 50 B2 50 50 |.NU.OE.7.M.PP.PP|
00000730: AB 4F 45 3A 89 37 35 00 47 0F 4E 00 50 31 B2 50 |.OE:.75.G.N.P1.P|
00000740: 50 3A 50 32 B2 50 50 00 5E 0F 4F 00 8B 20 43 24 |P:P2.PP.^.O.. C$|
00000750: 28 4E 2C 31 29 B2 22 20 20 22 A7 20 33 37 00 67 |(N,1)." ". 37.g|
00000760: 0F 50 00 8D 20 31 33 00 87 0F 51 00 8B 20 45 52 |.P.. 13...Q.. ER|
00000770: B2 31 20 A7 20 99 22 49 4C 4C 45 47 41 4C 20 4F |.1 . ."ILLEGAL O|
00000780: 50 2D 43 4F 44 45 22 00 A7 0F 52 00 8B 20 45 52 |P-CODE"...R.. ER|
00000790: B2 32 20 A7 20 99 22 49 4E 56 41 4C 49 44 20 4F |.2 . ."INVALID O|
000007A0: 50 2D 43 4F 44 45 22 00 CE 0F 53 00 8B 20 45 52 |P-CODE"...S.. ER|
000007B0: B2 33 20 A7 20 99 22 49 4E 56 41 4C 49 44 20 4C |.3 . ."INVALID L|
000007C0: 45 4E 47 54 48 20 4F 50 45 52 41 4E 44 22 00 EE |ENGTH OPERAND"..|
000007D0: 0F 54 00 8B 20 45 52 B2 34 20 A7 20 99 22 49 4C |.T.. ER.4 . ."IL|
000007E0: 4C 45 47 41 4C 20 4F 50 45 52 41 4E 44 22 00 F7 |LEGAL OPERAND"..|
000007F0: 0F 55 00 89 20 33 37 00 17 10 56 00 8F 20 2A 2A |.U.. 37...V.. **|
00000800: 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 57 41 54 43 48 2F |********* WATCH/|
00000810: 4E 4F 57 41 54 43 48 00 4E 10 57 00 85 22 57 41 |NOWATCH.N.W.."WA|
00000820: 54 43 48 20 57 48 41 54 20 41 44 44 52 45 53 53 |TCH WHAT ADDRESS|
00000830: 20 3A 20 22 3B 51 5A 24 3A 58 51 24 B2 C9 28 28 | : ";QZ$:XQ$..((|
00000840: 22 30 30 30 30 22 AA 51 5A 24 29 2C 34 29 00 64 |"0000".QZ$),4).d|
00000850: 10 58 00 8D 20 33 34 35 3A 8B 20 45 52 B2 31 20 |.X.. 345:. ER.1 |
00000860: A7 20 38 37 00 7B 10 59 00 57 51 B2 58 51 3A 57 |. 87.{.Y.WQ.XQ:W|
00000870: 51 24 B2 58 51 24 3A 89 20 33 37 00 8B 10 5A 00 |Q$.XQ$:. 37...Z.|
00000880: 8B 20 57 41 B3 B1 31 A7 20 39 33 00 BF 10 5B 00 |. WA..1. 93...[.|
00000890: 99 22 41 44 44 52 45 53 53 20 22 3B 57 51 24 3B |."ADDRESS ";WQ$;|
000008A0: 22 3D 20 20 3C 42 45 46 4F 52 45 3E 20 24 22 3B |"= <BEFORE> $";|
000008B0: 3A 45 54 B2 C2 28 57 51 29 3A 8D 20 33 39 35 00 |:ET..(WQ):. 395.|
000008C0: CD 10 5C 00 99 C9 28 48 42 24 2C 32 29 00 FA 10 |..\...(HB$,2)...|
000008D0: 5D 00 8B 20 C2 28 52 29 B2 30 20 A7 99 20 22 4E |].. .(R).0 .. "N|
000008E0: 4F 20 50 52 4F 47 52 41 4D 20 49 4E 20 4D 45 4D |O PROGRAM IN MEM|
000008F0: 4F 52 59 22 3A 99 3A 89 39 35 00 02 11 5E 00 9E |ORY":.:.95...^..|
00000900: 20 52 00 13 11 5F 00 8B 20 57 41 B3 B1 31 20 A7 | R..._.. WA..1 .|
00000910: 20 39 38 00 47 11 60 00 99 22 41 44 44 52 45 53 | 98.G.`.."ADDRES|
00000920: 53 20 22 3B 57 51 24 3B 22 3D 20 20 3C 41 46 54 |S ";WQ$;"= <AFT|
00000930: 45 52 20 3E 20 24 22 3B 3A 45 54 B2 C2 28 57 51 |ER > $";:ET..(WQ|
00000940: 29 3A 8D 20 33 39 35 00 55 11 61 00 99 C9 28 48 |):. 395.U.a...(H|
00000950: 42 24 2C 32 29 00 5E 11 62 00 89 20 33 37 00 7A |B$,2).^.b.. 37.z|
00000960: 11 63 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 44 |.c.. **********D|
00000970: 55 4D 50 20 4D 45 4D 4F 52 59 00 89 11 64 00 44 |UMP MEMORY...d.D|
00000980: 43 24 B2 22 30 30 30 30 22 00 AC 11 65 00 85 22 |C$."0000"...e.."|
00000990: 44 55 4D 50 20 46 52 4F 4D 20 57 48 41 54 20 41 |DUMP FROM WHAT A|
000009A0: 44 44 52 45 53 53 20 22 3B 44 4D 24 00 D4 11 66 |DDRESS ";DM$...f|
000009B0: 00 58 51 24 B2 C9 28 28 44 43 24 AA 44 4D 24 29 |.XQ$..((DC$.DM$)|
000009C0: 2C 34 29 3A 8D 33 34 35 3A 8B 20 45 52 B2 31 A7 |,4):.345:. ER.1.|
000009D0: 20 31 30 31 00 DE 11 67 00 44 4D B2 58 51 00 01 | 101...g.DM.XQ..|
000009E0: 12 68 00 99 22 93 44 55 4D 50 49 4E 47 20 46 52 |.h..".DUMPING FR|
000009F0: 4F 4D 20 41 44 44 52 45 53 53 20 24 22 3B 58 51 |OM ADDRESS $";XQ|
00000A00: 24 00 0A 12 69 00 47 B2 44 4D 00 29 12 6A 00 81 |$...i.G.DM.).j..|
00000A10: 20 4D 4D B2 47 20 A4 20 28 47 AA 31 37 36 29 20 | MM.G . (G.176) |
00000A20: A9 20 38 3A 46 24 B2 22 22 00 44 12 6B 00 45 54 |. 8:F$."".D.k.ET|
00000A30: B2 4D 4D 3A 8D 33 39 35 3A 99 48 42 24 3B 22 20 |.MM:.395:.HB$;" |
00000A40: 3A 20 22 3B 00 61 12 6C 00 81 20 4D 57 B2 30 A4 |: ";.a.l.. MW.0.|
00000A50: 37 3A 4D 51 28 4D 57 29 B2 C2 28 4D 4D AA 4D 57 |7:MQ(MW)..(MM.MW|
00000A60: 29 00 93 12 6D 00 41 B2 4D 51 28 4D 57 29 3A 8B |)...m.A.MQ(MW):.|
00000A70: 41 B3 33 32 B0 41 B1 31 32 37 B0 41 B1 31 35 39 |A.32.A.127.A.159|
00000A80: A7 20 46 24 B2 46 24 AA C7 28 33 32 29 3A 89 20 |. F$.F$..(32):. |
00000A90: 31 31 31 00 A2 12 6E 00 46 24 B2 46 24 AA C7 28 |111...n.F$.F$..(|
00000AA0: 41 29 00 C3 12 6F 00 48 B2 B5 28 4D 51 28 4D 57 |A)...o.H..(MQ(MW|
00000AB0: 29 AD 31 36 29 3A 4C B2 4D 51 28 4D 57 29 AB 31 |).16):L.MQ(MW).1|
00000AC0: 36 AC 48 00 E1 12 70 00 99 CA 28 44 24 2C 48 AA |6.H...p...(D$,H.|
00000AD0: 31 2C 31 29 AA CA 28 44 24 2C 4C AA 31 2C 31 29 |1,1)..(D$,L.1,1)|
00000AE0: 3B 00 F2 12 71 00 82 20 4D 57 3A 99 A6 38 29 3B |;...q.. MW:..8);|
00000AF0: 46 24 00 FB 12 72 00 82 20 4D 4D 00 11 13 73 00 |F$...r.. MM...s.|
00000B00: A1 20 4B 24 3A 8B 4B 24 B2 22 22 20 A7 20 31 31 |. K$:.K$."" . 11|
00000B10: 35 00 2C 13 74 00 8B 20 4B 24 B3 B1 22 4D 22 20 |5.,.t.. K$.."M" |
00000B20: A7 20 47 B2 4D 4D 3A 89 20 31 30 36 00 35 13 75 |. G.MM:. 106.5.u|
00000B30: 00 89 20 33 37 00 3B 13 76 00 8F 00 4C 13 77 00 |.. 37.;.v...L.w.|
00000B40: 8B 20 41 24 B2 22 22 20 89 20 33 37 00 6C 13 78 |. A$."" . 37.l.x|
00000B50: 00 8F 20 2A 2A 2A 2A 2A 2A 2A 20 43 4F 4D 4D 41 |.. ******* COMMA|
00000B60: 4E 44 4F 20 2A 2A 2A 2A 2A 2A 2A 2A 00 7C 13 79 |NDO ********.|.y|
00000B70: 00 4B 24 B2 C8 28 41 24 2C 54 57 29 00 90 13 7A |.K$..(A$,TW)...z|
00000B80: 00 8B 20 4B 24 B2 22 45 4E 22 20 A7 20 31 34 35 |.. K$."EN" . 145|
00000B90: 00 A2 13 7B 00 8B 20 4B 24 B2 22 51 55 22 20 A7 |...{.. K$."QU" .|
00000BA0: 20 90 00 BC 13 7C 00 8B 20 4B 24 B2 22 57 41 22 | ....|.. K$."WA"|
00000BB0: 20 A7 20 57 41 B2 31 3A 89 20 38 37 00 D6 13 7D | . WA.1:. 87...}|
00000BC0: 00 8B 20 4B 24 B2 22 4E 57 22 20 A7 20 57 41 B2 |.. K$."NW" . WA.|
00000BD0: 30 3A 89 20 33 37 00 EA 13 7E 00 8B 20 4B 24 B2 |0:. 37...~.. K$.|
00000BE0: 22 4C 49 22 20 A7 20 31 33 36 00 FE 13 7F 00 8B |"LI" . 136......|
00000BF0: 20 4B 24 B2 22 4C 4F 22 20 A7 20 32 32 33 00 12 | K$."LO" . 223..|
00000C00: 14 80 00 8B 20 4B 24 B2 22 4D 45 22 20 A7 20 31 |.... K$."ME" . 1|
00000C10: 39 38 00 24 14 81 00 8B 20 4B 24 B2 22 4E 45 22 |98.$.... K$."NE"|
00000C20: 20 A7 20 8A 00 39 14 82 00 8B 20 4B 24 B2 22 52 | . ..9.... K$."R|
00000C30: 55 22 20 A7 20 89 20 39 30 00 4D 14 83 00 8B 20 |U" . . 90.M.... |
00000C40: 4B 24 B2 22 53 41 22 20 A7 20 32 35 39 00 61 14 |K$."SA" . 259.a.|
00000C50: 84 00 8B 20 4B 24 B2 22 43 48 22 20 A7 20 32 38 |... K$."CH" . 28|
00000C60: 37 00 74 14 85 00 8B 20 4B 24 B2 22 44 55 22 20 |7.t.... K$."DU" |
00000C70: A7 20 39 39 00 8C 14 86 00 99 22 49 4E 56 41 4C |. 99......"INVAL|
00000C80: 49 44 20 43 4F 4D 4D 41 4E 44 20 22 00 95 14 87 |ID COMMAND "....|
00000C90: 00 89 20 33 35 00 9B 14 88 00 8F 00 BB 14 89 00 |.. 35...........|
00000CA0: 8F 20 2A 2A 2A 2A 2A 20 4C 49 53 54 20 52 4F 55 |. ***** LIST ROU|
00000CB0: 4E 54 49 4E 45 20 2A 2A 2A 2A 2A 00 CB 14 8A 00 |NTINE *****.....|
00000CC0: 50 31 B2 54 50 3A 50 32 B2 42 50 00 DE 14 8B 00 |P1.TP:P2.BP.....|
00000CD0: 8B C3 28 41 24 29 B3 35 20 A7 20 31 34 31 00 F2 |..(A$).5 . 141..|
00000CE0: 14 8C 00 4E 31 B2 C6 28 CA 28 41 24 2C 36 2C 31 |...N1..(.(A$,6,1|
00000CF0: 29 29 00 23 15 8D 00 8B 20 C3 28 41 24 29 B1 46 |)).#.... .(A$).F|
00000D00: 52 20 AF 20 4E 31 B1 34 37 20 AF 20 4E 31 B3 35 |R . N1.47 . N1.5|
00000D10: 38 20 A7 20 50 31 B2 C5 28 CA 28 41 24 2C 35 2C |8 . P1..(.(A$,5,|
00000D20: 33 29 29 00 2C 15 8E 00 99 22 93 22 00 35 15 8F |3)).,....".".5..|
00000D30: 00 8D 20 31 33 00 3E 15 90 00 89 20 33 37 00 44 |.. 13.>.... 37.D|
00000D40: 15 91 00 8F 00 64 15 92 00 8F 20 2A 2A 2A 2A 2A |.....d.... *****|
00000D50: 20 44 55 4E 50 20 52 4F 55 4E 54 49 4E 45 20 2A | DUNP ROUNTINE *|
00000D60: 2A 2A 2A 2A 00 96 15 93 00 47 B2 52 3A 99 22 45 |****.....G.R:."E|
00000D70: 4E 54 45 52 49 4E 47 20 41 54 20 41 44 44 52 45 |NTERING AT ADDRE|
00000D80: 53 53 20 24 22 3B 3A 45 54 B2 47 3A 8D 20 33 39 |SS $";:ET.G:. 39|
00000D90: 35 3A 99 48 42 24 00 A6 15 94 00 81 20 4A B2 54 |5:.HB$...... J.T|
00000DA0: 50 20 A4 20 42 50 00 BF 15 95 00 8B 20 43 24 28 |P . BP...... C$(|
00000DB0: 4A 2C 4F 45 29 B2 22 20 20 22 A7 89 31 39 36 00 |J,OE)." "..196.|
00000DC0: DF 15 96 00 8B 20 CA 28 43 24 28 4A 2C 54 57 29 |..... .(C$(J,TW)|
00000DD0: 2C 31 2C 31 29 B3 B1 22 4C 22 A7 20 31 38 37 00 |,1,1).."L". 187.|
00000DE0: 08 16 97 00 97 20 47 2C 5A 45 3A 97 20 47 AA 4F |..... G,ZE:. G.O|
00000DF0: 45 2C 5A 45 3A 97 20 47 AA 54 57 2C 5A 45 3A 97 |E,ZE:. G.TW,ZE:.|
00000E00: 20 47 AA 54 52 2C 5A 45 00 2C 16 98 00 4A 31 B2 | G.TR,ZE.,...J1.|
00000E10: C5 28 CA 28 43 24 28 4A 2C 54 57 29 2C 54 57 2C |.(.(C$(J,TW),TW,|
00000E20: 31 29 AA 43 24 28 4A 2C 54 52 29 29 00 6C 16 99 |1).C$(J,TR)).l..|
00000E30: 00 8B C8 28 43 24 28 4A 2C 32 29 2C 31 29 B2 22 |...(C$(J,2),1)."|
00000E40: 4C 22 A7 99 4A 3B 22 20 3A 20 22 3B 43 24 28 4A |L"..J;" : ";C$(J|
00000E50: 2C 31 29 AA 22 20 22 AA 43 24 28 4A 2C 32 29 AA |,1)." ".C$(J,2).|
00000E60: 43 24 28 4A 2C 33 29 3A 89 31 35 35 00 95 16 9A |C$(J,3):.155....|
00000E70: 00 99 4A 3B 22 20 3A 20 22 3B 43 24 28 4A 2C 31 |..J;" : ";C$(J,1|
00000E80: 29 3B 22 20 22 3B 43 24 28 4A 2C 32 29 3B 43 24 |);" ";C$(J,2);C$|
00000E90: 28 4A 2C 33 29 00 AF 16 9B 00 8B 20 4A 31 B3 5A |(J,3)...... J1.Z|
00000EA0: 45 20 B0 20 4A 31 B1 4C 4E 20 A7 20 31 39 35 00 |E . J1.LN . 195.|
00000EB0: CB 16 9C 00 4A 4A 24 B2 43 24 28 4A 2C 31 29 3A |....JJ$.C$(J,1):|
00000EC0: 8D 20 33 35 31 3A 43 4A B2 4A 4A 00 E7 16 9D 00 |. 351:CJ.JJ.....|
00000ED0: 8B C8 28 43 24 28 4A 2C 32 29 2C 31 29 B3 B1 22 |..(C$(J,2),1).."|
00000EE0: 4C 22 A7 20 31 35 39 00 19 17 9E 00 99 4A 31 3B |L". 159......J1;|
00000EF0: 22 20 3A 20 22 3B 43 24 28 4A 31 2C 31 29 AA 22 |" : ";C$(J1,1)."|
00000F00: 20 22 AA 43 24 28 4A 31 2C 32 29 AA 43 24 28 4A | ".C$(J1,2).C$(J|
00000F10: 31 2C 33 29 3A 89 31 36 30 00 4A 17 9F 00 99 4A |1,3):.160.J....J|
00000F20: 31 3B 22 20 3A 20 22 3B 43 24 28 4A 31 2C 31 29 |1;" : ";C$(J1,1)|
00000F30: 3B 22 20 22 3B 43 24 28 4A 31 2C 32 29 3B 22 20 |;" ";C$(J1,2);" |
00000F40: 22 3B 43 24 28 4A 31 2C 33 29 00 61 17 A0 00 8B |";C$(J1,3).a....|
00000F50: B6 28 43 4A 29 B3 B1 20 4F 45 20 A7 89 20 31 39 |.(CJ).. OE .. 19|
00000F60: 35 00 76 17 A1 00 44 44 B2 28 4A 31 B3 4A 29 AB |5.v...DD.(J1.J).|
00000F70: 28 4A 31 B1 4A 29 00 85 17 A2 00 4A 41 B2 47 3A |(J1.J).....JA.G:|
00000F80: 44 50 B2 5A 45 00 96 17 A3 00 8B 20 4A 31 B2 4A |DP.ZE...... J1.J|
00000F90: 20 A7 89 31 37 35 00 A2 17 A4 00 43 4C B2 4A AA | ..175.....CL.J.|
00000FA0: 44 44 00 C2 17 A5 00 4E 31 B2 5A 45 3A 8B 20 43 |DD.....N1.ZE:. C|
00000FB0: 24 28 43 4C 2C 4F 45 29 B2 22 20 20 22 A7 89 31 |$(CL,OE)." "..1|
00000FC0: 37 30 00 DE 17 A6 00 8B 20 C8 28 43 24 28 43 4C |70...... .(C$(CL|
00000FD0: 2C 32 29 2C 31 29 B2 22 4C 22 89 31 37 30 00 11 |,2),1)."L".170..|
00000FE0: 18 A7 00 4E 31 B2 4F 45 AB 28 43 24 28 43 4C 2C |...N1.OE.(C$(CL,|
00000FF0: 54 57 29 B3 B1 22 20 20 22 29 AB 28 43 24 28 43 |TW).." ").(C$(C|
00001000: 4C 2C 54 52 29 B3 B1 22 20 20 22 29 3A 89 31 37 |L,TR).." "):.17|
00001010: 30 00 2E 18 A8 00 4A 4A 24 B2 43 24 28 43 4C 2C |0.....JJ$.C$(CL,|
00001020: 31 29 3A 8D 20 33 35 31 3A 54 4A B2 4A 4A 00 51 |1):. 351:TJ.JJ.Q|
00001030: 18 A9 00 4E 31 B2 28 28 54 4A B2 4F 45 29 AC 54 |...N1.((TJ.OE).T|
00001040: 52 AA 28 54 4A B2 AB 4F 45 29 AC 54 57 29 AC AB |R.(TJ..OE).TW)..|
00001050: 31 00 68 18 AA 00 8B 20 43 4C B2 4A 31 20 AF 20 |1.h.... CL.J1 . |
00001060: 44 44 B1 30 89 31 37 35 00 75 18 AB 00 44 50 B2 |DD.0.175.u...DP.|
00001070: 44 50 AA 4E 31 00 89 18 AC 00 8B 20 43 4C B2 4A |DP.N1...... CL.J|
00001080: 31 20 A7 20 89 20 31 37 35 00 96 18 AD 00 43 4C |1 . . 175.....CL|
00001090: B2 43 4C AA 44 44 00 9F 18 AE 00 89 31 36 35 00 |.CL.DD......165.|
000010A0: C5 18 AF 00 8B 20 43 4A B2 31 A7 4A 41 B2 4A 41 |..... CJ.1.JA.JA|
000010B0: AA 44 44 AC 44 50 AA 28 44 44 B1 30 29 AC AB 33 |.DD.DP.(DD.0)..3|
000010C0: 3A 89 31 37 39 00 DA 18 B0 00 8B 44 44 B1 5A 45 |:.179......DD.ZE|
000010D0: 20 A7 20 44 50 B2 44 50 AA 32 00 F6 18 B1 00 8B | . DP.DP.2......|
000010E0: 20 44 50 B1 31 32 36 20 AF 20 44 44 B3 5A 45 20 | DP.126 . DD.ZE |
000010F0: A7 89 20 31 39 35 00 12 19 B2 00 8B 20 44 50 B1 |.. 195...... DP.|
00001100: 31 32 39 20 AF 20 44 44 B1 5A 45 20 A7 89 20 31 |129 . DD.ZE .. 1|
00001110: 39 35 00 33 19 B3 00 58 51 24 B2 CA 28 43 24 28 |95.3...XQ$..(C$(|
00001120: 4A 2C 31 29 2C 31 2C 32 29 3A 8D 33 33 37 3A 56 |J,1),1,2):.337:V|
00001130: B2 58 51 00 43 19 B4 00 97 47 2C 56 3A 47 B2 47 |.XQ.C....G,V:G.G|
00001140: AA 4F 45 00 80 19 B5 00 8B 43 4A B2 4F 45 20 A7 |.OE......CJ.OE .|
00001150: 97 47 2C 4A 41 AB B5 28 4A 41 AD 51 4B 29 AC 51 |.G,JA..(JA.QK).Q|
00001160: 4B 3A 47 B2 47 AA 4F 45 3A 97 47 2C B5 28 4A 41 |K:G.G.OE:.G,.(JA|
00001170: AD 51 4B 29 3A 47 B2 47 AA 4F 45 3A 89 31 38 35 |.QK):G.G.OE:.185|
00001180: 00 98 19 B6 00 8B 20 44 44 B3 5A 45 20 A7 20 44 |...... DD.ZE . D|
00001190: 50 B2 32 35 36 AB 44 50 00 AC 19 B7 00 8B 20 44 |P.256.DP...... D|
000011A0: 50 B2 30 20 A7 20 44 50 B2 32 35 36 00 C5 19 B8 |P.0 . DP.256....|
000011B0: 00 44 50 B2 44 50 AB 54 57 3A 97 47 2C 44 50 3A |.DP.DP.TW:.G,DP:|
000011C0: 47 B2 47 AA 31 00 CF 19 B9 00 99 22 4F 4B 22 00 |G.G.1......"OK".|
000011D0: D8 19 BA 00 89 31 39 36 00 E5 19 BB 00 81 49 B2 |.....196......I.|
000011E0: 31 A4 35 A9 32 00 F6 19 BC 00 4B B2 B5 28 49 AD |1.5.2.....K..(I.|
000011F0: 54 57 AA 4F 45 29 00 17 1A BD 00 58 51 24 B2 CA |TW.OE).....XQ$..|
00001200: 28 43 24 28 4A 2C 4B 29 2C 31 2C 32 29 3A 8D 33 |(C$(J,K),1,2):.3|
00001210: 33 37 3A 56 B2 58 51 00 2D 1A BE 00 8B 45 52 B2 |37:V.XQ.-....ER.|
00001220: 31 20 B0 56 B2 AB 31 20 A7 89 31 39 33 00 36 1A |1 .V..1 ..193.6.|
00001230: BF 00 97 47 2C 56 00 41 1A C0 00 47 B2 47 AA 4F |...G,V.A...G.G.O|
00001240: 45 00 48 1A C1 00 82 49 00 51 1A C2 00 89 31 39 |E.H....I.Q....19|
00001250: 36 00 78 1A C3 00 99 22 2A 2A 20 45 52 52 4F 52 |6.x...."** ERROR|
00001260: 2D 42 52 41 4E 43 48 20 4F 55 54 20 4F 46 20 52 |-BRANCH OUT OF R|
00001270: 41 4E 47 45 20 2A 2A 22 00 7F 1A C4 00 82 4A 00 |ANGE **"......J.|
00001280: 87 1A C5 00 89 33 37 00 92 1A C6 00 43 4F 24 B2 |.....37.....CO$.|
00001290: 22 22 00 AD 1A C7 00 8F 20 2A 2A 2A 2A 2A 2A 2A |""...... *******|
000012A0: 2A 2A 2A 2A 2A 44 49 53 45 4D 42 4C 45 00 BC 1A |*****DISEMBLE...|
000012B0: C8 00 44 43 24 B2 22 30 30 30 30 22 00 E6 1A C9 |..DC$."0000"....|
000012C0: 00 85 22 44 49 53 41 53 53 45 4D 42 4C 45 20 46 |.."DISASSEMBLE F|
000012D0: 52 4F 4D 20 57 48 41 54 20 41 44 44 52 45 53 53 |ROM WHAT ADDRESS|
000012E0: 20 22 3B 44 4D 24 00 0E 1B CA 00 58 51 24 B2 C9 | ";DM$.....XQ$..|
000012F0: 28 28 44 43 24 AA 44 4D 24 29 2C 34 29 3A 8D 33 |((DC$.DM$),4):.3|
00001300: 34 35 3A 8B 45 52 B2 31 20 A7 20 32 30 31 00 18 |45:.ER.1 . 201..|
00001310: 1B CB 00 44 4D B2 58 51 00 41 1B CC 00 99 22 93 |...DM.XQ.A....".|
00001320: 44 49 53 41 53 53 45 4D 42 4C 49 4E 47 20 46 52 |DISASSEMBLING FR|
00001330: 4F 4D 20 41 44 44 52 45 53 53 20 2A 22 3B 58 51 |OM ADDRESS *";XQ|
00001340: 24 00 53 1B CD 00 47 B2 44 4D 3A 46 B2 30 3A 46 |$.S...G.DM:F.0:F|
00001350: 4D B2 30 00 64 1B CE 00 46 B2 46 AA 31 3A 43 4F |M.0.d...F.F.1:CO|
00001360: 24 B2 22 22 00 6F 1B CF 00 81 49 B2 31 A4 33 00 |$."".o....I.1.3.|
00001370: 96 1B D0 00 56 28 49 29 B2 C2 28 47 29 3A 48 B2 |....V(I)..(G):H.|
00001380: B5 28 56 28 49 29 AD 31 36 29 3A 4C B2 56 28 49 |.(V(I).16):L.V(I|
00001390: 29 AB 31 36 AC 48 00 B8 1B D1 00 52 24 28 49 29 |).16.H.....R$(I)|
000013A0: B2 CA 28 44 24 2C 48 AA 31 2C 31 29 AA CA 28 44 |..(D$,H.1,1)..(D|
000013B0: 24 2C 4C AA 31 2C 31 29 00 C5 1B D2 00 47 B2 47 |$,L.1,1).....G.G|
000013C0: AA 31 3A 82 49 00 EA 1B D3 00 81 49 B2 31 A4 50 |.1:.I......I.1.P|
000013D0: 43 28 56 28 31 29 AA 31 29 3A 43 4F 24 B2 43 4F |C(V(1).1):CO$.CO|
000013E0: 24 AA 52 24 28 49 29 3A 82 49 00 F3 1B D4 00 8D |$.R$(I):.I......|
000013F0: 33 35 34 00 0E 1C D5 00 45 54 B2 44 4D 3A 8D 20 |354.....ET.DM:. |
00001400: 33 39 35 3A 99 48 42 24 3B 22 3A 20 22 3B 00 1F |395:.HB$;": ";..|
00001410: 1C D6 00 81 20 49 B2 31 A4 20 50 43 28 59 29 00 |.... I.1. PC(Y).|
00001420: 2F 1C D7 00 99 52 24 28 49 29 3B 22 20 22 3B 00 |/....R$(I);" ";.|
00001430: 37 1C D8 00 82 20 49 00 5A 1C D9 00 57 57 B2 31 |7.... I.Z...WW.1|
00001440: 35 AB 28 C3 28 43 4F 24 29 AA 50 43 28 59 29 29 |5.(.(CO$).PC(Y))|
00001450: 3A 99 A6 57 57 29 3B 44 49 24 00 71 1C DA 00 47 |:..WW);DI$.q...G|
00001460: B2 28 47 AB 33 29 AA 50 43 28 59 29 3A 44 4D B2 |.(G.3).PC(Y):DM.|
00001470: 47 00 84 1C DB 00 8B 20 46 B3 B1 32 32 20 A7 89 |G...... F..22 ..|
00001480: 20 32 30 36 00 9B 1C DC 00 A1 20 4B 24 3A 8B 20 | 206...... K$:. |
00001490: 4B 24 B2 22 22 20 A7 20 32 32 30 00 B5 1C DD 00 |K$."" . 220.....|
000014A0: 8B 20 4B 24 B3 B1 22 4D 22 20 A7 20 46 B2 5A 45 |. K$.."M" . F.ZE|
000014B0: 3A 89 32 30 36 00 BE 1C DE 00 89 20 33 37 00 C4 |:.206...... 37..|
000014C0: 1C DF 00 8F 00 E6 1C E0 00 8F 20 2A 2A 2A 2A 2A |.......... *****|
000014D0: 2A 2A 20 4C 4F 41 44 20 2A 2A 2A 2A 2A 2A 2A 2A |** LOAD ********|
000014E0: 2A 2A 2A 2A 2A 2A 00 EF 1C E1 00 99 22 93 22 00 |******......".".|
000014F0: 03 1D E2 00 99 22 4C 4F 41 44 20 50 52 4F 47 52 |....."LOAD PROGR|
00001500: 41 4D 22 00 1C 1D E3 00 85 22 49 4E 50 55 54 20 |AM"......"INPUT |
00001510: 46 49 4C 45 4E 41 4D 45 22 3B 4E 24 00 2E 1D E4 |FILENAME";N$....|
00001520: 00 8B 20 4E 24 B2 22 22 20 A7 20 32 32 37 00 3D |.. N$."" . 227.=|
00001530: 1D E5 00 9F 20 31 2C 31 2C 30 2C 4E 24 00 4A 1D |.... 1,1,0,N$.J.|
00001540: E6 00 54 B2 30 3A 46 46 B2 30 00 6D 1D E7 00 81 |..T.0:FF.0.m....|
00001550: 20 49 B2 31 20 A4 20 32 30 30 3A 43 44 24 28 49 | I.1 . 200:CD$(I|
00001560: 29 B2 22 22 3A 4A 24 28 49 29 B2 22 22 00 77 1D |)."":J$(I)."".w.|
00001570: E8 00 54 B2 54 AA 31 00 85 1D E9 00 A1 23 31 2C |..T.T.1......#1,|
00001580: 49 24 28 49 29 00 A2 1D EA 00 8B 20 49 24 28 49 |I$(I)...... I$(I|
00001590: 29 B2 C7 28 31 33 29 A7 20 46 46 B2 30 3A 89 32 |)..(13). FF.0:.2|
000015A0: 34 31 00 BE 1D EB 00 8B 20 49 24 28 49 29 B2 22 |41...... I$(I)."|
000015B0: 2C 22 20 A7 20 46 46 B2 31 3A 89 32 33 33 00 CF |," . FF.1:.233..|
000015C0: 1D EC 00 8B 20 46 46 B2 31 20 89 20 32 34 30 00 |.... FF.1 . 240.|
000015D0: 0B 1E ED 00 8B 20 49 24 28 49 29 B1 C7 28 34 37 |..... I$(I)..(47|
000015E0: 29 AF 49 24 28 49 29 B3 C7 28 35 38 29 AF 46 46 |).I$(I)..(58).FF|
000015F0: B2 30 20 A7 20 4A 24 28 49 29 B2 4A 24 28 49 29 |.0 . J$(I).J$(I)|
00001600: AA 49 24 28 49 29 3A 89 32 33 33 00 21 1E EE 00 |.I$(I):.233.!...|
00001610: 8B 20 49 24 28 49 29 B2 22 2A 22 20 A7 20 32 34 |. I$(I)."*" . 24|
00001620: 32 00 37 1E EF 00 8B 20 49 24 28 49 29 B2 22 20 |2.7.... I$(I)." |
00001630: 22 20 A7 20 32 33 33 00 55 1E F0 00 43 44 24 28 |" . 233.U...CD$(|
00001640: 49 29 B2 43 44 24 28 49 29 AA 49 24 28 49 29 3A |I).CD$(I).I$(I):|
00001650: 89 20 32 33 33 00 5D 1E F1 00 82 20 49 00 65 1E |. 233.].... I.e.|
00001660: F2 00 A0 20 31 00 75 1E F3 00 81 20 49 B2 31 20 |... 1.u.... I.1 |
00001670: A4 20 54 AB 31 00 8B 1E F4 00 58 28 49 29 B2 C5 |. T.1.....X(I)..|
00001680: 28 4A 24 28 49 29 29 3A 59 B2 31 00 9A 1E F5 00 |(J$(I)):Y.1.....|
00001690: 81 20 4A B2 20 31 20 A4 20 33 00 B7 1E F6 00 43 |. J. 1 . 3.....C|
000016A0: 24 28 58 28 49 29 2C 4A 29 B2 CA 28 43 44 24 28 |$(X(I),J)..(CD$(|
000016B0: 49 29 2C 59 2C 32 29 00 DB 1E F7 00 43 24 28 58 |I),Y,2).....C$(X|
000016C0: 28 49 29 2C 4A 29 B2 C8 28 43 24 28 58 28 49 29 |(I),J)..(C$(X(I)|
000016D0: 2C 4A 29 AA 22 20 20 22 2C 32 29 00 E5 1E F8 00 |,J)." ",2).....|
000016E0: 59 B2 59 AA 32 00 F1 1E F9 00 82 20 4A 3A 82 20 |Y.Y.2...... J:. |
000016F0: 49 00 00 1F FA 00 81 20 49 B2 31 A4 20 32 30 30 |I...... I.1. 200|
00001700: 00 09 1F FB 00 54 50 B2 49 00 22 1F FC 00 8B 43 |.....TP.I."....C|
00001710: 24 28 49 2C 31 29 B3 B1 22 20 20 22 20 A7 20 32 |$(I,1).." " . 2|
00001720: 35 34 00 2A 1F FD 00 82 20 49 00 3E 1F FE 00 81 |54.*.... I.>....|
00001730: 20 49 B2 32 30 30 20 A4 20 31 20 A9 AB 31 00 47 | I.200 . 1 ..1.G|
00001740: 1F FF 00 42 50 B2 49 00 60 1F 00 01 8B 43 24 28 |...BP.I.`....C$(|
00001750: 49 2C 31 29 B3 B1 22 20 20 22 20 A7 20 32 35 38 |I,1).." " . 258|
00001760: 00 68 1F 01 01 82 20 49 00 71 1F 02 01 89 20 33 |.h.... I.q.... 3|
00001770: 37 00 77 1F 03 01 8F 00 9C 1F 04 01 8F 20 2A 2A |7.w.......... **|
00001780: 2A 2A 2A 2A 20 53 41 56 45 20 2A 2A 2A 2A 2A 2A |**** SAVE ******|
00001790: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 B4 1F 05 |************....|
000017A0: 01 85 22 45 4E 54 45 52 20 4E 41 4D 45 20 3A 20 |.."ENTER NAME : |
000017B0: 22 3B 4E 24 00 C5 1F 06 01 8B 20 4E 24 B2 22 22 |";N$...... N$.""|
000017C0: A7 20 32 36 31 00 D0 1F 07 01 52 24 B2 22 2C 22 |. 261.....R$.","|
000017D0: 00 DF 1F 08 01 9F 20 31 2C 31 2C 31 2C 4E 24 00 |...... 1,1,1,N$.|
000017E0: EF 1F 09 01 81 20 49 B2 31 20 A4 20 32 30 30 00 |..... I.1 . 200.|
000017F0: 07 20 0A 01 8B 43 24 28 49 2C 31 29 B2 22 20 20 |. ...C$(I,1)." |
00001800: 22 20 A7 20 32 36 39 00 27 20 0B 01 43 4F 24 B2 |" . 269.' ..CO$.|
00001810: 43 24 28 49 2C 31 29 AA 43 24 28 49 2C 32 29 AA |C$(I,1).C$(I,2).|
00001820: 43 24 28 49 2C 33 29 00 36 20 0C 01 98 31 2C 49 |C$(I,3).6 ...1,I|
00001830: 3B 52 24 43 4F 24 00 3E 20 0D 01 82 20 49 00 4C |;R$CO$.> ... I.L|
00001840: 20 0E 01 98 31 2C 22 2A 22 3A A0 31 00 55 20 0F | ...1,"*":.1.U .|
00001850: 01 89 20 33 37 00 6A 20 10 01 97 4B 2C 30 3A 97 |.. 37.j ...K,0:.|
00001860: 4B AA 31 2C 30 3A 99 22 05 22 00 8F 20 11 01 8F |K.1,0:.".".. ...|
00001870: 20 2A 2A 2A 2A 2A 2A 2A 20 49 4E 49 54 49 41 4C | ******* INITIAL|
00001880: 49 53 41 54 49 4F 4E 20 2A 2A 2A 2A 2A 2A 2A 00 |ISATION *******.|
00001890: CE 20 12 01 5A 45 B2 30 3A 4F 45 B2 31 3A 54 57 |. ..ZE.0:OE.1:TW|
000018A0: B2 4F 45 AA 4F 45 3A 54 52 B2 4F 45 AA 54 57 3A |.OE.OE:TR.OE.TW:|
000018B0: 46 52 B2 54 57 AA 54 57 3A 51 4B B2 32 35 36 3A |FR.TW.TW:QK.256:|
000018C0: 4D 52 B2 32 30 32 30 3A 4C 4E B2 32 30 30 00 EA |MR.2020:LN.200..|
000018D0: 20 13 01 86 20 41 24 28 31 35 29 2C 4A 24 28 32 | ... A$(15),J$(2|
000018E0: 30 30 29 2C 58 28 32 30 30 29 00 0F 21 14 01 54 |00),X(200)..!..T|
000018F0: 50 B2 4C 4E 3A 42 50 B2 4F 45 3A 8F 20 2A 2A 2A |P.LN:BP.OE:. ***|
00001900: 2A 2A 20 4C 49 4E 45 2E 20 42 55 46 46 45 52 00 |** LINE. BUFFER.|
00001910: 28 21 15 01 86 20 43 24 28 4C 4E 2C 54 52 29 2C |(!... C$(LN,TR),|
00001920: 49 24 28 31 32 30 30 29 00 4A 21 16 01 99 22 9F |I$(1200).J!...".|
00001930: 93 20 20 20 20 20 20 20 20 20 20 20 20 49 4E 49 |. INI|
00001940: 54 49 41 4C 49 53 49 4E 47 22 00 5A 21 17 01 81 |TIALISING".Z!...|
00001950: 20 49 B2 4F 45 20 A4 20 4C 4E 00 6A 21 18 01 81 | I.OE . LN.j!...|
00001960: 20 4A B2 4F 45 20 A4 20 54 52 00 7B 21 19 01 43 | J.OE . TR.{!..C|
00001970: 24 28 49 2C 4A 29 B2 22 20 20 22 00 83 21 1A 01 |$(I,J)." "..!..|
00001980: 82 20 4A 00 8B 21 1B 01 82 20 49 00 B9 21 1C 01 |. J..!... I..!..|
00001990: 86 20 50 43 28 32 35 36 29 2C 44 53 24 28 32 35 |. PC(256),DS$(25|
000019A0: 36 29 2C 52 24 28 37 29 2C 43 44 24 28 32 30 30 |6),R$(7),CD$(200|
000019B0: 29 2C 4D 51 28 31 37 36 29 00 D9 21 1D 01 81 20 |),MQ(176)..!... |
000019C0: 41 B2 31 A4 32 35 36 3A 87 20 50 43 28 41 29 2C |A.1.256:. PC(A),|
000019D0: 44 53 24 28 41 29 3A 82 41 00 F3 21 1E 01 44 24 |DS$(A):.A..!..D$|
000019E0: B2 22 30 31 32 33 34 35 36 37 38 39 41 42 43 44 |."0123456789ABCD|
000019F0: 45 46 22 00 FC 21 1F 01 99 22 93 22 00 38 22 20 |EF"..!...".".8" |
00001A00: 01 85 22 4C 4F 43 41 54 45 20 50 52 4F 47 52 41 |.."LOCATE PROGRA|
00001A10: 4D 20 41 54 20 41 44 44 52 45 53 53 20 3A 20 22 |M AT ADDRESS : "|
00001A20: 3B 58 51 24 3A 58 51 24 B2 C8 28 58 51 24 AA 22 |;XQ$:XQ$..(XQ$."|
00001A30: 30 30 30 30 22 2C 34 29 00 56 22 21 01 8D 20 33 |0000",4).V"!.. 3|
00001A40: 34 35 3A 8B 20 45 52 B2 31 20 B0 20 58 51 B2 30 |45:. ER.1 . XQ.0|
00001A50: 20 A7 20 32 38 38 00 65 22 22 01 52 B2 58 51 3A | . 288.e"".R.XQ:|
00001A60: 97 20 52 2C 30 00 6E 22 23 01 99 22 93 22 00 7D |. R,0.n"#..".".}|
00001A70: 22 24 01 45 54 B2 52 3A 8D 20 33 39 35 00 AB 22 |"$.ET.R:. 395.."|
00001A80: 25 01 99 22 50 52 4F 47 52 41 4D 20 54 4F 20 42 |%.."PROGRAM TO B|
00001A90: 45 20 4C 4F 43 41 54 45 44 20 41 54 20 41 44 44 |E LOCATED AT ADD|
00001AA0: 52 45 53 53 20 24 22 3B 48 42 24 00 B4 22 26 01 |RESS $";HB$.."&.|
00001AB0: 89 20 33 37 00 E9 22 27 01 8F 20 41 4C 4C 20 53 |. 37.."'.. ALL S|
00001AC0: 50 41 43 45 53 20 49 4E 20 44 41 54 41 20 53 54 |PACES IN DATA ST|
00001AD0: 41 54 45 4D 45 4E 54 53 20 4D 55 53 54 20 42 45 |ATEMENTS MUST BE|
00001AE0: 20 54 59 50 45 44 20 49 4E 00 2A 23 28 01 83 31 | TYPED IN.*#(..1|
00001AF0: 2C 42 52 4B 2C 32 2C 22 4F 52 41 20 28 24 20 20 |,BRK,2,"ORA ($ |
00001B00: 2C 58 29 22 2C 31 2C 3F 3F 3F 2C 31 2C 3F 3F 3F |,X)",1,???,1,???|
00001B10: 2C 31 2C 3F 3F 3F 2C 32 2C 4F 52 41 24 2C 32 2C |,1,???,2,ORA$,2,|
00001B20: 41 53 4C 24 2C 31 2C 3F 3F 3F 00 64 23 29 01 83 |ASL$,1,???.d#)..|
00001B30: 31 2C 50 48 50 2C 32 2C 4F 52 41 23 24 2C 31 2C |1,PHP,2,ORA#$,1,|
00001B40: 41 53 4C 41 2C 31 2C 3F 3F 3F 2C 31 2C 3F 3F 3F |ASLA,1,???,1,???|
00001B50: 2C 33 2C 4F 52 41 24 2C 33 2C 41 53 4C 24 2C 31 |,3,ORA$,3,ASL$,1|
00001B60: 2C 3F 3F 3F 00 72 23 2A 01 83 32 2C 22 42 50 4C |,???.r#*..2,"BPL|
00001B70: 20 22 00 B5 23 2B 01 83 32 2C 22 4F 52 41 20 28 | "..#+..2,"ORA (|
00001B80: 24 20 20 29 2C 59 22 2C 31 2C 3F 3F 3F 2C 31 2C |$ ),Y",1,???,1,|
00001B90: 3F 3F 3F 2C 31 2C 3F 3F 3F 2C 32 2C 22 4F 52 41 |???,1,???,2,"ORA|
00001BA0: 20 24 20 20 2C 58 22 2C 32 2C 22 41 53 4C 20 24 | $ ,X",2,"ASL $|
00001BB0: 20 20 2C 58 22 00 F8 23 2C 01 83 31 2C 3F 3F 3F | ,X"..#,..1,???|
00001BC0: 2C 31 2C 43 4C 43 2C 33 2C 22 4F 52 43 20 24 20 |,1,CLC,3,"ORC $ |
00001BD0: 20 20 20 2C 59 22 2C 31 2C 3F 3F 3F 2C 31 2C 3F | ,Y",1,???,1,?|
00001BE0: 3F 3F 2C 31 2C 3F 3F 3F 2C 33 2C 22 4F 52 41 20 |??,1,???,3,"ORA |
00001BF0: 24 20 20 20 20 2C 58 22 00 3F 24 2D 01 83 33 2C |$ ,X".?$-..3,|
00001C00: 22 41 53 4C 20 24 20 20 20 20 2C 58 22 2C 31 2C |"ASL $ ,X",1,|
00001C10: 3F 3F 3F 2C 33 2C 4A 53 52 2C 32 2C 22 41 4E 44 |???,3,JSR,2,"AND|
00001C20: 20 28 24 20 20 2C 58 29 22 2C 31 2C 3F 3F 3F 2C | ($ ,X)",1,???,|
00001C30: 31 2C 3F 3F 3F 2C 32 2C 22 42 49 54 20 24 22 00 |1,???,2,"BIT $".|
00001C40: 7D 24 2E 01 83 32 2C 41 4E 44 24 2C 32 2C 52 4F |}$...2,AND$,2,RO|
00001C50: 4C 24 2C 31 2C 3F 3F 3F 2C 31 2C 50 4C 50 2C 32 |L$,1,???,1,PLP,2|
00001C60: 2C 41 4E 44 23 24 2C 31 2C 52 4F 4C 41 2C 31 2C |,AND#$,1,ROLA,1,|
00001C70: 3F 3F 3F 2C 33 2C 22 42 49 54 20 24 22 00 AD 24 |???,3,"BIT $"..$|
00001C80: 2F 01 83 33 2C 41 4E 44 24 2C 33 2C 52 4F 4C 24 |/..3,AND$,3,ROL$|
00001C90: 2C 31 2C 3F 3F 3F 2C 32 2C 42 4D 49 24 2C 32 2C |,1,???,2,BMI$,2,|
00001CA0: 22 41 4E 44 20 28 24 20 20 29 2C 59 22 00 D2 24 |"AND ($ ),Y"..$|
00001CB0: 30 01 83 31 2C 3F 3F 3F 2C 31 2C 3F 3F 3F 2C 31 |0..1,???,1,???,1|
00001CC0: 2C 3F 3F 3F 2C 32 2C 22 41 4E 44 20 24 20 20 2C |,???,2,"AND $ ,|
00001CD0: 58 22 00 13 25 31 01 83 32 2C 22 52 4F 4C 20 24 |X"..%1..2,"ROL $|
00001CE0: 20 20 2C 58 22 2C 31 2C 3F 3F 3F 2C 31 2C 53 45 | ,X",1,???,1,SE|
00001CF0: 43 2C 33 2C 22 41 4E 44 20 24 20 20 20 20 2C 59 |C,3,"AND $ ,Y|
00001D00: 22 2C 31 2C 3F 3F 3F 2C 31 2C 3F 3F 3F 2C 31 2C |",1,???,1,???,1,|
00001D10: 3F 3F 3F 00 5A 25 32 01 83 33 2C 22 41 4E 44 20 |???.Z%2..3,"AND |
00001D20: 24 20 20 20 20 2C 58 22 2C 33 2C 22 52 4F 4C 20 |$ ,X",3,"ROL |
00001D30: 24 20 20 20 20 2C 58 22 2C 31 2C 3F 3F 3F 2C 31 |$ ,X",1,???,1|
00001D40: 2C 52 54 49 2C 32 2C 22 45 4F 52 20 28 24 20 20 |,RTI,2,"EOR ($ |
00001D50: 2C 58 29 22 2C 31 2C 3F 3F 3F 00 9A 25 33 01 83 |,X)",1,???..%3..|
00001D60: 31 2C 3F 3F 3F 2C 31 2C 3F 3F 3F 2C 32 2C 45 4F |1,???,1,???,2,EO|
00001D70: 52 24 2C 32 2C 4C 53 52 24 2C 31 2C 3F 3F 3F 2C |R$,2,LSR$,1,???,|
00001D80: 31 2C 50 48 41 2C 32 2C 45 4F 52 23 24 2C 31 2C |1,PHA,2,EOR#$,1,|
00001D90: 4C 53 52 41 2C 31 2C 3F 3F 3F 00 C2 25 34 01 83 |LSRA,1,???..%4..|
00001DA0: 33 2C 4A 4D 50 2C 33 2C 45 4F 52 24 2C 33 2C 4C |3,JMP,3,EOR$,3,L|
00001DB0: 53 52 24 2C 31 2C 3F 3F 3F 2C 32 2C 22 42 56 43 |SR$,1,???,2,"BVC|
00001DC0: 20 22 00 DD 25 35 01 83 32 2C 22 45 4F 52 20 28 | "..%5..2,"EOR (|
00001DD0: 24 20 20 29 2C 59 22 2C 31 2C 3F 3F 3F 00 26 26 |$ ),Y",1,???.&&|
00001DE0: 36 01 83 31 2C 3F 3F 3F 2C 31 2C 3F 3F 3F 2C 32 |6..1,???,1,???,2|
00001DF0: 2C 22 45 4F 52 20 24 20 20 2C 58 22 2C 32 2C 22 |,"EOR $ ,X",2,"|
00001E00: 4C 53 52 20 24 20 20 2C 58 22 2C 31 2C 3F 3F 3F |LSR $ ,X",1,???|
00001E10: 2C 31 2C 43 4C 49 2C 33 2C 22 45 4F 52 20 24 20 |,1,CLI,3,"EOR $ |
00001E20: 20 20 20 2C 59 22 00 69 26 37 01 83 31 2C 3F 3F | ,Y".i&7..1,??|
00001E30: 3F 2C 31 2C 3F 3F 3F 2C 31 2C 3F 3F 3F 2C 33 2C |?,1,???,1,???,3,|
00001E40: 22 45 4F 52 20 24 20 20 20 20 2C 58 22 2C 33 2C |"EOR $ ,X",3,|
00001E50: 22 4C 53 52 20 24 20 20 20 20 2C 58 22 2C 31 2C |"LSR $ ,X",1,|
00001E60: 3F 3F 3F 2C 31 2C 52 54 53 00 AA 26 38 01 83 32 |???,1,RTS..&8..2|
00001E70: 2C 22 41 44 43 20 28 24 20 20 2C 58 29 22 2C 31 |,"ADC ($ ,X)",1|
00001E80: 2C 3F 3F 3F 2C 31 2C 3F 3F 3F 2C 31 2C 3F 3F 3F |,???,1,???,1,???|
00001E90: 2C 32 2C 41 44 43 24 2C 32 2C 52 4F 52 24 2C 31 |,2,ADC$,2,ROR$,1|
00001EA0: 2C 3F 3F 3F 2C 31 2C 50 4C 41 00 DF 26 39 01 83 |,???,1,PLA..&9..|
00001EB0: 32 2C 41 44 43 23 24 2C 31 2C 52 4F 52 41 2C 31 |2,ADC#$,1,RORA,1|
00001EC0: 2C 3F 3F 3F 2C 33 2C 4A 4D 50 28 2C 33 2C 41 44 |,???,3,JMP(,3,AD|
00001ED0: 43 24 2C 33 2C 52 4F 52 24 2C 31 2C 3F 3F 3F 00 |C$,3,ROR$,1,???.|
00001EE0: FA 26 3A 01 83 32 2C 42 56 53 2C 32 2C 22 41 44 |.&:..2,BVS,2,"AD|
00001EF0: 43 20 28 24 20 20 29 2C 59 22 00 3B 27 3B 01 83 |C ($ ),Y".;';..|
00001F00: 31 2C 3F 3F 3F 2C 31 2C 3F 3F 3F 2C 31 2C 3F 3F |1,???,1,???,1,??|
00001F10: 3F 2C 32 2C 22 41 44 43 20 24 20 20 2C 58 22 2C |?,2,"ADC $ ,X",|
00001F20: 32 2C 22 52 4F 52 20 24 20 20 2C 58 22 2C 31 2C |2,"ROR $ ,X",1,|
00001F30: 3F 3F 3F 2C 31 2C 22 53 45 49 22 00 82 27 3C 01 |???,1,"SEI"..'<.|
00001F40: 83 33 2C 22 41 44 43 20 24 20 20 20 20 2C 59 22 |.3,"ADC $ ,Y"|
00001F50: 2C 31 2C 3F 3F 3F 2C 31 2C 3F 3F 3F 2C 31 2C 3F |,1,???,1,???,1,?|
00001F60: 3F 3F 2C 33 2C 22 41 44 43 20 24 20 20 20 20 2C |??,3,"ADC $ ,|
00001F70: 58 22 2C 33 2C 22 52 4F 52 20 24 20 20 20 20 2C |X",3,"ROR $ ,|
00001F80: 58 22 00 C7 27 3D 01 83 31 2C 3F 3F 3F 2C 31 2C |X"..'=..1,???,1,|
00001F90: 3F 3F 3F 2C 32 2C 22 53 54 41 20 28 24 20 20 2C |???,2,"STA ($ ,|
00001FA0: 58 29 22 2C 31 2C 3F 3F 3F 2C 31 2C 3F 3F 3F 2C |X)",1,???,1,???,|
00001FB0: 32 2C 53 54 59 24 2C 32 2C 53 54 41 24 2C 32 2C |2,STY$,2,STA$,2,|
00001FC0: 22 53 54 58 20 24 22 00 05 28 3E 01 83 31 2C 3F |"STX $"..(>..1,?|
00001FD0: 3F 3F 2C 31 2C 44 45 59 2C 31 2C 3F 3F 3F 2C 31 |??,1,DEY,1,???,1|
00001FE0: 2C 54 58 41 2C 31 2C 3F 3F 3F 2C 33 2C 53 54 59 |,TXA,1,???,3,STY|
00001FF0: 24 2C 33 2C 53 54 41 24 2C 33 2C 53 54 58 24 2C |$,3,STA$,3,STX$,|
00002000: 31 2C 3F 3F 3F 00 20 28 3F 01 83 32 2C 42 43 43 |1,???. (?..2,BCC|
00002010: 2C 32 2C 22 53 54 41 20 28 24 20 20 2C 58 29 22 |,2,"STA ($ ,X)"|
00002020: 00 4D 28 40 01 83 31 2C 3F 3F 3F 2C 31 2C 3F 3F |.M(@..1,???,1,??|
00002030: 3F 2C 32 2C 22 53 54 59 20 24 20 20 2C 58 22 2C |?,2,"STY $ ,X",|
00002040: 32 2C 22 53 54 41 20 24 20 20 2C 58 22 00 7C 28 |2,"STA $ ,X".|(|
00002050: 41 01 83 32 2C 22 53 54 58 20 24 20 20 2C 59 22 |A..2,"STX $ ,Y"|
00002060: 2C 31 2C 3F 3F 3F 2C 31 2C 54 59 41 2C 33 2C 22 |,1,???,1,TYA,3,"|
00002070: 53 54 41 20 24 20 20 20 20 2C 59 22 00 BA 28 42 |STA $ ,Y"..(B|
00002080: 01 83 31 2C 54 58 53 2C 31 2C 3F 3F 3F 2C 31 2C |..1,TXS,1,???,1,|
00002090: 3F 3F 3F 2C 33 2C 22 53 54 41 20 24 20 20 20 20 |???,3,"STA $ |
000020A0: 2C 58 22 2C 31 2C 3F 3F 3F 2C 31 2C 3F 3F 3F 2C |,X",1,???,1,???,|
000020B0: 32 2C 22 4C 44 59 20 23 24 22 00 F8 28 43 01 83 |2,"LDY #$"..(C..|
000020C0: 32 2C 22 4C 44 41 20 28 24 20 20 2C 58 29 22 2C |2,"LDA ($ ,X)",|
000020D0: 32 2C 4C 44 58 23 24 2C 31 2C 3F 3F 3F 2C 32 2C |2,LDX#$,1,???,2,|
000020E0: 4C 44 59 24 2C 32 2C 4C 44 41 24 2C 32 2C 4C 44 |LDY$,2,LDA$,2,LD|
000020F0: 58 24 2C 31 2C 3F 3F 3F 00 33 29 44 01 83 31 2C |X$,1,???.3)D..1,|
00002100: 54 41 59 2C 32 2C 4C 44 41 23 24 2C 31 2C 54 41 |TAY,2,LDA#$,1,TA|
00002110: 58 2C 31 2C 3F 3F 3F 2C 33 2C 4C 44 59 20 24 2C |X,1,???,3,LDY $,|
00002120: 33 2C 4C 44 41 24 2C 33 2C 4C 44 58 24 2C 31 2C |3,LDA$,3,LDX$,1,|
00002130: 3F 3F 3F 00 76 29 45 01 83 32 2C 42 43 53 2C 32 |???.v)E..2,BCS,2|
00002140: 2C 22 4C 44 41 20 28 24 20 20 29 2C 59 22 2C 31 |,"LDA ($ ),Y",1|
00002150: 2C 3F 3F 3F 2C 31 2C 3F 3F 3F 2C 32 2C 22 4C 44 |,???,1,???,2,"LD|
00002160: 59 20 24 20 20 2C 58 22 2C 32 2C 22 4C 44 41 20 |Y $ ,X",2,"LDA |
00002170: 24 20 20 2C 58 22 00 C1 29 46 01 83 32 2C 22 4C |$ ,X"..)F..2,"L|
00002180: 44 58 20 24 20 20 2C 59 22 2C 31 2C 3F 3F 3F 2C |DX $ ,Y",1,???,|
00002190: 31 2C 43 4C 56 2C 33 2C 22 4C 44 41 20 24 20 20 |1,CLV,3,"LDA $ |
000021A0: 20 20 2C 59 22 2C 31 2C 54 53 58 2C 31 2C 3F 3F | ,Y",1,TSX,1,??|
000021B0: 3F 2C 33 2C 22 4C 44 59 20 24 20 20 20 20 2C 58 |?,3,"LDY $ ,X|
000021C0: 22 00 04 2A 47 01 83 33 2C 22 4C 44 41 20 24 20 |"..*G..3,"LDA $ |
000021D0: 20 20 20 2C 58 22 2C 33 2C 22 4C 44 58 20 24 20 | ,X",3,"LDX $ |
000021E0: 20 20 20 2C 59 22 2C 31 2C 3F 3F 3F 2C 32 2C 43 | ,Y",1,???,2,C|
000021F0: 50 59 23 24 2C 32 2C 22 43 4D 50 20 28 24 20 20 |PY#$,2,"CMP ($ |
00002200: 2C 58 29 22 00 44 2A 48 01 83 31 2C 3F 3F 3F 2C |,X)".D*H..1,???,|
00002210: 31 2C 3F 3F 3F 2C 32 2C 43 50 59 24 2C 32 2C 43 |1,???,2,CPY$,2,C|
00002220: 4D 50 24 2C 32 2C 44 45 43 24 2C 31 2C 3F 3F 3F |MP$,2,DEC$,1,???|
00002230: 2C 31 2C 49 4E 59 2C 32 2C 43 4D 50 23 24 2C 31 |,1,INY,2,CMP#$,1|
00002240: 2C 44 45 58 00 83 2A 49 01 83 31 2C 3F 3F 3F 2C |,DEX..*I..1,???,|
00002250: 33 2C 43 50 59 24 2C 33 2C 43 4D 50 24 2C 33 2C |3,CPY$,3,CMP$,3,|
00002260: 44 45 43 24 2C 31 2C 3F 3F 3F 2C 32 2C 22 42 4E |DEC$,1,???,2,"BN|
00002270: 45 20 22 2C 32 2C 22 43 4D 50 20 28 24 20 20 29 |E ",2,"CMP ($ )|
00002280: 2C 59 22 00 C2 2A 4A 01 83 31 2C 3F 3F 3F 2C 31 |,Y"..*J..1,???,1|
00002290: 2C 3F 3F 3F 2C 31 2C 3F 3F 3F 2C 32 2C 22 43 4D |,???,1,???,2,"CM|
000022A0: 50 20 24 20 20 2C 58 22 2C 32 2C 22 44 45 43 20 |P $ ,X",2,"DEC |
000022B0: 24 20 20 2C 58 22 2C 31 2C 3F 3F 3F 2C 31 2C 43 |$ ,X",1,???,1,C|
000022C0: 4C 44 00 09 2B 4B 01 83 33 2C 22 43 4D 50 20 24 |LD..+K..3,"CMP $|
000022D0: 20 20 20 20 2C 59 22 2C 31 2C 3F 3F 3F 2C 31 2C | ,Y",1,???,1,|
000022E0: 3F 3F 3F 2C 31 2C 3F 3F 3F 2C 33 2C 22 43 4D 50 |???,1,???,3,"CMP|
000022F0: 20 24 20 20 20 20 2C 58 22 2C 33 2C 22 44 45 43 | $ ,X",3,"DEC|
00002300: 20 24 20 20 20 20 2C 58 22 00 49 2B 4C 01 83 31 | $ ,X".I+L..1|
00002310: 2C 3F 3F 3F 2C 32 2C 43 50 58 23 24 2C 32 2C 22 |,???,2,CPX#$,2,"|
00002320: 53 42 43 20 28 24 20 20 2C 58 29 22 2C 31 2C 3F |SBC ($ ,X)",1,?|
00002330: 3F 3F 2C 31 2C 3F 3F 3F 2C 32 2C 43 50 58 24 2C |??,1,???,2,CPX$,|
00002340: 32 2C 22 53 42 43 20 24 22 00 86 2B 4D 01 83 32 |2,"SBC $"..+M..2|
00002350: 2C 49 4E 43 24 2C 31 2C 3F 3F 3F 2C 31 2C 49 4E |,INC$,1,???,1,IN|
00002360: 58 2C 32 2C 53 42 43 23 24 2C 31 2C 4E 4F 50 2C |X,2,SBC#$,1,NOP,|
00002370: 31 2C 3F 3F 3F 2C 33 2C 43 50 58 24 2C 33 2C 22 |1,???,3,CPX$,3,"|
00002380: 53 42 43 20 24 22 00 C0 2B 4E 01 83 33 2C 49 4E |SBC $"..+N..3,IN|
00002390: 43 24 2C 31 2C 3F 3F 3F 2C 32 2C 42 45 51 2C 32 |C$,1,???,2,BEQ,2|
000023A0: 2C 22 53 42 43 20 28 24 20 20 29 2C 59 22 2C 31 |,"SBC ($ ),Y",1|
000023B0: 2C 3F 3F 3F 2C 31 2C 3F 3F 3F 2C 31 2C 3F 3F 3F |,???,1,???,1,???|
000023C0: 00 09 2C 4F 01 83 32 2C 22 53 42 43 20 24 20 20 |..,O..2,"SBC $ |
000023D0: 2C 58 22 2C 32 2C 22 49 4E 43 20 24 20 20 2C 58 |,X",2,"INC $ ,X|
000023E0: 22 2C 31 2C 3F 3F 3F 2C 31 2C 53 45 44 2C 33 2C |",1,???,1,SED,3,|
000023F0: 22 53 42 43 20 24 20 20 20 20 2C 59 22 2C 31 2C |"SBC $ ,Y",1,|
00002400: 3F 3F 3F 2C 31 2C 3F 3F 3F 00 3A 2C 50 01 83 31 |???,1,???.:,P..1|
00002410: 2C 3F 3F 3F 2C 33 2C 22 53 42 43 20 24 20 20 20 |,???,3,"SBC $ |
00002420: 20 2C 58 22 2C 33 2C 22 49 4E 43 20 24 20 20 20 | ,X",3,"INC $ |
00002430: 20 2C 58 22 2C 31 2C 3F 3F 3F 00 55 2C 51 01 8B | ,X",1,???.U,Q..|
00002440: 58 51 24 B2 22 22 20 A7 20 58 51 B2 AB 31 3A 45 |XQ$."" . XQ..1:E|
00002450: 52 B2 31 3A 8E 00 7A 2C 52 01 41 53 B2 C6 28 C8 |R.1:..z,R.AS..(.|
00002460: 28 58 51 24 2C 31 29 29 AB 34 38 3A 8B 41 53 B1 |(XQ$,1)).48:.AS.|
00002470: 32 32 A7 20 45 52 B2 31 3A 8E 00 95 2C 53 01 8B |22. ER.1:...,S..|
00002480: 20 41 53 B3 31 30 20 AF 20 41 53 B1 AB 31 A7 20 | AS.10 . AS..1. |
00002490: 89 20 33 34 31 00 B2 2C 54 01 41 53 B2 41 53 AB |. 341..,T.AS.AS.|
000024A0: 37 3A 8B 20 41 53 B3 31 30 20 A7 20 45 52 B2 31 |7:. AS.10 . ER.1|
000024B0: 3A 8E 00 D7 2C 55 01 58 51 B2 C6 28 C9 28 58 51 |:...,U.XQ..(.(XQ|
000024C0: 24 2C 31 29 29 AB 34 38 3A 8B 58 51 B1 32 32 A7 |$,1)).48:.XQ.22.|
000024D0: 20 45 52 B2 31 3A 8E 00 F2 2C 56 01 8B 20 58 51 | ER.1:...,V.. XQ|
000024E0: B3 31 30 20 AF 20 58 51 B1 AB 31 A7 20 89 20 33 |.10 . XQ..1. . 3|
000024F0: 34 34 00 0F 2D 57 01 58 51 B2 58 51 AB 37 3A 8B |44..-W.XQ.XQ.7:.|
00002500: 20 58 51 B3 31 30 20 A7 20 45 52 B2 31 3A 8E 00 | XQ.10 . ER.1:..|
00002510: 26 2D 58 01 58 51 B2 58 51 AA 31 36 AC 41 53 3A |&-X.XQ.XQ.16.AS:|
00002520: 45 52 B2 30 3A 8E 00 44 2D 59 01 51 51 24 B2 C8 |ER.0:..D-Y.QQ$..|
00002530: 28 58 51 24 2C 32 29 3A 51 57 24 B2 C9 28 58 51 |(XQ$,2):QW$..(XQ|
00002540: 24 2C 32 29 00 60 2D 5A 01 58 51 24 B2 51 51 24 |$,2).`-Z.XQ$.QQ$|
00002550: 3A 8D 20 33 33 38 3A 51 51 B2 32 35 36 AC 58 51 |:. 338:QQ.256.XQ|
00002560: 00 6F 2D 5B 01 8B 20 45 52 B2 31 20 A7 20 8E 00 |.o-[.. ER.1 . ..|
00002570: 81 2D 5C 01 58 51 24 B2 51 57 24 3A 8D 20 33 33 |.-\.XQ$.QW$:. 33|
00002580: 38 00 9A 2D 5D 01 58 51 B2 58 51 AA 51 51 3A 58 |8..-].XQ.XQ.QQ:X|
00002590: 51 24 B2 51 51 24 AA 51 57 24 00 A0 2D 5E 01 8E |Q$.QQ$.QW$..-^..|
000025A0: 00 E9 2D 5F 01 4A 4A B2 28 4A 4A 24 B2 22 39 30 |..-_.JJ.(JJ$."90|
000025B0: 22 29 AA 28 4A 4A 24 B2 22 42 30 22 29 AA 28 4A |").(JJ$."B0").(J|
000025C0: 4A 24 B2 22 46 30 22 29 AA 28 4A 4A 24 B2 22 33 |J$."F0").(JJ$."3|
000025D0: 30 22 29 AA 28 4A 4A 24 B2 22 44 30 22 29 AA 28 |0").(JJ$."D0").(|
000025E0: 4A 4A 24 B2 22 31 30 22 29 00 2E 2E 60 01 4A 4A |JJ$."10")...`.JJ|
000025F0: B2 28 4A 4A AA 28 4A 4A 24 B2 22 35 30 22 29 AA |.(JJ.(JJ$."50").|
00002600: 28 4A 4A 24 B2 22 37 30 22 29 29 AB 28 28 4A 4A |(JJ$."70")).((JJ|
00002610: 24 B2 22 34 43 22 29 AA 28 4A 4A 24 B2 22 36 43 |$."4C").(JJ$."6C|
00002620: 22 29 AA 28 4A 4A 24 B2 22 32 30 22 29 29 00 34 |").(JJ$."20")).4|
00002630: 2E 61 01 8E 00 58 2E 62 01 58 51 24 B2 C8 28 43 |.a...X.b.XQ$..(C|
00002640: 4F 24 2C 32 29 3A 8B 58 51 24 B2 22 20 20 22 A7 |O$,2):.XQ$." ".|
00002650: 44 49 24 B2 22 22 3A 8E 00 6B 2E 63 01 46 4C B2 |DI$."":..k.c.FL.|
00002660: 30 3A 53 48 B2 30 3A 45 52 B2 30 00 81 2E 64 01 |0:SH.0:ER.0...d.|
00002670: 8D 20 33 33 37 3A 59 B2 58 51 AA 31 3A 58 51 B2 |. 337:Y.XQ.1:XQ.|
00002680: 30 00 8B 2E 65 01 8D 20 33 38 35 00 A3 2E 66 01 |0...e.. 385...f.|
00002690: 8B 20 45 52 B2 32 20 AF 20 46 4D B2 31 20 A7 20 |. ER.2 . FM.1 . |
000026A0: 33 36 31 00 C4 2E 67 01 8B 20 45 52 B1 30 B0 58 |361...g.. ER.0.X|
000026B0: 51 B2 AB 31 A7 20 43 24 28 4A 2C 31 29 B2 22 20 |Q..1. C$(J,1)." |
000026C0: 20 22 3A 8E 00 D5 2E 68 01 4A 4A 24 B2 58 51 24 | ":....h.JJ$.XQ$|
000026D0: 3A 8D 33 35 31 00 F2 2E 69 01 8B 20 50 43 28 59 |:.351...i.. PC(Y|
000026E0: 29 B2 31 20 A7 20 44 49 24 B2 44 53 24 28 59 29 |).1 . DI$.DS$(Y)|
000026F0: 3A 8E 00 06 2F 6A 01 44 49 24 B2 C8 28 44 53 24 |:.../j.DI$..(DS$|
00002700: 28 59 29 2C 35 29 00 16 2F 6B 01 8B 4A 4A B3 B1 |(Y),5)../k..JJ..|
00002710: 30 20 A7 33 37 35 00 44 2F 6C 01 8B 20 C9 28 44 |0 .375.D/l.. .(D|
00002720: 49 24 2C 31 29 B2 22 28 22 B0 20 C9 28 44 49 24 |I$,1)."(". .(DI$|
00002730: 2C 31 29 B2 22 23 22 20 A7 44 49 24 B2 44 49 24 |,1)."#" .DI$.DI$|
00002740: AA 22 24 22 00 65 2F 6D 01 8B 20 50 43 28 59 29 |."$".e/m.. PC(Y)|
00002750: B2 32 20 A7 20 44 49 24 B2 44 49 24 AA C9 28 43 |.2 . DI$.DI$..(C|
00002760: 4F 24 2C 32 29 00 79 2F 6E 01 8B 20 50 43 28 59 |O$,2).y/n.. PC(Y|
00002770: 29 B2 33 20 A7 20 33 37 30 00 A0 2F 6F 01 8B 20 |).3 . 370../o.. |
00002780: C3 28 44 53 24 28 59 29 29 B2 39 A7 20 44 49 24 |.(DS$(Y)).9. DI$|
00002790: B2 44 49 24 AA C9 28 44 53 24 28 59 29 2C 32 29 |.DI$..(DS$(Y),2)|
000027A0: 00 C8 2F 70 01 8B 20 C3 28 44 53 24 28 59 29 29 |../p.. .(DS$(Y))|
000027B0: B2 31 31 A7 20 44 49 24 B2 44 49 24 AA C9 28 44 |.11. DI$.DI$..(D|
000027C0: 53 24 28 59 29 2C 33 29 00 CE 2F 71 01 8E 00 EA |S$(Y),3)../q....|
000027D0: 2F 72 01 4F 50 24 B2 C9 28 43 4F 24 2C 32 29 AA |/r.OP$..(CO$,2).|
000027E0: CA 28 43 4F 24 2C 33 2C 32 29 00 0B 30 73 01 8B |.(CO$,3,2)..0s..|
000027F0: 20 C3 28 44 53 24 28 59 29 29 B2 35 20 20 A7 20 | .(DS$(Y)).5 . |
00002800: 44 49 24 B2 44 49 24 AA 4F 50 24 00 38 30 74 01 |DI$.DI$.OP$.80t.|
00002810: 8B 20 C3 28 44 53 24 28 59 29 29 B2 31 30 20 A7 |. .(DS$(Y)).10 .|
00002820: 20 44 49 24 B2 44 49 24 AA 4F 50 24 AA C9 28 44 | DI$.DI$.OP$..(D|
00002830: 53 24 28 59 29 2C 31 29 00 65 30 75 01 8B 20 C3 |S$(Y),1).e0u.. .|
00002840: 28 44 53 24 28 59 29 29 B2 31 31 20 A7 20 44 49 |(DS$(Y)).11 . DI|
00002850: 24 B2 44 49 24 AA 4F 50 24 AA C9 28 44 53 24 28 |$.DI$.OP$..(DS$(|
00002860: 59 29 2C 32 29 00 6B 30 76 01 8E 00 87 30 77 01 |Y),2).k0v....0w.|
00002870: 4F 50 24 B2 C9 28 43 4F 24 2C 32 29 AA CA 28 43 |OP$..(CO$,2)..(C|
00002880: 4F 24 2C 33 2C 32 29 00 BE 30 78 01 8B 20 CA 28 |O$,3,2)..0x.. .(|
00002890: 43 4F 24 2C 33 2C 31 29 B2 22 4C 22 A7 44 49 24 |CO$,3,1)."L".DI$|
000028A0: B2 44 53 24 28 59 29 AA C9 28 43 4F 24 2C 28 C3 |.DS$(Y)..(CO$,(.|
000028B0: 28 43 4F 24 29 AB 32 29 29 3A 53 48 B2 31 00 DE |(CO$).2)):SH.1..|
000028C0: 30 79 01 8B 20 4A 4A B2 31 20 AF 20 46 4D B2 31 |0y.. JJ.1 . FM.1|
000028D0: 20 A7 20 44 49 24 B2 44 49 24 AA 4F 50 24 00 13 | . DI$.DI$.OP$..|
000028E0: 31 7A 01 8B 20 4A 4A B2 31 20 AF 20 46 4D B2 30 |1z.. JJ.1 . FM.0|
000028F0: 20 AF 20 53 48 B2 30 20 AF 20 C3 28 44 53 24 28 | . SH.0 . .(DS$(|
00002900: 59 29 29 B2 34 20 A7 20 44 49 24 B2 44 49 24 AA |Y)).4 . DI$.DI$.|
00002910: 4F 50 24 00 4F 31 7B 01 8B 20 4A 4A B2 31 20 AF |OP$.O1{.. JJ.1 .|
00002920: 20 46 4D B2 30 20 AF 20 53 48 B2 30 20 AF 20 C3 | FM.0 . SH.0 . .|
00002930: 28 44 53 24 28 59 29 29 B2 35 20 A7 20 44 49 24 |(DS$(Y)).5 . DI$|
00002940: B2 44 53 24 28 59 29 AA 4F 50 24 AA 22 29 22 00 |.DS$(Y).OP$.")".|
00002950: 68 31 7C 01 8B 20 4A 4A B3 B1 AB 31 20 B0 20 46 |h1|.. JJ...1 . F|
00002960: 4D B3 B1 31 20 A7 20 8E 00 8E 31 7D 01 58 51 24 |M..1 . ...1}.XQ$|
00002970: B2 C9 28 43 4F 24 2C 32 29 3A 8D 20 33 33 37 3A |..(CO$,2):. 337:|
00002980: 5A 5A B2 28 47 AB 33 29 AA 50 43 28 59 29 00 AC |ZZ.(G.3).PC(Y)..|
00002990: 31 7E 01 8B 20 58 51 B1 31 32 37 20 A7 20 58 51 |1~.. XQ.127 . XQ|
000029A0: B2 AB 31 AC 28 32 35 36 AB 58 51 29 00 BF 31 7F |..1.(256.XQ)..1.|
000029B0: 01 45 54 B2 5A 5A AA 58 51 3A 8D 20 33 39 35 00 |.ET.ZZ.XQ:. 395.|
000029C0: D1 31 80 01 44 49 24 B2 44 49 24 AA 48 42 24 3A |.1..DI$.DI$.HB$:|
000029D0: 8E 00 E1 31 81 01 8B 20 45 52 B2 31 20 89 33 39 |...1... ER.1 .39|
000029E0: 34 00 00 32 82 01 8B 20 44 53 24 28 59 29 B2 22 |4..2... DS$(Y)."|
000029F0: 3F 3F 3F 22 20 A7 20 45 52 B2 32 3A 89 33 39 34 |???" . ER.2:.394|
00002A00: 00 33 32 83 01 8B 20 C3 28 43 4F 24 29 B3 B1 50 |.32... .(CO$)..P|
00002A10: 43 28 59 29 AC 32 AF 20 CA 28 43 4F 24 2C 33 2C |C(Y).2. .(CO$,3,|
00002A20: 31 29 B3 B1 22 4C 22 20 A7 20 45 52 B2 33 3A 89 |1).."L" . ER.3:.|
00002A30: 33 39 34 00 46 32 84 01 81 46 49 B2 32 20 A4 20 |394.F2...FI.2 . |
00002A40: C3 28 43 4F 24 29 00 61 32 85 01 8B 20 CA 28 43 |.(CO$).a2... .(C|
00002A50: 4F 24 2C 33 2C 31 29 B2 22 4C 22 20 A7 20 33 39 |O$,3,1)."L" . 39|
00002A60: 33 00 7F 32 86 01 8B 20 CA 28 43 4F 24 2C 46 49 |3..2... .(CO$,FI|
00002A70: 2C 31 29 B3 C7 28 34 38 29 A7 20 45 52 B2 34 00 |,1)..(48). ER.4.|
00002A80: B1 32 87 01 8B 20 CA 28 43 4F 24 2C 46 49 2C 31 |.2... .(CO$,FI,1|
00002A90: 29 B1 C7 28 35 37 29 20 AF 20 CA 28 43 4F 24 2C |)..(57) . .(CO$,|
00002AA0: 46 49 2C 31 29 B3 C7 28 36 35 29 A7 20 45 52 B2 |FI,1)..(65). ER.|
00002AB0: 34 00 D0 32 88 01 8B 20 CA 28 43 4F 24 2C 46 49 |4..2... .(CO$,FI|
00002AC0: 2C 31 29 B1 C7 28 37 30 29 20 A7 20 45 52 B2 34 |,1)..(70) . ER.4|
00002AD0: 00 D8 32 89 01 82 46 49 00 DE 32 8A 01 8E 00 06 |..2...FI..2.....|
00002AE0: 33 8B 01 48 42 24 B2 22 22 3A 8B 20 45 54 B1 36 |3..HB$."":. ET.6|
00002AF0: 35 35 33 35 A7 20 45 54 B2 45 54 AB 36 35 35 33 |5535. ET.ET.6553|
00002B00: 36 3A 89 33 39 35 00 15 33 8C 01 81 52 52 B2 33 |6:.395..3...RR.3|
00002B10: A4 30 A9 AB 31 00 2A 33 8D 01 52 54 B2 B5 28 45 |.0..1.*3..RT..(E|
00002B20: 54 AD 28 31 36 AE 52 52 29 29 00 51 33 8E 01 45 |T.(16.RR)).Q3..E|
00002B30: 54 B2 45 54 AB 52 54 AC 31 36 AE 52 52 3A 52 54 |T.ET.RT.16.RR:RT|
00002B40: B2 28 52 54 AA 34 38 29 AB 37 AC 28 52 54 B1 39 |.(RT.48).7.(RT.9|
00002B50: 29 00 67 33 8F 01 48 42 24 B2 48 42 24 AA C7 28 |).g3..HB$.HB$..(|
00002B60: 52 54 29 3A 82 52 52 00 6D 33 90 01 8E 00 91 33 |RT):.RR.m3.....3|
00002B70: 91 01 8F 2A 2A 2A 2A 2A 2A 2A 43 48 45 58 53 55 |...*******CHEXSU|
00002B80: 4D 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |M***************|
00002B90: 2A 00 DD 33 92 01 8F 20 57 41 52 4E 49 4E 47 20 |*..3... WARNING |
00002BA0: 50 52 4F 4F 46 20 52 45 41 44 20 54 48 49 53 20 |PROOF READ THIS |
00002BB0: 53 45 43 54 49 4F 4E 2A 2A 2A 2A 2A 2A 2A 2A 2A |SECTION*********|
00002BC0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002BD0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 01 34 |*************..4|
00002BE0: 93 01 8F 2A 2A 2A 2A 2A 2A 2A 43 41 52 45 46 55 |...*******CAREFU|
00002BF0: 4C 4C 59 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |LLY*************|
00002C00: 2A 00 19 34 94 01 54 B2 C2 28 36 32 29 AC 32 35 |*..4..T..(62).25|
00002C10: 36 AA C2 28 36 31 29 AA 31 00 37 34 95 01 85 22 |6..(61).1.74..."|
00002C20: 54 4F 20 50 52 49 4E 54 20 28 59 20 4F 52 20 4E |TO PRINT (Y OR N|
00002C30: 20 29 20 22 3B 51 24 00 49 34 96 01 8B 20 51 24 | ) ";Q$.I4... Q$|
00002C40: B3 B1 22 59 22 A7 34 30 38 00 67 34 97 01 A0 34 |.."Y".408.g4...4|
00002C50: 2C 34 3A 9F 34 2C 34 3A 9D 34 3A 99 C7 28 31 29 |,4:.4,4:.4:..(1)|
00002C60: 3B C7 28 31 32 39 29 00 9F 34 98 01 99 C7 28 31 |;.(129)..4....(1|
00002C70: 34 37 29 3B 22 43 48 45 43 4B 20 53 55 4D 20 3A |47);"CHECK SUM :|
00002C80: C0 22 3A 4C 49 4E 4B B2 C2 28 34 34 29 AC 32 35 |.":LINK..(44).25|
00002C90: 36 AA C2 28 34 33 29 3A 45 B2 36 32 30 30 30 00 |6..(43):E.62000.|
00002CA0: C3 34 99 01 8F 2A 2A 2A 2A 2A 2A 4D 41 49 4E 4E |.4...******MAINN|
00002CB0: 20 4C 4F 4F 50 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | LOOP***********|
00002CC0: 2A 2A 2A 00 CE 34 9A 01 54 B2 4C 49 4E 4B 00 EA |***..4..T.LINK..|
00002CD0: 34 9B 01 8F 47 45 54 58 24 3A 49 46 58 24 3D 22 |4...GETX$:IFX$="|
00002CE0: 22 54 48 45 4E 36 32 31 32 31 00 FC 34 9C 01 8B |"THEN62121..4...|
00002CF0: 20 58 24 B2 22 20 22 A7 20 34 31 33 00 15 35 9D | X$." ". 413..5.|
00002D00: 01 4C 49 4E 4B B2 C2 28 54 AA 31 29 AC 32 35 36 |.LINK..(T.1).256|
00002D10: AA C2 28 54 29 00 2E 35 9E 01 4C 4E B2 C2 28 54 |..(T)..5..LN..(T|
00002D20: AA 33 29 AC 32 35 36 AA C2 28 54 AA 32 29 00 51 |.3).256..(T.2).Q|
00002D30: 35 9F 01 8B 20 4C 4E B1 45 20 A7 20 99 3A 99 22 |5... LN.E . .:."|
00002D40: 54 4F 54 41 4C 3D 22 3B 43 48 3A A0 34 2C 34 3A |TOTAL=";CH:.4,4:|
00002D50: 80 00 75 35 A0 01 53 24 B2 C4 28 4C 4E 29 3A 4C |..u5..S$..(LN):L|
00002D60: B2 C3 28 53 24 29 AB 31 3A 53 24 B2 CA 28 53 24 |..(S$).1:S$..(S$|
00002D70: 2C 32 2C 4C 29 00 87 35 A1 01 99 53 50 53 28 36 |,2,L)..5...SPS(6|
00002D80: AB 4C 29 3B 53 24 3B 00 98 35 A2 01 43 53 B2 30 |.L);S$;..5..CS.0|
00002D90: 3A 4E B2 30 3A 43 B2 30 00 B5 35 A3 01 81 20 50 |:N.0:C.0..5... P|
00002DA0: B2 54 AA 34 20 A4 20 4C 49 4E 4B AB 32 3A 50 4B |.T.4 . LINK.2:PK|
00002DB0: B2 C2 28 50 29 00 D1 35 A4 01 8B 50 4B B2 31 34 |..(P)..5...PK.14|
00002DC0: 33 20 A7 20 50 B2 4C 49 4E 4B AB 32 3A 89 34 32 |3 . P.LINK.2:.42|
00002DD0: 35 00 E7 35 A5 01 8B 20 50 4B B2 33 34 20 A7 20 |5..5... PK.34 . |
00002DE0: 43 B2 28 43 B2 30 29 00 FF 35 A6 01 8B 20 43 B2 |C.(C.0)..5... C.|
00002DF0: 30 20 AF 20 50 4B B2 33 32 20 A7 20 34 32 35 00 |0 . PK.32 . 425.|
00002E00: 2B 36 A7 01 8B 20 50 4B B2 31 33 37 20 A7 20 4E |+6... PK.137 . N|
00002E10: B2 4E AA 31 3A 43 53 B2 43 53 AA 28 32 30 33 20 |.N.1:CS.CS.(203 |
00002E20: B0 20 4E 29 3A 50 4B B2 31 36 34 00 44 36 A8 01 |. N):PK.164.D6..|
00002E30: 4E B2 4E AA 31 3A 43 53 B2 43 53 AA 28 50 4B 20 |N.N.1:CS.CS.(PK |
00002E40: B0 20 4E 29 00 73 36 A9 01 82 20 50 3A 43 48 B2 |. N).s6... P:CH.|
00002E50: 43 48 AA 43 53 3A 99 22 3D 22 3B C9 28 C4 28 43 |CH.CS:."=";.(.(C|
00002E60: 53 29 2C C3 28 C4 28 43 53 29 29 AB 31 29 3A 89 |S),.(.(CS)).1):.|
00002E70: 34 31 30 00 7D 36 AA 01 8F 20 45 4E 44 00 91 36 |410.}6... END..6|
00002E80: AB 01 8F 20 41 4C 50 41 20 43 4F 4D 4D 41 4E 44 |... ALPA COMMAND|
00002E90: 53 00 B3 36 AC 01 8F 20 4C 49 53 54 20 45 4E 54 |S..6... LIST ENT|
00002EA0: 45 52 20 52 55 4E 20 57 41 54 43 48 20 4E 57 41 |ER RUN WATCH NWA|
00002EB0: 54 43 48 00 D6 36 AD 01 8F 20 43 48 41 4E 47 45 |TCH..6... CHANGE|
00002EC0: 20 4D 45 4D 4F 52 59 20 44 55 4D 50 20 4C 4F 41 | MEMORY DUMP LOA|
00002ED0: 44 20 53 41 56 45 00 E5 36 AE 01 8F 20 4E 45 57 |D SAVE..6... NEW|
00002EE0: 20 51 55 49 54 00 00 00 22 | QUIT..." |
..3...."...... ********************
***********.E...."...... * GETYPT
DOOR JB SOFTWARE *...... ************
*******************...... *
*.W.... * A L P
A *...... * P.ROSHAM, 12
/4/1984 *.#.... * AND DANNY D
AVIS *.I.... *
*.O.... * ASSEMBLY LANGUAGE
*...... * PROGRAMMING AID
*......*
*......*******************************.
....K.53280: . 272......K,1:.K.1,1:.".".
..... PROCESS LINE. .....2...F.0:FM.0:ER
.0.A....J.P1 . P2.X.... C$(J,1)." ". 33
.....CO$.C$(J,1):.C$(J,2).." ". CO$.CO$
.C$(J,2)......C$(J,3).." ". CO$.CO$.C$(
J,3)......354.D.... ER.0. 33.V.... J.100
.." ";...... J.10.." ";...... J;": ";...
... H(C$(J,2),1)."L" . 28......29.C....C
$(J,1)." ".C$(J,2).C$(J,3);" ";:.30.I...
.C$(J,1);" ";C$(J,2);" ";C$(J,3);.S...F.
F.1.......8);DI$... .. F.22 ..34...!.. J
...".....#.....$.. MAIN ROUTINE...%.A$."
":."COMMAND OR LINE(###) : ";A$...&.. H(
A$,1)."9" .118...'..".";:.I.1.36:." ";:.
I:.G(13);".";.1.(..H(A$,1)."0".37.B.).K$
."":.K.1.4.X.*..J(A$,K,1)." ".47...+.. J
(A$,K,1)."" . A$." ":J.E(K$):N.J
:.56.D.,..J(A$,K,1)."9".J(A$,K,1)."0".."
INVALID LINE #":. 37.X.-.K$.K$.J(A$,K,1)
...... K.../..K.5.E(K$).ZE.E(K$).LN . 37
...0.J.E(K$):N.J.'.1.A$.I(A$,(C(A$).K)).
3.2.. K$."".B.3..K.1.C(A$).G.4.. J(A$,K,
1).." ".K$.K$.J(A$,K,1).O.5.. K.Y.6.A$.K
$...7.. H(A$,1)."L". . 37...8..I.1.5 .2.
..9.K..(I.2.1).D.:.C$(J,K).J(A$,I,2)...;
.C$(J,K).H(C$(J,K)." ",2)...<.. I...=..
C$(N,OE)." ".65...>.. N.TP.TP.N.!.?..
N.BP.BP.N.).@..72.9.A..N..BP . 68.X.B..
BP.1 . C$(BP,1).." ".72.J.C.BP.BP.OE:.
66.{.D.. N..TP . 72...E.. C$(TP,OE).."
"..72...F.. TP..BP . TP..LN .TP.TP.OE:.
69.D.G.TP.OE.M.H.PP.N...I.. N.TP . PP.TP
:.78...J.NU.ZE...K.. PP.TP . NU.0 .. 78.
&.L.. C$(PP,OE).." ".NU.NU.OE.7.M.PP.PP
.OE:.75.G.N.P1.PP:P2.PP.^.O.. C$(N,1)."
". 37.G.P.. 13...Q.. ER.1 . ."ILLEGAL O
P-CODE"...R.. ER.2 . ."INVALID OP-CODE".
N.S.. ER.3 . ."INVALID LENGTH OPERAND"..
.T.. ER.4 . ."ILLEGAL OPERAND"...U.. 37.
..V.. *********** WATCH/NOWATCH.N.W.."WA
TCH WHAT ADDRESS : ";QZ$:XQ$.I(("0000".Q
Z$),4).D.X.. 345:. ER.1 . 87.{.Y.WQ.XQ:W
Q$.XQ$:. 37...Z.. WA..1. 93...[.."ADDRES
S ";WQ$;"= <BEFORE> $";:ET.B(WQ):. 395.
M.\..I(HB$,2)...].. B(R).0 .. "NO PROGRA
M IN MEMORY":.:.95...^.. R..._.. WA..1 .
98.G.`.."ADDRESS ";WQ$;"= <AFTER > $";
:ET.B(WQ):. 395.U.A..I(HB$,2).^.B.. 37.Z
.C.. **********DUMP MEMORY...D.DC$."0000
"...E.."DUMP FROM WHAT ADDRESS ";DM$.T.F
.XQ$.I((DC$.DM$),4):.345:. ER.1. 101...G
.DM.XQ...H..".DUMPING FROM ADDRESS $";XQ
$...I.G.DM.).J.. MM.G . (G.176) . 8:F$."
".D.K.ET.MM:.395:.HB$;" : ";.A.L.. MW.0.
7:MQ(MW).B(MM.MW)...M.A.MQ(MW):.A.32.A.1
27.A.159. F$.F$.G(32):. 111...N.F$.F$.G(
A).C.O.H..(MQ(MW).16):L.MQ(MW).16.H...P.
.J(D$,H.1,1).J(D$,L.1,1);...Q.. MW:..8);
F$...R.. MM...S.. K$:.K$."" . 115.,.T..
K$.."M" . G.MM:. 106.5.U.. 37.;.V...L.W.
. A$."" . 37.L.X.. ******* COMMANDO ****
****.|.Y.K$.H(A$,TW)...Z.. K$."EN" . 145
...{.. K$."QU" . ....|.. K$."WA" . WA.1:
. 87.V.}.. K$."NW" . WA.0:. 37...~.. K$.
"LI" . 136..... K$."LO" . 223...... K$.
"ME" . 198.$.... K$."NE" . ..9.... K$."R
U" . . 90.M.... K$."SA" . 259.A.... K$."
CH" . 287.T.... K$."DU" . 99......"INVAL
ID COMMAND "...... 35............ *****
LIST ROUNTINE *****.K...P1.TP:P2.BP.....
.C(A$).5 . 141.....N1.F(J(A$,6,1)).#....
C(A$).FR . N1.47 . N1.58 . P1.E(J(A$,5,
3)).,....".".5.... 13.>.... 37.D.....D..
.. ***** DUNP ROUNTINE *****.....G.R:."E
NTERING AT ADDRESS $";:ET.G:. 395:.HB$..
.... J.TP . BP...... C$(J,OE)." "..196.
..... J(C$(J,TW),1,1).."L". 187...... G,
ZE:. G.OE,ZE:. G.TW,ZE:. G.TR,ZE.,...J1.
E(J(C$(J,TW),TW,1).C$(J,TR)).L....H(C$(J
,2),1)."L"..J;" : ";C$(J,1)." ".C$(J,2).
C$(J,3):.155......J;" : ";C$(J,1);" ";C$
(J,2);C$(J,3)...... J1.ZE . J1.LN . 195.
K...JJ$.C$(J,1):. 351:CJ.JJ......H(C$(J,
2),1).."L". 159......J1;" : ";C$(J1,1)."
".C$(J1,2).C$(J1,3):.160.J....J1;" : ";
C$(J1,1);" ";C$(J1,2);" ";C$(J1,3).A. ..
.(CJ).. OE .. 195.V...DD.(J1.J).(J1.J)..
...JA.G:DP.ZE...... J1.J ..175.....CL.J.
DD.B...N1.ZE:. C$(CL,OE)." "..170......
H(C$(CL,2),1)."L".170.....N1.OE.(C$(CL,
TW).." ").(C$(CL,TR).." "):.170.....JJ
$.C$(CL,1):. 351:TJ.JJ.Q...N1.((TJ.OE).T
R.(TJ..OE).TW)..1.H.... CL.J1 . DD.0.175
.U...DP.DP.N1...... CL.J1 . . 175.....CL
.CL.DD......165.E.... CJ.1.JA.JA.DD.DP.(
DD.0)..3:.179.Z....DD.ZE . DP.DP.2......
DP.126 . DD.ZE .. 195...... DP.129 . DD
.ZE .. 195.3...XQ$.J(C$(J,1),1,2):.337:V
.XQ.C....G,V:G.G.OE......CJ.OE ..G,JA..(
JA.QK).QK:G.G.OE:.G,.(JA.QK):G.G.OE:.185
...... DD.ZE . DP.256.DP...... DP.0 . DP
.256.E...DP.DP.TW:.G,DP:G.G.1.O...."OK".
X....196......I.1.5.2.....K..(I.TW.OE)..
...XQ$.J(C$(J,K),1,2):.337:V.XQ.-....ER.
1 .V..1 ..193.6....G,V.A...G.G.OE.H.A..I
.Q.B..196.X.C.."** ERROR-BRANCH OUT OF R
ANGE **"..D..J...E..37...F.CO$.""...G..
************DISEMBLE...H.DC$."0000"...I
.."DISASSEMBLE FROM WHAT ADDRESS ";DM$..
.J.XQ$.I((DC$.DM$),4):.345:.ER.1 . 201..
.K.DM.XQ.A.L..".DISASSEMBLING FROM ADDRE
SS *";XQ$.S.M.G.DM:F.0:FM.0.D.N.F.F.1:CO
$."".O.O..I.1.3...P.V(I).B(G):H..(V(I).1
6):L.V(I).16.H...Q.R$(I).J(D$,H.1,1).J(D
$,L.1,1).E.R.G.G.1:.I...S..I.1.PC(V(1).1
):CO$.CO$.R$(I):.I...T..354...U.ET.DM:.
395:.HB$;": ";...V.. I.1. PC(Y)./.W..R$(
I);" ";.7.X.. I.Z.Y.WW.15.(C(CO$).PC(Y))
:..WW);DI$.Q.Z.G.(G.3).PC(Y):DM.G......
F..22 .. 206...... K$:. K$."" . 220.....
. K$.."M" . F.ZE:.206...... 37.D........
.. ******* LOAD **************......".".
....."LOAD PROGRAM"......"INPUT FILENAME
";N$...... N$."" . 227.=.... 1,1,0,N$.J.
..T.0:FF.0.M.... I.1 . 200:CD$(I)."":J$(
I)."".W...T.T.1......#1,I$(I)...... I$(I
).G(13). FF.0:.241...... I$(I)."," . FF.
1:.233.O.... FF.1 . 240...... I$(I).G(47
).I$(I).G(58).FF.0 . J$(I).J$(I).I$(I):.
233.!.... I$(I)."*" . 242.7.... I$(I)."
" . 233.U...CD$(I).CD$(I).I$(I):. 233.].
... I.E... 1.U.... I.1 . T.1.....X(I).E
(J$(I)):Y.1...... J. 1 . 3.....C$(X(I),J
).J(CD$(I),Y,2).....C$(X(I),J).H(C$(X(I)
,J)." ",2).....Y.Y.2...... J:. I......
I.1. 200.....TP.I."....C$(I,1).." " . 2
54.*.... I.>.... I.200 . 1 ..1.G...BP.I.
`....C$(I,1).." " . 258.H.... I.Q.... 3
7.W.......... ****** SAVE **************
****......"ENTER NAME : ";N$.E.... N$.""
. 261.P...R$.","...... 1,1,1,N$...... I.
1 . 200.. ...C$(I,1)." " . 269.' ..CO$.
C$(I,1).C$(I,2).C$(I,3).6 ...1,I;R$CO$.>
... I.L ...1,"*": 1.U ... 37.J ...K,0:.
K.1,0:.".".. ... ******* INITIALISATION
*******.N ..ZE.0:OE.1:TW.OE.OE:TR.OE.TW:
FR.TW.TW:QK.256:MR.2020:LN.200.. ... A$(
15),J$(200),X(200)..!..TP.LN:BP.OE:. ***
** LINE. BUFFER.(!... C$(LN,TR),I$(1200)
.J!...".. INITIALISING".Z!...
I.OE . LN.J!... J.OE . TR.{!..C$(I,J)."
"..!... J..!... I..!... PC(256),DS$(25
6),R$(7),CD$(200),MQ(176).Y!... A.1.256:
. PC(A),DS$(A):.A..!..D$."0123456789ABCD
EF"..!...".".8" .."LOCATE PROGRAM AT ADD
RESS : ";XQ$:XQ$.H(XQ$."0000",4).V"!.. 3
45:. ER.1 . XQ.0 . 288.E"".R.XQ:. R,0.N"
#..".".}"$.ET.R:. 395.."%.."PROGRAM TO B
E LOCATED AT ADDRESS $";HB$.."&.. 37.."'
.. ALL SPACES IN DATA STATEMENTS MUST BE
TYPED IN.*#(..1,BRK,2,"ORA ($ ,X)",1,?
??,1,???,1,???,2,ORA$,2,ASL$,1,???.D#)..
1,PHP,2,ORA#$,1,ASLA,1,???,1,???,3,ORA$,
3,ASL$,1,???.R#*..2,"BPL "..#+..2,"ORA (
$ ),Y",1,???,1,???,1,???,2,"ORA $ ,X",
2,"ASL $ ,X"..#,..1,???,1,CLC,3,"ORC $
,Y",1,???,1,???,1,???,3,"ORA $ ,X"
.?$-..3,"ASL $ ,X",1,???,3,JSR,2,"AND
($ ,X)",1,???,1,???,2,"BIT $".}$...2,A
ND$,2,ROL$,1,???,1,PLP,2,AND#$,1,ROLA,1,
???,3,"BIT $"..$/..3,AND$,3,ROL$,1,???,2
,BMI$,2,"AND ($ ),Y".R$0..1,???,1,???,1
,???,2,"AND $ ,X"..%1..2,"ROL $ ,X",1,
???,1,SEC,3,"AND $ ,Y",1,???,1,???,1,
???.Z%2..3,"AND $ ,X",3,"ROL $ ,X"
,1,???,1,RTI,2,"EOR ($ ,X)",1,???..%3..
1,???,1,???,2,EOR$,2,LSR$,1,???,1,PHA,2,
EOR#$,1,LSRA,1,???.B%4..3,JMP,3,EOR$,3,L
SR$,1,???,2,"BVC "..%5..2,"EOR ($ ),Y",
1,???.&&6..1,???,1,???,2,"EOR $ ,X",2,"
LSR $ ,X",1,???,1,CLI,3,"EOR $ ,Y".I
&7..1,???,1,???,1,???,3,"EOR $ ,X",3,
"LSR $ ,X",1,???,1,RTS..&8..2,"ADC ($
,X)",1,???,1,???,1,???,2,ADC$,2,ROR$,1
,???,1,PLA..&9..2,ADC#$,1,RORA,1,???,3,J
MP(,3,ADC$,3,ROR$,1,???..&:..2,BVS,2,"AD
C ($ ),Y".;';..1,???,1,???,1,???,2,"ADC
$ ,X",2,"ROR $ ,X",1,???,1,"SEI"..'<.
.3,"ADC $ ,Y",1,???,1,???,1,???,3,"AD
C $ ,X",3,"ROR $ ,X".G'=..1,???,1,
???,2,"STA ($ ,X)",1,???,1,???,2,STY$,2
,STA$,2,"STX $"..(>..1,???,1,DEY,1,???,1
,TXA,1,???,3,STY$,3,STA$,3,STX$,1,???. (
?..2,BCC,2,"STA ($ ,X)".M(@..1,???,1,??
?,2,"STY $ ,X",2,"STA $ ,X".|(A..2,"ST
X $ ,Y",1,???,1,TYA,3,"STA $ ,Y"..(B
..1,TXS,1,???,1,???,3,"STA $ ,X",1,??
?,1,???,2,"LDY #$"..(C..2,"LDA ($ ,X)",
2,LDX#$,1,???,2,LDY$,2,LDA$,2,LDX$,1,???
.3)D..1,TAY,2,LDA#$,1,TAX,1,???,3,LDY $,
3,LDA$,3,LDX$,1,???.V)E..2,BCS,2,"LDA ($
),Y",1,???,1,???,2,"LDY $ ,X",2,"LDA
$ ,X".A)F..2,"LDX $ ,Y",1,???,1,CLV,3,
"LDA $ ,Y",1,TSX,1,???,3,"LDY $ ,X
"..*G..3,"LDA $ ,X",3,"LDX $ ,Y",1
,???,2,CPY#$,2,"CMP ($ ,X)".D*H..1,???,
1,???,2,CPY$,2,CMP$,2,DEC$,1,???,1,INY,2
,CMP#$,1,DEX..*I..1,???,3,CPY$,3,CMP$,3,
DEC$,1,???,2,"BNE ",2,"CMP ($ ),Y".B*J.
.1,???,1,???,1,???,2,"CMP $ ,X",2,"DEC
$ ,X",1,???,1,CLD..+K..3,"CMP $ ,Y",
1,???,1,???,1,???,3,"CMP $ ,X",3,"DEC
$ ,X".I+L..1,???,2,CPX#$,2,"SBC ($
,X)",1,???,1,???,2,CPX$,2,"SBC $"..+M..2
,INC$,1,???,1,INX,2,SBC#$,1,NOP,1,???,3,
CPX$,3,"SBC $"..+N..3,INC$,1,???,2,BEQ,2
,"SBC ($ ),Y",1,???,1,???,1,???..,O..2,
"SBC $ ,X",2,"INC $ ,X",1,???,1,SED,3,
"SBC $ ,Y",1,???,1,???.:,P..1,???,3,"
SBC $ ,X",3,"INC $ ,X",1,???.U,Q..
XQ$."" . XQ..1:ER.1:..Z,R.AS.F(H(XQ$,1))
.48:.AS.22. ER.1:...,S.. AS.10 . AS..1.
. 341..,T.AS.AS.7:. AS.10 . ER.1:..W,U.X
Q.F(I(XQ$,1)).48:.XQ.22. ER.1:...,V.. XQ
.10 . XQ..1. . 344..-W.XQ.XQ.7:. XQ.10 .
ER.1:..&-X.XQ.XQ.16.AS:ER.0:..D-Y.QQ$.H
(XQ$,2):QW$.I(XQ$,2).`-Z.XQ$.QQ$:. 338:Q
Q.256.XQ.O-[.. ER.1 . ...-\.XQ$.QW$:. 33
8..-].XQ.XQ.QQ:XQ$.QQ$.QW$. -^....-_.JJ.
(JJ$."90").(JJ$."B0").(JJ$."F0").(JJ$."3
0").(JJ$."D0").(JJ$."10")...`.JJ.(JJ.(JJ
$."50").(JJ$."70")).((JJ$."4C").(JJ$."6C
").(JJ$."20")).4.A...X.B.XQ$.H(CO$,2):.X
Q$." ".DI$."":..K.C.FL.0:SH.0:ER.0...D.
. 337:Y.XQ.1:XQ.0...E.. 385...F.. ER.2 .
FM.1 . 361.D.G.. ER.0.XQ..1. C$(J,1)."
":..U.H.JJ$.XQ$:.351...I.. PC(Y).1 . DI
$.DS$(Y):.../J.DI$.H(DS$(Y),5)../K..JJ..
0 .375.D/L.. I(DI$,1)."(". I(DI$,1)."#"
.DI$.DI$."$".E/M.. PC(Y).2 . DI$.DI$.I(C
O$,2).Y/N.. PC(Y).3 . 370. /O.. C(DS$(Y)
).9. DI$.DI$.I(DS$(Y),2).H/P.. C(DS$(Y))
.11. DI$.DI$.I(DS$(Y),3).N/Q..../R.OP$.I
(CO$,2).J(CO$,3,2)..0S.. C(DS$(Y)).5 .
DI$.DI$.OP$.80T.. C(DS$(Y)).10 . DI$.DI$
.OP$.I(DS$(Y),1).E0U.. C(DS$(Y)).11 . DI
$.DI$.OP$.I(DS$(Y),2).K0V....0W.OP$.I(CO
$,2).J(CO$,3,2)..0X.. J(CO$,3,1)."L".DI$
.DS$(Y).I(CO$,(C(CO$).2)):SH.1..0Y.. JJ.
1 . FM.1 . DI$.DI$.OP$..1Z.. JJ.1 . FM.0
. SH.0 . C(DS$(Y)).4 . DI$.DI$.OP$.O1{.
. JJ.1 . FM.0 . SH.0 . C(DS$(Y)).5 . DI$
.DS$(Y).OP$.")".H1|.. JJ...1 . FM..1 . .
..1}.XQ$.I(CO$,2):. 337:ZZ.(G.3).PC(Y)..
1~.. XQ.127 . XQ..1.(256.XQ)..1.ET.ZZ.X
Q:. 395.Q1..DI$.DI$.HB$:...1... ER.1 .39
4..2... DS$(Y)."???" . ER.2:.394.32... C
(CO$)..PC(Y).2. J(CO$,3,1).."L" . ER.3:.
394.F2...FI.2 . C(CO$).A2... J(CO$,3,1).
"L" . 393.2... J(CO$,FI,1).G(48). ER.4.
.2... J(CO$,FI,1).G(57) . J(CO$,FI,1).G(
65). ER.4.P2... J(CO$,FI,1).G(70) . ER.4
.X2...FI..2.....3..HB$."":. ET.65535. ET
.ET.65536:.395..3...RR.3.0..1.*3..RT..(E
T.(16.RR)).Q3..ET.ET.RT.16.RR:RT.(RT.48)
.7.(RT.9).G3..HB$.HB$.G(RT):.RR.M3.....3
...*******CHEXSUM****************..3...
WARNING PROOF READ THIS SECTION*********
*****************************..4...*****
**CAREFULLY**************..4..T.B(62).25
6.B(61).1.74..."TO PRINT (Y OR N ) ";Q$.
I4... Q$.."Y".408.G4.. 4,4:.4,4:.4:.G(1)
;G(129)..4...G(147);"CHECK SUM :.":LINK.
B(44).256.B(43):E.62000.C4...******MAINN
LOOP**************.N4..T.LINK..4...GETX
$:IFX$=""THEN62121..4... X$." ". 413..5.
.LINK.B(T.1).256.B(T)..5..LN.B(T.3).256.
B(T.2).Q5... LN.E . .:."TOTAL=";CH: 4,4:
..U5 .S$.D(LN):L.C(S$).1:S$.J(S$,2,L)..5
...SPS(6.L);S$;..5..CS.0:N.0:C.0..5... P
.T.4 . LINK.2:PK.B(P).Q5...PK.143 . P.LI
NK.2:.425..5... PK.34 . C.(C.0)..5... C.
0 . PK.32 . 425.+6... PK.137 . N.N.1:CS.
CS.(203 . N):PK.164.D6..N.N.1:CS.CS.(PK
. N).S6... P:CH.CH.CS:."=";I(D(CS),C(D(C
S)).1):.410.}6... END..6... ALPA COMMAND
S..6... LIST ENTER RUN WATCH NWATCH.V6..
. CHANGE MEMORY DUMP LOAD SAVE..6... NEW
QUIT..."
> CLICK IMAGE PREVIEW FOR FULL MODAL