UNASSEMBLER
FILE INFORMATION
FILENAME(S): UNASSEMBLER
FILE TYPE(S): PRG
FILE SIZE: 9.9K
FIRST SEEN: 2025-11-30 21:12:21
APPEARS ON: 2 disk(s)
FILE HASH
83af053258743556e581b29feaf9c504157c67d6b7463d63997acb474f4bd815
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| RANS ISK1 | UNASSEMBLER | PRG | DuncanTwain | 16 | 0 | DOWNLOAD FILE |
| RANS ISK2 | UNASSEMBLER | PRG | DuncanTwain | 16 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 04 22 04 0A 00 8F 20 44 49 53 4B 20 55 4E 2D |..".... DISK UN-| 00000010: 41 53 53 45 4D 42 4C 45 52 2E 4C 4F 4E 47 20 43 |ASSEMBLER.LONG C| 00000020: 36 34 00 48 04 14 00 8F 20 4F 52 49 47 49 4E 41 |64.H.... ORIGINA| 00000030: 4C 4C 59 20 42 59 20 50 41 55 4C 20 48 49 47 47 |LLY BY PAUL HIGG| 00000040: 49 4E 42 4F 54 54 4F 4D 00 76 04 1E 00 8F 20 4D |INBOTTOM.v.... M| 00000050: 4F 44 49 46 49 45 44 20 42 59 20 4A 2E 20 4C 4F |ODIFIED BY J. LO| 00000060: 54 48 49 41 4E 2C 20 4F 54 54 41 57 41 2C 20 4F |THIAN, OTTAWA, O| 00000070: 4E 54 41 52 49 4F 00 91 04 28 00 8F 20 49 4E 49 |NTARIO...(.. INI| 00000080: 54 49 41 4C 49 5A 45 20 56 41 52 49 41 42 4C 45 |TIALIZE VARIABLE| 00000090: 53 00 D5 04 32 00 97 35 33 32 38 30 2C 31 32 3A |S...2..53280,12:| 000000A0: 97 35 33 32 38 31 2C 31 35 3A 41 24 B2 22 22 3A |.53281,15:A$."":| 000000B0: 51 B2 2E 3A 50 B2 2E 3A 4E B2 2E 3A 4E 24 B2 22 |Q..:P..:N..:N$."| 000000C0: 22 3A 50 24 B2 22 22 3A 44 45 B2 2E 3A 49 B2 2E |":P$."":DE..:I..| 000000D0: 3A 42 43 B2 2E 00 1C 05 3C 00 4E 31 24 B2 C7 28 |:BC.....<.N1$..(| 000000E0: 30 29 3A 48 45 24 B2 22 30 31 32 33 34 35 36 37 |0):HE$."01234567| 000000F0: 38 39 41 42 43 44 45 46 22 3A 58 58 24 B2 C7 28 |89ABCDEF":XX$..(| 00000100: 31 33 29 3A 50 53 B2 31 3A 4D 48 B2 32 35 36 3A |13):PS.1:MH.256:| 00000110: 4C 46 B2 31 30 30 30 3A 4F 54 B2 2E 00 22 05 46 |LF.1000:OT...".F| 00000120: 00 8F 00 4C 05 50 00 99 22 93 11 11 11 20 20 20 |...L.P..".... | 00000130: 20 20 20 20 20 43 2D 36 34 20 44 49 53 4B 20 55 | C-64 DISK U| 00000140: 4E 2D 41 53 53 45 4D 42 4C 45 52 22 00 8D 05 5A |N-ASSEMBLER"...Z| 00000150: 00 99 22 11 11 11 20 20 20 20 20 20 20 20 20 20 |.."... | 00000160: 20 20 4A 41 43 4B 20 4C 4F 54 48 49 41 4E 22 3A | JACK LOTHIAN":| 00000170: 99 22 11 11 20 20 20 20 20 20 20 20 20 20 20 20 |.".. | 00000180: 20 50 4C 45 41 53 45 20 57 41 49 54 22 00 93 05 | PLEASE WAIT"...| 00000190: 64 00 8F 00 BC 05 6E 00 8F 20 41 52 52 41 59 53 |d.....n.. ARRAYS| 000001A0: 20 44 45 46 49 4E 49 4E 47 20 41 53 53 45 4D 42 | DEFINING ASSEMB| 000001B0: 4C 45 52 20 4F 50 20 43 4F 44 45 53 00 E3 05 78 |LER OP CODES...x| 000001C0: 00 86 20 4D 44 28 32 35 35 29 2C 4D 4E 24 28 32 |.. MD(255),MN$(2| 000001D0: 35 35 29 2C 4C 31 28 35 30 30 29 2C 4C 32 28 35 |55),L1(500),L2(5| 000001E0: 30 30 29 00 0C 06 82 00 81 49 B2 31 A4 31 35 31 |00)......I.1.151| 000001F0: 3A 87 41 24 2C 41 2C 42 3A 4D 4E 24 28 42 29 B2 |:.A$,A,B:MN$(B).| 00000200: 41 24 3A 4D 44 28 42 29 B2 41 3A 82 00 12 06 8C |A$:MD(B).A:.....| 00000210: 00 8F 00 3C 06 96 00 8F 20 43 48 45 43 4B 20 57 |...<.... CHECK W| 00000220: 48 45 52 45 20 53 4F 55 52 43 45 20 53 48 4F 55 |HERE SOURCE SHOU| 00000230: 4C 44 20 42 45 20 4C 49 53 54 45 44 00 7F 06 A0 |LD BE LISTED....| 00000240: 00 99 22 11 20 53 4F 55 52 43 45 20 43 4F 44 45 |..". SOURCE CODE| 00000250: 20 4F 4E 20 50 52 49 4E 54 20 28 50 29 2C 20 53 | ON PRINT (P), S| 00000260: 43 52 45 45 4E 20 28 53 29 2C 22 3A 85 22 20 4F |CREEN (S),":." O| 00000270: 52 20 44 49 53 4B 20 28 44 29 22 3B 4F 54 24 00 |R DISK (D)";OT$.| 00000280: A4 06 AA 00 8B 20 4F 54 24 B3 B1 22 50 22 AF 4F |..... OT$.."P".O| 00000290: 54 24 B3 B1 22 53 22 AF 4F 54 24 B3 B1 22 44 22 |T$.."S".OT$.."D"| 000002A0: A7 31 36 30 00 AA 06 B4 00 8F 00 D1 06 BE 00 8F |.160............| 000002B0: 20 47 45 54 20 4F 42 4A 45 43 54 20 41 4E 44 20 | GET OBJECT AND | 000002C0: 53 4F 55 52 43 45 20 46 49 4C 45 20 4E 41 4D 45 |SOURCE FILE NAME| 000002D0: 53 00 12 07 C8 00 85 22 11 20 44 52 49 56 45 20 |S......". DRIVE | 000002E0: 4E 55 4D 42 45 52 20 4F 46 20 54 48 45 20 50 52 |NUMBER OF THE PR| 000002F0: 4F 47 52 41 4D 28 30 20 4F 52 20 31 29 22 3B 46 |OGRAM(0 OR 1)";F| 00000300: 44 3A 8B 46 44 B3 B1 30 AF 46 44 B3 B1 31 A7 32 |D:.FD..0.FD..1.2| 00000310: 30 30 00 2E 07 D2 00 85 22 20 50 52 4F 47 52 41 |00......" PROGRA| 00000320: 4D 20 46 49 4C 45 4E 41 4D 45 22 3B 46 24 00 65 |M FILENAME";F$.e| 00000330: 07 DC 00 8B C3 28 46 24 29 B1 31 36 A7 99 22 11 |.....(F$).16..".| 00000340: 12 45 52 52 4F 52 20 2D 20 46 49 4C 45 20 4E 41 |.ERROR - FILE NA| 00000350: 4D 45 20 49 53 20 54 4F 4F 20 4C 4F 4E 47 11 22 |ME IS TOO LONG."| 00000360: 3A 89 32 31 30 00 86 07 E6 00 8D 32 34 31 30 3A |:.210......2410:| 00000370: 46 24 B2 C7 28 46 44 29 AA 22 3A 22 AA 46 24 AA |F$..(FD).":".F$.| 00000380: 22 2C 50 2C 52 22 00 9D 07 F0 00 9F 31 2C 38 2C |",P,R"......1,8,| 00000390: 39 2C 46 24 3A 8D 32 32 32 30 3A A0 31 00 B1 07 |9,F$:.2220:.1...| 000003A0: FA 00 8B 45 41 B3 B1 30 A7 A0 31 35 3A 89 32 31 |...EA..0..15:.21| 000003B0: 30 00 C4 07 04 01 8B 20 4F 54 24 B3 B1 22 44 22 |0...... OT$.."D"| 000003C0: A7 33 33 30 00 02 08 0E 01 85 22 11 20 44 52 49 |.330......". DRI| 000003D0: 56 45 20 4E 55 4D 42 45 52 20 46 4F 52 20 54 48 |VE NUMBER FOR TH| 000003E0: 45 20 53 4F 55 52 43 45 20 46 49 4C 45 22 3B 46 |E SOURCE FILE";F| 000003F0: 4F 3A 8B 46 4F B3 B1 30 AF 46 44 B3 B1 31 A7 32 |O:.FO..0.FD..1.2| 00000400: 37 30 00 1E 08 18 01 85 22 20 53 4F 55 52 43 45 |70......" SOURCE| 00000410: 20 46 49 4C 45 4E 41 4D 45 22 3B 4F 46 24 00 56 | FILENAME";OF$.V| 00000420: 08 22 01 8B C3 28 4F 46 24 29 B1 31 32 A7 99 22 |."...(OF$).12.."| 00000430: 11 12 45 52 52 4F 52 20 2D 20 46 49 4C 45 20 4E |..ERROR - FILE N| 00000440: 41 4D 45 20 49 53 20 54 4F 4F 20 4C 4F 4E 47 11 |AME IS TOO LONG.| 00000450: 22 3A 89 32 38 30 00 76 08 2C 01 4F 46 24 B2 C4 |":.280.v.,.OF$..| 00000460: 28 46 4F 29 AA 22 3A 22 AA 4F 46 24 AA 22 2E 22 |(FO).":".OF$."."| 00000470: 3A 8D 32 34 32 30 00 7C 08 36 01 8F 00 9E 08 40 |:.2420.|.6.....@| 00000480: 01 8F 20 43 4F 4E 56 45 52 54 20 42 49 54 20 54 |.. CONVERT BIT T| 00000490: 4F 20 2E 42 59 54 45 20 4F 50 54 49 4F 4E 00 E3 |O .BYTE OPTION..| 000004A0: 08 4A 01 99 22 11 20 44 4F 20 59 4F 55 20 57 49 |.J..". DO YOU WI| 000004B0: 53 48 20 42 49 54 20 4F 50 45 52 41 54 49 4F 4E |SH BIT OPERATION| 000004C0: 53 20 43 4F 4E 56 45 52 54 45 44 20 20 20 20 54 |S CONVERTED T| 000004D0: 4F 20 42 59 54 45 20 4F 50 45 52 41 54 49 4F 4E |O BYTE OPERATION| 000004E0: 53 3F 22 00 02 09 54 01 85 22 11 20 59 45 53 20 |S?"...T..". YES | 000004F0: 28 59 29 20 4F 52 20 4E 4F 20 28 4E 29 22 3B 41 |(Y) OR NO (N)";A| 00000500: 4E 24 00 22 09 5E 01 8B 20 41 4E 24 B3 B1 22 4E |N$.".^.. AN$.."N| 00000510: 22 20 AF 20 41 4E 24 B3 B1 22 59 22 20 A7 20 33 |" . AN$.."Y" . 3| 00000520: 34 30 00 46 09 68 01 8B 20 41 4E 24 B2 22 59 22 |40.F.h.. AN$."Y"| 00000530: 20 A7 20 4D 44 28 33 36 29 B2 31 34 3A 4D 44 28 | . MD(36).14:MD(| 00000540: 34 34 29 B2 31 34 00 4C 09 72 01 8F 00 7C 09 7C |44).14.L.r...|.|| 00000550: 01 8F 20 46 49 52 53 54 20 50 41 53 53 20 2D 20 |.. FIRST PASS - | 00000560: 46 49 4E 44 20 53 54 41 52 54 20 41 4E 44 20 45 |FIND START AND E| 00000570: 4E 44 20 41 44 44 52 45 53 53 45 53 00 A9 09 86 |ND ADDRESSES....| 00000580: 01 8D 32 33 38 30 3A 8D 32 32 36 30 3A 53 B2 C6 |..2380:.2260:S..| 00000590: 28 41 24 AA 4E 31 24 29 AA C6 28 42 24 AA 4E 31 |(A$.N1$)..(B$.N1| 000005A0: 24 29 AC 4D 48 3A 45 B2 53 00 C4 09 90 01 A1 23 |$).MH:E.S......#| 000005B0: 31 2C 41 24 3A 45 B2 45 AA 31 3A 8B 53 54 B2 30 |1,A$:E.E.1:.ST.0| 000005C0: A7 34 30 30 00 DB 09 9A 01 A0 31 3A 44 45 B2 53 |.400......1:DE.S| 000005D0: 3A 48 4E B2 33 3A 8D 32 31 38 30 00 09 0A A4 01 |:HN.3:.2180.....| 000005E0: 99 22 11 20 53 54 41 52 54 49 4E 47 20 41 44 44 |.". STARTING ADD| 000005F0: 52 45 53 53 20 49 53 3A 20 22 3B 53 3B 22 20 28 |RESS IS: ";S;" (| 00000600: 24 22 3B 48 24 3B 22 29 22 00 42 0A AE 01 44 45 |$";H$;")".B...DE| 00000610: B2 45 3A 8D 32 31 38 30 3A 99 22 11 20 45 4E 44 |.E:.2180:.". END| 00000620: 49 4E 47 20 41 44 44 52 45 53 53 20 49 53 3A 20 |ING ADDRESS IS: | 00000630: 20 20 22 3B 45 3B 22 20 28 24 22 3B 48 24 3B 22 | ";E;" ($";H$;"| 00000640: 29 22 00 71 0A B8 01 99 22 11 20 4C 45 4E 47 54 |)".q....". LENGT| 00000650: 48 20 4F 46 20 54 48 45 20 46 49 4C 45 20 49 53 |H OF THE FILE IS| 00000660: 20 22 3B 45 AB 53 AA 31 3B 22 20 42 59 54 45 53 | ";E.S.1;" BYTES| 00000670: 22 00 77 0A C2 01 8F 00 A0 0A CC 01 8F 20 52 45 |".w.......... RE| 00000680: 41 44 20 53 54 41 52 54 20 41 44 44 52 45 53 53 |AD START ADDRESS| 00000690: 20 46 4F 52 20 55 4E 2D 41 53 53 45 4D 42 4C 59 | FOR UN-ASSEMBLY| 000006A0: 00 C6 0A D6 01 99 22 11 20 55 4E 2D 41 53 53 45 |......". UN-ASSE| 000006B0: 4D 42 4C 59 20 53 54 41 52 54 49 4E 47 20 41 44 |MBLY STARTING AD| 000006C0: 44 52 45 53 53 22 00 EF 0A E0 01 85 22 20 20 20 |DRESS"......" | 000006D0: 20 20 20 20 20 49 4E 20 44 45 43 49 4D 41 4C 20 | IN DECIMAL | 000006E0: 4F 52 20 48 45 58 20 28 24 29 22 3B 41 4E 24 00 |OR HEX ($)";AN$.| 000006F0: 0B 0B EA 01 8D 32 34 38 30 3A 53 41 B2 44 45 3A |.....2480:SA.DE:| 00000700: 8B 20 53 41 B2 30 A7 53 41 B2 53 00 43 0B F4 01 |. SA.0.SA.S.C...| 00000710: 8B 20 53 41 B3 53 B0 53 41 B2 B1 45 A7 99 22 11 |. SA.S.SA..E..".| 00000720: 12 45 52 52 4F 52 20 2D 20 4F 55 54 20 4F 46 20 |.ERROR - OUT OF | 00000730: 52 41 4E 47 45 20 41 44 44 52 45 53 53 22 3A 89 |RANGE ADDRESS":.| 00000740: 34 38 30 00 49 0B FE 01 8F 00 73 0B 08 02 8F 20 |480.I.....s.... | 00000750: 53 45 43 4F 4E 44 20 50 41 53 53 20 2D 20 43 4F |SECOND PASS - CO| 00000760: 4E 53 54 52 55 43 54 20 4C 41 42 45 4C 20 54 41 |NSTRUCT LABEL TA| 00000770: 42 4C 45 00 89 0B 12 02 8D 32 33 38 30 3A 50 B2 |BLE......2380:P.| 00000780: 53 AB 31 3A 8D 32 32 36 30 00 9E 0B 1C 02 8D 32 |S.1:.2260......2| 00000790: 30 39 30 3A 8D 32 31 32 30 3A 4F 50 B2 51 00 DF |090:.2120:OP.Q..| 000007A0: 0B 26 02 91 20 4E 20 8D 35 38 30 2C 35 39 30 2C |.&.. N .580,590,| 000007B0: 36 33 30 2C 35 39 30 2C 35 39 30 2C 35 39 30 2C |630,590,590,590,| 000007C0: 36 30 30 2C 36 30 30 2C 36 30 30 2C 36 30 30 2C |600,600,600,600,| 000007D0: 35 39 30 2C 35 39 30 2C 35 38 30 2C 35 38 30 00 |590,590,580,580.| 000007E0: ED 0B 30 02 8B 50 B3 B2 45 A7 35 34 30 00 F9 0B |..0..P..E.540...| 000007F0: 3A 02 A0 31 3A 89 38 36 30 00 FF 0B 44 02 8E 00 |:..1:.860...D...| 00000800: 11 0C 4E 02 8D 32 30 39 30 3A 50 B2 50 AA 31 3A |..N..2090:P.P.1:| 00000810: 8E 00 31 0C 58 02 8D 32 30 39 30 3A 41 44 B2 51 |..1.X..2090:AD.Q| 00000820: 3A 8D 32 30 39 30 3A 41 44 B2 41 44 AA 51 AC 4D |:.2090:AD.AD.Q.M| 00000830: 48 00 4D 0C 62 02 50 B2 50 AA 32 3A 8B 41 44 B3 |H.M.b.P.P.2:.AD.| 00000840: 53 B0 41 44 B1 45 A7 8D 37 36 30 3A 8E 00 58 0C |S.AD.E..760:..X.| 00000850: 6C 02 8D 36 38 30 3A 8E 00 76 0C 76 02 8D 32 30 |l..680:..v.v..20| 00000860: 39 30 3A 41 44 B2 50 AA 51 AA 28 51 B1 31 32 37 |90:AD.P.Q.(Q.127| 00000870: 29 AC 4D 48 AA 32 00 8E 0C 80 02 50 B2 50 AA 31 |).MH.2.....P.P.1| 00000880: 3A 8B 41 44 B3 53 B0 41 44 B1 45 A7 20 8E 00 99 |:.AD.S.AD.E. ...| 00000890: 0C 8A 02 8D 36 38 30 3A 8E 00 9F 0C 94 02 8F 00 |....680:........| 000008A0: E0 0C 9E 02 8F 20 4C 41 42 45 4C 53 20 46 4F 52 |..... LABELS FOR| 000008B0: 20 41 44 44 52 45 53 53 45 53 20 4F 46 20 49 4E | ADDRESSES OF IN| 000008C0: 20 52 41 4E 47 45 20 42 52 41 4E 43 48 45 53 2C | RANGE BRANCHES,| 000008D0: 20 4A 55 4D 50 53 2C 20 4C 44 41 2C 20 45 54 43 | JUMPS, LDA, ETC| 000008E0: 00 0B 0D A8 02 4C 46 B2 31 3A 81 49 B2 31 A4 4C |.....LF.1:.I.1.L| 000008F0: 42 AA 31 3A 54 B2 4C 31 28 49 29 3A 8B 54 B2 41 |B.1:T.L1(I):.T.A| 00000900: 44 A7 4C 46 B2 30 3A 89 37 32 30 00 21 0D B2 02 |D.LF.0:.720.!...| 00000910: 8B 20 54 B3 41 44 AF 54 B3 B1 30 20 A7 20 37 32 |. T.AD.T..0 . 72| 00000920: 30 00 44 0D BC 02 8B 20 54 B1 41 44 AF 4C 46 20 |0.D.... T.AD.LF | 00000930: A7 20 4C 31 28 49 29 B2 41 44 3A 41 44 B2 54 3A |. L1(I).AD:AD.T:| 00000940: 89 37 32 30 00 5C 0D C6 02 8B 20 54 B2 30 AF 4C |.720.\.... T.0.L| 00000950: 46 20 A7 20 4C 31 28 49 29 B2 41 44 00 71 0D D0 |F . L1(I).AD.q..| 00000960: 02 82 3A 8B 20 4C 46 20 A7 20 4C 42 B2 4C 42 AA |..:. LF . LB.LB.| 00000970: 31 00 77 0D DA 02 8E 00 7D 0D E4 02 8F 00 A5 0D |1.w.....}.......| 00000980: EE 02 8F 20 4C 41 42 45 4C 53 20 46 4F 52 20 41 |... LABELS FOR A| 00000990: 44 44 52 45 53 53 45 53 20 4F 55 54 20 4F 46 20 |DDRESSES OUT OF | 000009A0: 52 41 4E 47 45 00 C2 0D F8 02 8B 4F 50 B3 B1 33 |RANGE......OP..3| 000009B0: 32 AF 4F 50 B3 B1 37 36 AF 4F 50 B3 B1 31 30 38 |2.OP..76.OP..108| 000009C0: A7 8E 00 CF 0D 02 03 8B 20 41 44 B2 30 A7 8E 00 |........ AD.0...| 000009D0: FA 0D 0C 03 4C 46 B2 31 3A 81 49 B2 31 A4 4C 4F |....LF.1:.I.1.LO| 000009E0: AA 31 3A 54 B2 4C 32 28 49 29 3A 8B 54 B2 41 44 |.1:T.L2(I):.T.AD| 000009F0: A7 4C 46 B2 30 3A 89 38 32 30 00 10 0E 16 03 8B |.LF.0:.820......| 00000A00: 20 54 B3 41 44 AF 54 B3 B1 30 20 A7 20 38 32 30 | T.AD.T..0 . 820| 00000A10: 00 33 0E 20 03 8B 20 54 B1 41 44 AF 4C 46 20 A7 |.3. .. T.AD.LF .| 00000A20: 20 4C 32 28 49 29 B2 41 44 3A 41 44 B2 54 3A 89 | L2(I).AD:AD.T:.| 00000A30: 38 32 30 00 4B 0E 2A 03 8B 20 54 B2 30 AF 4C 46 |820.K.*.. T.0.LF| 00000A40: 20 A7 20 4C 32 28 49 29 B2 41 44 00 60 0E 34 03 | . L2(I).AD.`.4.| 00000A50: 82 3A 8B 20 4C 46 20 A7 20 4C 4F B2 4C 4F AA 31 |.:. LF . LO.LO.1| 00000A60: 00 66 0E 3E 03 8E 00 6C 0E 48 03 8F 00 90 0E 52 |.f.>...l.H.....R| 00000A70: 03 8F 20 50 52 49 4E 54 20 53 55 4D 4D 41 52 59 |.. PRINT SUMMARY| 00000A80: 20 4F 46 20 4C 41 42 45 4C 20 43 4F 55 4E 54 53 | OF LABEL COUNTS| 00000A90: 00 B8 0E 5C 03 99 22 11 20 4E 55 4D 42 45 52 20 |...\..". NUMBER | 00000AA0: 4F 46 20 49 4E 20 52 41 4E 47 45 20 4C 41 42 45 |OF IN RANGE LABE| 00000AB0: 4C 53 3A 20 22 3B 4C 42 00 E4 0E 66 03 99 22 11 |LS: ";LB...f..".| 00000AC0: 20 4E 55 4D 42 45 52 20 4F 46 20 4F 55 54 20 4F | NUMBER OF OUT O| 00000AD0: 46 20 52 41 4E 47 45 20 4C 41 42 45 4C 53 3A 20 |F RANGE LABELS: | 00000AE0: 22 3B 4C 4F 00 EA 0E 70 03 8F 00 17 0F 7A 03 8F |";LO...p.....z..| 00000AF0: 20 54 48 49 52 44 20 50 41 53 53 20 2D 20 43 48 | THIRD PASS - CH| 00000B00: 45 43 4B 20 49 46 20 41 4C 4C 20 4C 41 42 45 4C |ECK IF ALL LABEL| 00000B10: 53 20 56 41 4C 49 44 00 29 0F 84 03 8B 20 4C 42 |S VALID.).... LB| 00000B20: B2 30 20 A7 20 31 31 32 30 00 4C 0F 8E 03 8D 32 |.0 . 1120.L....2| 00000B30: 33 38 30 3A 50 B2 53 AB 31 3A 8D 32 32 36 30 3A |380:P.S.1:.2260:| 00000B40: 49 B2 31 3A 41 44 B2 4C 31 28 49 29 00 71 0F 98 |I.1:AD.L1(I).q..| 00000B50: 03 8D 32 30 39 30 3A 8D 32 31 32 30 3A 8B 41 44 |..2090:.2120:.AD| 00000B60: B2 50 A7 49 B2 49 AA 31 3A 41 44 B2 4C 31 28 49 |.P.I.I.1:AD.L1(I| 00000B70: 29 00 A6 0F A2 03 91 20 4E 20 8D 39 37 30 2C 39 |)...... N .970,9| 00000B80: 38 30 2C 39 38 30 2C 39 38 30 2C 39 38 30 2C 39 |80,980,980,980,9| 00000B90: 38 30 2C 31 30 31 30 2C 31 30 31 30 2C 31 30 31 |80,1010,1010,101| 00000BA0: 30 2C 31 30 31 30 00 CD 0F AC 03 8B 20 4E B1 31 |0,1010...... N.1| 00000BB0: 30 20 A7 20 91 20 28 4E AB 31 30 29 20 8D 39 38 |0 . . (N.10) .98| 00000BC0: 30 2C 39 38 30 2C 39 37 30 2C 39 37 30 00 DB 0F |0,980,970,970...| 00000BD0: B6 03 8B 50 B3 B2 45 A7 39 32 30 00 E8 0F C0 03 |...P..E.920.....| 00000BE0: A0 31 3A 89 31 30 39 30 00 EE 0F CA 03 8E 00 02 |.1:.1090........| 00000BF0: 10 D4 03 50 B2 50 AA 31 3A 8B 20 50 B1 45 20 A7 |...P.P.1:. P.E .| 00000C00: 20 8E 00 15 10 DE 03 8B 20 41 44 B2 50 20 A7 20 | ....... AD.P . | 00000C10: 8D 31 30 36 30 00 21 10 E8 03 8D 32 30 39 30 3A |.1060.!....2090:| 00000C20: 8E 00 35 10 F2 03 50 B2 50 AA 32 3A 8B 20 50 B1 |..5...P.P.2:. P.| 00000C30: 45 20 A7 20 8E 00 4E 10 FC 03 8B 20 41 44 B2 50 |E . ..N.... AD.P| 00000C40: B0 41 44 B2 50 AB 31 A7 20 8D 31 30 36 30 00 60 |.AD.P.1. .1060.`| 00000C50: 10 06 04 8D 32 30 39 30 3A 8D 32 30 39 30 3A 8E |....2090:.2090:.| 00000C60: 00 66 10 10 04 8F 00 97 10 1A 04 8F 20 49 4E 56 |.f.......... INV| 00000C70: 41 4C 49 44 20 4C 41 42 45 4C 20 43 48 41 4E 47 |ALID LABEL CHANG| 00000C80: 45 20 54 4F 20 4F 55 54 20 4F 46 20 52 41 4E 47 |E TO OUT OF RANG| 00000C90: 45 20 4C 41 42 45 4C 00 C6 10 24 04 4C 56 B2 4C |E LABEL...$.LV.L| 00000CA0: 56 AA 31 3A 4C 4F B2 4C 4F AA 31 3A 4C 32 28 4C |V.1:LO.LO.1:L2(L| 00000CB0: 4F 29 B2 41 44 3A 49 B2 49 AA 31 3A 41 44 B2 4C |O).AD:I.I.1:AD.L| 00000CC0: 31 28 49 29 3A 8E 00 CC 10 2E 04 8F 00 F3 10 38 |1(I):..........8| 00000CD0: 04 8F 20 50 52 49 4E 54 20 43 4F 55 4E 54 20 4F |.. PRINT COUNT O| 00000CE0: 46 20 49 4E 56 41 4C 49 44 20 41 44 44 52 45 53 |F INVALID ADDRES| 00000CF0: 53 45 53 00 27 11 42 04 8B 20 4C 56 20 B3 B1 30 |SES.'.B.. LV ..0| 00000D00: 20 A7 20 99 22 11 20 4E 55 4D 42 45 52 20 4F 46 | . .". NUMBER OF| 00000D10: 20 49 4E 56 41 4C 49 44 20 41 44 44 52 45 53 53 | INVALID ADDRESS| 00000D20: 45 53 3A 20 22 4C 56 00 2D 11 4C 04 8F 00 57 11 |ES: "LV.-.L...W.| 00000D30: 56 04 8F 20 46 4F 55 52 54 48 20 50 41 53 53 20 |V.. FOURTH PASS | 00000D40: 2D 20 4F 55 54 50 55 54 20 41 53 53 45 4D 42 4C |- OUTPUT ASSEMBL| 00000D50: 45 52 20 43 4F 44 45 00 61 11 60 04 8D 32 33 38 |ER CODE.a.`..238| 00000D60: 30 00 67 11 6A 04 8F 00 90 11 74 04 8F 20 4F 50 |0.g.j.....t.. OP| 00000D70: 45 4E 20 53 4F 55 52 43 45 20 41 4E 44 20 4D 41 |EN SOURCE AND MA| 00000D80: 43 48 49 4E 45 20 43 4F 44 45 20 46 49 4C 45 53 |CHINE CODE FILES| 00000D90: 00 AD 11 7E 04 4E 46 24 B2 4F 46 24 AA 22 31 2E |...~.NF$.OF$."1.| 00000DA0: 53 22 3A 50 B2 53 AB 31 3A 4E 46 B2 32 00 CD 11 |S":P.S.1:NF.2...| 00000DB0: 88 04 8D 32 33 32 30 3A 8D 32 32 32 30 3A 8D 32 |...2320:.2220:.2| 00000DC0: 32 36 30 3A 4E 46 B2 32 3A 4C 43 B2 31 00 D3 11 |260:NF.2:LC.1...| 00000DD0: 92 04 8F 00 F0 11 9C 04 8F 20 57 52 49 54 45 20 |......... WRITE | 00000DE0: 53 54 41 52 54 49 4E 47 20 41 44 44 52 45 53 53 |STARTING ADDRESS| 00000DF0: 00 30 12 A6 04 44 45 B2 50 AA 31 3A 48 4E B2 33 |.0...DE.P.1:HN.3| 00000E00: 3A 8D 32 31 38 30 3A 50 24 B2 22 20 2A 3D 24 22 |:.2180:P$." *=$"| 00000E10: AA 48 24 AA 22 3B 20 3C 53 54 41 52 54 49 4E 47 |.H$."; <STARTING| 00000E20: 20 41 44 44 52 45 53 53 3E 22 3A 8D 32 31 35 30 | ADDRESS>":.2150| 00000E30: 00 36 12 B0 04 8F 00 6B 12 BA 04 8F 20 41 53 53 |.6.....k.... ASS| 00000E40: 49 47 4E 20 4C 41 42 45 4C 20 56 41 4C 55 45 53 |IGN LABEL VALUES| 00000E50: 20 46 4F 52 20 41 44 44 52 45 53 53 45 53 20 4F | FOR ADDRESSES O| 00000E60: 55 54 20 4F 46 20 52 41 4E 47 45 00 7C 12 C4 04 |UT OF RANGE.|...| 00000E70: 8B 20 4C 4F B2 30 20 A7 31 32 37 30 00 AB 12 CE |. LO.0 .1270....| 00000E80: 04 50 24 B2 22 20 3B 3C 4F 55 54 20 4F 46 20 52 |.P$." ;<OUT OF R| 00000E90: 41 4E 47 45 20 4A 55 4D 50 53 20 41 4E 44 20 53 |ANGE JUMPS AND S| 00000EA0: 55 42 53 3E 22 3A 8D 32 31 35 30 00 C6 12 D8 04 |UBS>":.2150.....| 00000EB0: 81 49 B2 31 A4 4C 4F 3A 44 45 B2 4C 32 28 49 29 |.I.1.LO:DE.L2(I)| 00000EC0: 3A 8D 32 31 38 30 00 FC 12 E2 04 8B 20 49 B2 4C |:.2180...... I.L| 00000ED0: 4F AB 4C 56 AA 31 20 A7 20 50 24 B2 22 20 3B 20 |O.LV.1 . P$." ; | 00000EE0: 20 20 20 20 20 3C 49 4E 56 41 4C 49 44 20 4C 41 | <INVALID LA| 00000EF0: 42 45 4C 53 3E 22 3A 8D 32 31 35 30 00 20 13 EC |BELS>":.2150. ..| 00000F00: 04 50 24 B2 22 20 20 20 20 20 41 44 22 AA 48 24 |.P$." AD".H$| 00000F10: AA 22 3D 24 22 AA 48 24 3A 8D 32 31 35 30 3A 82 |."=$".H$:.2150:.| 00000F20: 00 32 13 F6 04 4C 54 B2 31 3A 54 B2 4C 31 28 4C |.2...LT.1:T.L1(L| 00000F30: 54 29 00 43 13 00 05 8B 4C 43 B3 B1 4C 46 A7 31 |T).C....LC..LF.1| 00000F40: 33 35 30 00 49 13 0A 05 8F 00 70 13 14 05 8F 20 |350.I.....p.... | 00000F50: 41 46 54 45 52 20 31 30 30 30 20 4C 49 4E 45 53 |AFTER 1000 LINES| 00000F60: 20 43 52 45 41 54 45 20 4E 45 57 20 46 49 4C 45 | CREATE NEW FILE| 00000F70: 00 AD 13 1E 05 4E 46 24 B2 4F 46 24 AA CA 28 C4 |.....NF$.OF$..(.| 00000F80: 28 4E 46 29 2C 32 29 AA 22 2E 53 22 3A 50 24 B2 |(NF),2).".S":P$.| 00000F90: 22 3B 22 3A 8D 32 31 35 30 3A 50 24 B2 22 2E 46 |";":.2150:P$.".F| 00000FA0: 49 4C 22 AA 4E 46 24 3A 8D 32 31 35 30 00 D0 13 |IL".NF$:.2150...| 00000FB0: 28 05 8D 32 34 35 30 3A 4E 46 B2 4E 46 AA 31 3A |(..2450:NF.NF.1:| 00000FC0: 4C 43 B2 31 3A 8D 32 33 32 30 3A 8D 32 32 32 30 |LC.1:.2320:.2220| 00000FD0: 00 D6 13 32 05 8F 00 F3 13 3C 05 8F 20 53 54 41 |...2.....<.. STA| 00000FE0: 52 54 20 52 45 41 44 49 4E 47 20 4F 50 20 43 4F |RT READING OP CO| 00000FF0: 44 45 53 00 08 14 46 05 8D 32 30 39 30 3A 4F 50 |DES...F..2090:OP| 00001000: B2 51 3A 8D 32 31 32 30 00 0E 14 50 05 8F 00 37 |.Q:.2120...P...7| 00001010: 14 5A 05 8F 20 43 48 45 43 4B 20 49 46 20 54 48 |.Z.. CHECK IF TH| 00001020: 49 53 20 49 53 20 41 20 4C 41 42 45 4C 45 44 20 |IS IS A LABELED | 00001030: 41 44 44 52 45 53 53 00 55 14 64 05 50 50 24 B2 |ADDRESS.U.d.PP$.| 00001040: 22 20 20 20 20 20 20 20 20 22 3A 8B 20 54 B2 30 |" ":. T.0| 00001050: A7 31 34 31 30 00 78 14 6E 05 8B 20 54 B3 50 20 |.1410.x.n.. T.P | 00001060: A7 20 4C 54 B2 4C 54 AA 31 3A 54 B2 4C 31 28 4C |. LT.LT.1:T.L1(L| 00001070: 54 29 3A 89 31 33 38 30 00 B6 14 78 05 8B 20 54 |T):.1380...x.. T| 00001080: B2 50 20 A7 20 44 45 B2 50 3A 48 4E B2 33 3A 8D |.P . DE.P:HN.3:.| 00001090: 32 31 38 30 3A 50 50 24 B2 22 41 44 22 AA 48 24 |2180:PP$."AD".H$| 000010A0: AA 22 20 20 22 3A 4C 54 B2 4C 54 AA 31 3A 54 B2 |." ":LT.LT.1:T.| 000010B0: 4C 31 28 4C 54 29 00 D0 14 82 05 8B 20 4E B3 B1 |L1(LT)...... N..| 000010C0: 30 A7 50 50 24 B2 50 50 24 AA 4E 24 AA 22 20 22 |0.PP$.PP$.N$." "| 000010D0: 00 14 15 8C 05 91 20 28 4E AA 31 29 20 8D 31 34 |...... (N.1) .14| 000010E0: 38 30 2C 31 35 31 30 2C 31 35 35 30 2C 31 35 38 |80,1510,1550,158| 000010F0: 30 2C 31 36 34 30 2C 31 36 37 30 2C 31 37 30 30 |0,1640,1670,1700| 00001100: 2C 31 37 33 30 2C 31 37 39 30 2C 31 38 35 30 2C |,1730,1790,1850,| 00001110: 31 39 31 30 00 39 15 96 05 8B 20 4E B1 31 30 A7 |1910.9.... N.10.| 00001120: 20 91 20 28 4E AB 31 30 29 20 8D 31 39 35 30 2C | . (N.10) .1950,| 00001130: 31 39 38 30 2C 32 30 31 30 00 4B 15 A0 05 8B 20 |1980,2010.K.... | 00001140: 50 B1 B2 45 20 A7 20 32 37 30 30 00 55 15 AA 05 |P..E . 2700.U...| 00001150: 89 31 32 38 30 00 5B 15 B4 05 8F 00 7F 15 BE 05 |.1280.[.........| 00001160: 8F 20 49 4C 4C 45 47 41 4C 20 4F 50 20 43 4F 44 |. ILLEGAL OP COD| 00001170: 45 20 2E 42 59 54 45 20 41 53 53 55 4D 45 44 00 |E .BYTE ASSUMED.| 00001180: B0 15 C8 05 44 45 B2 4F 50 3A 48 4E B2 31 3A 8D |....DE.OP:HN.1:.| 00001190: 32 31 38 30 3A 50 24 B2 50 50 24 AA 22 2E 42 59 |2180:P$.PP$.".BY| 000011A0: 54 45 20 24 22 AA 48 24 3A 8D 32 31 35 30 3A 8E |TE $".H$:.2150:.| 000011B0: 00 B6 15 D2 05 8F 00 C9 15 DC 05 8F 20 49 4D 50 |............ IMP| 000011C0: 4C 49 45 44 20 4D 4F 44 45 00 DC 15 E6 05 50 24 |LIED MODE.....P$| 000011D0: B2 50 50 24 3A 8D 32 31 35 30 3A 8E 00 E8 15 F0 |.PP$:.2150:.....| 000011E0: 05 8D 32 31 35 30 3A 8E 00 EE 15 FA 05 8F 00 03 |..2150:.........| 000011F0: 16 04 06 8F 20 49 4D 4D 45 44 49 41 54 45 20 4D |.... IMMEDIATE M| 00001200: 4F 44 45 00 3A 16 0E 06 8D 32 30 39 30 3A 44 45 |ODE.:....2090:DE| 00001210: B2 51 3A 48 4E B2 31 3A 8D 32 31 38 30 3A 50 24 |.Q:HN.1:.2180:P$| 00001220: B2 50 50 24 AA 22 23 24 22 AA 48 24 3A 8D 32 31 |.PP$."#$".H$:.21| 00001230: 35 30 3A 50 B2 50 AA 31 3A 8E 00 40 16 18 06 8F |50:P.P.1:..@....| 00001240: 00 5F 16 22 06 8F 20 52 45 4C 41 54 49 56 45 20 |._.".. RELATIVE | 00001250: 4D 4F 44 45 20 28 42 52 41 4E 43 48 45 53 29 00 |MODE (BRANCHES).| 00001260: 8E 16 2C 06 8D 32 30 39 30 3A 41 44 B2 50 AA 51 |..,..2090:AD.P.Q| 00001270: AA 28 51 B1 31 32 37 29 AC 4D 48 AA 32 3A 44 45 |.(Q.127).MH.2:DE| 00001280: B2 41 44 3A 48 4E B2 33 3A 8D 32 31 38 30 00 B1 |.AD:HN.3:.2180..| 00001290: 16 36 06 8B 41 44 B3 53 B0 41 44 B1 45 A7 50 24 |.6..AD.S.AD.E.P$| 000012A0: B2 50 50 24 AA 22 24 22 AA 48 24 3A 89 31 36 31 |.PP$."$".H$:.161| 000012B0: 30 00 C4 16 40 06 50 24 B2 50 50 24 AA 22 41 44 |0...@.P$.PP$."AD| 000012C0: 22 AA 48 24 00 D6 16 4A 06 8D 32 31 35 30 3A 50 |".H$...J..2150:P| 000012D0: B2 50 AA 31 3A 8E 00 DC 16 54 06 8F 00 F1 16 5E |.P.1:....T.....^| 000012E0: 06 8F 20 5A 45 52 4F 20 50 41 47 45 20 4D 4F 44 |.. ZERO PAGE MOD| 000012F0: 45 00 27 17 68 06 8D 32 30 39 30 3A 50 B2 50 AA |E.'.h..2090:P.P.| 00001300: 31 3A 44 45 B2 51 3A 48 4E B2 31 3A 8D 32 31 38 |1:DE.Q:HN.1:.218| 00001310: 30 3A 50 24 B2 50 50 24 AA 22 24 22 AA 48 24 3A |0:P$.PP$."$".H$:| 00001320: 8D 32 31 35 30 3A 8E 00 2D 17 72 06 8F 00 4C 17 |.2150:..-.r...L.| 00001330: 7C 06 8F 20 58 2D 49 4E 44 45 58 45 44 20 5A 45 ||.. X-INDEXED ZE| 00001340: 52 4F 20 50 41 47 45 20 4D 4F 44 45 00 87 17 86 |RO PAGE MODE....| 00001350: 06 8D 32 30 39 30 3A 50 B2 50 AA 31 3A 44 45 B2 |..2090:P.P.1:DE.| 00001360: 51 3A 48 4E B2 31 3A 8D 32 31 38 30 3A 50 24 B2 |Q:HN.1:.2180:P$.| 00001370: 50 50 24 AA 22 24 22 AA 48 24 AA 22 2C 58 22 3A |PP$."$".H$.",X":| 00001380: 8D 32 31 35 30 3A 8E 00 8D 17 90 06 8F 00 AC 17 |.2150:..........| 00001390: 9A 06 8F 20 59 2D 49 4E 44 45 58 45 44 20 5A 45 |... Y-INDEXED ZE| 000013A0: 52 4F 20 50 41 47 45 20 4D 4F 44 45 00 E7 17 A4 |RO PAGE MODE....| 000013B0: 06 8D 32 30 39 30 3A 50 B2 50 AA 31 3A 44 45 B2 |..2090:P.P.1:DE.| 000013C0: 51 3A 48 4E B2 31 3A 8D 32 31 38 30 3A 50 24 B2 |Q:HN.1:.2180:P$.| 000013D0: 50 50 24 AA 22 24 22 AA 48 24 AA 22 2C 59 22 3A |PP$."$".H$.",Y":| 000013E0: 8D 32 31 35 30 3A 8E 00 ED 17 AE 06 8F 00 01 18 |.2150:..........| 000013F0: B8 06 8F 20 41 42 53 4F 4C 55 54 45 20 4D 4F 44 |... ABSOLUTE MOD| 00001400: 45 00 38 18 C2 06 8D 32 30 39 30 3A 41 44 B2 51 |E.8....2090:AD.Q| 00001410: 3A 8D 32 30 39 30 3A 41 44 B2 41 44 AA 51 AC 4D |:.2090:AD.AD.Q.M| 00001420: 48 3A 50 B2 50 AA 32 3A 44 45 B2 41 44 3A 48 4E |H:P.P.2:DE.AD:HN| 00001430: B2 33 3A 8D 32 31 38 30 00 5D 18 CC 06 50 24 B2 |.3:.2180.]...P$.| 00001440: 50 50 24 AA 22 41 44 22 AA 48 24 3A 8B 41 44 B1 |PP$."AD".H$:.AD.| 00001450: B2 53 AF 41 44 B3 B2 45 A7 31 37 36 30 00 8E 18 |.S.AD..E.1760...| 00001460: D6 06 8B 20 4F 50 B3 B1 33 32 AF 4F 50 B3 B1 37 |... OP..32.OP..7| 00001470: 36 AF 4F 50 B3 B1 31 30 38 B0 41 44 B2 30 20 A7 |6.OP..108.AD.0 .| 00001480: 20 50 24 B2 50 50 24 AA 22 24 22 AA 48 24 00 9A | P$.PP$."$".H$..| 00001490: 18 E0 06 8D 32 31 35 30 3A 8E 00 A0 18 EA 06 8F |....2150:.......| 000014A0: 00 BE 18 F4 06 8F 20 58 2D 49 4E 44 45 58 45 44 |...... X-INDEXED| 000014B0: 20 41 42 53 4F 4C 55 54 45 20 4D 4F 44 45 00 F5 | ABSOLUTE MODE..| 000014C0: 18 FE 06 8D 32 30 39 30 3A 41 44 B2 51 3A 8D 32 |....2090:AD.Q:.2| 000014D0: 30 39 30 3A 41 44 B2 41 44 AA 51 AC 4D 48 3A 50 |090:AD.AD.Q.MH:P| 000014E0: B2 50 AA 32 3A 44 45 B2 41 44 3A 48 4E B2 33 3A |.P.2:DE.AD:HN.3:| 000014F0: 8D 32 31 38 30 00 1F 19 08 07 50 24 B2 50 50 24 |.2180.....P$.PP$| 00001500: AA 22 41 44 22 AA 48 24 AA 22 2C 58 22 3A 8B 41 |."AD".H$.",X":.A| 00001510: 44 B1 B2 53 AF 41 44 B3 B2 45 A7 31 38 32 30 00 |D..S.AD..E.1820.| 00001520: 55 19 12 07 8B 20 4F 50 B3 B1 33 32 AF 4F 50 B3 |U.... OP..32.OP.| 00001530: B1 37 36 AF 4F 50 B3 B1 31 30 38 B0 41 44 B2 30 |.76.OP..108.AD.0| 00001540: 20 A7 20 50 24 B2 50 50 24 AA 22 24 22 AA 48 24 | . P$.PP$."$".H$| 00001550: AA 22 2C 58 22 00 61 19 1C 07 8D 32 31 35 30 3A |.",X".a....2150:| 00001560: 8E 00 67 19 26 07 8F 00 85 19 30 07 8F 20 59 2D |..g.&.....0.. Y-| 00001570: 49 4E 44 45 58 45 44 20 41 42 53 4F 4C 55 54 45 |INDEXED ABSOLUTE| 00001580: 20 4D 4F 44 45 00 BC 19 3A 07 8D 32 30 39 30 3A | MODE...:..2090:| 00001590: 41 44 B2 51 3A 8D 32 30 39 30 3A 41 44 B2 41 44 |AD.Q:.2090:AD.AD| 000015A0: AA 51 AC 4D 48 3A 50 B2 50 AA 32 3A 44 45 B2 41 |.Q.MH:P.P.2:DE.A| 000015B0: 44 3A 48 4E B2 33 3A 8D 32 31 38 30 00 E6 19 44 |D:HN.3:.2180...D| 000015C0: 07 50 24 B2 50 50 24 AA 22 41 44 22 AA 48 24 AA |.P$.PP$."AD".H$.| 000015D0: 22 2C 59 22 3A 8B 41 44 B1 B2 53 AF 41 44 B3 B2 |",Y":.AD..S.AD..| 000015E0: 45 A7 31 38 38 30 00 1C 1A 4E 07 8B 20 4F 50 B3 |E.1880...N.. OP.| 000015F0: B1 33 32 AF 4F 50 B3 B1 37 36 AF 4F 50 B3 B1 31 |.32.OP..76.OP..1| 00001600: 30 38 B0 41 44 B2 30 20 A7 20 50 24 B2 50 50 24 |08.AD.0 . P$.PP$| 00001610: AA 22 24 22 AA 48 24 AA 22 2C 59 22 00 28 1A 58 |."$".H$.",Y".(.X| 00001620: 07 8D 32 31 35 30 3A 8E 00 2E 1A 62 07 8F 00 42 |..2150:....b...B| 00001630: 1A 6C 07 8F 20 49 4E 44 49 52 45 43 54 20 4D 4F |.l.. INDIRECT MO| 00001640: 44 45 00 79 1A 76 07 8D 32 30 39 30 3A 41 44 B2 |DE.y.v..2090:AD.| 00001650: 51 3A 8D 32 30 39 30 3A 41 44 B2 41 44 AA 51 AC |Q:.2090:AD.AD.Q.| 00001660: 4D 48 3A 50 B2 50 AA 32 3A 44 45 B2 41 44 3A 48 |MH:P.P.2:DE.AD:H| 00001670: 4E B2 33 3A 8D 32 31 38 30 00 99 1A 80 07 50 24 |N.3:.2180.....P$| 00001680: B2 50 50 24 AA 22 28 41 44 22 AA 48 24 AA 22 29 |.PP$."(AD".H$.")| 00001690: 22 3A 8D 32 31 35 30 3A 8E 00 9F 1A 8A 07 8F 00 |":.2150:........| 000016A0: BD 1A 94 07 8F 20 58 2D 49 4E 44 45 58 45 44 20 |..... X-INDEXED | 000016B0: 49 4E 44 49 52 45 43 54 20 4D 4F 44 45 00 FA 1A |INDIRECT MODE...| 000016C0: 9E 07 8D 32 30 39 30 3A 50 B2 50 AA 31 3A 44 45 |...2090:P.P.1:DE| 000016D0: B2 51 3A 48 4E B2 31 3A 8D 32 31 38 30 3A 50 24 |.Q:HN.1:.2180:P$| 000016E0: B2 50 50 24 AA 22 28 24 22 AA 48 24 AA 22 2C 58 |.PP$."($".H$.",X| 000016F0: 29 22 3A 8D 32 31 35 30 3A 8E 00 00 1B A8 07 8F |)":.2150:.......| 00001700: 00 1E 1B B2 07 8F 20 59 2D 49 4E 44 45 58 45 44 |...... Y-INDEXED| 00001710: 20 49 4E 44 49 52 45 43 54 20 4D 4F 44 45 00 5B | INDIRECT MODE.[| 00001720: 1B BC 07 8D 32 30 39 30 3A 50 B2 50 AA 31 3A 44 |....2090:P.P.1:D| 00001730: 45 B2 51 3A 48 4E B2 31 3A 8D 32 31 38 30 3A 50 |E.Q:HN.1:.2180:P| 00001740: 24 B2 50 50 24 AA 22 28 24 22 AA 48 24 AA 22 29 |$.PP$."($".H$.")| 00001750: 2C 59 22 3A 8D 32 31 35 30 3A 8E 00 61 1B C6 07 |,Y":.2150:..a...| 00001760: 8F 00 78 1B D0 07 8F 20 41 43 43 55 4D 55 4C 41 |..x.... ACCUMULA| 00001770: 54 4F 52 20 4D 4F 44 45 00 8F 1B DA 07 50 24 B2 |TOR MODE.....P$.| 00001780: 50 50 24 AA 22 41 22 3A 8D 32 31 35 30 3A 8E 00 |PP$."A":.2150:..| 00001790: 95 1B E4 07 8F 00 BC 1B EE 07 8F 20 42 49 54 20 |........... BIT | 000017A0: 43 4F 4E 56 45 52 54 45 44 20 54 4F 20 2E 42 59 |CONVERTED TO .BY| 000017B0: 54 45 20 4F 50 45 52 41 54 49 4F 4E 00 D9 1B F8 |TE OPERATION....| 000017C0: 07 44 45 B2 4F 50 3A 48 4E B2 31 3A 8D 32 31 38 |.DE.OP:HN.1:.218| 000017D0: 30 3A 42 43 B2 42 43 AA 31 00 18 1C 02 08 50 24 |0:BC.BC.1.....P$| 000017E0: B2 22 20 20 20 20 20 20 20 20 22 AA 22 2E 42 59 |." ".".BY| 000017F0: 54 45 20 24 22 AA 48 24 AA 22 3B 3C 54 48 49 53 |TE $".H$.";<THIS| 00001800: 20 57 41 53 20 41 20 42 49 54 20 49 4E 53 54 52 | WAS A BIT INSTR| 00001810: 55 43 54 49 4F 4E 3E 22 00 24 1C 0C 08 8D 32 31 |UCTION>".$....21| 00001820: 35 30 3A 8E 00 2A 1C 16 08 8F 00 69 1C 20 08 8F |50:..*.....i. ..| 00001830: 20 52 45 41 44 20 41 20 42 59 54 45 20 28 41 24 | READ A BYTE (A$| 00001840: 29 20 46 52 4F 4D 20 46 49 4C 45 20 41 4E 44 20 |) FROM FILE AND | 00001850: 43 41 4C 43 55 4C 41 54 45 20 41 53 43 49 49 20 |CALCULATE ASCII | 00001860: 56 41 4C 55 45 20 28 51 29 00 83 1C 2A 08 A1 23 |VALUE (Q)...*..#| 00001870: 31 2C 41 24 3A 51 B2 C6 28 41 24 AA 4E 31 24 29 |1,A$:Q..(A$.N1$)| 00001880: 3A 3A 8E 00 89 1C 34 08 8F 00 A2 1C 3E 08 8F 20 |::....4.....>.. | 00001890: 44 45 43 4F 44 45 20 49 4E 53 54 52 55 43 54 49 |DECODE INSTRUCTI| 000018A0: 4F 4E 00 C0 1C 48 08 50 B2 50 AA 31 3A 4E 24 B2 |ON...H.P.P.1:N$.| 000018B0: 4D 4E 24 28 51 29 3A 4E B2 4D 44 28 51 29 3A 8E |MN$(Q):N.MD(Q):.| 000018C0: 00 C6 1C 52 08 8F 00 EB 1C 5C 08 8F 20 4F 55 54 |...R.....\.. OUT| 000018D0: 50 55 54 20 44 41 54 41 20 4C 49 4E 45 20 46 4F |PUT DATA LINE FO| 000018E0: 52 20 41 53 53 45 4D 42 4C 45 52 00 10 1D 66 08 |R ASSEMBLER...f.| 000018F0: 50 24 B2 50 24 AA 58 58 24 3A 98 36 2C 50 24 3B |P$.P$.XX$:.6,P$;| 00001900: 3A 8D 32 32 32 30 3A 4C 43 B2 4C 43 AA 31 3A 8E |:.2220:LC.LC.1:.| 00001910: 00 16 1D 70 08 8F 00 40 1D 7A 08 8F 20 44 45 43 |...p...@.z.. DEC| 00001920: 49 4D 41 4C 20 28 44 45 29 20 54 4F 20 48 45 58 |IMAL (DE) TO HEX| 00001930: 20 28 48 24 29 20 43 4F 4E 56 45 52 53 49 4F 4E | (H$) CONVERSION| 00001940: 00 76 1D 84 08 44 58 B2 44 45 3A 48 24 B2 22 22 |.v...DX.DE:H$.""| 00001950: 3A 81 4D B2 48 4E A4 30 A9 AB 31 3A 4E 25 B2 44 |:.M.HN.0..1:N%.D| 00001960: 58 AD 28 31 36 AE 4D 29 3A 44 58 B2 44 58 AB 4E |X.(16.M):DX.DX.N| 00001970: 25 AC 31 36 AE 4D 00 92 1D 8E 08 48 24 B2 48 24 |%.16.M.....H$.H$| 00001980: AA CA 28 48 45 24 2C 4E 25 AA 31 2C 31 29 3A 82 |..(HE$,N%.1,1):.| 00001990: 3A 8E 00 98 1D 98 08 8F 00 B6 1D A2 08 8F 20 52 |:............. R| 000019A0: 45 41 44 20 44 49 53 4B 20 45 52 52 4F 52 20 43 |EAD DISK ERROR C| 000019B0: 48 41 4E 4E 45 4C 00 ED 1D AC 08 84 31 35 2C 45 |HANNEL......15,E| 000019C0: 41 2C 45 42 24 2C 45 43 2C 45 44 3A 8B 20 45 41 |A,EB$,EC,ED:. EA| 000019D0: 20 A7 20 99 22 11 12 44 49 53 4B 20 45 52 52 4F | . ."..DISK ERRO| 000019E0: 52 22 3B 45 41 3B 45 42 24 3B 22 11 22 00 F3 1D |R";EA;EB$;"."...| 000019F0: B6 08 8E 00 F9 1D C0 08 8F 00 21 1E CA 08 8F 20 |..........!.... | 00001A00: 4F 50 45 4E 20 46 49 4C 45 20 41 4E 44 20 47 45 |OPEN FILE AND GE| 00001A10: 54 20 46 49 52 53 54 20 54 57 4F 20 42 59 54 45 |T FIRST TWO BYTE| 00001A20: 53 00 3A 1E D4 08 9F 31 2C 38 2C 31 32 2C 46 24 |S.:....1,8,12,F$| 00001A30: 3A A1 23 31 2C 41 24 2C 42 24 00 48 1E DE 08 8B |:.#1,A$,B$.H....| 00001A40: 20 50 53 B3 B2 32 A7 8E 00 69 1E E8 08 8B 20 50 | PS..2...i.... P| 00001A50: B3 28 53 41 AB 31 29 A7 8D 32 30 39 30 3A 50 B2 |.(SA.1)..2090:P.| 00001A60: 50 AA 31 3A 89 32 32 38 30 00 6F 1E F2 08 8E 00 |P.1:.2280.o.....| 00001A70: 75 1E FC 08 8F 00 8C 1E 06 09 8F 20 4F 50 45 4E |u.......... OPEN| 00001A80: 20 53 4F 55 52 43 45 20 46 49 4C 45 00 BD 1E 10 | SOURCE FILE....| 00001A90: 09 8B 4F 54 24 B2 22 44 22 A7 50 24 B2 22 40 22 |..OT$."D".P$."@"| 00001AA0: AA 4E 46 24 AA 22 2C 53 2C 57 22 3A 9F 36 2C 38 |.NF$.",S,W":.6,8| 00001AB0: 2C 33 2C 50 24 3A 8D 32 32 32 30 3A 8E 00 C7 1E |,3,P$:.2220:....| 00001AC0: 1A 09 8B 4F 54 A7 8E 00 E0 1E 24 09 4F 54 B2 31 |...OT.....$.OT.1| 00001AD0: 3A 8B 4F 54 24 B2 22 50 22 A7 9F 36 2C 34 3A 8E |:.OT$."P"..6,4:.| 00001AE0: 00 EB 1E 2E 09 9F 36 2C 33 3A 8E 00 F1 1E 38 09 |......6,3:....8.| 00001AF0: 8F 00 09 1F 42 09 8F 20 50 52 49 4E 54 20 50 41 |....B.. PRINT PA| 00001B00: 53 53 20 4E 55 4D 42 45 52 00 43 1F 4C 09 99 22 |SS NUMBER.C.L.."| 00001B10: 11 12 50 41 53 53 20 23 22 3B 50 53 3B 22 20 4F |..PASS #";PS;" O| 00001B20: 46 20 54 48 45 20 46 49 4C 45 20 54 4F 20 42 45 |F THE FILE TO BE| 00001B30: 20 44 45 43 4F 44 45 44 22 3A 50 53 B2 50 53 AA | DECODED":PS.PS.| 00001B40: 31 3A 8E 00 49 1F 56 09 8F 00 69 1F 60 09 8F 20 |1:..I.V...i.`.. | 00001B50: 49 4E 49 54 49 41 4C 49 5A 45 20 54 48 45 20 44 |INITIALIZE THE D| 00001B60: 49 53 4B 20 44 52 49 56 45 00 82 1F 6A 09 9F 31 |ISK DRIVE...j..1| 00001B70: 35 2C 38 2C 31 35 2C 22 49 22 AA C4 28 46 44 29 |5,8,15,"I"..(FD)| 00001B80: 3A 8E 00 96 1F 74 09 98 31 35 2C 22 49 22 AA C4 |:....t..15,"I"..| 00001B90: 28 46 4F 29 3A 8E 00 9C 1F 7E 09 8F 00 B5 1F 88 |(FO):....~......| 00001BA0: 09 8F 20 45 4E 44 20 4F 46 20 53 4F 55 52 43 45 |.. END OF SOURCE| 00001BB0: 20 46 49 4C 45 00 C7 1F 92 09 98 36 2C C7 28 30 | FILE......6,.(0| 00001BC0: 29 3B 3A A0 36 3A 8E 00 CD 1F 9C 09 8F 00 05 20 |);:.6:......... | 00001BD0: A6 09 8F 20 43 4F 4E 56 45 52 54 20 53 54 52 49 |... CONVERT STRI| 00001BE0: 4E 47 20 28 41 4E 24 29 20 54 4F 20 44 45 43 49 |NG (AN$) TO DECI| 00001BF0: 4D 41 4C 20 28 44 45 29 20 41 4E 44 20 48 45 58 |MAL (DE) AND HEX| 00001C00: 20 28 48 24 29 00 27 20 B0 09 48 44 B2 30 3A 4C | (H$).' ..HD.0:L| 00001C10: 32 B2 30 3A 4C 33 B2 31 3A 4C 34 B2 C3 28 41 4E |2.0:L3.1:L4..(AN| 00001C20: 24 29 3A 48 4E B2 33 00 3B 20 BA 09 41 31 24 B2 |$):HN.3.; ..A1$.| 00001C30: CA 28 41 4E 24 2C 4C 33 2C 31 29 00 51 20 C4 09 |.(AN$,L3,1).Q ..| 00001C40: 8B 20 41 31 24 B3 B1 C7 28 33 32 29 A7 32 35 34 |. A1$...(32).254| 00001C50: 30 00 5D 20 CE 09 4C 33 B2 4C 33 AA 31 00 78 20 |0.] ..L3.L3.1.x | 00001C60: D8 09 8B 20 4C 33 B1 4C 34 20 A7 20 44 45 B2 30 |... L3.L4 . DE.0| 00001C70: 3A 8D 32 30 38 30 3A 8E 00 82 20 E2 09 89 32 34 |:.2080:... ...24| 00001C80: 39 30 00 A1 20 EC 09 8B 20 41 31 24 B2 C7 28 33 |90.. ... A1$..(3| 00001C90: 36 29 20 A7 20 48 44 B2 31 3A 4C 33 B2 4C 33 AA |6) . HD.1:L3.L3.| 00001CA0: 31 00 C0 20 F6 09 4C 32 B2 4C 34 AB 4C 33 AA 31 |1.. ..L2.L4.L3.1| 00001CB0: 3A 48 24 B2 CA 28 41 4E 24 2C 4C 33 2C 4C 32 29 |:H$..(AN$,L3,L2)| 00001CC0: 00 DB 20 00 0A 8B 20 48 44 B2 30 20 A7 20 8D 32 |.. ... HD.0 . .2| 00001CD0: 36 34 30 3A 8D 32 31 38 30 3A 8E 00 E1 20 0A 0A |640:.2180:... ..| 00001CE0: 8F 00 01 21 14 0A 8F 20 48 45 58 20 54 4F 20 44 |...!... HEX TO D| 00001CF0: 45 43 49 4D 41 4C 20 28 48 24 20 54 4F 20 44 45 |ECIMAL (H$ TO DE| 00001D00: 29 00 3A 21 1E 0A 44 45 B2 30 3A 81 4D B2 31 A4 |).:!..DE.0:.M.1.| 00001D10: 4C 32 3A 81 57 B2 30 A4 31 35 3A 8B 20 CA 28 48 |L2:.W.0.15:. .(H| 00001D20: 24 2C 4D 2C 31 29 B2 CA 28 48 45 24 2C 57 AA 31 |$,M,1)..(HE$,W.1| 00001D30: 2C 31 29 20 A7 20 32 36 31 30 00 50 21 28 0A 82 |,1) . 2610.P!(..| 00001D40: 57 3A 4D B2 4C 32 3A 82 4D 3A 44 45 B2 30 3A 8E |W:M.L2:.M:DE.0:.| 00001D50: 00 6D 21 32 0A 44 45 B2 44 45 AA 57 AC 28 31 36 |.m!2.DE.DE.W.(16| 00001D60: AE 28 4C 32 AB 4D 29 29 3A 82 4D 3A 8E 00 73 21 |.(L2.M)):.M:..s!| 00001D70: 3C 0A 8F 00 95 21 46 0A 8F 20 53 54 52 49 4E 47 |<....!F.. STRING| 00001D80: 20 28 48 24 29 20 54 4F 20 44 45 43 49 4D 41 4C | (H$) TO DECIMAL| 00001D90: 20 28 44 45 29 00 B6 21 50 0A 44 45 B2 30 3A 4C | (DE)..!P.DE.0:L| 00001DA0: 32 B2 C3 28 48 24 29 3A 81 4D B2 31 A4 4C 32 3A |2..(H$):.M.1.L2:| 00001DB0: 81 57 B2 30 A4 39 00 DA 21 5A 0A 8B 20 CA 28 48 |.W.0.9..!Z.. .(H| 00001DC0: 24 2C 4D 2C 31 29 B2 CA 28 48 45 24 2C 57 AA 31 |$,M,1)..(HE$,W.1| 00001DD0: 2C 31 29 20 A7 20 32 36 37 30 00 F0 21 64 0A 82 |,1) . 2670..!d..| 00001DE0: 57 3A 4D B2 4C 32 3A 82 4D 3A 44 45 B2 30 3A 8E |W:M.L2:.M:DE.0:.| 00001DF0: 00 0D 22 6E 0A 44 45 B2 44 45 AA 57 AC 28 31 30 |.."n.DE.DE.W.(10| 00001E00: AE 28 4C 32 AB 4D 29 29 3A 82 4D 3A 8E 00 13 22 |.(L2.M)):.M:..."| 00001E10: 78 0A 8F 00 36 22 82 0A 8F 20 45 4E 44 20 4F 46 |x...6"... END OF| 00001E20: 20 50 52 4F 47 52 41 4D 20 2D 20 43 4C 4F 53 45 | PROGRAM - CLOSE| 00001E30: 20 46 49 4C 45 53 00 67 22 8C 0A 50 24 B2 22 20 | FILES.g"..P$." | 00001E40: 3B 22 3A 8D 32 31 35 30 3A 50 24 B2 22 20 20 2E |;":.2150:P$." .| 00001E50: 45 4E 44 22 3A 8D 32 31 35 30 3A A0 31 3A 8D 32 |END":.2150:.1:.2| 00001E60: 34 35 30 3A A0 31 35 00 88 22 96 0A 99 22 11 12 |450:.15.."..."..| 00001E70: 20 55 4E 2D 41 53 53 45 4D 42 4C 59 20 43 4F 4D | UN-ASSEMBLY COM| 00001E80: 50 4C 45 54 45 22 3A 80 00 8E 22 A0 0A 8F 00 B8 |PLETE":...".....| 00001E90: 22 AA 0A 8F 20 4D 4E 45 4D 4F 4E 49 43 2C 20 41 |"... MNEMONIC, A| 00001EA0: 44 44 52 45 53 53 49 4E 47 20 4D 4F 44 45 2C 20 |DDRESSING MODE, | 00001EB0: 48 45 58 20 43 4F 44 45 00 F5 22 B4 0A 83 20 42 |HEX CODE.."... B| 00001EC0: 52 4B 2C 20 20 31 2C 20 20 20 30 2C 20 4F 52 41 |RK, 1, 0, ORA| 00001ED0: 2C 20 31 31 2C 20 20 20 31 2C 20 4F 52 41 2C 20 |, 11, 1, ORA, | 00001EE0: 20 34 2C 20 20 20 35 2C 20 41 53 4C 2C 20 20 34 | 4, 5, ASL, 4| 00001EF0: 2C 20 20 20 36 00 32 23 BE 0A 83 20 50 48 50 2C |, 6.2#... PHP,| 00001F00: 20 20 31 2C 20 20 20 38 2C 20 4F 52 41 2C 20 20 | 1, 8, ORA, | 00001F10: 32 2C 20 20 20 39 2C 20 41 53 4C 2C 20 31 33 2C |2, 9, ASL, 13,| 00001F20: 20 20 31 30 2C 20 4F 52 41 2C 20 20 37 2C 20 20 | 10, ORA, 7, | 00001F30: 31 33 00 6F 23 C8 0A 83 20 41 53 4C 2C 20 20 37 |13.o#... ASL, 7| 00001F40: 2C 20 20 31 34 2C 20 42 50 4C 2C 20 20 33 2C 20 |, 14, BPL, 3, | 00001F50: 20 31 36 2C 20 4F 52 41 2C 20 31 32 2C 20 20 31 | 16, ORA, 12, 1| 00001F60: 37 2C 20 4F 52 41 2C 20 20 35 2C 20 20 32 31 00 |7, ORA, 5, 21.| 00001F70: AC 23 D2 0A 83 20 41 53 4C 2C 20 20 35 2C 20 20 |.#... ASL, 5, | 00001F80: 32 32 2C 20 43 4C 43 2C 20 20 31 2C 20 20 32 34 |22, CLC, 1, 24| 00001F90: 2C 20 4F 52 41 2C 20 20 39 2C 20 20 32 35 2C 20 |, ORA, 9, 25, | 00001FA0: 4F 52 41 2C 20 20 38 2C 20 20 32 39 00 E9 23 DC |ORA, 8, 29..#.| 00001FB0: 0A 83 20 41 53 4C 2C 20 20 38 2C 20 20 33 30 2C |.. ASL, 8, 30,| 00001FC0: 20 4A 53 52 2C 20 20 37 2C 20 20 33 32 2C 20 41 | JSR, 7, 32, A| 00001FD0: 4E 44 2C 20 31 31 2C 20 20 33 33 2C 20 42 49 54 |ND, 11, 33, BIT| 00001FE0: 2C 20 20 34 2C 20 20 33 36 00 26 24 E6 0A 83 20 |, 4, 36.&$... | 00001FF0: 41 4E 44 2C 20 20 34 2C 20 20 33 37 2C 20 52 4F |AND, 4, 37, RO| 00002000: 4C 2C 20 20 34 2C 20 20 33 38 2C 20 50 4C 50 2C |L, 4, 38, PLP,| 00002010: 20 20 31 2C 20 20 34 30 2C 20 41 4E 44 2C 20 20 | 1, 40, AND, | 00002020: 32 2C 20 20 34 31 00 63 24 F0 0A 83 20 52 4F 4C |2, 41.c$... ROL| 00002030: 2C 20 31 33 2C 20 20 34 32 2C 20 42 49 54 2C 20 |, 13, 42, BIT, | 00002040: 20 37 2C 20 20 34 34 2C 20 41 4E 44 2C 20 20 37 | 7, 44, AND, 7| 00002050: 2C 20 20 34 35 2C 20 52 4F 4C 2C 20 20 37 2C 20 |, 45, ROL, 7, | 00002060: 20 34 36 00 A0 24 FA 0A 83 20 42 4D 49 2C 20 20 | 46..$... BMI, | 00002070: 33 2C 20 20 34 38 2C 20 41 4E 44 2C 20 31 32 2C |3, 48, AND, 12,| 00002080: 20 20 34 39 2C 20 41 4E 44 2C 20 20 35 2C 20 20 | 49, AND, 5, | 00002090: 35 33 2C 20 52 4F 4C 2C 20 20 35 2C 20 20 35 34 |53, ROL, 5, 54| 000020A0: 00 DD 24 04 0B 83 20 53 45 43 2C 20 20 31 2C 20 |..$... SEC, 1, | 000020B0: 20 35 36 2C 20 41 4E 44 2C 20 20 39 2C 20 20 35 | 56, AND, 9, 5| 000020C0: 37 2C 20 41 4E 44 2C 20 20 38 2C 20 20 36 31 2C |7, AND, 8, 61,| 000020D0: 20 52 4F 4C 2C 20 20 38 2C 20 20 36 32 00 1A 25 | ROL, 8, 62..%| 000020E0: 0E 0B 83 20 52 54 49 2C 20 20 31 2C 20 20 36 34 |... RTI, 1, 64| 000020F0: 2C 20 45 4F 52 2C 20 31 31 2C 20 20 36 35 2C 20 |, EOR, 11, 65, | 00002100: 45 4F 52 2C 20 20 34 2C 20 20 36 39 2C 20 4C 53 |EOR, 4, 69, LS| 00002110: 52 2C 20 20 34 2C 20 20 37 30 00 57 25 18 0B 83 |R, 4, 70.W%...| 00002120: 20 50 48 41 2C 20 20 31 2C 20 20 37 32 2C 20 45 | PHA, 1, 72, E| 00002130: 4F 52 2C 20 20 32 2C 20 20 37 33 2C 20 4C 53 52 |OR, 2, 73, LSR| 00002140: 2C 20 31 33 2C 20 20 37 34 2C 20 4A 4D 50 2C 20 |, 13, 74, JMP, | 00002150: 20 37 2C 20 20 37 36 00 94 25 22 0B 83 20 45 4F | 7, 76..%".. EO| 00002160: 52 2C 20 20 37 2C 20 20 37 37 2C 20 4C 53 52 2C |R, 7, 77, LSR,| 00002170: 20 20 37 2C 20 20 37 38 2C 20 42 56 43 2C 20 20 | 7, 78, BVC, | 00002180: 33 2C 20 20 38 30 2C 20 45 4F 52 2C 20 31 32 2C |3, 80, EOR, 12,| 00002190: 20 20 38 31 00 D1 25 2C 0B 83 20 45 4F 52 2C 20 | 81..%,.. EOR, | 000021A0: 20 35 2C 20 20 38 35 2C 20 4C 53 52 2C 20 20 35 | 5, 85, LSR, 5| 000021B0: 2C 20 20 38 36 2C 20 43 4C 49 2C 20 20 31 2C 20 |, 86, CLI, 1, | 000021C0: 20 38 38 2C 20 45 4F 52 2C 20 20 39 2C 20 20 38 | 88, EOR, 9, 8| 000021D0: 39 00 0E 26 36 0B 83 20 45 4F 52 2C 20 20 38 2C |9..&6.. EOR, 8,| 000021E0: 20 20 39 33 2C 20 4C 53 52 2C 20 20 38 2C 20 20 | 93, LSR, 8, | 000021F0: 39 34 2C 20 52 54 53 2C 20 20 31 2C 20 20 39 36 |94, RTS, 1, 96| 00002200: 2C 20 41 44 43 2C 20 31 31 2C 20 20 39 37 00 4B |, ADC, 11, 97.K| 00002210: 26 40 0B 83 20 41 44 43 2C 20 20 34 2C 20 31 30 |&@.. ADC, 4, 10| 00002220: 31 2C 20 52 4F 52 2C 20 20 34 2C 20 31 30 32 2C |1, ROR, 4, 102,| 00002230: 20 50 4C 41 2C 20 20 31 2C 20 31 30 34 2C 20 41 | PLA, 1, 104, A| 00002240: 44 43 2C 20 20 32 2C 20 31 30 35 00 88 26 4A 0B |DC, 2, 105..&J.| 00002250: 83 20 52 4F 52 2C 20 31 33 2C 20 31 30 36 2C 20 |. ROR, 13, 106, | 00002260: 4A 4D 50 2C 20 31 30 2C 20 31 30 38 2C 20 41 44 |JMP, 10, 108, AD| 00002270: 43 2C 20 20 37 2C 20 31 30 39 2C 20 52 4F 52 2C |C, 7, 109, ROR,| 00002280: 20 20 37 2C 20 31 31 30 00 C5 26 54 0B 83 20 42 | 7, 110..&T.. B| 00002290: 56 53 2C 20 20 33 2C 20 31 31 32 2C 20 41 44 43 |VS, 3, 112, ADC| 000022A0: 2C 20 31 32 2C 20 31 31 33 2C 20 41 44 43 2C 20 |, 12, 113, ADC, | 000022B0: 20 35 2C 20 31 31 37 2C 20 52 4F 52 2C 20 20 35 | 5, 117, ROR, 5| 000022C0: 2C 20 31 31 38 00 02 27 5E 0B 83 20 53 45 49 2C |, 118..'^.. SEI,| 000022D0: 20 20 31 2C 20 31 32 30 2C 20 41 44 43 2C 20 20 | 1, 120, ADC, | 000022E0: 39 2C 20 31 32 31 2C 20 41 44 43 2C 20 20 38 2C |9, 121, ADC, 8,| 000022F0: 20 31 32 35 2C 20 52 4F 52 2C 20 20 38 2C 20 31 | 125, ROR, 8, 1| 00002300: 32 36 00 3F 27 68 0B 83 20 53 54 41 2C 20 31 31 |26.?'h.. STA, 11| 00002310: 2C 20 31 32 39 2C 20 53 54 59 2C 20 20 34 2C 20 |, 129, STY, 4, | 00002320: 31 33 32 2C 20 53 54 41 2C 20 20 34 2C 20 31 33 |132, STA, 4, 13| 00002330: 33 2C 20 53 54 58 2C 20 20 34 2C 20 31 33 34 00 |3, STX, 4, 134.| 00002340: 7C 27 72 0B 83 20 44 45 59 2C 20 20 31 2C 20 31 ||'r.. DEY, 1, 1| 00002350: 33 36 2C 20 54 58 41 2C 20 20 31 2C 20 31 33 38 |36, TXA, 1, 138| 00002360: 2C 20 53 54 59 2C 20 20 37 2C 20 31 34 30 2C 20 |, STY, 7, 140, | 00002370: 53 54 41 2C 20 20 37 2C 20 31 34 31 00 B9 27 7C |STA, 7, 141..'|| 00002380: 0B 83 20 53 54 58 2C 20 20 37 2C 20 31 34 32 2C |.. STX, 7, 142,| 00002390: 20 42 43 43 2C 20 20 33 2C 20 31 34 34 2C 20 53 | BCC, 3, 144, S| 000023A0: 54 41 2C 20 31 32 2C 20 31 34 35 2C 20 53 54 59 |TA, 12, 145, STY| 000023B0: 2C 20 20 35 2C 20 31 34 38 00 F6 27 86 0B 83 20 |, 5, 148..'... | 000023C0: 53 54 41 2C 20 20 35 2C 20 31 34 39 2C 20 53 54 |STA, 5, 149, ST| 000023D0: 58 2C 20 20 36 2C 20 31 35 30 2C 20 54 59 41 2C |X, 6, 150, TYA,| 000023E0: 20 20 31 2C 20 31 35 32 2C 20 53 54 41 2C 20 20 | 1, 152, STA, | 000023F0: 39 2C 20 31 35 33 00 33 28 90 0B 83 20 54 58 53 |9, 153.3(... TXS| 00002400: 2C 20 20 31 2C 20 31 35 34 2C 20 53 54 41 2C 20 |, 1, 154, STA, | 00002410: 20 38 2C 20 31 35 37 2C 20 4C 44 59 2C 20 20 32 | 8, 157, LDY, 2| 00002420: 2C 20 31 36 30 2C 20 4C 44 41 2C 20 31 31 2C 20 |, 160, LDA, 11, | 00002430: 31 36 31 00 70 28 9A 0B 83 20 4C 44 58 2C 20 20 |161.p(... LDX, | 00002440: 32 2C 20 31 36 32 2C 20 4C 44 59 2C 20 20 34 2C |2, 162, LDY, 4,| 00002450: 20 31 36 34 2C 20 4C 44 41 2C 20 20 34 2C 20 31 | 164, LDA, 4, 1| 00002460: 36 35 2C 20 4C 44 58 2C 20 20 34 2C 20 31 36 36 |65, LDX, 4, 166| 00002470: 00 AD 28 A4 0B 83 20 54 41 59 2C 20 20 31 2C 20 |..(... TAY, 1, | 00002480: 31 36 38 2C 20 4C 44 41 2C 20 20 32 2C 20 31 36 |168, LDA, 2, 16| 00002490: 39 2C 20 54 41 58 2C 20 20 31 2C 20 31 37 30 2C |9, TAX, 1, 170,| 000024A0: 20 4C 44 59 2C 20 20 37 2C 20 31 37 32 00 EA 28 | LDY, 7, 172..(| 000024B0: AE 0B 83 20 4C 44 41 2C 20 20 37 2C 20 31 37 33 |... LDA, 7, 173| 000024C0: 2C 20 4C 44 58 2C 20 20 37 2C 20 31 37 34 2C 20 |, LDX, 7, 174, | 000024D0: 42 43 53 2C 20 20 33 2C 20 31 37 36 2C 20 4C 44 |BCS, 3, 176, LD| 000024E0: 41 2C 20 31 32 2C 20 31 37 37 00 27 29 B8 0B 83 |A, 12, 177.')...| 000024F0: 20 4C 44 59 2C 20 20 35 2C 20 31 38 30 2C 20 4C | LDY, 5, 180, L| 00002500: 44 41 2C 20 20 35 2C 20 31 38 31 2C 20 4C 44 58 |DA, 5, 181, LDX| 00002510: 2C 20 20 36 2C 20 31 38 32 2C 20 43 4C 56 2C 20 |, 6, 182, CLV, | 00002520: 20 31 2C 20 31 38 34 00 64 29 C2 0B 83 20 4C 44 | 1, 184.d)... LD| 00002530: 41 2C 20 20 39 2C 20 31 38 35 2C 20 54 53 58 2C |A, 9, 185, TSX,| 00002540: 20 20 31 2C 20 31 38 36 2C 20 4C 44 59 2C 20 20 | 1, 186, LDY, | 00002550: 38 2C 20 31 38 38 2C 20 4C 44 41 2C 20 20 38 2C |8, 188, LDA, 8,| 00002560: 20 31 38 39 00 A1 29 CC 0B 83 20 4C 44 58 2C 20 | 189..)... LDX, | 00002570: 20 39 2C 20 31 39 30 2C 20 43 50 59 2C 20 20 32 | 9, 190, CPY, 2| 00002580: 2C 20 31 39 32 2C 20 43 4D 50 2C 20 31 31 2C 20 |, 192, CMP, 11, | 00002590: 31 39 33 2C 20 43 50 59 2C 20 20 34 2C 20 31 39 |193, CPY, 4, 19| 000025A0: 36 00 DE 29 D6 0B 83 20 43 4D 50 2C 20 20 34 2C |6..)... CMP, 4,| 000025B0: 20 31 39 37 2C 20 44 45 43 2C 20 20 34 2C 20 31 | 197, DEC, 4, 1| 000025C0: 39 38 2C 20 49 4E 59 2C 20 20 31 2C 20 32 30 30 |98, INY, 1, 200| 000025D0: 2C 20 43 4D 50 2C 20 20 32 2C 20 32 30 31 00 1B |, CMP, 2, 201..| 000025E0: 2A E0 0B 83 20 44 45 58 2C 20 20 31 2C 20 32 30 |*... DEX, 1, 20| 000025F0: 32 2C 20 43 50 59 2C 20 20 37 2C 20 32 30 34 2C |2, CPY, 7, 204,| 00002600: 20 43 4D 50 2C 20 20 37 2C 20 32 30 35 2C 20 44 | CMP, 7, 205, D| 00002610: 45 43 2C 20 20 37 2C 20 32 30 36 00 58 2A EA 0B |EC, 7, 206.X*..| 00002620: 83 20 42 4E 45 2C 20 20 33 2C 20 32 30 38 2C 20 |. BNE, 3, 208, | 00002630: 43 4D 50 2C 20 31 32 2C 20 32 30 39 2C 20 43 4D |CMP, 12, 209, CM| 00002640: 50 2C 20 20 35 2C 20 32 31 33 2C 20 44 45 43 2C |P, 5, 213, DEC,| 00002650: 20 20 35 2C 20 32 31 34 00 95 2A F4 0B 83 20 43 | 5, 214..*... C| 00002660: 4C 44 2C 20 20 31 2C 20 32 31 36 2C 20 43 4D 50 |LD, 1, 216, CMP| 00002670: 2C 20 20 39 2C 20 32 31 37 2C 20 43 4D 50 2C 20 |, 9, 217, CMP, | 00002680: 20 38 2C 20 32 32 31 2C 20 44 45 43 2C 20 20 38 | 8, 221, DEC, 8| 00002690: 2C 20 32 32 32 00 D2 2A FE 0B 83 20 43 50 58 2C |, 222..*... CPX,| 000026A0: 20 20 32 2C 20 32 32 34 2C 20 53 42 43 2C 20 31 | 2, 224, SBC, 1| 000026B0: 31 2C 20 32 32 35 2C 20 43 50 58 2C 20 20 34 2C |1, 225, CPX, 4,| 000026C0: 20 32 32 38 2C 20 53 42 43 2C 20 20 34 2C 20 32 | 228, SBC, 4, 2| 000026D0: 32 39 00 0F 2B 08 0C 83 20 49 4E 43 2C 20 20 34 |29..+... INC, 4| 000026E0: 2C 20 32 33 30 2C 20 49 4E 58 2C 20 20 31 2C 20 |, 230, INX, 1, | 000026F0: 32 33 32 2C 20 53 42 43 2C 20 20 32 2C 20 32 33 |232, SBC, 2, 23| 00002700: 33 2C 20 4E 4F 50 2C 20 20 31 2C 20 32 33 34 00 |3, NOP, 1, 234.| 00002710: 4C 2B 12 0C 83 20 43 50 58 2C 20 20 37 2C 20 32 |L+... CPX, 7, 2| 00002720: 33 36 2C 20 53 42 43 2C 20 20 37 2C 20 32 33 37 |36, SBC, 7, 237| 00002730: 2C 20 49 4E 43 2C 20 20 37 2C 20 32 33 38 2C 20 |, INC, 7, 238, | 00002740: 42 45 51 2C 20 20 33 2C 20 32 34 30 00 89 2B 1C |BEQ, 3, 240..+.| 00002750: 0C 83 20 53 42 43 2C 20 31 32 2C 20 32 34 31 2C |.. SBC, 12, 241,| 00002760: 20 53 42 43 2C 20 20 35 2C 20 32 34 35 2C 20 49 | SBC, 5, 245, I| 00002770: 4E 43 2C 20 20 35 2C 20 32 34 36 2C 20 53 45 44 |NC, 5, 246, SED| 00002780: 2C 20 20 31 2C 20 32 34 38 00 B8 2B 26 0C 83 20 |, 1, 248..+&.. | 00002790: 53 42 43 2C 20 20 39 2C 20 32 34 39 2C 20 53 42 |SBC, 9, 249, SB| 000027A0: 43 2C 20 20 38 2C 20 32 35 33 2C 20 49 4E 43 2C |C, 8, 253, INC,| 000027B0: 20 20 38 2C 20 32 35 34 00 00 00 | 8, 254... |
..".... DISK UN-ASSEMBLER.LONG C64.H.... ORIGINALLY BY PAUL HIGGINBOTTOM.V.... M ODIFIED BY J. LOTHIAN, OTTAWA, ONTARIO.. .(.. INITIALIZE VARIABLES.U.2..53280,12: .53281,15:A$."":Q..:P..:N..:N$."":P$."": DE..:I..:BC.....<.N1$.G(0):HE$."01234567 89ABCDEF":XX$.G(13):PS.1:MH.256:LF.1000: OT...".F...L.P..".... C-64 DISK U N-ASSEMBLER"...Z.."... JACK L OTHIAN":.".. PLEASE WAIT"... D.....N.. ARRAYS DEFINING ASSEMBLER OP C ODES...X.. MD(255),MN$(255),L1(500),L2(5 00)......I.1.151:.A$,A,B:MN$(B).A$:MD(B) .A:........<.... CHECK WHERE SOURCE SHOU LD BE LISTED.. ..". SOURCE CODE ON PRIN T (P), SCREEN (S),":." OR DISK (D)";OT$. ..... OT$.."P".OT$.."S".OT$.."D".160.... ...Q.... GET OBJECT AND SOURCE FILE NAME S...H..". DRIVE NUMBER OF THE PROGRAM(0 OR 1)";FD:.FD..0.FD..1.200...R.." PROGRA M FILENAME";F$.E....C(F$).16.."..ERROR - FILE NAME IS TOO LONG.":.210......2410: F$.G(FD).":".F$.",P,R"......1,8,9,F$:.22 20: 1......EA..0. 15:.210.D.... OT$.."D" .330......". DRIVE NUMBER FOR THE SOURCE FILE";FO:.FO..0.FD..1.270......" SOURCE FILENAME";OF$.V."..C(OF$).12.."..ERROR - FILE NAME IS TOO LONG.":.280.V.,.OF$.D (FO).":".OF$.".":.2420.|.6.....@.. CONVE RT BIT TO .BYTE OPTION...J..". DO YOU WI SH BIT OPERATIONS CONVERTED TO BYTE O PERATIONS?"...T..". YES (Y) OR NO (N)";A N$.".^.. AN$.."N" . AN$.."Y" . 340.F.H.. AN$."Y" . MD(36).14:MD(44).14.L.R...|.| .. FIRST PASS - FIND START AND END ADDRE SSES......2380:.2260:S.F(A$.N1$).F(B$.N1 $).MH:E.S.D....#1,A$:E.E.1:.ST.0.400.... . 1:DE.S:HN.3:.2180......". STARTING ADD RESS IS: ";S;" ($";H$;")".B...DE.E:.2180 :.". ENDING ADDRESS IS: ";E;" ($";H$;" )".Q....". LENGTH OF THE FILE IS ";E.S.1 ;" BYTES".W.B... .L.. READ START ADDRESS FOR UN-ASSEMBLY.F.V..". UN-ASSEMBLY STA RTING ADDRESS"......" IN DECIMAL OR HEX ($)";AN$......2480:SA.DE:. SA.0.S A.S.C.... SA.S.SA..E.."..ERROR - OUT OF RANGE ADDRESS":.480.I.....S.... SECOND P ASS - CONSTRUCT LABEL TABLE......2380:P. S.1:.2260......2090:.2120:OP.Q...&.. N . 580,590,630,590,590,590,600,600,600,600, 590,590,580,580...0..P..E.540...:. 1:.86 0...D.....N..2090:P.P.1:..1.X..2090:AD.Q :.2090:AD.AD.Q.MH.M.B.P.P.2:.AD.S.AD.E.. 760:..X.L..680:..V.V..2090:AD.P.Q.(Q.127 ).MH.2.....P.P.1:.AD.S.AD.E. .......680: ............. LABELS FOR ADDRESSES OF IN RANGE BRANCHES, JUMPS, LDA, ETC.....LF. 1:.I.1.LB.1:T.L1(I):.T.AD.LF.0:.720.!... . T.AD.T..0 . 720.D.... T.AD.LF . L1(I). AD:AD.T:.720.\.F.. T.0.LF . L1(I).AD.Q.P ..:. LF . LB.LB.1.W.Z...}.......... LABE LS FOR ADDRESSES OUT OF RANGE.B....OP..3 2.OP..76.OP..108...O.... AD.0.......LF.1 :.I.1.LO.1:T.L2(I):.T.AD.LF.0:.820...... T.AD.T..0 . 820.3. .. T.AD.LF . L2(I).A D:AD.T:.820.K.*.. T.0.LF . L2(I).AD.`.4. .:. LF . LO.LO.1.F.>...L.H.....R.. PRINT SUMMARY OF LABEL COUNTS...\..". NUMBER OF IN RANGE LABELS: ";LB...F..". NUMBER OF OUT OF RANGE LABELS: ";LO...P.....Z.. THIRD PASS - CHECK IF ALL LABELS VALID. ).... LB.0 . 1120.L....2380:P.S.1:.2260: I.1:AD.L1(I).Q....2090:.2120:.AD.P.I.I.1 :AD.L1(I)...... N .970,980,980,980,980,9 80,1010,1010,1010,1010.M.... N.10 . . (N .10) .980,980,970,970......P..E.920..... 1:.1090...J.....T.P.P.1:. P.E . ....... AD.P . .1060.!....2090:..5...P.P.2:. P. E . ..N.... AD.P.AD.P.1. .1060.`....2090 :.2090:..F.......... INVALID LABEL CHANG E TO OUT OF RANGE LABEL.F.$.LV.LV.1:LO.L O.1:L2(LO).AD:I.I.1:AD.L1(I):..L.......8 .. PRINT COUNT OF INVALID ADDRESSES.'.B. . LV ..0 . .". NUMBER OF INVALID ADDRESS ES: "LV.-.L...W.V.. FOURTH PASS - OUTPUT ASSEMBLER CODE.A.`..2380.G.J.....T.. OP EN SOURCE AND MACHINE CODE FILES...~.NF$ .OF$."1.S":P.S.1:NF.2.M....2320:.2220:.2 260:NF.2:LC.1.S.......... WRITE STARTING ADDRESS.0...DE.P.1:HN.3:.2180:P$." *=$" .H$."; <STARTING ADDRESS>":.2150.6.....K .... ASSIGN LABEL VALUES FOR ADDRESSES O UT OF RANGE.|.D.. LO.0 .1270...N.P$." ;< OUT OF RANGE JUMPS AND SUBS>":.2150.F.X. .I.1.LO:DE.L2(I):.2180...... I.LO.LV.1 . P$." ; <INVALID LABELS>":.2150. .. .P$." AD".H$."=$".H$:.2150:..2...LT. 1:T.L1(LT).C....LC..LF.1350.I.....P.... AFTER 1000 LINES CREATE NEW FILE.....NF$ .OF$.J(D(NF),2).".S":P$.";":.2150:P$.".F IL".NF$:.2150.P.(..2450:NF.NF.1:LC.1:.23 20:.2220.V.2.....<.. START READING OP CO DES...F..2090:OP.Q:.2120...P...7.Z.. CHE CK IF THIS IS A LABELED ADDRESS.U.D.PP$. " ":. T.0.1410.X.N.. T.P . LT.LT. 1:T.L1(LT):.1380...X.. T.P . DE.P:HN.3:. 2180:PP$."AD".H$." ":LT.LT.1:T.L1(LT).P .... N..0.PP$.PP$.N$." "...... (N.1) .14 80,1510,1550,1580,1640,1670,1700,1730,17 90,1850,1910.9.... N.10. . (N.10) .1950, 1980,2010.K. .. P..E . 2700.U....1280.[. ........ ILLEGAL OP CODE .BYTE ASSUMED. ..H.DE.OP:HN.1:.2180:P$.PP$.".BYTE $".H$ :.2150:....R...I.... IMPLIED MODE.....P$ .PP$:.2150:.......2150:............. IMM EDIATE MODE.:....2090:DE.Q:HN.1:.2180:P$ .PP$."#$".H$:.2150:P.P.1:..@....._.".. R ELATIVE MODE (BRANCHES)...,..2090:AD.P.Q .(Q.127).MH.2:DE.AD:HN.3:.2180...6..AD.S .AD.E.P$.PP$."$".H$:.1610.D.@.P$.PP$."AD ".H$.V.J..2150:P.P.1:....T.....^.. ZERO PAGE MODE.'.H..2090:P.P.1:DE.Q:HN.1:.218 0:P$.PP$."$".H$:.2150:..-.R...L.|.. X-IN DEXED ZERO PAGE MODE......2090:P.P.1:DE. Q:HN.1:.2180:P$.PP$."$".H$.",X":.2150:.. ........... Y-INDEXED ZERO PAGE MODE.... ..2090:P.P.1:DE.Q:HN.1:.2180:P$.PP$."$". H$.",Y":.2150:............. ABSOLUTE MOD E.8.B..2090:AD.Q:.2090:AD.AD.Q.MH:P.P.2: DE.AD:HN.3:.2180.].L.P$.PP$."AD".H$:.AD. .S.AD..E.1760...V.. OP..32.OP..76.OP..10 8.AD.0 . P$.PP$."$".H$......2150:.. .... ...... X-INDEXED ABSOLUTE MODE......2090 :AD.Q:.2090:AD.AD.Q.MH:P.P.2:DE.AD:HN.3: .2180.....P$.PP$."AD".H$.",X":.AD..S.AD. .E.1820.U.... OP..32.OP..76.OP..108.AD.0 . P$.PP$."$".H$.",X".A....2150:..G.&... ..0.. Y-INDEXED ABSOLUTE MODE...:..2090: AD.Q:.2090:AD.AD.Q.MH:P.P.2:DE.AD:HN.3:. 2180...D.P$.PP$."AD".H$.",Y":.AD..S.AD.. E.1880...N.. OP..32.OP..76.OP..108.AD.0 . P$.PP$."$".H$.",Y".(.X..2150:....B...B .L.. INDIRECT MODE.Y.V..2090:AD.Q:.2090: AD.AD.Q.MH:P.P.2:DE.AD:HN.3:.2180.....P$ .PP$."(AD".H$.")":.2150:............. X- INDEXED INDIRECT MODE......2090:P.P.1:DE .Q:HN.1:.2180:P$.PP$."($".H$.",X)":.2150 :............. Y-INDEXED INDIRECT MODE.[ ....2090:P.P.1:DE.Q:HN.1:.2180:P$.PP$."( $".H$."),Y":.2150:..A.F...X.P.. ACCUMULA TOR MODE...Z.P$.PP$."A":.2150:.......... ... BIT CONVERTED TO .BYTE OPERATION.Y.. .DE.OP:HN.1:.2180:BC.BC.1.....P$." ".".BYTE $".H$.";<THIS WAS A BIT INSTR UCTION>".$....2150:..*.....I. .. READ A BYTE (A$) FROM FILE AND CALCULATE ASCII VALUE (Q)...*..#1,A$:Q.F(A$.N1$)::....4. ....>.. DECODE INSTRUCTION...H.P.P.1:N$. MN$(Q):N.MD(Q):..F.R.....\.. OUTPUT DATA LINE FOR ASSEMBLER...F.P$.P$.XX$:.6,P$; :.2220:LC.LC.1:....P...@.Z.. DECIMAL (DE ) TO HEX (H$) CONVERSION.V...DX.DE:H$."" :.M.HN.0..1:N%.DX.(16.M):DX.DX.N%.16.M.. ...H$.H$.J(HE$,N%.1,1):.:............. R EAD DISK ERROR CHANNEL......15,EA,EB$,EC ,ED:. EA . ."..DISK ERROR";EA;EB$;"."... ..........!.J.. OPEN FILE AND GET FIRST TWO BYTES.:.T..1,8,12,F$:.#1,A$,B$.H.... PS..2...I.... P.(SA.1)..2090:P.P.1:.228 0.O.....U.......... OPEN SOURCE FILE.... ..OT$."D".P$."@".NF$.",S,W":.6,8,3,P$:.2 220:..G....OT.....$.OT.1:.OT$."P"..6,4:. ......6,3:....8.....B.. PRINT PASS NUMBE R.C.L.."..PASS #";PS;" OF THE FILE TO BE DECODED":PS.PS.1:..I.V...I.`.. INITIALI ZE THE DISK DRIVE...J..15,8,15,"I".D(FD) :....T..15,"I".D(FO):....~........ END O F SOURCE FILE.G....6,G(0);: 6:..M...... ... CONVERT STRING (AN$) TO DECIMAL (DE) AND HEX (H$).' ..HD.0:L2.0:L3.1:L4.C(AN $):HN.3.; ..A1$.J(AN$,L3,1).Q D.. A1$..G (32).2540.] N.L3.L3.1.X X.. L3.L4 . DE.0 :.2080:... ...2490.. ... A1$.G(36) . HD. 1:L3.L3.1.. ..L2.L4.L3.1:H$.J(AN$,L3,L2) .. ... HD.0 . .2640:.2180:... .....!... HEX TO DECIMAL (H$ TO DE).:!..DE.0:.M.1. L2:.W.0.15:. J(H$,M,1).J(HE$,W.1,1) . 26 10.P!(..W:M.L2:.M:DE.0:..M!2.DE.DE.W.(16 .(L2.M)):.M:..S!<....!F.. STRING (H$) TO DECIMAL (DE)..!P.DE.0:L2.C(H$):.M.1.L2: .W.0.9.Z!Z.. J(H$,M,1).J(HE$,W.1,1) . 26 70..!D..W:M.L2:.M:DE.0:..."N.DE.DE.W.(10 .(L2.M)):.M:..."X...6"... END OF PROGRAM - CLOSE FILES.G"..P$." ;":.2150:P$." . END":.2150: 1:.2450: 15.."...".. UN-ASSE MBLY COMPLETE":..." ...."... MNEMONIC, A DDRESSING MODE, HEX CODE.."... BRK, 1, 0, ORA, 11, 1, ORA, 4, 5, ASL, 4 , 6.2#... PHP, 1, 8, ORA, 2, 9, ASL, 13, 10, ORA, 7, 13.O#H.. ASL, 7 , 14, BPL, 3, 16, ORA, 12, 17, ORA, 5, 21..#R.. ASL, 5, 22, CLC, 1, 24 , ORA, 9, 25, ORA, 8, 29..#... ASL, 8, 30, JSR, 7, 32, AND, 11, 33, BIT , 4, 36.&$... AND, 4, 37, ROL, 4, 38, PLP, 1, 40, AND, 2, 41.C$... ROL , 13, 42, BIT, 7, 44, AND, 7, 45, R OL, 7, 46. $... BMI, 3, 48, AND, 12, 49, AND, 5, 53, ROL, 5, 54..$... S EC, 1, 56, AND, 9, 57, AND, 8, 61, ROL, 8, 62..%... RTI, 1, 64, EOR, 1 1, 65, EOR, 4, 69, LSR, 4, 70.W%... PHA, 1, 72, EOR, 2, 73, LSR, 13, 7 4, JMP, 7, 76..%".. EOR, 7, 77, LSR, 7, 78, BVC, 3, 80, EOR, 12, 81.Q%, .. EOR, 5, 85, LSR, 5, 86, CLI, 1, 88, EOR, 9, 89..&6.. EOR, 8, 93, LS R, 8, 94, RTS, 1, 96, ADC, 11, 97.K &@.. ADC, 4, 101, ROR, 4, 102, PLA, 1 , 104, ADC, 2, 105..&J.. ROR, 13, 106, JMP, 10, 108, ADC, 7, 109, ROR, 7, 110 .E&T.. BVS, 3, 112, ADC, 12, 113, ADC, 5, 117, ROR, 5, 118..'^.. SEI, 1, 120 , ADC, 9, 121, ADC, 8, 125, ROR, 8, 1 26.?'H.. STA, 11, 129, STY, 4, 132, STA , 4, 133, STX, 4, 134.|'R.. DEY, 1, 1 36, TXA, 1, 138, STY, 7, 140, STA, 7, 141..'|.. STX, 7, 142, BCC, 3, 144, S TA, 12, 145, STY, 5, 148..'... STA, 5, 149, STX, 6, 150, TYA, 1, 152, STA, 9, 153.3(... TXS, 1, 154, STA, 8, 157, LDY, 2, 160, LDA, 11, 161.P(... LDX, 2, 162, LDY, 4, 164, LDA, 4, 165, LDX, 4, 166..(... TAY, 1, 168, LDA, 2, 16 9, TAX, 1, 170, LDY, 7, 172..(... LDA, 7, 173, LDX, 7, 174, BCS, 3, 176, LD A, 12, 177.')... LDY, 5, 180, LDA, 5, 181, LDX, 6, 182, CLV, 1, 184.D)B.. LD A, 9, 185, TSX, 1, 186, LDY, 8, 188, LDA, 8, 189..)L.. LDX, 9, 190, CPY, 2 , 192, CMP, 11, 193, CPY, 4, 196..)V.. CMP, 4, 197, DEC, 4, 198, INY, 1, 200 , CMP, 2, 201..*... DEX, 1, 202, CPY, 7, 204, CMP, 7, 205, DEC, 7, 206.X*.. . BNE, 3, 208, CMP, 12, 209, CMP, 5, 2 13, DEC, 5, 214..*... CLD, 1, 216, CMP , 9, 217, CMP, 8, 221, DEC, 8, 222.R* ... CPX, 2, 224, SBC, 11, 225, CPX, 4, 228, SBC, 4, 229..+... INC, 4, 230, I NX, 1, 232, SBC, 2, 233, NOP, 1, 234. L+... CPX, 7, 236, SBC, 7, 237, INC, 7, 238, BEQ, 3, 240..+... SBC, 12, 241, SBC, 5, 245, INC, 5, 246, SED, 1, 24 8..+&.. SBC, 9, 249, SBC, 8, 253, INC, 8, 254...
> CLICK IMAGE PREVIEW FOR FULL MODAL