SYMASS 3.1.SRC

00000000: 01 08 0A 08 64 00 9E 37  30 30 00 2A 08 6E 00 3B  |....d..700.*.n.;|
00000010: 20 20 20 20 20 20 B3 B3  B3 B3 20 53 59 4D 41 53  |      .... SYMAS|
00000020: 53 20 33 2E 31 20 B1 B1  B1 B1 00 49 08 78 00 3B  |S 3.1 .....I.x.;|
00000030: 20 20 20 20 20 20 20 53  59 4D 42 4F 4C 49 43 20  |       SYMBOLIC |
00000040: 41 53 53 45 4D 42 4C 45  52 00 6E 08 82 00 3B 20  |ASSEMBLER.n...; |
00000050: 52 4F 42 45 52 54 20 48  55 45 48 4E 20 4A 55 4E  |ROBERT HUEHN JUN|
00000060: 45 2C 20 4F 43 A4 42 45  52 20 31 39 38 35 00 88  |E, OC.BER 1985..|
00000070: 08 8C 00 3B 20 20 20 20  20 20 20 20 20 20 20 20  |...;            |
00000080: 20 53 4D 33 2E 31 30 33  00 94 08 96 00 AC B2 24  | SM3.103.......$|
00000090: 43 30 30 30 00 9A 08 A0  00 3B 00 B1 08 AA 00 3B  |C000.....;.....;|
000000A0: 5A 45 52 4F 20 50 41 47  45 20 45 51 55 41 54 45  |ZERO PAGE EQUATE|
000000B0: 53 00 D2 08 B4 00 53 54  41 53 52 43 20 B2 24 35  |S.....STASRC .$5|
000000C0: 30 20 3B 53 54 41 52 54  20 4F 46 20 53 4F 55 52  |0 ;START OF SOUR|
000000D0: 43 45 00 EF 08 BE 00 53  54 41 56 41 52 20 B2 24  |CE.....STAVAR .$|
000000E0: 32 44 20 3B 80 20 4F 46  20 53 4F 55 52 43 45 00  |2D ;. OF SOURCE.|
000000F0: 13 09 C8 00 4D 45 4D 53  49 5A 20 B2 24 33 37 20  |....MEMSIZ .$37 |
00000100: 3B A4 50 20 4F 46 20 53  59 4D 42 4F 4C 20 54 41  |;.P OF SYMBOL TA|
00000110: 42 4C 45 00 34 09 D2 00  4C 49 4E 4B 20 B2 24 34  |BLE.4...LINK .$4|
00000120: 45 20 20 20 3B 42 41 53  49 43 20 4C 49 4E 45 20  |E   ;BASIC LINE |
00000130: 4C 49 4E 4B 00 59 09 DC  00 4C 49 4E 45 20 B2 24  |LINK.Y...LINE .$|
00000140: 33 39 20 20 20 3B 43 55  52 52 45 4E 54 20 4C 49  |39   ;CURRENT LI|
00000150: 4E 45 20 4E 55 4D 42 45  52 00 81 09 E6 00 41 44  |NE NUMBER.....AD|
00000160: 20 B2 24 37 41 20 20 20  20 20 3B 43 55 52 52 45  | .$7A     ;CURRE|
00000170: 4E 54 20 53 4F 55 52 43  45 20 41 44 44 52 45 53  |NT SOURCE ADDRES|
00000180: 53 00 A3 09 F0 00 53 59  4D 50 54 52 20 B2 24 35  |S.....SYMPTR .$5|
00000190: 32 20 3B 53 59 4D 42 4F  4C 20 C5 55 45 20 50 4F  |2 ;SYMBOL .UE PO|
000001A0: B5 45 52 00 C8 09 FA 00  53 59 4D 80 20 B2 24 35  |.ER.....SYM. .$5|
000001B0: 37 20 3B 42 4F 54 A4 4D  20 4F 46 20 53 59 4D 42  |7 ;BOT.M OF SYMB|
000001C0: 4F 4C 20 54 41 42 4C 45  00 F0 09 04 01 50 54 52  |OL TABLE.....PTR|
000001D0: 20 B2 24 35 39 20 20 20  20 3B 43 55 52 52 45 4E  | .$59    ;CURREN|
000001E0: 54 20 4F 42 4A 45 43 54  20 41 44 44 52 45 53 53  |T OBJECT ADDRESS|
000001F0: 00 14 0A 0E 01 4F 50 50  54 52 20 B2 24 35 42 20  |.....OPPTR .$5B |
00000200: 20 3B 4F 50 43 4F 44 45  20 54 41 42 4C 45 20 50  | ;OPCODE TABLE P|
00000210: 4F B5 45 52 00 2F 0A 18  01 C3 20 B2 24 35 44 20  |O.ER./.... .$5D |
00000220: 20 20 20 3B C3 47 54 48  20 4F 46 20 57 B0 44 00  |   ;.GTH OF W.D.|
00000230: 50 0A 22 01 54 31 20 B2  24 32 36 20 20 20 20 20  |P.".T1 .$26     |
00000240: 3B 54 45 4D 50 B0 41 52  59 20 4E 55 4D 42 45 52  |;TEMP.ARY NUMBER|
00000250: 00 6D 0A 2C 01 54 32 20  B2 24 32 38 20 20 20 20  |.m.,.T2 .$28    |
00000260: 20 3B 53 A4 52 41 47 45  20 81 20 45 C5 00 85 0A  | ;S.RAGE . E....|
00000270: 36 01 53 53 20 B2 24 32  41 20 20 20 20 20 3B 53  |6.SS .$2A     ;S|
00000280: 49 47 4E 20 94 00 91 0A  40 01 54 33 20 B2 24 35  |IGN ....@.T3 .$5|
00000290: 45 00 9D 0A 4A 01 54 34  20 B2 24 35 46 00 A9 0A  |E...J.T4 .$5F...|
000002A0: 54 01 54 35 20 B2 24 36  30 00 CD 0A 5E 01 46 4C  |T.T5 .$60...^.FL|
000002B0: 41 47 20 B2 24 30 32 20  20 20 3B 46 49 52 53 54  |AG .$02   ;FIRST|
000002C0: 20 B0 20 53 45 43 91 44  20 50 41 53 53 00 D9 0A  | . SEC.D PASS...|
000002D0: 68 01 3B 43 91 53 C0 54  53 00 00 0B 72 01 4E 4F  |h.;C.S.TS...r.NO|
000002E0: 50 53 20 B2 35 35 20 20  20 20 3B 4E 55 4D 42 45  |PS .55    ;NUMBE|
000002F0: 52 20 4F 46 20 49 4E 53  54 52 55 43 54 49 91 53  |R OF INSTRUCTI.S|
00000300: 00 18 0B 7C 01 87 59 20  B2 24 41 34 37 34 20 3B  |...|..Y .$A474 ;|
00000310: 42 41 53 49 43 20 87 59  00 37 0B 86 01 49 4E 4C  |BASIC .Y.7...INL|
00000320: 49 4E 45 20 B2 24 42 44  43 32 20 3B 99 20 27 49  |INE .$BDC2 ;. 'I|
00000330: 4E 20 4C 49 4E 45 27 00  54 0B 90 01 9A 42 41 53  |N LINE'.T....BAS|
00000340: 20 B2 24 41 37 41 45 20  3B 9A 49 4E 55 45 20 42  | .$A7AE ;.INUE B|
00000350: 41 53 49 43 00 69 0B 9A  01 9B 20 B2 24 41 36 43  |ASIC.i.... .$A6C|
00000360: 39 20 3B 9B 20 4C 49 4E  45 00 8E 0B A4 01 46 49  |9 ;. LINE.....FI|
00000370: 4E 44 4C 49 4E 45 20 B2  24 41 36 31 33 20 3B 46  |NDLINE .$A613 ;F|
00000380: 49 4E 44 20 42 41 53 49  43 20 4C 49 4E 45 00 94  |IND BASIC LINE..|
00000390: 0B AE 01 3B 00 A6 0B B8  01 3B 4D 41 49 4E 20 50  |...;.....;MAIN P|
000003A0: 52 4F 47 52 41 4D 00 AC  0B C2 01 3B 00 CA 0B CC  |ROGRAM.....;....|
000003B0: 01 49 4E 49 54 20 B2 AC  20 3B 42 45 47 49 4E 20  |.INIT .. ;BEGIN |
000003C0: 46 49 52 53 54 20 50 41  53 53 00 D0 0B D6 01 3B  |FIRST PASS.....;|
000003D0: 00 DB 0B E0 01 4C 44 41  20 23 30 00 E8 0B EA 01  |.....LDA #0.....|
000003E0: 53 54 41 20 46 4C 41 47  00 02 0C F4 01 4C 44 58  |STA FLAG.....LDX|
000003F0: 20 23 B3 4D 45 53 53 53  54 41 52 20 3B 53 54 41  | #.MESSSTAR ;STA|
00000400: 52 54 00 15 0C FE 01 4C  44 59 20 23 B1 4D 45 53  |RT.....LDY #.MES|
00000410: 53 53 54 41 52 00 22 0C  08 02 4A 53 52 20 99 4D  |SSTAR."...JSR .M|
00000420: 53 47 00 2E 0C 12 02 4C  44 58 20 24 33 41 00 36  |SG.....LDX $3A.6|
00000430: 0C 1C 02 49 4E 58 00 42  0C 26 02 42 4E 45 20 49  |...INX.B.&.BNE I|
00000440: 54 31 00 61 0C 30 02 4A  4D 50 20 87 59 20 3B BF  |T1.a.0.JMP .Y ;.|
00000450: 43 45 20 49 4E 20 44 49  52 45 43 54 20 4D 4F 44  |CE IN DIRECT MOD|
00000460: 45 00 83 0C 3A 02 49 54  31 20 4C 44 58 20 23 B3  |E...:.IT1 LDX #.|
00000470: 4D 45 53 53 46 49 52 20  3B 46 49 52 53 54 20 50  |MESSFIR ;FIRST P|
00000480: 41 53 53 00 95 0C 44 02  4C 44 59 20 23 B1 4D 45  |ASS...D.LDY #.ME|
00000490: 53 53 46 49 52 00 A2 0C  4E 02 4A 53 52 20 99 4D  |SSFIR...N.JSR .M|
000004A0: 53 47 00 C4 0C 58 02 4C  44 41 20 4D 45 4D 53 49  |SG...X.LDA MEMSI|
000004B0: 5A 20 3B 49 4E 49 54 20  53 59 4D 42 4F 4C 20 54  |Z ;INIT SYMBOL T|
000004C0: 41 42 4C 45 00 D1 0C 62  02 53 54 41 20 53 59 4D  |ABLE...b.STA SYM|
000004D0: 80 00 E2 0C 6C 02 4C 44  41 20 4D 45 4D 53 49 5A  |....l.LDA MEMSIZ|
000004E0: AA 31 00 F1 0C 76 02 53  54 41 20 53 59 4D 80 AA  |.1...v.STA SYM..|
000004F0: 31 00 FC 0C 80 02 49 4E  43 20 41 44 00 08 0D 8A  |1.....INC AD....|
00000500: 02 42 4E 45 20 49 54 32  00 15 0D 94 02 49 4E 43  |.BNE IT2.....INC|
00000510: 20 41 44 AA 31 00 24 0D  9E 02 49 54 32 20 4C 44  | AD.1.$...IT2 LD|
00000520: 41 20 41 44 00 33 0D A8  02 53 54 41 20 53 54 41  |A AD.3...STA STA|
00000530: 53 52 43 00 40 0D B2 02  53 54 41 20 4C 49 4E 4B  |SRC.@...STA LINK|
00000540: 00 4D 0D BC 02 4C 44 41  20 41 44 AA 31 00 5E 0D  |.M...LDA AD.1.^.|
00000550: C6 02 53 54 41 20 53 54  41 53 52 43 AA 31 00 6D  |..STA STASRC.1.m|
00000560: 0D D0 02 53 54 41 20 4C  49 4E 4B AA 31 00 73 0D  |...STA LINK.1.s.|
00000570: DA 02 3B 00 8E 0D E4 02  A2 4C 49 4E 45 20 B2 AC  |..;......LINE ..|
00000580: 20 3B 53 54 41 52 54 20  82 20 4C 49 4E 45 00 94  | ;START . LINE..|
00000590: 0D EE 02 3B 00 A2 0D F8  02 4A 53 52 20 82 4C 49  |...;.....JSR .LI|
000005A0: 4E 45 00 AF 0D 02 03 42  4E 45 20 A1 57 B0 44 00  |NE.....BNE .W.D.|
000005B0: BF 0D 0C 03 4A 4D 50 20  53 45 43 50 41 53 53 00  |....JMP SECPASS.|
000005C0: C5 0D 16 03 3B 00 DE 0D  20 03 A1 57 B0 44 20 B2  |....;... ..W.D .|
000005D0: AC 20 3B 50 52 4F 43 45  53 53 20 57 B0 44 00 E4  |. ;PROCESS W.D..|
000005E0: 0D 2A 03 3B 00 F0 0D 34  03 4A 53 52 20 57 B0 44  |.*.;...4.JSR W.D|
000005F0: 00 FC 0D 3E 03 42 4E 45  20 47 57 31 00 11 0E 48  |...>.BNE GW1...H|
00000600: 03 43 4D 50 20 23 24 42  32 20 3B B2 20 A4 4B 45  |.CMP #$B2 ;. .KE|
00000610: 4E 00 1B 0E 52 03 42 4E  45 20 82 00 28 0E 5C 03  |N...R.BNE ..(.\.|
00000620: 4A 4D 50 20 41 44 44 C5  00 46 0E 66 03 47 57 31  |JMP ADD..F.f.GW1|
00000630: 20 4C 44 58 20 23 30 20  3B 43 48 45 43 4B 20 81  | LDX #0 ;CHECK .|
00000640: 20 AC B2 AC AA 31 00 55  0E 70 03 4C 44 41 20 28  | ....1.U.p.LDA (|
00000650: 41 44 2C 58 29 00 6A 0E  7A 03 43 4D 50 20 23 24  |AD,X).j.z.CMP #$|
00000660: 41 43 20 3B AC 20 A4 4B  45 4E 00 76 0E 84 03 42  |AC ;. .KEN.v...B|
00000670: 4E 45 20 47 57 32 00 84  0E 8E 03 4A 53 52 20 44  |NE GW2.....JSR D|
00000680: 4F 50 54 52 00 8E 0E 98  03 4A 4D 50 20 82 00 A1  |OPTR.....JMP ...|
00000690: 0E A2 03 47 57 32 20 4C  44 41 20 28 41 44 29 2C  |...GW2 LDA (AD),|
000006A0: 59 00 B1 0E AC 03 43 4D  50 20 23 24 42 32 20 3B  |Y.....CMP #$B2 ;|
000006B0: B2 00 BD 0E B6 03 42 4E  45 20 47 57 33 00 CC 0E  |......BNE GW3...|
000006C0: C0 03 4A 4D 50 20 41 44  44 53 59 4D 00 DF 0E CA  |..JMP ADDSYM....|
000006D0: 03 47 57 33 20 4A 53 52  20 46 49 4E 44 4F 50 00  |.GW3 JSR FINDOP.|
000006E0: EB 0E D4 03 42 43 43 20  47 57 34 00 F8 0E DE 03  |....BCC GW4.....|
000006F0: 4A 4D 50 20 44 4F 4F 50  00 07 0F E8 03 47 57 34  |JMP DOOP.....GW4|
00000700: 20 4C 44 59 20 23 30 00  16 0F F2 03 4C 44 41 20  | LDY #0.....LDA |
00000710: 28 41 44 29 2C 59 00 23  0F FC 03 43 4D 50 20 23  |(AD),Y.#...CMP #|
00000720: 22 2E 22 00 31 0F 06 04  42 4E 45 20 4C 41 42 45  |".".1...BNE LABE|
00000730: 4C 00 3D 0F 10 04 4A 4D  50 20 43 55 90 00 43 0F  |L.=...JMP CU..C.|
00000740: 1A 04 3B 00 68 0F 24 04  4C 41 42 45 4C 20 B2 AC  |..;.h.$.LABEL ..|
00000750: 20 3B 94 20 57 B0 44 2C  20 43 55 52 52 45 4E 54  | ;. W.D, CURRENT|
00000760: 20 41 44 44 52 45 53 53  00 6E 0F 2E 04 3B 00 7C  | ADDRESS.n...;.||
00000770: 0F 38 04 4A 53 52 20 43  52 53 59 4D 00 87 0F 42  |.8.JSR CRSYM...B|
00000780: 04 4C 44 59 20 23 30 00  93 0F 4C 04 4C 44 41 20  |.LDY #0...L.LDA |
00000790: 50 54 52 00 A6 0F 56 04  53 54 41 20 28 53 59 4D  |PTR...V.STA (SYM|
000007A0: 50 54 52 29 2C 59 00 AE  0F 60 04 49 4E 59 00 BC  |PTR),Y...`.INY..|
000007B0: 0F 6A 04 4C 44 41 20 50  54 52 AA 31 00 CF 0F 74  |.j.LDA PTR.1...t|
000007C0: 04 53 54 41 20 28 53 59  4D 50 54 52 29 2C 59 00  |.STA (SYMPTR),Y.|
000007D0: D5 0F 7E 04 3B 00 EC 0F  88 04 82 20 B2 AC 20 3B  |..~.;...... .. ;|
000007E0: A1 20 87 59 20 81 20 82  20 57 B0 44 00 F2 0F 92  |. .Y . . W.D....|
000007F0: 04 3B 00 FC 0F 9C 04 4C  44 59 20 C3 00 0B 10 A6  |.;.....LDY .....|
00000800: 04 4C 44 41 20 28 41 44  29 2C 59 00 18 10 B0 04  |.LDA (AD),Y.....|
00000810: 43 4D 50 20 23 22 20 22  00 23 10 BA 04 42 45 51  |CMP #" ".#...BEQ|
00000820: 20 4E 31 00 30 10 C4 04  43 4D 50 20 23 22 3A 22  | N1.0...CMP #":"|
00000830: 00 3B 10 CE 04 42 45 51  20 4E 31 00 49 10 D8 04  |.;...BEQ N1.I...|
00000840: 4A 4D 50 20 A2 4C 49 4E  45 00 54 10 E2 04 4E 31  |JMP .LINE.T...N1|
00000850: 20 49 4E 59 00 5C 10 EC  04 54 59 41 00 64 10 F6  | INY.\...TYA.d..|
00000860: 04 43 4C 43 00 6F 10 00  05 41 44 43 20 41 44 00  |.CLC.o...ADC AD.|
00000870: 7A 10 0A 05 53 54 41 20  41 44 00 84 10 14 05 42  |z...STA AD.....B|
00000880: 43 43 20 4E 00 91 10 1E  05 49 4E 43 20 41 44 AA  |CC N.....INC AD.|
00000890: 31 00 A0 10 28 05 4E 20  4A 4D 50 20 A1 57 B0 44  |1...(.N JMP .W.D|
000008A0: 00 A6 10 32 05 3B 00 C7  10 3C 05 53 45 43 50 41  |...2.;...<.SECPA|
000008B0: 53 53 20 B2 AC 20 3B 42  45 47 49 4E 20 53 45 43  |SS .. ;BEGIN SEC|
000008C0: 91 44 20 50 41 53 53 00  CD 10 46 05 3B 00 DA 10  |.D PASS...F.;...|
000008D0: 50 05 49 4E 43 20 46 4C  41 47 00 F8 10 5A 05 4C  |P.INC FLAG...Z.L|
000008E0: 44 58 20 23 B3 4D 45 53  53 53 45 43 20 3B 53 45  |DX #.MESSSEC ;SE|
000008F0: 43 91 44 20 50 41 53 53  00 0A 11 64 05 4C 44 59  |C.D PASS...d.LDY|
00000900: 20 23 B1 4D 45 53 53 53  45 43 00 17 11 6E 05 4A  | #.MESSSEC...n.J|
00000910: 53 52 20 99 4D 53 47 00  39 11 78 05 4C 44 41 20  |SR .MSG.9.x.LDA |
00000920: 53 54 41 53 52 43 20 3B  50 55 54 20 4C 49 4E 4B  |STASRC ;PUT LINK|
00000930: 20 41 54 20 53 54 41 52  54 00 46 11 82 05 53 54  | AT START.F...ST|
00000940: 41 20 4C 49 4E 4B 00 57  11 8C 05 4C 44 41 20 53  |A LINK.W...LDA S|
00000950: 54 41 53 52 43 AA 31 00  66 11 96 05 53 54 41 20  |TASRC.1.f...STA |
00000960: 4C 49 4E 4B AA 31 00 6C  11 A0 05 3B 00 88 11 AA  |LINK.1.l...;....|
00000970: 05 A2 4C 49 4E 45 32 20  B2 AC 20 3B 53 54 41 52  |..LINE2 .. ;STAR|
00000980: 54 20 82 20 4C 49 4E 45  00 8E 11 B4 05 3B 00 9C  |T . LINE.....;..|
00000990: 11 BE 05 4A 53 52 20 82  4C 49 4E 45 00 AA 11 C8  |...JSR .LINE....|
000009A0: 05 42 4E 45 20 A1 57 B0  44 32 00 B9 11 D2 05 4A  |.BNE .W.D2.....J|
000009B0: 4D 50 20 46 49 4E 49 53  48 00 BF 11 DC 05 3B 00  |MP FINISH.....;.|
000009C0: D9 11 E6 05 A1 57 B0 44  32 20 B2 AC 20 3B 50 52  |.....W.D2 .. ;PR|
000009D0: 4F 43 45 53 53 20 57 B0  44 00 DF 11 F0 05 3B 00  |OCESS W.D.....;.|
000009E0: EB 11 FA 05 4A 53 52 20  57 B0 44 00 F6 11 04 06  |....JSR W.D.....|
000009F0: 42 45 51 20 82 32 00 01  12 0E 06 4C 44 58 20 23  |BEQ .2.....LDX #|
00000A00: 30 00 10 12 18 06 4C 44  41 20 28 41 44 2C 58 29  |0.....LDA (AD,X)|
00000A10: 00 20 12 22 06 43 4D 50  20 23 24 41 43 20 3B AC  |. .".CMP #$AC ;.|
00000A20: 00 2D 12 2C 06 42 4E 45  20 47 32 57 31 00 3B 12  |.-.,.BNE G2W1.;.|
00000A30: 36 06 4A 53 52 20 44 4F  50 54 52 00 46 12 40 06  |6.JSR DOPTR.F.@.|
00000A40: 4A 4D 50 20 82 32 00 5A  12 4A 06 47 32 57 31 20  |JMP .2.Z.J.G2W1 |
00000A50: 4A 53 52 20 46 49 4E 44  4F 50 00 67 12 54 06 42  |JSR FINDOP.g.T.B|
00000A60: 43 43 20 47 32 57 32 00  74 12 5E 06 4A 4D 50 20  |CC G2W2.t.^.JMP |
00000A70: 50 55 A4 50 00 84 12 68  06 47 32 57 32 20 4C 44  |PU.P...h.G2W2 LD|
00000A80: 59 20 23 30 00 93 12 72  06 4C 44 41 20 28 41 44  |Y #0...r.LDA (AD|
00000A90: 29 2C 59 00 A0 12 7C 06  43 4D 50 20 23 22 2E 22  |),Y...|.CMP #"."|
00000AA0: 00 AB 12 86 06 42 4E 45  20 82 32 00 B7 12 90 06  |.....BNE .2.....|
00000AB0: 4A 4D 50 20 43 55 90 00  BD 12 9A 06 3B 00 D5 12  |JMP CU......;...|
00000AC0: A4 06 82 32 20 B2 AC 20  3B A1 20 87 59 20 81 20  |...2 .. ;. .Y . |
00000AD0: 82 20 57 B0 44 00 DB 12  AE 06 3B 00 E5 12 B8 06  |. W.D.....;.....|
00000AE0: 4C 44 59 20 C3 00 F4 12  C2 06 4C 44 41 20 28 41  |LDY ......LDA (A|
00000AF0: 44 29 2C 59 00 01 13 CC  06 43 4D 50 20 23 24 32  |D),Y.....CMP #$2|
00000B00: 30 00 0E 13 D6 06 42 45  51 20 4E 32 58 31 00 1B  |0.....BEQ N2X1..|
00000B10: 13 E0 06 43 4D 50 20 23  24 33 41 00 28 13 EA 06  |...CMP #$3A.(...|
00000B20: 42 45 51 20 4E 32 58 31  00 37 13 F4 06 4A 4D 50  |BEQ N2X1.7...JMP|
00000B30: 20 A2 4C 49 4E 45 32 00  44 13 FE 06 4E 32 58 31  | .LINE2.D...N2X1|
00000B40: 20 49 4E 59 00 4C 13 08  07 54 59 41 00 54 13 12  | INY.L...TYA.T..|
00000B50: 07 43 4C 43 00 5F 13 1C  07 41 44 43 20 41 44 00  |.CLC._...ADC AD.|
00000B60: 6A 13 26 07 53 54 41 20  41 44 00 76 13 30 07 42  |j.&.STA AD.v.0.B|
00000B70: 43 43 20 4E 32 58 00 83  13 3A 07 49 4E 43 20 41  |CC N2X...:.INC A|
00000B80: 44 AA 31 00 95 13 44 07  4E 32 58 20 4A 4D 50 20  |D.1...D.N2X JMP |
00000B90: A1 57 B0 44 32 00 9B 13  4E 07 3B 00 AC 13 58 07  |.W.D2...N.;...X.|
00000BA0: 46 49 4E 49 53 48 20 B2  AC 20 3B 80 00 B2 13 62  |FINISH .. ;....b|
00000BB0: 07 3B 00 D4 13 6C 07 4C  44 58 20 23 B3 4D 45 53  |.;...l.LDX #.MES|
00000BC0: 53 41 43 20 3B 41 53 53  45 4D 42 4C 59 20 43 4F  |SAC ;ASSEMBLY CO|
00000BD0: 4D 50 88 45 00 E5 13 76  07 4C 44 59 20 23 B1 4D  |MP.E...v.LDY #.M|
00000BE0: 45 53 53 41 43 00 F2 13  80 07 4A 53 52 20 99 4D  |ESSAC.....JSR .M|
00000BF0: 53 47 00 FE 13 8A 07 4C  44 41 20 50 54 52 00 0B  |SG.....LDA PTR..|
00000C00: 14 94 07 53 54 41 20 4C  49 4E 45 00 19 14 9E 07  |...STA LINE.....|
00000C10: 4C 44 41 20 50 54 52 AA  31 00 28 14 A8 07 53 54  |LDA PTR.1.(...ST|
00000C20: 41 20 4C 49 4E 45 AA 31  00 37 14 B2 07 4A 53 52  |A LINE.1.7...JSR|
00000C30: 20 49 4E 4C 49 4E 45 00  42 14 BC 07 4A 4D 50 20  | INLINE.B...JMP |
00000C40: 87 59 00 48 14 C6 07 3B  00 6E 14 D0 07 3B 53 55  |.Y.H...;.n...;SU|
00000C50: 42 52 4F 55 54 49 4E 45  53 20 55 53 45 44 20 42  |BROUTINES USED B|
00000C60: 59 20 4D 41 49 4E 20 50  52 4F 47 52 41 4D 00 74  |Y MAIN PROGRAM.t|
00000C70: 14 DA 07 3B 00 95 14 E4  07 41 44 44 53 59 4D 20  |...;.....ADDSYM |
00000C80: B2 AC 20 3B 94 20 53 59  4D 42 4F 4C 20 57 49 54  |.. ;. SYMBOL WIT|
00000C90: 48 20 C5 55 45 00 9B 14  EE 07 3B 00 A9 14 F8 07  |H .UE.....;.....|
00000CA0: 4A 53 52 20 43 52 53 59  4D 00 B6 14 02 08 4A 53  |JSR CRSYM.....JS|
00000CB0: 52 20 A2 57 B0 44 00 C1  14 0C 08 4A 53 52 20 45  |R .W.D.....JSR E|
00000CC0: C5 00 CC 14 16 08 4C 44  59 20 23 30 00 DF 14 20  |......LDY #0... |
00000CD0: 08 53 54 41 20 28 53 59  4D 50 54 52 29 2C 59 00  |.STA (SYMPTR),Y.|
00000CE0: E7 14 2A 08 49 4E 59 00  EF 14 34 08 54 58 41 00  |..*.INY...4.TXA.|
00000CF0: 02 15 3E 08 53 54 41 20  28 53 59 4D 50 54 52 29  |..>.STA (SYMPTR)|
00000D00: 2C 59 00 0C 15 48 08 4A  4D 50 20 82 00 12 15 52  |,Y...H.JMP ....R|
00000D10: 08 3B 00 36 15 5C 08 41  44 44 C5 20 B2 AC 20 3B  |.;.6.\.ADD. .. ;|
00000D20: 43 48 41 4E 47 45 20 4C  41 42 45 4C 20 B5 4F 20  |CHANGE LABEL .O |
00000D30: 53 59 4D 42 4F 4C 00 3C  15 66 08 3B 00 49 15 70  |SYMBOL.<.f.;.I.p|
00000D40: 08 4A 53 52 20 A2 57 B0  44 00 54 15 7A 08 4A 53  |.JSR .W.D.T.z.JS|
00000D50: 52 20 45 C5 00 5F 15 84  08 4C 44 59 20 23 30 00  |R E.._...LDY #0.|
00000D60: 72 15 8E 08 53 54 41 20  28 53 59 4D 50 54 52 29  |r...STA (SYMPTR)|
00000D70: 2C 59 00 7A 15 98 08 49  4E 59 00 82 15 A2 08 54  |,Y.z...INY.....T|
00000D80: 58 41 00 95 15 AC 08 53  54 41 20 28 53 59 4D 50  |XA.....STA (SYMP|
00000D90: 54 52 29 2C 59 00 9F 15  B6 08 4A 4D 50 20 82 00  |TR),Y.....JMP ..|
00000DA0: A5 15 C0 08 3B 00 CD 15  CA 08 43 52 53 59 4D 20  |....;.....CRSYM |
00000DB0: B2 AC 20 3B 43 52 45 41  54 45 20 53 59 4D 42 4F  |.. ;CREATE SYMBO|
00000DC0: 4C 20 54 41 42 4C 45 20  45 4E 54 52 59 00 D3 15  |L TABLE ENTRY...|
00000DD0: D4 08 3B 00 EE 15 DE 08  4C 44 41 20 53 59 4D 80  |..;.....LDA SYM.|
00000DE0: 20 3B 4C 4F 57 45 52 20  53 59 4D 80 20 A4 00 08  | ;LOWER SYM. ...|
00000DF0: 16 E8 08 53 45 43 20 20  20 20 20 20 20 20 3B 4D  |...SEC        ;M|
00000E00: 41 4B 45 20 52 4F 4F 4D  00 14 16 F2 08 53 42 43  |AKE ROOM.....SBC|
00000E10: 20 23 31 30 00 21 16 FC  08 53 54 41 20 53 59 4D  | #10.!...STA SYM|
00000E20: 80 00 2D 16 06 09 42 43  53 20 43 53 31 00 3C 16  |..-...BCS CS1.<.|
00000E30: 10 09 44 45 43 20 53 59  4D 80 AA 31 00 58 16 1A  |..DEC SYM..1.X..|
00000E40: 09 43 53 31 20 43 4D 50  20 53 54 41 56 41 52 20  |.CS1 CMP STAVAR |
00000E50: 3B 43 48 45 43 4B 20 81  00 67 16 24 09 4C 44 41  |;CHECK ..g.$.LDA|
00000E60: 20 53 59 4D 80 AA 31 00  78 16 2E 09 53 42 43 20  | SYM..1.x...SBC |
00000E70: 53 54 41 56 41 52 AA 31  00 84 16 38 09 42 43 53  |STAVAR.1...8.BCS|
00000E80: 20 43 53 32 00 A3 16 42  09 4C 44 58 20 23 B3 4D  | CS2...B.LDX #.M|
00000E90: 45 53 53 53 A4 20 3B 53  59 4D 42 4F 4C 20 54 41  |ESSS. ;SYMBOL TA|
00000EA0: 42 4C 45 00 BE 16 4C 09  4C 44 59 20 23 B1 4D 45  |BLE...L.LDY #.ME|
00000EB0: 53 53 53 A4 20 3B 4F 56  45 52 46 4C 4F 57 00 CB  |SSS. ;OVERFLOW..|
00000EC0: 16 56 09 4A 53 52 20 99  4D 53 47 00 DA 16 60 09  |.V.JSR .MSG...`.|
00000ED0: 4A 53 52 20 49 4E 4C 49  4E 45 00 E8 16 6A 09 4A  |JSR INLINE...j.J|
00000EE0: 4D 50 20 9B 4C 49 4E 45  00 05 17 74 09 43 53 32  |MP .LINE...t.CS2|
00000EF0: 20 43 4C 43 20 20 20 20  3B 50 4F B5 20 53 59 4D  | CLC    ;PO. SYM|
00000F00: 50 54 52 20 A4 00 26 17  7E 09 4C 44 41 20 53 59  |PTR ..&.~.LDA SY|
00000F10: 4D 80 20 3B 53 59 4D 42  4F 4C 20 C5 55 45 20 41  |M. ;SYMBOL .UE A|
00000F20: 44 44 52 45 53 53 00 31  17 88 09 41 44 43 20 23  |DDRESS.1...ADC #|
00000F30: 38 00 40 17 92 09 53 54  41 20 53 59 4D 50 54 52  |8.@...STA SYMPTR|
00000F40: 00 4F 17 9C 09 4C 44 41  20 53 59 4D 80 AA 31 00  |.O...LDA SYM..1.|
00000F50: 5A 17 A6 09 41 44 43 20  23 30 00 6B 17 B0 09 53  |Z...ADC #0.k...S|
00000F60: 54 41 20 53 59 4D 50 54  52 AA 31 00 8A 17 BA 09  |TA SYMPTR.1.....|
00000F70: 4C 44 59 20 23 38 20 3B  45 52 41 53 45 20 53 50  |LDY #8 ;ERASE SP|
00000F80: 41 43 45 20 81 20 4E 41  4D 45 00 95 17 C4 09 4C  |ACE . NAME.....L|
00000F90: 44 41 20 23 30 00 A1 17  CE 09 43 53 34 20 44 45  |DA #0.....CS4 DE|
00000FA0: 59 00 B2 17 D8 09 53 54  41 20 28 53 59 4D 80 29  |Y.....STA (SYM.)|
00000FB0: 2C 59 00 BE 17 E2 09 42  4E 45 20 43 53 34 00 D7  |,Y.....BNE CS4..|
00000FC0: 17 EC 09 4C 44 59 20 C3  20 3B 4D 41 58 20 C3 47  |...LDY . ;MAX .G|
00000FD0: 54 48 20 49 53 20 38 00  F5 17 F6 09 43 53 35 20  |TH IS 8.....CS5 |
00000FE0: 44 45 59 20 3B 43 4F 50  59 20 53 59 4D 42 4F 4C  |DEY ;COPY SYMBOL|
00000FF0: 20 4E 41 4D 45 00 04 18  00 0A 4C 44 41 20 28 41  | NAME.....LDA (A|
00001000: 44 29 2C 59 00 15 18 0A  0A 53 54 41 20 28 53 59  |D),Y.....STA (SY|
00001010: 4D 80 29 2C 59 00 1D 18  14 0A 54 59 41 00 29 18  |M.),Y.....TYA.).|
00001020: 1E 0A 42 4E 45 20 43 53  35 00 31 18 28 0A 52 54  |..BNE CS5.1.(.RT|
00001030: 53 00 37 18 32 0A 3B 00  5D 18 3C 0A 44 4F 4F 50  |S.7.2.;.].<.DOOP|
00001040: 20 B2 AC 20 3B 4D 4F 56  45 20 50 54 52 20 50 41  | .. ;MOVE PTR PA|
00001050: 53 54 20 49 4E 53 54 52  55 43 54 49 91 00 63 18  |ST INSTRUCTI..c.|
00001060: 46 0A 3B 00 6E 18 50 0A  4C 44 59 20 23 30 00 7D  |F.;.n.P.LDY #0.}|
00001070: 18 5A 0A 4C 44 41 20 28  41 44 29 2C 59 00 8A 18  |.Z.LDA (AD),Y...|
00001080: 64 0A 43 4D 50 20 23 22  4A 22 00 96 18 6E 0A 42  |d.CMP #"J"...n.B|
00001090: 45 51 20 44 4F 33 00 A3  18 78 0A 43 4D 50 20 23  |EQ DO3...x.CMP #|
000010A0: 22 42 22 00 AF 18 82 0A  42 4E 45 20 44 4F 31 00  |"B".....BNE DO1.|
000010B0: C5 18 8C 0A 43 50 58 20  23 24 32 31 20 3B 42 52  |....CPX #$21 ;BR|
000010C0: 4B 20 4F 50 23 00 D1 18  96 0A 42 45 51 20 44 4F  |K OP#.....BEQ DO|
000010D0: 31 00 E7 18 A0 0A 43 50  58 20 23 24 32 30 20 3B  |1.....CPX #$20 ;|
000010E0: 42 49 54 20 4F 50 23 00  F3 18 AA 0A 42 45 51 20  |BIT OP#.....BEQ |
000010F0: 44 4F 31 00 00 19 B4 0A  4A 53 52 20 82 57 B0 44  |DO1.....JSR .W.D|
00001100: 00 10 19 BE 0A 44 4F 4C  32 20 4C 44 41 20 23 32  |.....DOL2 LDA #2|
00001110: 00 1B 19 C8 0A 42 4E 45  20 44 4F 00 2C 19 D2 0A  |.....BNE DO.,...|
00001120: 44 4F 33 20 4A 53 52 20  82 57 B0 44 00 37 19 DC  |DO3 JSR .W.D.7..|
00001130: 0A 4C 44 41 20 23 33 00  42 19 E6 0A 42 4E 45 20  |.LDA #3.B...BNE |
00001140: 44 4F 00 53 19 F0 0A 44  4F 31 20 4A 53 52 20 82  |DO.S...DO1 JSR .|
00001150: 57 B0 44 00 5F 19 FA 0A  42 4E 45 20 44 4F 32 00  |W.D._...BNE DO2.|
00001160: 6A 19 04 0B 4C 44 41 20  23 31 00 75 19 0E 0B 42  |j...LDA #1.u...B|
00001170: 4E 45 20 44 4F 00 84 19  18 0B 44 4F 32 20 4C 44  |NE DO.....DO2 LD|
00001180: 59 20 23 30 00 93 19 22  0B 4C 44 41 20 28 41 44  |Y #0...".LDA (AD|
00001190: 29 2C 59 00 A0 19 2C 0B  43 4D 50 20 23 22 23 22  |),Y...,.CMP #"#"|
000011A0: 00 AD 19 36 0B 42 45 51  20 44 4F 4C 32 00 BA 19  |...6.BEQ DOL2...|
000011B0: 40 0B 43 4D 50 20 23 22  28 22 00 C7 19 4A 0B 42  |@.CMP #"("...J.B|
000011C0: 45 51 20 44 4F 4C 32 00  D1 19 54 0B 4C 44 59 20  |EQ DOL2...T.LDY |
000011D0: C3 00 D9 19 5E 0B 44 45  59 00 E5 19 68 0B 42 45  |....^.DEY...h.BE|
000011E0: 51 20 44 4F 35 00 ED 19  72 0B 44 45 59 00 F9 19  |Q DO5...r.DEY...|
000011F0: 7C 0B 42 45 51 20 44 4F  35 00 08 1A 86 0B 4C 44  ||.BEQ DO5.....LD|
00001200: 41 20 28 41 44 29 2C 59  00 15 1A 90 0B 43 4D 50  |A (AD),Y.....CMP|
00001210: 20 23 22 2C 22 00 21 1A  9A 0B 42 4E 45 20 44 4F  | #",".!...BNE DO|
00001220: 35 00 40 1A A4 0B 49 4E  59 20 3B 52 45 43 4F 47  |5.@...INY ;RECOG|
00001230: 4E 49 5A 45 20 B5 80 45  44 20 B6 4F 4C 55 54 45  |NIZE ..ED .OLUTE|
00001240: 00 4F 1A AE 0B 4C 44 41  20 28 41 44 29 2C 59 00  |.O...LDA (AD),Y.|
00001250: 5A 1A B8 0B 4C 44 59 20  23 37 00 67 1A C2 0B 43  |Z...LDY #7.g...C|
00001260: 4D 50 20 23 22 58 22 00  73 1A CC 0B 42 45 51 20  |MP #"X".s...BEQ |
00001270: 44 4F 37 00 7B 1A D6 0B  49 4E 59 00 91 1A E0 0B  |DO7.{...INY.....|
00001280: 44 4F 37 20 4C 44 41 20  28 4F 50 50 54 52 29 2C  |DO7 LDA (OPPTR),|
00001290: 59 00 9E 1A EA 0B 43 4D  50 20 23 24 46 41 00 AB  |Y.....CMP #$FA..|
000012A0: 1A F4 0B 42 45 51 20 44  4F 4C 33 00 B5 1A FE 0B  |...BEQ DOL3.....|
000012B0: 4C 44 59 20 C3 00 C1 1A  08 0C 44 45 59 3A 44 45  |LDY ......DEY:DE|
000012C0: 59 00 CB 1A 12 0C 53 54  59 20 C3 00 D6 1A 1C 0C  |Y.....STY ......|
000012D0: 4A 53 52 20 45 C5 00 E0  1A 26 0C 49 4E 43 20 C3  |JSR E....&.INC .|
000012E0: 00 EA 1A 30 0C 49 4E 43  20 C3 00 F5 1A 3A 0C 43  |...0.INC ....:.C|
000012F0: 50 58 20 23 30 00 01 1B  44 0C 4A 4D 50 20 44 4F  |PX #0...D.JMP DO|
00001300: 36 00 10 1B 4E 0C 44 4F  35 20 4A 53 52 20 45 C5  |6...N.DO5 JSR E.|
00001310: 00 21 1B 58 0C 44 4F 36  20 42 45 51 20 44 4F 4C  |.!.X.DO6 BEQ DOL|
00001320: 32 00 31 1B 62 0C 44 4F  4C 33 20 4C 44 41 20 23  |2.1.b.DOL3 LDA #|
00001330: 33 00 3C 1B 6C 0C 44 4F  20 43 4C 43 00 48 1B 76  |3.<.l.DO CLC.H.v|
00001340: 0C 41 44 43 20 50 54 52  00 54 1B 80 0C 53 54 41  |.ADC PTR.T...STA|
00001350: 20 50 54 52 00 60 1B 8A  0C 42 43 43 20 44 4F 34  | PTR.`...BCC DO4|
00001360: 00 6E 1B 94 0C 49 4E 43  20 50 54 52 AA 31 00 7C  |.n...INC PTR.1.||
00001370: 1B 9E 0C 44 4F 34 20 4A  4D 50 20 82 00 82 1B A8  |...DO4 JMP .....|
00001380: 0C 3B 00 A5 1B B2 0C 44  4F 50 54 52 20 B2 AC 20  |.;.....DOPTR .. |
00001390: 3B 43 48 41 4E 47 45 20  50 54 52 20 45 47 2E 20  |;CHANGE PTR EG. |
000013A0: AC B2 AC AA 32 00 AB 1B  BC 0C 3B 00 B8 1B C6 0C  |....2.....;.....|
000013B0: 4A 53 52 20 82 57 B0 44  00 C5 1B D0 0C 4A 53 52  |JSR .W.D.....JSR|
000013C0: 20 A2 57 B0 44 00 D0 1B  DA 0C 4A 53 52 20 45 C5  | .W.D.....JSR E.|
000013D0: 00 DC 1B E4 0C 53 54 41  20 50 54 52 00 EA 1B EE  |.....STA PTR....|
000013E0: 0C 53 54 58 20 50 54 52  AA 31 00 F2 1B F8 0C 52  |.STX PTR.1.....R|
000013F0: 54 53 00 F8 1B 02 0D 3B  00 14 1C 0C 0D 3B 45 C5  |TS.....;.....;E.|
00001400: 20 52 4F 55 54 49 4E 45  53 20 42 45 47 49 4E 20  | ROUTINES BEGIN |
00001410: 48 45 52 45 00 1A 1C 16  0D 3B 00 39 1C 20 0D 4C  |HERE.....;.9. .L|
00001420: 49 54 45 52 41 4C 20 B2  AC 20 3B 8E 20 BF 47 4C  |ITERAL .. ;. .GL|
00001430: 45 20 C6 49 49 20 C5 55  45 00 3F 1C 2A 0D 3B 00  |E .II .UE.?.*.;.|
00001440: 47 1C 34 0D 49 4E 59 00  56 1C 3E 0D 4C 44 41 20  |G.4.INY.V.>.LDA |
00001450: 28 41 44 29 2C 59 00 61  1C 48 0D 53 54 41 20 54  |(AD),Y.a.H.STA T|
00001460: 31 00 6C 1C 52 0D 4C 44  41 20 23 30 00 79 1C 5C  |1.l.R.LDA #0.y.\|
00001470: 0D 53 54 41 20 54 31 AA  31 00 85 1C 66 0D 49 4E  |.STA T1.1...f.IN|
00001480: 59 3A 49 4E 59 00 92 1C  70 0D 4A 4D 50 20 4C 41  |Y:INY...p.JMP LA|
00001490: 53 54 00 98 1C 7A 0D 3B  00 BA 1C 84 0D 53 59 4D  |ST...z.;.....SYM|
000014A0: 20 B2 AC 20 3B 46 49 4E  44 20 80 20 AF 20 43 41  | .. ;FIND . . CA|
000014B0: 4C 4C 20 46 49 4E 44 53  59 4D 00 C0 1C 8E 0D 3B  |LL FINDSYM.....;|
000014C0: 00 CC 1C 98 0D 53 59 31  20 49 4E 59 00 D6 1C A2  |.....SY1 INY....|
000014D0: 0D 43 50 59 20 C3 00 E1  1C AC 0D 42 45 51 20 53  |.CPY ......BEQ S|
000014E0: 59 00 F0 1C B6 0D 4C 44  41 20 28 41 44 29 2C 59  |Y.....LDA (AD),Y|
000014F0: 00 00 1D C0 0D 43 4D 50  20 23 24 41 41 20 3B AA  |.....CMP #$AA ;.|
00001500: 00 0B 1D CA 0D 42 45 51  20 53 59 00 1B 1D D4 0D  |.....BEQ SY.....|
00001510: 43 4D 50 20 23 24 41 42  20 3B AB 00 27 1D DE 0D  |CMP #$AB ;..'...|
00001520: 42 4E 45 20 53 59 31 00  35 1D E8 0D 53 59 20 53  |BNE SY1.5...SY S|
00001530: 54 59 20 54 31 00 45 1D  F2 0D 4A 53 52 20 46 49  |TY T1.E...JSR FI|
00001540: 4E 44 53 59 4D 00 50 1D  FC 0D 4C 44 59 20 54 31  |NDSYM.P...LDY T1|
00001550: 00 5B 1D 06 0E 53 54 41  20 54 31 00 68 1D 10 0E  |.[...STA T1.h...|
00001560: 53 54 58 20 54 31 AA 31  00 75 1D 1A 0E 4A 4D 50  |STX T1.1.u...JMP|
00001570: 20 4C 41 53 54 00 7B 1D  24 0E 3B 00 9A 1D 2E 0E  | LAST.{.$.;.....|
00001580: 45 C5 20 B2 AC 20 3B 45  C5 55 41 54 45 20 BF 47  |E. .. ;E.UATE .G|
00001590: 4C 45 20 BD 52 45 53 53  49 91 00 A0 1D 38 0E 3B  |LE .RESSI....8.;|
000015A0: 00 AB 1D 42 0E 4C 44 41  20 23 30 00 B6 1D 4C 0E  |...B.LDA #0...L.|
000015B0: 53 54 41 20 54 32 00 C3  1D 56 0E 53 54 41 20 54  |STA T2...V.STA T|
000015C0: 32 AA 31 00 CE 1D 60 0E  53 54 41 20 53 53 00 D9  |2.1...`.STA SS..|
000015D0: 1D 6A 0E 53 54 41 20 54  34 00 E8 1D 74 0E 45 56  |.j.STA T4...t.EV|
000015E0: 31 20 4C 44 59 20 23 30  00 F7 1D 7E 0E 4C 44 41  |1 LDY #0...~.LDA|
000015F0: 20 28 41 44 29 2C 59 00  04 1E 88 0E 43 4D 50 20  | (AD),Y.....CMP |
00001600: 23 22 24 22 00 10 1E 92  0E 42 4E 45 20 45 56 38  |#"$".....BNE EV8|
00001610: 00 1C 1E 9C 0E 4A 4D 50  20 48 45 58 00 30 1E A6  |.....JMP HEX.0..|
00001620: 0E 45 56 38 20 43 4D 50  20 23 24 32 32 20 3B 22  |.EV8 CMP #$22 ;"|
00001630: 00 40 1E B0 0E 42 45 51  20 4C 49 54 45 52 41 4C  |.@...BEQ LITERAL|
00001640: 00 50 1E BA 0E 43 4D 50  20 23 24 41 43 20 3B AC  |.P...CMP #$AC ;.|
00001650: 00 5D 1E C4 0E 42 45 51  20 50 54 52 C5 00 6D 1E  |.]...BEQ PTR..m.|
00001660: CE 0E 43 4D 50 20 23 24  42 31 20 3B B1 00 7A 1E  |..CMP #$B1 ;..z.|
00001670: D8 0E 42 45 51 20 48 49  4C 4F 00 8A 1E E2 0E 43  |..BEQ HILO.....C|
00001680: 4D 50 20 23 24 42 33 20  3B B3 00 97 1E EC 0E 42  |MP #$B3 ;......B|
00001690: 45 51 20 48 49 4C 4F 00  A4 1E F6 0E 43 4D 50 20  |EQ HILO.....CMP |
000016A0: 23 22 25 22 00 B0 1E 00  0F 42 4E 45 20 45 56 39  |#"%".....BNE EV9|
000016B0: 00 BC 1E 0A 0F 4A 4D 50  20 42 49 4E 00 C8 1E 14  |.....JMP BIN....|
000016C0: 0F 45 56 39 20 53 45 43  00 D5 1E 1E 0F 53 42 43  |.EV9 SEC.....SBC|
000016D0: 20 23 24 33 30 00 E1 1E  28 0F 42 43 43 20 53 59  | #$30...(.BCC SY|
000016E0: 4D 00 EE 1E 32 0F 43 4D  50 20 23 24 30 41 00 FA  |M...2.CMP #$0A..|
000016F0: 1E 3C 0F 42 43 53 20 53  59 4D 00 07 1F 46 0F 4A  |.<.BCS SYM...F.J|
00001700: 4D 50 20 44 45 43 49 00  0D 1F 50 0F 3B 00 30 1F  |MP DECI...P.;.0.|
00001710: 5A 0F 48 49 4C 4F 20 B2  AC 20 3B B1 20 B0 20 B3  |Z.HILO .. ;. . .|
00001720: 20 42 59 54 45 20 45 58  54 52 41 43 54 49 91 53  | BYTE EXTRACTI.S|
00001730: 00 36 1F 64 0F 3B 00 41  1F 6E 0F 53 54 41 20 54  |.6.d.;.A.n.STA T|
00001740: 34 00 4C 1F 78 0F 49 4E  43 20 41 44 00 57 1F 82  |4.L.x.INC AD.W..|
00001750: 0F 42 4E 45 20 48 4C 00  64 1F 8C 0F 49 4E 43 20  |.BNE HL.d...INC |
00001760: 41 44 AA 31 00 71 1F 96  0F 48 4C 20 44 45 43 20  |AD.1.q...HL DEC |
00001770: C3 00 7D 1F A0 0F 42 4E  45 20 45 56 31 00 83 1F  |..}...BNE EV1...|
00001780: AA 0F 3B 00 A5 1F B4 0F  50 54 52 C5 20 B2 AC 20  |..;.....PTR. .. |
00001790: 3B 47 49 56 45 20 43 55  52 52 45 4E 54 20 41 44  |;GIVE CURRENT AD|
000017A0: 44 52 45 53 53 00 AB 1F  BE 0F 3B 00 B3 1F C8 0F  |DRESS.....;.....|
000017B0: 49 4E 59 00 BF 1F D2 0F  4C 44 41 20 50 54 52 00  |INY.....LDA PTR.|
000017C0: CA 1F DC 0F 53 54 41 20  54 31 00 D8 1F E6 0F 4C  |....STA T1.....L|
000017D0: 44 41 20 50 54 52 AA 31  00 E5 1F F0 0F 53 54 41  |DA PTR.1.....STA|
000017E0: 20 54 31 AA 31 00 EB 1F  FA 0F 3B 00 08 20 04 10  | T1.1.....;.. ..|
000017F0: 4C 41 53 54 20 B2 AC 20  3B 50 45 52 81 4D 20 4C  |LAST .. ;PER.M L|
00001800: 41 53 54 20 53 49 47 4E  00 0E 20 0E 10 3B 00 19  |AST SIGN.. ..;..|
00001810: 20 18 10 4C 44 41 20 53  53 00 25 20 22 10 42 4E  | ..LDA SS.% ".BN|
00001820: 45 20 45 56 33 00 3E 20  2C 10 4C 44 41 20 54 31  |E EV3.> ,.LDA T1|
00001830: 20 20 20 20 20 20 3B 4E  4F 20 53 49 47 4E 00 49  |      ;NO SIGN.I|
00001840: 20 36 10 53 54 41 20 54  32 00 56 20 40 10 4C 44  | 6.STA T2.V @.LD|
00001850: 41 20 54 31 AA 31 00 63  20 4A 10 53 54 41 20 54  |A T1.1.c J.STA T|
00001860: 32 AA 31 00 70 20 54 10  4A 4D 50 20 53 49 47 4E  |2.1.p T.JMP SIGN|
00001870: 00 84 20 5E 10 45 56 33  20 43 4D 50 20 23 24 41  |.. ^.EV3 CMP #$A|
00001880: 41 20 3B AA 00 90 20 68  10 42 4E 45 20 45 56 34  |A ;... h.BNE EV4|
00001890: 00 98 20 72 10 43 4C 43  00 A3 20 7C 10 4C 44 41  |.. r.CLC.. |.LDA|
000018A0: 20 54 31 00 AE 20 86 10  41 44 43 20 54 32 00 B9  | T1.. ..ADC T2..|
000018B0: 20 90 10 53 54 41 20 54  32 00 C6 20 9A 10 4C 44  | ..STA T2.. ..LD|
000018C0: 41 20 54 31 AA 31 00 D3  20 A4 10 41 44 43 20 54  |A T1.1.. ..ADC T|
000018D0: 32 AA 31 00 E0 20 AE 10  42 43 43 20 53 49 47 4E  |2.1.. ..BCC SIGN|
000018E0: 00 EB 20 B8 10 4A 4D 50  20 49 51 00 02 21 C2 10  |.. ..JMP IQ..!..|
000018F0: 45 56 34 20 53 45 43 20  3B AB 20 28 96 41 55 4C  |EV4 SEC ;. (.AUL|
00001900: 54 29 00 0D 21 CC 10 4C  44 41 20 54 32 00 18 21  |T)..!..LDA T2..!|
00001910: D6 10 53 42 43 20 54 31  00 23 21 E0 10 53 54 41  |..SBC T1.#!..STA|
00001920: 20 54 32 00 30 21 EA 10  4C 44 41 20 54 32 AA 31  | T2.0!..LDA T2.1|
00001930: 00 3D 21 F4 10 53 42 43  20 54 31 AA 31 00 4A 21  |.=!..SBC T1.1.J!|
00001940: FE 10 53 54 41 20 54 32  AA 31 00 55 21 08 11 42  |..STA T2.1.U!..B|
00001950: 43 43 20 49 51 00 5B 21  12 11 3B 00 73 21 1C 11  |CC IQ.[!..;.s!..|
00001960: 53 49 47 4E 20 B2 AC 20  3B 94 20 53 49 47 4E 20  |SIGN .. ;. SIGN |
00001970: B0 20 90 00 79 21 26 11  3B 00 83 21 30 11 43 50  |. ..y!&.;..!0.CP|
00001980: 59 20 C3 00 8E 21 3A 11  42 45 51 20 45 56 00 9D  |Y ...!:.BEQ EV..|
00001990: 21 44 11 4C 44 41 20 28  41 44 29 2C 59 00 A8 21  |!D.LDA (AD),Y..!|
000019A0: 4E 11 53 54 41 20 53 53  00 B0 21 58 11 49 4E 59  |N.STA SS..!X.INY|
000019B0: 00 B8 21 62 11 54 59 41  00 C0 21 6C 11 43 4C 43  |..!b.TYA..!l.CLC|
000019C0: 00 CB 21 76 11 41 44 43  20 41 44 00 D6 21 80 11  |..!v.ADC AD..!..|
000019D0: 53 54 41 20 41 44 00 E2  21 8A 11 42 43 43 20 45  |STA AD..!..BCC E|
000019E0: 56 35 00 EF 21 94 11 49  4E 43 20 41 44 AA 31 00  |V5..!..INC AD.1.|
000019F0: FB 21 9E 11 45 56 35 20  53 45 43 00 05 22 A8 11  |.!..EV5 SEC.."..|
00001A00: 4C 44 41 20 C3 00 0F 22  B2 11 53 54 59 20 C3 00  |LDA ..."..STY ..|
00001A10: 19 22 BC 11 53 42 43 20  C3 00 23 22 C6 11 53 54  |."..SBC ..#"..ST|
00001A20: 41 20 C3 00 2F 22 D0 11  4A 4D 50 20 45 56 31 00  |A ../"..JMP EV1.|
00001A30: 3D 22 DA 11 45 56 20 4C  44 41 20 54 34 00 49 22  |="..EV LDA T4.I"|
00001A40: E4 11 42 4E 45 20 45 56  36 00 54 22 EE 11 4C 44  |..BNE EV6.T"..LD|
00001A50: 41 20 54 32 00 61 22 F8  11 4C 44 58 20 54 32 AA  |A T2.a"..LDX T2.|
00001A60: 31 00 69 22 02 12 52 54  53 00 7D 22 0C 12 45 56  |1.i"..RTS.}"..EV|
00001A70: 36 20 43 4D 50 20 23 24  42 31 20 3B B1 00 89 22  |6 CMP #$B1 ;..."|
00001A80: 16 12 42 4E 45 20 45 56  37 00 96 22 20 12 4C 44  |..BNE EV7.." .LD|
00001A90: 41 20 54 32 AA 31 00 A1  22 2A 12 4C 44 58 20 23  |A T2.1.."*.LDX #|
00001AA0: 30 00 A9 22 34 12 52 54  53 00 BB 22 3E 12 45 56  |0.."4.RTS..">.EV|
00001AB0: 37 20 4C 44 41 20 54 32  20 3B B3 00 C6 22 48 12  |7 LDA T2 ;..."H.|
00001AC0: 4C 44 58 20 23 30 00 CE  22 52 12 52 54 53 00 D4  |LDX #0.."R.RTS..|
00001AD0: 22 5C 12 3B 00 F2 22 66  12 48 45 58 20 B2 AC 20  |"\.;.."f.HEX .. |
00001AE0: 3B 43 91 56 45 52 54 20  48 45 58 20 4E 55 4D 42  |;C.VERT HEX NUMB|
00001AF0: 45 52 00 F8 22 70 12 3B  00 00 23 7A 12 49 4E 59  |ER.."p.;..#z.INY|
00001B00: 00 0B 23 84 12 4C 44 41  20 23 30 00 16 23 8E 12  |..#..LDA #0..#..|
00001B10: 53 54 41 20 54 31 00 23  23 98 12 53 54 41 20 54  |STA T1.##..STA T|
00001B20: 31 AA 31 00 36 23 A2 12  48 58 31 20 4C 44 41 20  |1.1.6#..HX1 LDA |
00001B30: 28 41 44 29 2C 59 00 3E  23 AC 12 53 45 43 00 4B  |(AD),Y.>#..SEC.K|
00001B40: 23 B6 12 53 42 43 20 23  24 33 30 00 56 23 C0 12  |#..SBC #$30.V#..|
00001B50: 42 43 43 20 48 58 00 63  23 CA 12 43 4D 50 20 23  |BCC HX.c#..CMP #|
00001B60: 24 30 41 00 6F 23 D4 12  42 43 43 20 48 58 32 00  |$0A.o#..BCC HX2.|
00001B70: 7C 23 DE 12 53 42 43 20  23 24 31 31 00 87 23 E8  ||#..SBC #$11..#.|
00001B80: 12 42 43 43 20 48 58 00  94 23 F2 12 43 4D 50 20  |.BCC HX..#..CMP |
00001B90: 23 24 30 36 00 9F 23 FC  12 42 43 53 20 48 58 00  |#$06..#..BCS HX.|
00001BA0: AC 23 06 13 41 44 43 20  23 24 30 41 00 BB 23 10  |.#..ADC #$0A..#.|
00001BB0: 13 48 58 32 20 41 53 4C  20 54 31 00 C8 23 1A 13  |.HX2 ASL T1..#..|
00001BC0: 52 4F 4C 20 54 31 AA 31  00 D3 23 24 13 42 43 53  |ROL T1.1..#$.BCS|
00001BD0: 20 49 51 00 DE 23 2E 13  41 53 4C 20 54 31 00 EB  | IQ..#..ASL T1..|
00001BE0: 23 38 13 52 4F 4C 20 54  31 AA 31 00 F6 23 42 13  |#8.ROL T1.1..#B.|
00001BF0: 42 43 53 20 49 51 00 01  24 4C 13 41 53 4C 20 54  |BCS IQ..$L.ASL T|
00001C00: 31 00 0E 24 56 13 52 4F  4C 20 54 31 AA 31 00 19  |1..$V.ROL T1.1..|
00001C10: 24 60 13 42 43 53 20 49  51 00 24 24 6A 13 41 53  |$`.BCS IQ.$$j.AS|
00001C20: 4C 20 54 31 00 31 24 74  13 52 4F 4C 20 54 31 AA  |L T1.1$t.ROL T1.|
00001C30: 31 00 3C 24 7E 13 42 43  53 20 49 51 00 47 24 88  |1.<$~.BCS IQ.G$.|
00001C40: 13 41 44 43 20 54 31 00  52 24 92 13 53 54 41 20  |.ADC T1.R$..STA |
00001C50: 54 31 00 5F 24 9C 13 4C  44 41 20 54 31 AA 31 00  |T1._$..LDA T1.1.|
00001C60: 6A 24 A6 13 41 44 43 20  23 30 00 77 24 B0 13 53  |j$..ADC #0.w$..S|
00001C70: 54 41 20 54 31 AA 31 00  82 24 BA 13 42 43 53 20  |TA T1.1..$..BCS |
00001C80: 49 51 00 8A 24 C4 13 49  4E 59 00 96 24 CE 13 42  |IQ..$..INY..$..B|
00001C90: 4E 45 20 48 58 31 00 A6  24 D8 13 48 58 20 4A 4D  |NE HX1..$..HX JM|
00001CA0: 50 20 4C 41 53 54 00 AC  24 E2 13 3B 00 C7 24 EC  |P LAST..$..;..$.|
00001CB0: 13 49 51 20 B2 AC 20 3B  49 4C 4C 45 47 41 4C 20  |.IQ .. ;ILLEGAL |
00001CC0: 51 55 41 4E 49 54 59 00  D8 24 F6 13 4C 44 58 20  |QUANITY..$..LDX |
00001CD0: 23 B3 4D 45 53 53 49 51  00 E9 24 00 14 4C 44 59  |#.MESSIQ..$..LDY|
00001CE0: 20 23 B1 4D 45 53 53 49  51 00 F6 24 0A 14 4A 53  | #.MESSIQ..$..JS|
00001CF0: 52 20 99 4D 53 47 00 05  25 14 14 4A 53 52 20 49  |R .MSG..%..JSR I|
00001D00: 4E 4C 49 4E 45 00 13 25  1E 14 4A 4D 50 20 9B 4C  |NLINE..%..JMP .L|
00001D10: 49 4E 45 00 19 25 28 14  3B 00 35 25 32 14 44 45  |INE..%(.;.5%2.DE|
00001D20: 43 49 20 B2 AC 20 3B 43  91 56 45 52 54 20 44 45  |CI .. ;C.VERT DE|
00001D30: 43 49 4D 41 4C 00 3B 25  3C 14 3B 00 46 25 46 14  |CIMAL.;%<.;.F%F.|
00001D40: 4C 44 41 20 23 30 00 51  25 50 14 53 54 41 20 54  |LDA #0.Q%P.STA T|
00001D50: 31 00 5E 25 5A 14 53 54  41 20 54 31 AA 31 00 71  |1.^%Z.STA T1.1.q|
00001D60: 25 64 14 44 45 31 20 4C  44 41 20 28 41 44 29 2C  |%d.DE1 LDA (AD),|
00001D70: 59 00 79 25 6E 14 53 45  43 00 86 25 78 14 53 42  |Y.y%n.SEC..%x.SB|
00001D80: 43 20 23 24 33 30 00 91  25 82 14 42 43 43 20 44  |C #$30..%..BCC D|
00001D90: 45 00 9E 25 8C 14 43 4D  50 20 23 24 30 41 00 A9  |E..%..CMP #$0A..|
00001DA0: 25 96 14 42 43 53 20 44  45 00 B1 25 A0 14 50 48  |%..BCS DE..%..PH|
00001DB0: 41 00 BC 25 AA 14 4C 44  41 20 54 31 00 C9 25 B4  |A..%..LDA T1..%.|
00001DC0: 14 4C 44 58 20 54 31 AA  31 00 D4 25 BE 14 41 53  |.LDX T1.1..%..AS|
00001DD0: 4C 20 54 31 00 E1 25 C8  14 52 4F 4C 20 54 31 AA  |L T1..%..ROL T1.|
00001DE0: 31 00 EC 25 D2 14 42 43  53 20 49 51 00 F7 25 DC  |1..%..BCS IQ..%.|
00001DF0: 14 41 53 4C 20 54 31 00  04 26 E6 14 52 4F 4C 20  |.ASL T1..&..ROL |
00001E00: 54 31 AA 31 00 0F 26 F0  14 42 43 53 20 49 51 00  |T1.1..&..BCS IQ.|
00001E10: 1A 26 FA 14 41 44 43 20  54 31 00 25 26 04 15 53  |.&..ADC T1.%&..S|
00001E20: 54 41 20 54 31 00 2D 26  0E 15 54 58 41 00 3A 26  |TA T1.-&..TXA.:&|
00001E30: 18 15 41 44 43 20 54 31  AA 31 00 47 26 22 15 53  |..ADC T1.1.G&".S|
00001E40: 54 41 20 54 31 AA 31 00  52 26 2C 15 42 43 53 20  |TA T1.1.R&,.BCS |
00001E50: 49 51 00 5D 26 36 15 41  53 4C 20 54 31 00 6A 26  |IQ.]&6.ASL T1.j&|
00001E60: 40 15 52 4F 4C 20 54 31  AA 31 00 75 26 4A 15 42  |@.ROL T1.1.u&J.B|
00001E70: 43 53 20 49 51 00 7D 26  54 15 50 4C 41 00 88 26  |CS IQ.}&T.PLA..&|
00001E80: 5E 15 41 44 43 20 54 31  00 93 26 68 15 53 54 41  |^.ADC T1..&h.STA|
00001E90: 20 54 31 00 A0 26 72 15  4C 44 41 20 54 31 AA 31  | T1..&r.LDA T1.1|
00001EA0: 00 AB 26 7C 15 41 44 43  20 23 30 00 B8 26 86 15  |..&|.ADC #0..&..|
00001EB0: 53 54 41 20 54 31 AA 31  00 C3 26 90 15 42 43 53  |STA T1.1..&..BCS|
00001EC0: 20 49 51 00 CB 26 9A 15  49 4E 59 00 D7 26 A4 15  | IQ..&..INY..&..|
00001ED0: 42 4E 45 20 44 45 31 00  E7 26 AE 15 44 45 20 4A  |BNE DE1..&..DE J|
00001EE0: 4D 50 20 4C 41 53 54 00  ED 26 B8 15 3B 00 07 27  |MP LAST..&..;..'|
00001EF0: C2 15 42 49 4E 20 B2 AC  20 3B 43 91 56 45 52 54  |..BIN .. ;C.VERT|
00001F00: 20 42 49 4E 41 52 59 00  0D 27 CC 15 3B 00 15 27  | BINARY..'..;..'|
00001F10: D6 15 49 4E 59 00 20 27  E0 15 4C 44 41 20 23 30  |..INY. '..LDA #0|
00001F20: 00 2B 27 EA 15 53 54 41  20 54 31 00 38 27 F4 15  |.+'..STA T1.8'..|
00001F30: 53 54 41 20 54 31 AA 31  00 4B 27 FE 15 42 4E 31  |STA T1.1.K'..BN1|
00001F40: 20 4C 44 41 20 28 41 44  29 2C 59 00 53 27 08 16  | LDA (AD),Y.S'..|
00001F50: 53 45 43 00 60 27 12 16  53 42 43 20 23 24 33 30  |SEC.`'..SBC #$30|
00001F60: 00 6B 27 1C 16 42 43 43  20 42 4E 00 76 27 26 16  |.k'..BCC BN.v'&.|
00001F70: 43 4D 50 20 23 32 00 81  27 30 16 42 43 53 20 42  |CMP #2..'0.BCS B|
00001F80: 4E 00 8C 27 3A 16 41 53  4C 20 54 31 00 99 27 44  |N..':.ASL T1..'D|
00001F90: 16 52 4F 4C 20 54 31 AA  31 00 A4 27 4E 16 42 43  |.ROL T1.1..'N.BC|
00001FA0: 53 20 49 51 00 AF 27 58  16 41 44 43 20 54 31 00  |S IQ..'X.ADC T1.|
00001FB0: BA 27 62 16 53 54 41 20  54 31 00 C7 27 6C 16 4C  |.'b.STA T1..'l.L|
00001FC0: 44 41 20 54 31 AA 31 00  D2 27 76 16 41 44 43 20  |DA T1.1..'v.ADC |
00001FD0: 23 30 00 DF 27 80 16 53  54 41 20 54 31 AA 31 00  |#0..'..STA T1.1.|
00001FE0: E7 27 8A 16 49 4E 59 00  F3 27 94 16 42 4E 45 20  |.'..INY..'..BNE |
00001FF0: 42 4E 31 00 03 28 9E 16  42 4E 20 4A 4D 50 20 4C  |BN1..(..BN JMP L|
00002000: 41 53 54 00 09 28 A8 16  3B 00 2C 28 B2 16 46 49  |AST..(..;.,(..FI|
00002010: 4E 44 4F 50 20 B2 AC 20  3B 53 45 54 20 43 41 52  |NDOP .. ;SET CAR|
00002020: 52 59 20 8B 20 4F 50 43  4F 44 45 2C 00 4A 28 BC  |RY . OPCODE,.J(.|
00002030: 16 3B 4F 50 50 54 52 20  50 4F B5 53 20 A4 20 B9  |.;OPPTR PO.S . .|
00002040: 49 54 49 91 2C 36 33 39  39 39 00 66 28 C6 16 3B  |ITI.,63999.f(..;|
00002050: 2E 58 20 48 4F 4C 44 53  20 4F 50 43 4F 44 45 20  |.X HOLDS OPCODE |
00002060: 4E 55 4D 42 45 52 00 6C  28 D0 16 3B 00 8A 28 DA  |NUMBER.l(..;..(.|
00002070: 16 4C 44 41 20 23 B3 4F  50 54 41 42 20 3B 4F 50  |.LDA #.OPTAB ;OP|
00002080: 43 4F 44 45 20 54 41 42  4C 45 00 98 28 E4 16 53  |CODE TABLE..(..S|
00002090: 54 41 20 4F 50 50 54 52  00 A8 28 EE 16 4C 44 41  |TA OPPTR..(..LDA|
000020A0: 20 23 B1 4F 50 54 41 42  00 B8 28 F8 16 53 54 41  | #.OPTAB..(..STA|
000020B0: 20 4F 50 50 54 52 AA 31  00 C3 28 02 17 4C 44 58  | OPPTR.1..(..LDX|
000020C0: 20 23 30 00 D2 28 0C 17  46 4F 31 20 4C 44 59 20  | #0..(..FO1 LDY |
000020D0: 23 30 00 E8 28 16 17 46  4F 32 20 4C 44 41 20 28  |#0..(..FO2 LDA (|
000020E0: 4F 50 50 54 52 29 2C 59  00 F4 28 20 17 42 45 51  |OPPTR),Y..( .BEQ|
000020F0: 20 46 4F 33 00 03 29 2A  17 43 4D 50 20 28 41 44  | FO3..)*.CMP (AD|
00002100: 29 2C 59 00 0F 29 34 17  42 4E 45 20 46 4F 34 00  |),Y..)4.BNE FO4.|
00002110: 17 29 3E 17 49 4E 59 00  22 29 48 17 43 50 59 20  |.)>.INY.")H.CPY |
00002120: 23 33 00 2E 29 52 17 42  43 43 20 46 4F 32 00 3C  |#3..)R.BCC FO2.<|
00002130: 29 5C 17 46 4F 33 20 43  50 59 20 C3 00 48 29 66  |)\.FO3 CPY ..H)f|
00002140: 17 42 4E 45 20 46 4F 34  00 50 29 70 17 53 45 43  |.BNE FO4.P)p.SEC|
00002150: 00 58 29 7A 17 52 54 53  00 64 29 84 17 46 4F 34  |.X)z.RTS.d)..FO4|
00002160: 20 49 4E 58 00 72 29 8E  17 4C 44 41 20 4F 50 50  | INX.r)..LDA OPP|
00002170: 54 52 00 7A 29 98 17 43  4C 43 00 87 29 A2 17 41  |TR.z)..CLC..)..A|
00002180: 44 43 20 23 24 30 44 00  95 29 AC 17 53 54 41 20  |DC #$0D..)..STA |
00002190: 4F 50 50 54 52 00 A1 29  B6 17 42 43 43 20 46 4F  |OPPTR..)..BCC FO|
000021A0: 35 00 B1 29 C0 17 49 4E  43 20 4F 50 50 54 52 AA  |5..)..INC OPPTR.|
000021B0: 31 00 C3 29 CA 17 46 4F  35 20 43 50 58 20 23 4E  |1..)..FO5 CPX #N|
000021C0: 4F 50 53 00 CF 29 D4 17  42 4E 45 20 46 4F 31 00  |OPS..)..BNE FO1.|
000021D0: D7 29 DE 17 43 4C 43 00  DF 29 E8 17 52 54 53 00  |.)..CLC..)..RTS.|
000021E0: E5 29 F2 17 3B 00 04 2A  FC 17 46 49 4E 44 53 59  |.)..;..*..FINDSY|
000021F0: 4D 20 B2 AC 20 3B 46 49  4E 44 20 53 59 4D 42 4F  |M .. ;FIND SYMBO|
00002200: 4C 2C 20 8E 00 20 2A 06  18 3B 20 20 20 20 20 20  |L, .. *..;      |
00002210: 20 20 20 20 C5 55 45 20  49 4E 20 2E 41 20 2E 58  |    .UE IN .A .X|
00002220: 00 26 2A 10 18 3B 00 35  2A 1A 18 4C 44 41 20 4D  |.&*..;.5*..LDA M|
00002230: 45 4D 53 49 5A 00 44 2A  24 18 53 54 41 20 53 59  |EMSIZ.D*$.STA SY|
00002240: 4D 50 54 52 00 55 2A 2E  18 4C 44 41 20 4D 45 4D  |MPTR.U*..LDA MEM|
00002250: 53 49 5A AA 31 00 66 2A  38 18 53 54 41 20 53 59  |SIZ.1.f*8.STA SY|
00002260: 4D 50 54 52 AA 31 00 79  2A 42 18 46 53 31 20 4C  |MPTR.1.y*B.FS1 L|
00002270: 44 41 20 53 59 4D 50 54  52 00 81 2A 4C 18 53 45  |DA SYMPTR..*L.SE|
00002280: 43 00 8D 2A 56 18 53 42  43 20 23 31 30 00 9C 2A  |C..*V.SBC #10..*|
00002290: 60 18 53 54 41 20 53 59  4D 50 54 52 00 A8 2A 6A  |`.STA SYMPTR..*j|
000022A0: 18 42 43 53 20 46 53 32  00 B9 2A 74 18 44 45 43  |.BCS FS2..*t.DEC|
000022B0: 20 53 59 4D 50 54 52 AA  31 00 CA 2A 7E 18 46 53  | SYMPTR.1..*~.FS|
000022C0: 32 20 43 4D 50 20 53 59  4D 80 00 DB 2A 88 18 4C  |2 CMP SYM...*..L|
000022D0: 44 41 20 53 59 4D 50 54  52 AA 31 00 EA 2A 92 18  |DA SYMPTR.1..*..|
000022E0: 53 42 43 20 53 59 4D 80  AA 31 00 F6 2A 9C 18 42  |SBC SYM..1..*..B|
000022F0: 43 53 20 46 53 33 00 03  2B A6 18 4C 44 41 20 46  |CS FS3..+..LDA F|
00002300: 4C 41 47 00 0F 2B B0 18  42 4E 45 20 46 53 38 00  |LAG..+..BNE FS8.|
00002310: 2D 2B BA 18 4C 44 41 20  50 54 52 20 3B 8E 20 50  |-+..LDA PTR ;. P|
00002320: 54 52 20 91 20 31 53 54  20 50 41 53 53 00 3B 2B  |TR . 1ST PASS.;+|
00002330: C4 18 4C 44 58 20 50 54  52 AA 31 00 43 2B CE 18  |..LDX PTR.1.C+..|
00002340: 52 54 53 00 68 2B D8 18  46 53 38 20 4C 44 58 20  |RTS.h+..FS8 LDX |
00002350: 23 B3 4D 45 53 53 55 53  20 3B 55 4E 96 49 4E 45  |#.MESSUS ;UN.INE|
00002360: 44 20 53 59 4D 42 4F 4C  00 79 2B E2 18 4C 44 59  |D SYMBOL.y+..LDY|
00002370: 20 23 B1 4D 45 53 53 55  53 00 86 2B EC 18 4A 53  | #.MESSUS..+..JS|
00002380: 52 20 99 4D 53 47 00 95  2B F6 18 4A 53 52 20 49  |R .MSG..+..JSR I|
00002390: 4E 4C 49 4E 45 00 A3 2B  00 19 4A 4D 50 20 9B 4C  |NLINE..+..JMP .L|
000023A0: 49 4E 45 00 B2 2B 0A 19  46 53 33 20 4C 44 59 20  |INE..+..FS3 LDY |
000023B0: 23 30 00 C9 2B 14 19 46  53 34 20 4C 44 41 20 28  |#0..+..FS4 LDA (|
000023C0: 53 59 4D 50 54 52 29 2C  59 00 D5 2B 1E 19 42 45  |SYMPTR),Y..+..BE|
000023D0: 51 20 46 53 37 00 E4 2B  28 19 43 4D 50 20 28 41  |Q FS7..+(.CMP (A|
000023E0: 44 29 2C 59 00 F0 2B 32  19 42 4E 45 20 46 53 31  |D),Y..+2.BNE FS1|
000023F0: 00 F8 2B 3C 19 49 4E 59  00 03 2C 46 19 43 50 59  |..+<.INY..,F.CPY|
00002400: 20 23 38 00 0F 2C 50 19  42 43 43 20 46 53 34 00  | #8..,P.BCC FS4.|
00002410: 24 2C 5A 19 46 53 37 20  43 50 59 20 54 31 20 3B  |$,Z.FS7 CPY T1 ;|
00002420: C3 47 54 48 00 30 2C 64  19 42 4E 45 20 46 53 31  |.GTH.0,d.BNE FS1|
00002430: 00 49 2C 6E 19 46 53 39  20 4C 44 59 20 23 39 20  |.I,n.FS9 LDY #9 |
00002440: 3B 46 4F 55 4E 44 20 49  54 00 5C 2C 78 19 4C 44  |;FOUND IT.\,x.LD|
00002450: 41 20 28 53 59 4D 50 54  52 29 2C 59 00 64 2C 82  |A (SYMPTR),Y.d,.|
00002460: 19 54 41 58 00 6C 2C 8C  19 44 45 59 00 7F 2C 96  |.TAX.l,..DEY..,.|
00002470: 19 4C 44 41 20 28 53 59  4D 50 54 52 29 2C 59 00  |.LDA (SYMPTR),Y.|
00002480: 87 2C A0 19 52 54 53 00  8D 2C AA 19 3B 00 AA 2C  |.,..RTS..,..;..,|
00002490: B4 19 9B 4C 49 4E 45 20  B2 AC 20 3B 9B 20 4F 46  |...LINE .. ;. OF|
000024A0: 46 80 49 4E 47 20 4C 49  4E 45 00 B0 2C BE 19 3B  |F.ING LINE..,..;|
000024B0: 00 BD 2C C8 19 4C 44 41  20 4C 49 4E 45 00 C9 2C  |..,..LDA LINE..,|
000024C0: D2 19 53 54 41 20 24 31  34 00 D8 2C DC 19 4C 44  |..STA $14..,..LD|
000024D0: 41 20 4C 49 4E 45 AA 31  00 E4 2C E6 19 53 54 41  |A LINE.1..,..STA|
000024E0: 20 24 31 35 00 F5 2C F0  19 4A 53 52 20 46 49 4E  | $15..,..JSR FIN|
000024F0: 44 4C 49 4E 45 00 FF 2C  FA 19 4A 53 52 20 9B 00  |DLINE..,..JSR ..|
00002500: 0A 2D 04 1A 4A 4D 50 20  87 59 00 10 2D 0E 1A 3B  |.-..JMP .Y..-..;|
00002510: 00 2A 2D 18 1A 82 4C 49  4E 45 20 B2 AC 20 3B 87  |.*-...LINE .. ;.|
00002520: 59 20 81 20 82 20 4C 49  4E 45 00 30 2D 22 1A 3B  |Y . . LINE.0-".;|
00002530: 00 4F 2D 2C 1A 4C 44 41  20 4C 49 4E 4B 20 3B 4D  |.O-,.LDA LINK ;M|
00002540: 4F 56 45 20 41 44 20 A4  20 82 20 4C 49 4E 45 00  |OVE AD . . LINE.|
00002550: 5A 2D 36 1A 53 54 41 20  41 44 00 69 2D 40 1A 4C  |Z-6.STA AD.i-@.L|
00002560: 44 41 20 4C 49 4E 4B AA  31 00 76 2D 4A 1A 53 54  |DA LINK.1.v-J.ST|
00002570: 41 20 41 44 AA 31 00 89  2D 54 1A 4C 44 59 20 23  |A AD.1..-T.LDY #|
00002580: 30 20 3B A2 20 4C 49 4E  4B 00 98 2D 5E 1A 4C 44  |0 ;. LINK..-^.LD|
00002590: 41 20 28 41 44 29 2C 59  00 A5 2D 68 1A 53 54 41  |A (AD),Y..-h.STA|
000025A0: 20 4C 49 4E 4B 00 AD 2D  72 1A 49 4E 59 00 BC 2D  | LINK..-r.INY..-|
000025B0: 7C 1A 4C 44 41 20 28 41  44 29 2C 59 00 CB 2D 86  ||.LDA (AD),Y..-.|
000025C0: 1A 53 54 41 20 4C 49 4E  4B AA 31 00 EB 2D 90 1A  |.STA LINK.1..-..|
000025D0: 42 45 51 20 4E 4C 20 3B  80 20 4F 46 20 53 4F 55  |BEQ NL ;. OF SOU|
000025E0: 52 43 45 20 8E 20 5A 20  53 45 54 00 02 2E 9A 1A  |RCE . Z SET.....|
000025F0: 49 4E 59 20 3B A2 20 4C  49 4E 45 20 4E 55 4D 42  |INY ;. LINE NUMB|
00002600: 45 52 00 11 2E A4 1A 4C  44 41 20 28 41 44 29 2C  |ER.....LDA (AD),|
00002610: 59 00 1E 2E AE 1A 53 54  41 20 4C 49 4E 45 00 26  |Y.....STA LINE.&|
00002620: 2E B8 1A 49 4E 59 00 35  2E C2 1A 4C 44 41 20 28  |...INY.5...LDA (|
00002630: 41 44 29 2C 59 00 44 2E  CC 1A 53 54 41 20 4C 49  |AD),Y.D...STA LI|
00002640: 4E 45 AA 31 00 66 2E D6  1A 43 4C 43 20 3B 4D 4F  |NE.1.f...CLC ;MO|
00002650: 56 45 20 41 44 20 4F 56  45 52 20 4C 49 4E 4B 20  |VE AD OVER LINK |
00002660: AF 20 4C 49 4E 45 00 71  2E E0 1A 4C 44 41 20 41  |. LINE.q...LDA A|
00002670: 44 00 7C 2E EA 1A 41 44  43 20 23 34 00 87 2E F4  |D.|...ADC #4....|
00002680: 1A 53 54 41 20 41 44 00  92 2E FE 1A 42 43 43 20  |.STA AD.....BCC |
00002690: 4E 4C 00 AA 2E 08 1B 49  4E 43 20 41 44 AA 31 20  |NL.....INC AD.1 |
000026A0: 3B 8E 20 5A 20 43 4C 45  41 52 00 B5 2E 12 1B 4E  |;. Z CLEAR.....N|
000026B0: 4C 20 52 54 53 00 BB 2E  1C 1B 3B 00 D7 2E 26 1B  |L RTS.....;...&.|
000026C0: A2 57 B0 44 20 B2 AC 20  3B A1 20 82 20 57 B0 44  |.W.D .. ;. . W.D|
000026D0: 20 50 41 53 54 20 B2 00  DD 2E 30 1B 3B 00 E7 2E  | PAST ....0.;...|
000026E0: 3A 1B 4C 44 59 20 C3 00  EF 2E 44 1B 49 4E 59 00  |:.LDY ....D.INY.|
000026F0: FD 2E 4E 1B 2E 42 59 54  45 20 24 32 43 00 03 2F  |..N..BYTE $2C../|
00002700: 58 1B 3B 00 18 2F 62 1B  82 57 B0 44 20 B2 AC 20  |X.;../b..W.D .. |
00002710: 3B A1 20 82 20 57 B0 44  00 1E 2F 6C 1B 3B 00 28  |;. . W.D../l.;.(|
00002720: 2F 76 1B 4C 44 59 20 C3  00 30 2F 80 1B 54 59 41  |/v.LDY ..0/..TYA|
00002730: 00 38 2F 8A 1B 43 4C 43  00 43 2F 94 1B 41 44 43  |.8/..CLC.C/..ADC|
00002740: 20 41 44 00 4E 2F 9E 1B  53 54 41 20 41 44 00 59  | AD.N/..STA AD.Y|
00002750: 2F A8 1B 42 43 43 20 4E  57 00 66 2F B2 1B 49 4E  |/..BCC NW.f/..IN|
00002760: 43 20 41 44 AA 31 00 75  2F BC 1B 4E 57 20 4A 4D  |C AD.1.u/..NW JM|
00002770: 50 20 57 B0 44 00 7B 2F  C6 1B 3B 00 92 2F D0 1B  |P W.D.{/..;../..|
00002780: 99 4D 53 47 20 B2 AC 20  3B 99 20 4D 45 53 53 41  |.MSG .. ;. MESSA|
00002790: 47 45 00 98 2F DA 1B 3B  00 A3 2F E4 1B 53 54 58  |GE../..;../..STX|
000027A0: 20 54 31 00 B0 2F EE 1B  53 54 59 20 54 31 AA 31  | T1../..STY T1.1|
000027B0: 00 BB 2F F8 1B 4C 44 59  20 23 30 00 CE 2F 02 1C  |../..LDY #0../..|
000027C0: 50 4D 31 20 4C 44 41 20  28 54 31 29 2C 59 00 D9  |PM1 LDA (T1),Y..|
000027D0: 2F 0C 1C 42 45 51 20 50  4D 00 F4 2F 16 1C 4A 53  |/..BEQ PM../..JS|
000027E0: 52 20 24 46 46 44 32 20  3B 99 20 43 48 41 52 41  |R $FFD2 ;. CHARA|
000027F0: 43 54 45 52 00 FC 2F 20  1C 49 4E 59 00 08 30 2A  |CTER../ .INY..0*|
00002800: 1C 42 4E 45 20 50 4D 31  00 13 30 34 1C 50 4D 20  |.BNE PM1..04.PM |
00002810: 52 54 53 00 19 30 3E 1C  3B 00 37 30 48 1C 3B 50  |RTS..0>.;.70H.;P|
00002820: 55 A4 50 20 52 4F 55 54  49 4E 45 53 20 42 45 47  |U.P ROUTINES BEG|
00002830: 49 4E 20 48 45 52 45 00  3D 30 52 1C 3B 00 5F 30  |IN HERE.=0R.;._0|
00002840: 5C 1C 52 45 4C 41 54 49  56 45 20 B2 AC 20 3B 43  |\.RELATIVE .. ;C|
00002850: 41 4C 43 55 4C 41 54 45  20 4F 46 46 53 45 54 00  |ALCULATE OFFSET.|
00002860: 65 30 66 1C 3B 00 70 30  70 1C 4C 44 59 20 23 33  |e0f.;.p0p.LDY #3|
00002870: 00 82 30 7A 1C 4C 44 41  20 28 4F 50 50 54 52 29  |..0z.LDA (OPPTR)|
00002880: 2C 59 00 91 30 84 1C 4A  53 52 20 50 55 A4 55 A4  |,Y..0..JSR PU.U.|
00002890: 50 00 9E 30 8E 1C 4A 53  52 20 82 57 B0 44 00 A9  |P..0..JSR .W.D..|
000028A0: 30 98 1C 4A 53 52 20 45  C5 00 B1 30 A2 1C 53 45  |0..JSR E...0..SE|
000028B0: 43 00 BC 30 AC 1C 53 42  43 20 23 31 00 C8 30 B6  |C..0..SBC #1..0.|
000028C0: 1C 42 43 53 20 52 4C 31  00 D0 30 C0 1C 44 45 58  |.BCS RL1..0..DEX|
000028D0: 00 DC 30 CA 1C 52 4C 31  20 53 45 43 00 E8 30 D4  |..0..RL1 SEC..0.|
000028E0: 1C 53 42 43 20 50 54 52  00 F3 30 DE 1C 53 54 41  |.SBC PTR..0..STA|
000028F0: 20 54 31 00 FB 30 E8 1C  54 58 41 00 09 31 F2 1C  | T1..0..TXA..1..|
00002900: 53 42 43 20 50 54 52 AA  31 00 11 31 FC 1C 54 41  |SBC PTR.1..1..TA|
00002910: 58 00 19 31 06 1D 43 4C  43 00 24 31 10 1D 4C 44  |X..1..CLC.$1..LD|
00002920: 41 20 54 31 00 31 31 1A  1D 41 44 43 20 23 24 38  |A T1.11..ADC #$8|
00002930: 30 00 39 31 24 1D 54 58  41 00 44 31 2E 1D 41 44  |0.91$.TXA.D1..AD|
00002940: 43 20 23 30 00 4F 31 38  1D 42 45 51 20 52 4C 00  |C #0.O18.BEQ RL.|
00002950: 70 31 42 1D 4C 44 58 20  23 B3 4D 45 53 53 42 4F  |p1B.LDX #.MESSBO|
00002960: B0 20 3B 42 52 41 4E 43  48 20 4F 55 54 20 4F 46  |. ;BRANCH OUT OF|
00002970: 00 89 31 4C 1D 4C 44 59  20 23 B1 4D 45 53 53 42  |..1L.LDY #.MESSB|
00002980: 4F B0 20 3B 52 41 4E 47  45 00 96 31 56 1D 4A 53  |O. ;RANGE..1V.JS|
00002990: 52 20 99 4D 53 47 00 A5  31 60 1D 4A 53 52 20 49  |R .MSG..1`.JSR I|
000029A0: 4E 4C 49 4E 45 00 B3 31  6A 1D 4A 4D 50 20 9B 4C  |NLINE..1j.JMP .L|
000029B0: 49 4E 45 00 C1 31 74 1D  52 4C 20 4C 44 41 20 54  |INE..1t.RL LDA T|
000029C0: 31 00 CF 31 7E 1D 4A 53  52 20 50 55 A4 55 54 00  |1..1~.JSR PU.UT.|
000029D0: DA 31 88 1D 4A 4D 50 20  82 32 00 E0 31 92 1D 3B  |.1..JMP .2..1..;|
000029E0: 00 02 32 9C 1D 49 4D 4D  20 B2 AC 20 3B 44 4F 20  |..2..IMM .. ;DO |
000029F0: 49 4D 4D 45 44 49 41 54  45 20 4D 4F 44 45 20 27  |IMMEDIATE MODE '|
00002A00: 23 27 00 08 32 A6 1D 3B  00 13 32 B0 1D 49 4E 43  |#'..2..;..2..INC|
00002A10: 20 41 44 00 1F 32 BA 1D  42 4E 45 20 49 4D 31 00  | AD..2..BNE IM1.|
00002A20: 2C 32 C4 1D 49 4E 43 20  41 44 AA 31 00 3D 32 CE  |,2..INC AD.1.=2.|
00002A30: 1D 49 4D 31 20 4C 44 59  20 23 24 30 41 00 4F 32  |.IM1 LDY #$0A.O2|
00002A40: D8 1D 4C 44 41 20 28 4F  50 50 54 52 29 2C 59 00  |..LDA (OPPTR),Y.|
00002A50: 5E 32 E2 1D 4A 53 52 20  50 55 A4 55 A4 50 00 68  |^2..JSR PU.U.P.h|
00002A60: 32 EC 1D 44 45 43 20 C3  00 73 32 F6 1D 4A 53 52  |2..DEC ..s2..JSR|
00002A70: 20 45 C5 00 81 32 00 1E  4A 53 52 20 50 55 A4 55  | E...2..JSR PU.U|
00002A80: 54 00 8C 32 0A 1E 4A 4D  50 20 82 32 00 92 32 14  |T..2..JMP .2..2.|
00002A90: 1E 3B 00 B5 32 1E 1E 49  4E 44 49 52 45 43 54 20  |.;..2..INDIRECT |
00002AA0: B2 AC 20 3B 44 4F 20 28  2C 58 29 20 45 4C 53 45  |.. ;DO (,X) ELSE|
00002AB0: 20 28 29 2C 59 00 BB 32  28 1E 3B 00 C6 32 32 1E  | (),Y..2(.;..22.|
00002AC0: 49 4E 43 20 41 44 00 D3  32 3C 1E 42 4E 45 20 49  |INC AD..2<.BNE I|
00002AD0: 4E 44 31 00 E0 32 46 1E  49 4E 43 20 41 44 AA 31  |ND1..2F.INC AD.1|
00002AE0: 00 EF 32 50 1E 49 4E 44  31 20 4C 44 41 20 C3 00  |..2P.IND1 LDA ..|
00002AF0: F7 32 5A 1E 53 45 43 00  02 33 64 1E 53 42 43 20  |.2Z.SEC..3d.SBC |
00002B00: 23 34 00 0A 33 6E 1E 54  41 59 00 14 33 78 1E 53  |#4..3n.TAY..3x.S|
00002B10: 54 59 20 C3 00 23 33 82  1E 4C 44 41 20 28 41 44  |TY ..#3..LDA (AD|
00002B20: 29 2C 59 00 2F 33 8C 1E  4C 44 59 20 23 31 31 00  |),Y./3..LDY #11.|
00002B30: 3C 33 96 1E 43 4D 50 20  23 22 2C 22 00 49 33 A0  |<3..CMP #",".I3.|
00002B40: 1E 42 45 51 20 49 4E 44  32 00 51 33 AA 1E 49 4E  |.BEQ IND2.Q3..IN|
00002B50: 59 00 68 33 B4 1E 49 4E  44 32 20 4C 44 41 20 28  |Y.h3..IND2 LDA (|
00002B60: 4F 50 50 54 52 29 2C 59  00 77 33 BE 1E 4A 53 52  |OPPTR),Y.w3..JSR|
00002B70: 20 50 55 A4 55 A4 50 00  82 33 C8 1E 4A 53 52 20  | PU.U.P..3..JSR |
00002B80: 45 C5 00 90 33 D2 1E 4A  53 52 20 50 55 A4 55 54  |E...3..JSR PU.UT|
00002B90: 00 9A 33 DC 1E 49 4E 43  20 C3 00 A4 33 E6 1E 49  |..3..INC ...3..I|
00002BA0: 4E 43 20 C3 00 AE 33 F0  1E 49 4E 43 20 C3 00 B9  |NC ...3..INC ...|
00002BB0: 33 FA 1E 4A 4D 50 20 82  32 00 BF 33 04 1F 3B 00  |3..JMP .2..3..;.|
00002BC0: E3 33 0E 1F 50 55 A4 50  20 B2 AC 20 3B 47 45 4E  |.3..PU.P .. ;GEN|
00002BD0: 45 52 41 54 45 53 20 4D  41 43 48 49 4E 45 20 43  |ERATES MACHINE C|
00002BE0: 4F 44 45 00 E9 33 18 1F  3B 00 F4 33 22 1F 4C 44  |ODE..3..;..3".LD|
00002BF0: 59 20 23 30 00 03 34 2C  1F 4C 44 41 20 28 41 44  |Y #0..4,.LDA (AD|
00002C00: 29 2C 59 00 10 34 36 1F  43 4D 50 20 23 22 4A 22  |),Y..46.CMP #"J"|
00002C10: 00 1D 34 40 1F 42 4E 45  20 50 4F 50 35 00 2A 34  |..4@.BNE POP5.*4|
00002C20: 4A 1F 4A 4D 50 20 4A 55  4D 50 00 3C 34 54 1F 50  |J.JMP JUMP.<4T.P|
00002C30: 4F 50 35 20 43 4D 50 20  23 22 42 22 00 49 34 5E  |OP5 CMP #"B".I4^|
00002C40: 1F 42 4E 45 20 50 4F 50  31 00 5F 34 68 1F 43 50  |.BNE POP1._4h.CP|
00002C50: 58 20 23 24 32 31 20 3B  42 52 4B 20 4F 50 23 00  |X #$21 ;BRK OP#.|
00002C60: 6C 34 72 1F 42 45 51 20  50 4F 50 31 00 82 34 7C  |l4r.BEQ POP1..4||
00002C70: 1F 43 50 58 20 23 24 32  30 20 3B 42 49 54 20 4F  |.CPX #$20 ;BIT O|
00002C80: 50 23 00 8F 34 86 1F 42  45 51 20 50 4F 50 31 00  |P#..4..BEQ POP1.|
00002C90: A0 34 90 1F 4A 4D 50 20  52 45 4C 41 54 49 56 45  |.4..JMP RELATIVE|
00002CA0: 00 B2 34 9A 1F 50 4F 50  31 20 4A 53 52 20 82 57  |..4..POP1 JSR .W|
00002CB0: B0 44 00 BF 34 A4 1F 42  4E 45 20 50 4F 50 32 00  |.D..4..BNE POP2.|
00002CC0: CA 34 AE 1F 4C 44 59 20  23 39 00 DC 34 B8 1F 4C  |.4..LDY #9..4..L|
00002CD0: 44 41 20 28 4F 50 50 54  52 29 2C 59 00 EB 34 C2  |DA (OPPTR),Y..4.|
00002CE0: 1F 4A 53 52 20 50 55 A4  55 A4 50 00 F6 34 CC 1F  |.JSR PU.U.P..4..|
00002CF0: 4A 4D 50 20 82 32 00 06  35 D6 1F 50 4F 50 32 20  |JMP .2..5..POP2 |
00002D00: 4C 44 59 20 23 30 00 15  35 E0 1F 4C 44 41 20 28  |LDY #0..5..LDA (|
00002D10: 41 44 29 2C 59 00 22 35  EA 1F 43 4D 50 20 23 22  |AD),Y."5..CMP #"|
00002D20: 23 22 00 2F 35 F4 1F 42  4E 45 20 50 4F 50 33 00  |#"./5..BNE POP3.|
00002D30: 3B 35 FE 1F 4A 4D 50 20  49 4D 4D 00 4D 35 08 20  |;5..JMP IMM.M5. |
00002D40: 50 4F 50 33 20 43 4D 50  20 23 22 28 22 00 5A 35  |POP3 CMP #"(".Z5|
00002D50: 12 20 42 4E 45 20 50 4F  50 34 00 6B 35 1C 20 4A  |. BNE POP4.k5. J|
00002D60: 4D 50 20 49 4E 44 49 52  45 43 54 00 7D 35 26 20  |MP INDIRECT.}5& |
00002D70: 50 4F 50 34 20 43 4D 50  20 23 22 21 22 00 8C 35  |POP4 CMP #"!"..5|
00002D80: 30 20 42 4E 45 20 B6 4F  4C 55 54 45 00 AA 35 3A  |0 BNE .OLUTE..5:|
00002D90: 20 3B 20 81 43 45 44 20  B6 4F 4C 55 54 45 20 42  | ; .CED .OLUTE B|
00002DA0: 59 20 21 20 50 52 45 46  49 58 00 B5 35 44 20 49  |Y ! PREFIX..5D I|
00002DB0: 4E 43 20 41 44 00 C0 35  4E 20 42 4E 45 20 46 52  |NC AD..5N BNE FR|
00002DC0: 00 CD 35 58 20 49 4E 43  20 41 44 AA 31 00 DA 35  |..5X INC AD.1..5|
00002DD0: 62 20 46 52 20 44 45 43  20 C3 00 E8 35 6C 20 2E  |b FR DEC ...5l .|
00002DE0: 42 59 54 45 20 24 32 43  00 EE 35 76 20 3B 00 0D  |BYTE $2C..5v ;..|
00002DF0: 36 80 20 B6 4F 4C 55 54  45 20 B2 AC 20 3B 54 48  |6. .OLUTE .. ;TH|
00002E00: 52 45 45 20 42 59 54 45  20 4D 4F 44 45 00 13 36  |REE BYTE MODE..6|
00002E10: 8A 20 3B 00 1E 36 94 20  4C 44 41 20 23 30 00 29  |. ;..6. LDA #0.)|
00002E20: 36 9E 20 53 54 41 20 54  35 00 34 36 A8 20 4C 44  |6. STA T5.46. LD|
00002E30: 58 20 23 33 00 3E 36 B2  20 4C 44 59 20 C3 00 46  |X #3.>6. LDY ..F|
00002E40: 36 BC 20 44 45 59 00 52  36 C6 20 42 45 51 20 41  |6. DEY.R6. BEQ A|
00002E50: 42 31 00 5A 36 D0 20 44  45 59 00 66 36 DA 20 42  |B1.Z6. DEY.f6. B|
00002E60: 45 51 20 41 42 31 00 75  36 E4 20 4C 44 41 20 28  |EQ AB1.u6. LDA (|
00002E70: 41 44 29 2C 59 00 82 36  EE 20 43 4D 50 20 23 22  |AD),Y..6. CMP #"|
00002E80: 2C 22 00 8E 36 F8 20 42  4E 45 20 41 42 31 00 98  |,"..6. BNE AB1..|
00002E90: 36 02 21 53 54 59 20 C3  00 A0 36 0C 21 49 4E 58  |6.!STY ...6.!INX|
00002EA0: 00 A8 36 16 21 49 4E 59  00 B7 36 20 21 4C 44 41  |..6.!INY..6 !LDA|
00002EB0: 20 28 41 44 29 2C 59 00  C4 36 2A 21 43 4D 50 20  | (AD),Y..6*!CMP |
00002EC0: 23 22 58 22 00 D0 36 34  21 42 45 51 20 41 42 31  |#"X"..64!BEQ AB1|
00002ED0: 00 D8 36 3E 21 49 4E 58  00 E7 36 48 21 41 42 31  |..6>!INX..6H!AB1|
00002EE0: 20 53 54 58 20 54 33 00  F2 36 52 21 4A 53 52 20  | STX T3..6R!JSR |
00002EF0: 45 C5 00 FE 36 5C 21 42  45 51 20 41 42 32 00 0D  |E...6\!BEQ AB2..|
00002F00: 37 66 21 41 42 34 20 4C  44 59 20 54 33 00 1F 37  |7f!AB4 LDY T3..7|
00002F10: 70 21 4C 44 41 20 28 4F  50 50 54 52 29 2C 59 00  |p!LDA (OPPTR),Y.|
00002F20: 2E 37 7A 21 4A 53 52 20  50 55 A4 55 A4 50 00 39  |.7z!JSR PU.U.P.9|
00002F30: 37 84 21 4C 44 41 20 54  32 00 47 37 8E 21 4A 53  |7.!LDA T2.G7.!JS|
00002F40: 52 20 50 55 A4 55 54 00  4F 37 98 21 54 58 41 00  |R PU.UT.O7.!TXA.|
00002F50: 5D 37 A2 21 4A 53 52 20  50 55 A4 55 54 00 69 37  |]7.!JSR PU.UT.i7|
00002F60: AC 21 4A 4D 50 20 41 42  33 00 78 37 B6 21 41 42  |.!JMP AB3.x7.!AB|
00002F70: 32 20 4C 44 41 20 54 35  00 84 37 C0 21 42 4E 45  |2 LDA T5..7.!BNE|
00002F80: 20 41 42 34 00 8F 37 CA  21 4C 44 59 20 54 33 00  | AB4..7.!LDY T3.|
00002F90: 9F 37 D4 21 49 4E 59 3A  49 4E 59 3A 49 4E 59 00  |.7.!INY:INY:INY.|
00002FA0: B1 37 DE 21 4C 44 41 20  28 4F 50 50 54 52 29 2C  |.7.!LDA (OPPTR),|
00002FB0: 59 00 BE 37 E8 21 43 4D  50 20 23 24 46 41 00 CA  |Y..7.!CMP #$FA..|
00002FC0: 37 F2 21 42 45 51 20 41  42 34 00 D9 37 FC 21 4A  |7.!BEQ AB4..7.!J|
00002FD0: 53 52 20 50 55 A4 55 A4  50 00 E4 37 06 22 4C 44  |SR PU.U.P..7."LD|
00002FE0: 41 20 54 32 00 F2 37 10  22 4A 53 52 20 50 55 A4  |A T2..7."JSR PU.|
00002FF0: 55 54 00 01 38 1A 22 41  42 33 20 4C 44 59 20 54  |UT..8."AB3 LDY T|
00003000: 33 00 11 38 24 22 44 45  59 3A 44 45 59 3A 44 45  |3..8$"DEY:DEY:DE|
00003010: 59 00 1C 38 2E 22 42 45  51 20 41 42 00 26 38 38  |Y..8."BEQ AB.&88|
00003020: 22 49 4E 43 20 C3 00 30  38 42 22 49 4E 43 20 C3  |"INC ..08B"INC .|
00003030: 00 3E 38 4C 22 41 42 20  4A 4D 50 20 82 32 00 44  |.>8L"AB JMP .2.D|
00003040: 38 56 22 3B 00 64 38 60  22 4A 55 4D 50 20 B2 AC  |8V";.d8`"JUMP ..|
00003050: 20 3B 20 4A 4D 50 2C 20  4A 53 52 20 AF 20 4A 4D  | ; JMP, JSR . JM|
00003060: 50 20 28 29 00 6A 38 6A  22 3B 00 77 38 74 22 4A  |P ().j8j";.w8t"J|
00003070: 53 52 20 82 57 B0 44 00  82 38 7E 22 4C 44 59 20  |SR .W.D..8~"LDY |
00003080: 23 30 00 91 38 88 22 4C  44 41 20 28 41 44 29 2C  |#0..8."LDA (AD),|
00003090: 59 00 9E 38 92 22 43 4D  50 20 23 22 28 22 00 AA  |Y..8."CMP #"("..|
000030A0: 38 9C 22 42 45 51 20 4A  50 31 00 B5 38 A6 22 4C  |8."BEQ JP1..8."L|
000030B0: 44 59 20 23 33 00 C7 38  B0 22 4C 44 41 20 28 4F  |DY #3..8."LDA (O|
000030C0: 50 50 54 52 29 2C 59 00  D6 38 BA 22 4A 53 52 20  |PPTR),Y..8."JSR |
000030D0: 50 55 A4 55 A4 50 00 E1  38 C4 22 4A 53 52 20 45  |PU.U.P..8."JSR E|
000030E0: C5 00 EF 38 CE 22 4A 53  52 20 50 55 A4 55 54 00  |...8."JSR PU.UT.|
000030F0: F7 38 D8 22 54 58 41 00  05 39 E2 22 4A 53 52 20  |.8."TXA..9."JSR |
00003100: 50 55 A4 55 54 00 10 39  EC 22 4A 4D 50 20 82 32  |PU.UT..9."JMP .2|
00003110: 00 1F 39 F6 22 4A 50 31  20 49 4E 43 20 41 44 00  |..9."JP1 INC AD.|
00003120: 2B 39 00 23 42 4E 45 20  4A 50 32 00 38 39 0A 23  |+9.#BNE JP2.89.#|
00003130: 49 4E 43 20 41 44 AA 31  00 46 39 14 23 4A 50 32  |INC AD.1.F9.#JP2|
00003140: 20 44 45 43 20 C3 00 50  39 1E 23 44 45 43 20 C3  | DEC ..P9.#DEC .|
00003150: 00 5B 39 28 23 4C 44 59  20 23 34 00 6D 39 32 23  |.[9(#LDY #4.m92#|
00003160: 4C 44 41 20 28 4F 50 50  54 52 29 2C 59 00 7C 39  |LDA (OPPTR),Y.|9|
00003170: 3C 23 4A 53 52 20 50 55  A4 55 A4 50 00 87 39 46  |<#JSR PU.U.P..9F|
00003180: 23 4A 53 52 20 45 C5 00  95 39 50 23 4A 53 52 20  |#JSR E...9P#JSR |
00003190: 50 55 A4 55 54 00 9D 39  5A 23 54 58 41 00 AB 39  |PU.UT..9Z#TXA..9|
000031A0: 64 23 4A 53 52 20 50 55  A4 55 54 00 B5 39 6E 23  |d#JSR PU.UT..9n#|
000031B0: 49 4E 43 20 C3 00 C0 39  78 23 4A 4D 50 20 82 32  |INC ...9x#JMP .2|
000031C0: 00 C6 39 82 23 3B 00 DF  39 8C 23 50 55 A4 55 A4  |..9.#;..9.#PU.U.|
000031D0: 50 20 B2 AC 20 3B 95 20  4F 50 20 4D 4F 44 45 00  |P .. ;. OP MODE.|
000031E0: E5 39 96 23 3B 00 F2 39  A0 23 43 4D 50 20 23 24  |.9.#;..9.#CMP #$|
000031F0: 46 41 00 00 3A AA 23 42  4E 45 20 50 55 A4 55 54  |FA..:.#BNE PU.UT|
00003200: 00 1F 3A B4 23 4C 44 58  20 23 B3 4D 45 53 53 49  |..:.#LDX #.MESSI|
00003210: 4D 20 3B 49 4C 4C 45 47  41 4C 20 4D 4F 44 45 00  |M ;ILLEGAL MODE.|
00003220: 30 3A BE 23 4C 44 59 20  23 B1 4D 45 53 53 49 4D  |0:.#LDY #.MESSIM|
00003230: 00 3D 3A C8 23 4A 53 52  20 99 4D 53 47 00 4C 3A  |.=:.#JSR .MSG.L:|
00003240: D2 23 4A 53 52 20 49 4E  4C 49 4E 45 00 5A 3A DC  |.#JSR INLINE.Z:.|
00003250: 23 4A 4D 50 20 9B 4C 49  4E 45 00 60 3A E6 23 3B  |#JMP .LINE.`:.#;|
00003260: 00 81 3A F0 23 50 55 A4  55 54 20 B2 AC 20 3B 4F  |..:.#PU.UT .. ;O|
00003270: 55 54 50 55 54 20 4F 42  4A 45 43 54 20 43 4F 44  |UTPUT OBJECT COD|
00003280: 45 00 87 3A FA 23 3B 00  92 3A 04 24 4C 44 59 20  |E..:.#;..:.$LDY |
00003290: 23 30 00 A2 3A 0E 24 53  54 41 20 28 50 54 52 29  |#0..:.$STA (PTR)|
000032A0: 2C 59 00 AE 3A 18 24 49  4E 43 20 50 54 52 00 B9  |,Y..:.$INC PTR..|
000032B0: 3A 22 24 42 4E 45 20 50  54 00 C7 3A 2C 24 49 4E  |:"$BNE PT..:,$IN|
000032C0: 43 20 50 54 52 AA 31 00  D2 3A 36 24 50 54 20 52  |C PTR.1..:6$PT R|
000032D0: 54 53 00 D8 3A 40 24 3B  00 FA 3A 4A 24 57 B0 44  |TS..:@$;..:J$W.D|
000032E0: 20 B2 AC 20 3B 42 41 53  49 43 20 52 4F 55 54 49  | .. ;BASIC ROUTI|
000032F0: 4E 45 20 A4 20 A1 20 57  B0 44 00 15 3B 54 24 3B  |NE . . W.D..;T$;|
00003300: 28 41 44 29 20 4D 55 53  54 20 50 4F B5 20 A4 20  |(AD) MUST PO. . |
00003310: 53 54 41 52 54 00 30 3B  5E 24 3B 49 47 4E B0 45  |START.0;^$;IGN.E|
00003320: 53 20 4C 45 41 44 49 4E  47 20 53 50 41 43 45 53  |S LEADING SPACES|
00003330: 00 55 3B 68 24 3B 22 3A  3B 3D 20 22 20 43 4F 50  |.U;h$;":;= " COP|
00003340: 49 45 44 20 91 4C 59 20  49 4E 20 51 55 4F 54 45  |IED .LY IN QUOTE|
00003350: 20 4D 4F 44 45 00 72 3B  72 24 3B 8E 20 2E 59 AB  | MODE.r;r$;. .Y.|
00003360: C3 47 54 48 2C 20 90 20  43 48 41 52 20 49 4E 20  |.GTH, . CHAR IN |
00003370: 2E 41 00 78 3B 7C 24 3B  00 83 3B 86 24 4C 44 58  |.A.x;|$;..;.$LDX|
00003380: 20 23 30 00 8E 3B 90 24  4C 44 59 20 23 30 00 A0  | #0..;.$LDY #0..|
00003390: 3B 9A 24 57 31 20 4C 44  41 20 28 41 44 29 2C 59  |;.$W1 LDA (AD),Y|
000033A0: 00 B6 3B A4 24 42 45 51  20 57 35 20 3B 80 20 4F  |..;.$BEQ W5 ;. O|
000033B0: 46 20 4C 49 4E 45 00 C6  3B AE 24 43 4D 50 20 23  |F LINE..;.$CMP #|
000033C0: 24 32 32 20 3B 22 00 D1  3B B8 24 42 45 51 20 57  |$22 ;"..;.$BEQ W|
000033D0: 34 00 DE 3B C2 24 43 50  58 20 23 24 38 30 00 E9  |4..;.$CPX #$80..|
000033E0: 3B CC 24 42 45 51 20 57  32 00 F6 3B D6 24 43 4D  |;.$BEQ W2..;.$CM|
000033F0: 50 20 23 22 3A 22 00 01  3C E0 24 42 45 51 20 57  |P #":"..<.$BEQ W|
00003400: 35 00 0E 3C EA 24 43 4D  50 20 23 22 3B 22 00 19  |5..<.$CMP #";"..|
00003410: 3C F4 24 42 45 51 20 57  35 00 2A 3C FE 24 43 4D  |<.$BEQ W5.*<.$CM|
00003420: 50 20 23 24 42 32 20 3B  20 B2 00 35 3C 08 25 42  |P #$B2 ; ..5<.%B|
00003430: 45 51 20 57 35 00 42 3C  12 25 43 4D 50 20 23 22  |EQ W5.B<.%CMP #"|
00003440: 20 22 00 4D 3C 1C 25 42  45 51 20 57 33 00 5E 3C  | ".M<.%BEQ W3.^<|
00003450: 26 25 57 32 20 49 4E 59  20 3B 43 4F 50 59 00 69  |&%W2 INY ;COPY.i|
00003460: 3C 30 25 42 4E 45 20 57  31 00 86 3C 3A 25 57 33  |<0%BNE W1..<:%W3|
00003470: 20 43 50 59 20 23 30 20  3B 4C 45 41 44 49 4E 47  | CPY #0 ;LEADING|
00003480: 20 53 50 41 43 45 00 91  3C 44 25 42 4E 45 20 57  | SPACE..<D%BNE W|
00003490: 35 00 9C 3C 4E 25 49 4E  43 20 41 44 00 A7 3C 58  |5..<N%INC AD..<X|
000034A0: 25 42 4E 45 20 57 31 00  B4 3C 62 25 49 4E 43 20  |%BNE W1..<b%INC |
000034B0: 41 44 AA 31 00 BF 3C 6C  25 42 4E 45 20 57 31 00  |AD.1..<l%BNE W1.|
000034C0: D1 3C 76 25 57 34 20 54  58 41 20 3B A4 47 47 4C  |.<v%W4 TXA ;.GGL|
000034D0: 45 00 DD 3C 80 25 45 B0  20 23 24 38 30 00 E5 3C  |E..<.%E. #$80..<|
000034E0: 8A 25 54 41 58 00 F0 3C  94 25 4A 4D 50 20 57 32  |.%TAX..<.%JMP W2|
000034F0: 00 FD 3C 9E 25 57 35 20  53 54 59 20 C3 00 08 3D  |..<.%W5 STY ...=|
00003500: A8 25 43 50 59 20 23 30  00 10 3D B2 25 52 54 53  |.%CPY #0..=.%RTS|
00003510: 00 16 3D BC 25 3B 00 33  3D C6 25 43 55 90 20 B2  |..=.%;.3=.%CU. .|
00003520: AC 20 3B 43 55 53 A4 4D  20 50 53 45 55 44 4F AB  |. ;CUS.M PSEUDO.|
00003530: 4F 50 53 00 39 3D D0 25  3B 00 41 3D DA 25 49 4E  |OPS.9=.%;.A=.%IN|
00003540: 59 00 50 3D E4 25 4C 44  41 20 28 41 44 29 2C 59  |Y.P=.%LDA (AD),Y|
00003550: 00 5D 3D EE 25 43 4D 50  20 23 22 42 22 00 69 3D  |.]=.%CMP #"B".i=|
00003560: F8 25 42 4E 45 20 43 50  31 00 76 3D 02 26 4A 4D  |.%BNE CP1.v=.&JM|
00003570: 50 20 42 59 54 45 00 87  3D 0C 26 43 50 31 20 43  |P BYTE..=.&CP1 C|
00003580: 4D 50 20 23 22 57 22 00  93 3D 16 26 42 4E 45 20  |MP #"W"..=.&BNE |
00003590: 43 50 32 00 A2 3D 20 26  4A 4D 50 20 42 59 54 45  |CP2..= &JMP BYTE|
000035A0: AA 32 00 B6 3D 2A 26 43  50 32 20 43 4D 50 20 23  |.2..=*&CP2 CMP #|
000035B0: 24 43 36 20 3B C6 00 C2  3D 34 26 42 4E 45 20 43  |$C6 ;...=4&BNE C|
000035C0: 50 33 00 CC 3D 3E 26 4A  4D 50 20 C6 00 E0 3D 48  |P3..=>&JMP ...=H|
000035D0: 26 43 50 33 20 43 4D 50  20 23 24 38 30 20 3B 80  |&CP3 CMP #$80 ;.|
000035E0: 00 EC 3D 52 26 42 4E 45  20 43 50 34 00 F6 3D 5C  |..=R&BNE CP4..=\|
000035F0: 26 4A 4D 50 20 80 00 07  3E 66 26 43 50 34 20 43  |&JMP ...>f&CP4 C|
00003600: 4D 50 20 23 22 50 22 00  13 3E 70 26 42 4E 45 20  |MP #"P"..>p&BNE |
00003610: 43 50 35 00 1F 3E 7A 26  4A 4D 50 20 50 41 44 00  |CP5..>z&JMP PAD.|
00003620: 3D 3E 84 26 43 50 35 20  4C 44 58 20 23 B3 4D 45  |=>.&CP5 LDX #.ME|
00003630: 53 53 49 50 20 3B 49 4C  4C 45 47 41 4C 00 59 3E  |SSIP ;ILLEGAL.Y>|
00003640: 8E 26 4C 44 59 20 23 B1  4D 45 53 53 49 50 20 3B  |.&LDY #.MESSIP ;|
00003650: 50 53 45 55 44 4F AB 4F  50 00 66 3E 98 26 4A 53  |PSEUDO.OP.f>.&JS|
00003660: 52 20 99 4D 53 47 00 75  3E A2 26 4A 53 52 20 49  |R .MSG.u>.&JSR I|
00003670: 4E 4C 49 4E 45 00 83 3E  AC 26 4A 4D 50 20 9B 4C  |NLINE..>.&JMP .L|
00003680: 49 4E 45 00 89 3E B6 26  3B 00 99 3E C0 26 43 50  |INE..>.&;..>.&CP|
00003690: 20 4C 44 41 20 46 4C 41  47 00 A5 3E CA 26 42 4E  | LDA FLAG..>.&BN|
000036A0: 45 20 43 50 36 00 AF 3E  D4 26 4A 4D 50 20 82 00  |E CP6..>.&JMP ..|
000036B0: BE 3E DE 26 43 50 36 20  4A 4D 50 20 82 32 00 C4  |.>.&CP6 JMP .2..|
000036C0: 3E E8 26 3B 00 DE 3E F2  26 42 59 54 45 20 B2 AC  |>.&;..>.&BYTE ..|
000036D0: 20 3B 2E 42 59 54 45 20  AF 20 2E 57 B0 44 00 E4  | ;.BYTE . .W.D..|
000036E0: 3E FC 26 3B 00 EF 3E 06  27 4C 44 41 20 23 30 00  |>.&;..>.'LDA #0.|
000036F0: FA 3E 10 27 53 54 41 20  54 35 00 07 3F 1A 27 4A  |.>.'STA T5..?.'J|
00003700: 53 52 20 82 57 B0 44 00  12 3F 24 27 53 54 59 20  |SR .W.D..?$'STY |
00003710: 54 33 00 21 3F 2E 27 42  59 31 20 4C 44 59 20 23  |T3.!?.'BY1 LDY #|
00003720: 30 00 34 3F 38 27 42 59  32 20 4C 44 41 20 28 41  |0.4?8'BY2 LDA (A|
00003730: 44 29 2C 59 00 54 3F 42  27 43 4D 50 20 23 22 2C  |D),Y.T?B'CMP #",|
00003740: 22 20 3B 53 50 4C 49 54  20 55 50 20 BD 52 45 53  |" ;SPLIT UP .RES|
00003750: 53 49 91 53 00 60 3F 4C  27 42 45 51 20 42 59 33  |SI.S.`?L'BEQ BY3|
00003760: 00 6C 3F 56 27 42 59 39  20 49 4E 59 00 77 3F 60  |.l?V'BY9 INY.w?`|
00003770: 27 43 50 59 20 54 33 00  83 3F 6A 27 42 4E 45 20  |'CPY T3..?j'BNE |
00003780: 42 59 32 00 94 3F 74 27  42 59 33 20 4C 44 41 20  |BY2..?t'BY3 LDA |
00003790: 46 4C 41 47 00 A0 3F 7E  27 42 45 51 20 42 59 36  |FLAG..?~'BEQ BY6|
000037A0: 00 AA 3F 88 27 53 54 59  20 C3 00 B2 3F 92 27 49  |..?.'STY ...?.'I|
000037B0: 4E 59 00 BD 3F 9C 27 4C  44 41 20 54 33 00 C8 3F  |NY..?.'LDA T3..?|
000037C0: A6 27 53 54 59 20 54 33  00 D0 3F B0 27 53 45 43  |.'STY T3..?.'SEC|
000037D0: 00 DB 3F BA 27 53 42 43  20 54 33 00 E6 3F C4 27  |..?.'SBC T3..?.'|
000037E0: 53 54 41 20 54 33 00 F2  3F CE 27 42 43 53 20 42  |STA T3..?.'BCS B|
000037F0: 59 34 00 FD 3F D8 27 4C  44 41 20 23 30 00 08 40  |Y4..?.'LDA #0..@|
00003800: E2 27 53 54 41 20 54 33  00 1D 40 EC 27 42 59 34  |.'STA T3..@.'BY4|
00003810: 20 4A 53 52 20 45 C5 20  3B 45 C5 20 AF 00 3A 40  | JSR E. ;E. ..:@|
00003820: F6 27 4A 53 52 20 50 55  A4 55 54 20 3B 50 55 A4  |.'JSR PU.UT ;PU.|
00003830: 55 54 20 91 45 20 42 59  54 45 00 45 40 00 28 4C  |UT .E BYTE.E@.(L|
00003840: 44 41 20 54 35 00 51 40  0A 28 42 45 51 20 42 59  |DA T5.Q@.(BEQ BY|
00003850: 35 00 59 40 14 28 54 58  41 00 71 40 1E 28 4A 53  |5.Y@.(TXA.q@.(JS|
00003860: 52 20 50 55 A4 55 54 20  3B B0 20 91 45 20 57 B0  |R PU.UT ;. .E W.|
00003870: 44 00 80 40 28 28 42 59  35 20 4C 44 41 20 54 33  |D..@((BY5 LDA T3|
00003880: 00 8B 40 32 28 42 45 51  20 42 59 00 95 40 3C 28  |..@2(BEQ BY..@<(|
00003890: 4C 44 59 20 C3 00 9D 40  46 28 49 4E 59 00 A5 40  |LDY ...@F(INY..@|
000038A0: 50 28 54 59 41 00 AD 40  5A 28 43 4C 43 00 B8 40  |P(TYA..@Z(CLC..@|
000038B0: 64 28 41 44 43 20 41 44  00 C3 40 6E 28 53 54 41  |d(ADC AD..@n(STA|
000038C0: 20 41 44 00 CF 40 78 28  42 43 43 20 42 59 31 00  | AD..@x(BCC BY1.|
000038D0: DC 40 82 28 49 4E 43 20  41 44 AA 31 00 E8 40 8C  |.@.(INC AD.1..@.|
000038E0: 28 42 4E 45 20 42 59 31  00 F4 40 96 28 42 59 36  |(BNE BY1..@.(BY6|
000038F0: 20 43 4C 43 00 FF 40 A0  28 4C 44 41 20 54 35 00  | CLC..@.(LDA T5.|
00003900: 0B 41 AA 28 42 45 51 20  42 59 37 00 16 41 B4 28  |.A.(BEQ BY7..A.(|
00003910: 4C 44 41 20 23 31 00 25  41 BE 28 42 59 37 20 41  |LDA #1.%A.(BY7 A|
00003920: 44 43 20 23 31 00 47 41  C8 28 41 44 43 20 50 54  |DC #1.GA.(ADC PT|
00003930: 52 20 3B 49 4E 43 20 50  54 52 20 91 20 46 49 52  |R ;INC PTR . FIR|
00003940: 53 54 20 50 41 53 53 00  53 41 D2 28 53 54 41 20  |ST PASS.SA.(STA |
00003950: 50 54 52 00 5F 41 DC 28  42 43 43 20 42 59 38 00  |PTR._A.(BCC BY8.|
00003960: 6D 41 E6 28 49 4E 43 20  50 54 52 AA 31 00 7C 41  |mA.(INC PTR.1.|A|
00003970: F0 28 42 59 38 20 43 50  59 20 54 33 00 88 41 FA  |.(BY8 CPY T3..A.|
00003980: 28 42 4E 45 20 42 59 39  00 96 41 04 29 42 59 20  |(BNE BY9..A.)BY |
00003990: 4A 4D 50 20 43 50 00 9C  41 0E 29 3B 00 A9 41 18  |JMP CP..A.);..A.|
000039A0: 29 C6 20 B2 AC 20 3B 2E  C6 00 AF 41 22 29 3B 00  |). .. ;....A");.|
000039B0: BC 41 2C 29 4A 53 52 20  82 57 B0 44 00 C7 41 36  |.A,)JSR .W.D..A6|
000039C0: 29 4C 44 59 20 23 31 00  DA 41 40 29 41 53 31 20  |)LDY #1..A@)AS1 |
000039D0: 4C 44 41 20 28 41 44 29  2C 59 00 EA 41 4A 29 43  |LDA (AD),Y..AJ)C|
000039E0: 4D 50 20 23 24 32 32 20  3B 22 00 F5 41 54 29 42  |MP #$22 ;"..AT)B|
000039F0: 45 51 20 41 53 00 02 42  5E 29 4C 44 58 20 46 4C  |EQ AS..B^)LDX FL|
00003A00: 41 47 00 0E 42 68 29 42  45 51 20 41 53 33 00 19  |AG..Bh)BEQ AS3..|
00003A10: 42 72 29 53 54 59 20 54  33 00 27 42 7C 29 4A 53  |Br)STY T3.'B|)JS|
00003A20: 52 20 50 55 A4 55 54 00  32 42 86 29 4C 44 59 20  |R PU.UT.2B.)LDY |
00003A30: 54 33 00 3E 42 90 29 41  53 32 20 49 4E 59 00 48  |T3.>B.)AS2 INY.H|
00003A40: 42 9A 29 43 50 59 20 C3  00 54 42 A4 29 42 4E 45  |B.)CPY ..TB.)BNE|
00003A50: 20 41 53 31 00 62 42 AE  29 41 53 20 4A 4D 50 20  | AS1.bB.)AS JMP |
00003A60: 43 50 00 72 42 B8 29 41  53 33 20 49 4E 43 20 50  |CP.rB.)AS3 INC P|
00003A70: 54 52 00 7E 42 C2 29 42  4E 45 20 41 53 32 00 8C  |TR.~B.)BNE AS2..|
00003A80: 42 CC 29 49 4E 43 20 50  54 52 AA 31 00 98 42 D6  |B.)INC PTR.1..B.|
00003A90: 29 42 4E 45 20 41 53 32  00 9E 42 E0 29 3B 00 AB  |)BNE AS2..B.);..|
00003AA0: 42 EA 29 80 20 B2 AC 20  3B 2E 80 00 B1 42 F4 29  |B.). .. ;....B.)|
00003AB0: 3B 00 BE 42 FE 29 4C 44  41 20 46 4C 41 47 00 C9  |;..B.)LDA FLAG..|
00003AC0: 42 08 2A 42 4E 45 20 45  4E 00 D9 42 12 2A 4A 4D  |B.*BNE EN..B.*JM|
00003AD0: 50 20 53 45 43 50 41 53  53 00 E9 42 1C 2A 45 4E  |P SECPASS..B.*EN|
00003AE0: 20 4A 53 52 20 82 57 B0  44 00 FA 42 26 2A 4C 44  | JSR .W.D..B&*LD|
00003AF0: 58 20 23 B3 4D 45 53 53  41 43 00 0B 43 30 2A 4C  |X #.MESSAC..C0*L|
00003B00: 44 59 20 23 B1 4D 45 53  53 41 43 00 18 43 3A 2A  |DY #.MESSAC..C:*|
00003B10: 4A 53 52 20 99 4D 53 47  00 24 43 44 2A 4C 44 41  |JSR .MSG.$CD*LDA|
00003B20: 20 50 54 52 00 31 43 4E  2A 53 54 41 20 4C 49 4E  | PTR.1CN*STA LIN|
00003B30: 45 00 3F 43 58 2A 4C 44  41 20 50 54 52 AA 31 00  |E.?CX*LDA PTR.1.|
00003B40: 4E 43 62 2A 53 54 41 20  4C 49 4E 45 AA 31 00 5D  |NCb*STA LINE.1.]|
00003B50: 43 6C 2A 4A 53 52 20 49  4E 4C 49 4E 45 00 6A 43  |Cl*JSR INLINE.jC|
00003B60: 76 2A 4A 4D 50 20 9A 42  41 53 00 70 43 80 2A 3B  |v*JMP .BAS.pC.*;|
00003B70: 00 95 43 8A 2A 50 41 44  20 B2 AC 20 3B 50 41 44  |..C.*PAD .. ;PAD|
00003B80: 20 4F 42 4A 45 43 54 20  57 49 54 48 20 41 20 30  | OBJECT WITH A 0|
00003B90: 20 8B 20 41 54 00 BA 43  94 2A 3B 4F 44 44 20 42  | . AT..C.*;ODD B|
00003BA0: 59 54 45 20 A4 20 4B 45  45 50 20 4A 4D 50 20 54  |YTE . KEEP JMP T|
00003BB0: 41 42 4C 45 53 20 53 41  46 45 00 C6 43 9E 2A 4C  |ABLES SAFE..C.*L|
00003BC0: 44 41 20 50 54 52 00 CF  43 A8 2A AF 20 23 31 00  |DA PTR..C.*. #1.|
00003BD0: DA 43 B2 2A 42 45 51 20  50 41 00 E7 43 BC 2A 4C  |.C.*BEQ PA..C.*L|
00003BE0: 44 41 20 46 4C 41 47 00  F3 43 C6 2A 42 45 51 20  |DA FLAG..C.*BEQ |
00003BF0: 50 41 31 00 FE 43 D0 2A  4C 44 41 20 23 30 00 0C  |PA1..C.*LDA #0..|
00003C00: 44 DA 2A 4A 53 52 20 50  55 A4 55 54 00 1A 44 E4  |D.*JSR PU.UT..D.|
00003C10: 2A 50 41 20 4A 4D 50 20  43 50 00 2A 44 EE 2A 50  |*PA JMP CP.*D.*P|
00003C20: 41 31 20 49 4E 43 20 50  54 52 00 35 44 F8 2A 42  |A1 INC PTR.5D.*B|
00003C30: 4E 45 20 50 41 00 43 44  02 2B 49 4E 43 20 50 54  |NE PA.CD.+INC PT|
00003C40: 52 AA 31 00 4E 44 0C 2B  42 4E 45 20 50 41 00 54  |R.1.ND.+BNE PA.T|
00003C50: 44 16 2B 3B 00 6F 44 20  2B 4F 50 54 41 42 20 B2  |D.+;.oD +OPTAB .|
00003C60: AC 20 3B 4F 50 43 4F 44  45 20 54 41 42 4C 45 00  |. ;OPCODE TABLE.|
00003C70: 75 44 2A 2B 3B 00 B0 44  34 2B 2E C6 20 22 4C 44  |uD*+;..D4+.. "LD|
00003C80: 41 22 3A 2E 42 59 54 45  20 24 41 44 2C 24 42 44  |A":.BYTE $AD,$BD|
00003C90: 2C 24 42 39 2C 24 41 35  2C 24 42 35 2C 24 46 41  |,$B9,$A5,$B5,$FA|
00003CA0: 2C 24 46 41 2C 24 41 39  2C 24 41 31 2C 24 42 31  |,$FA,$A9,$A1,$B1|
00003CB0: 00 EB 44 3E 2B 2E C6 20  22 53 54 41 22 3A 2E 42  |..D>+.. "STA":.B|
00003CC0: 59 54 45 20 24 38 44 2C  24 39 44 2C 24 39 39 2C  |YTE $8D,$9D,$99,|
00003CD0: 24 38 35 2C 24 39 35 2C  24 46 41 2C 24 46 41 2C  |$85,$95,$FA,$FA,|
00003CE0: 24 46 41 2C 24 38 31 2C  24 39 31 00 26 45 48 2B  |$FA,$81,$91.&EH+|
00003CF0: 2E C6 20 22 42 4E 45 22  3A 2E 42 59 54 45 20 24  |.. "BNE":.BYTE $|
00003D00: 44 30 2C 24 46 41 2C 24  46 41 2C 24 46 41 2C 24  |D0,$FA,$FA,$FA,$|
00003D10: 46 41 2C 24 46 41 2C 24  46 41 2C 24 46 41 2C 24  |FA,$FA,$FA,$FA,$|
00003D20: 46 41 2C 24 46 41 00 61  45 52 2B 2E C6 20 22 42  |FA,$FA.aER+.. "B|
00003D30: 45 51 22 3A 2E 42 59 54  45 20 24 46 30 2C 24 46  |EQ":.BYTE $F0,$F|
00003D40: 41 2C 24 46 41 2C 24 46  41 2C 24 46 41 2C 24 46  |A,$FA,$FA,$FA,$F|
00003D50: 41 2C 24 46 41 2C 24 46  41 2C 24 46 41 2C 24 46  |A,$FA,$FA,$FA,$F|
00003D60: 41 00 9C 45 5C 2B 2E C6  20 22 43 4D 50 22 3A 2E  |A..E\+.. "CMP":.|
00003D70: 42 59 54 45 20 24 43 44  2C 24 44 44 2C 24 44 39  |BYTE $CD,$DD,$D9|
00003D80: 2C 24 43 35 2C 24 44 35  2C 24 46 41 2C 24 46 41  |,$C5,$D5,$FA,$FA|
00003D90: 2C 24 43 39 2C 24 43 31  2C 24 44 31 00 D7 45 66  |,$C9,$C1,$D1..Ef|
00003DA0: 2B 2E C6 20 22 4A 53 52  22 3A 2E 42 59 54 45 20  |+.. "JSR":.BYTE |
00003DB0: 24 32 30 2C 24 46 41 2C  24 46 41 2C 24 46 41 2C  |$20,$FA,$FA,$FA,|
00003DC0: 24 46 41 2C 24 46 41 2C  24 46 41 2C 24 46 41 2C  |$FA,$FA,$FA,$FA,|
00003DD0: 24 46 41 2C 24 46 41 00  12 46 70 2B 2E C6 20 22  |$FA,$FA..Fp+.. "|
00003DE0: 4C 44 58 22 3A 2E 42 59  54 45 20 24 41 45 2C 24  |LDX":.BYTE $AE,$|
00003DF0: 46 41 2C 24 42 45 2C 24  41 36 2C 24 46 41 2C 24  |FA,$BE,$A6,$FA,$|
00003E00: 42 36 2C 24 46 41 2C 24  41 32 2C 24 46 41 2C 24  |B6,$FA,$A2,$FA,$|
00003E10: 46 41 00 4D 46 7A 2B 2E  C6 20 22 52 54 53 22 3A  |FA.MFz+.. "RTS":|
00003E20: 2E 42 59 54 45 20 24 46  41 2C 24 46 41 2C 24 46  |.BYTE $FA,$FA,$F|
00003E30: 41 2C 24 46 41 2C 24 46  41 2C 24 46 41 2C 24 36  |A,$FA,$FA,$FA,$6|
00003E40: 30 2C 24 46 41 2C 24 46  41 2C 24 46 41 00 88 46  |0,$FA,$FA,$FA..F|
00003E50: 84 2B 2E C6 20 22 4C 44  59 22 3A 2E 42 59 54 45  |.+.. "LDY":.BYTE|
00003E60: 20 24 41 43 2C 24 42 43  2C 24 46 41 2C 24 41 34  | $AC,$BC,$FA,$A4|
00003E70: 2C 24 42 34 2C 24 46 41  2C 24 46 41 2C 24 41 30  |,$B4,$FA,$FA,$A0|
00003E80: 2C 24 46 41 2C 24 46 41  00 C3 46 8E 2B 2E C6 20  |,$FA,$FA..F.+.. |
00003E90: 22 42 4D 49 22 3A 2E 42  59 54 45 20 24 33 30 2C  |"BMI":.BYTE $30,|
00003EA0: 24 46 41 2C 24 46 41 2C  24 46 41 2C 24 46 41 2C  |$FA,$FA,$FA,$FA,|
00003EB0: 24 46 41 2C 24 46 41 2C  24 46 41 2C 24 46 41 2C  |$FA,$FA,$FA,$FA,|
00003EC0: 24 46 41 00 FE 46 98 2B  2E C6 20 22 44 45 43 22  |$FA..F.+.. "DEC"|
00003ED0: 3A 2E 42 59 54 45 20 24  43 45 2C 24 44 45 2C 24  |:.BYTE $CE,$DE,$|
00003EE0: 46 41 2C 24 43 36 2C 24  44 36 2C 24 46 41 2C 24  |FA,$C6,$D6,$FA,$|
00003EF0: 46 41 2C 24 46 41 2C 24  46 41 2C 24 46 41 00 3B  |FA,$FA,$FA,$FA.;|
00003F00: 47 A2 2B 2E 42 59 54 45  20 24 41 46 2C 30 2C 30  |G.+.BYTE $AF,0,0|
00003F10: 2C 24 32 44 2C 24 33 44  2C 24 33 39 2C 24 32 35  |,$2D,$3D,$39,$25|
00003F20: 2C 24 33 35 2C 24 46 41  2C 24 46 41 2C 24 32 39  |,$35,$FA,$FA,$29|
00003F30: 2C 24 32 31 2C 24 33 31  20 3B AF 00 76 47 AC 2B  |,$21,$31 ;..vG.+|
00003F40: 2E C6 20 22 42 43 53 22  3A 2E 42 59 54 45 20 24  |.. "BCS":.BYTE $|
00003F50: 42 30 2C 24 46 41 2C 24  46 41 2C 24 46 41 2C 24  |B0,$FA,$FA,$FA,$|
00003F60: 46 41 2C 24 46 41 2C 24  46 41 2C 24 46 41 2C 24  |FA,$FA,$FA,$FA,$|
00003F70: 46 41 2C 24 46 41 00 B1  47 B6 2B 2E C6 20 22 49  |FA,$FA..G.+.. "I|
00003F80: 4E 43 22 3A 2E 42 59 54  45 20 24 45 45 2C 24 46  |NC":.BYTE $EE,$F|
00003F90: 45 2C 24 46 41 2C 24 45  36 2C 24 46 36 2C 24 46  |E,$FA,$E6,$F6,$F|
00003FA0: 41 2C 24 46 41 2C 24 46  41 2C 24 46 41 2C 24 46  |A,$FA,$FA,$FA,$F|
00003FB0: 41 00 EC 47 C0 2B 2E C6  20 22 42 43 43 22 3A 2E  |A..G.+.. "BCC":.|
00003FC0: 42 59 54 45 20 24 39 30  2C 24 46 41 2C 24 46 41  |BYTE $90,$FA,$FA|
00003FD0: 2C 24 46 41 2C 24 46 41  2C 24 46 41 2C 24 46 41  |,$FA,$FA,$FA,$FA|
00003FE0: 2C 24 46 41 2C 24 46 41  2C 24 46 41 00 27 48 CA  |,$FA,$FA,$FA.'H.|
00003FF0: 2B 2E C6 20 22 54 59 41  22 3A 2E 42 59 54 45 20  |+.. "TYA":.BYTE |
00004000: 24 46 41 2C 24 46 41 2C  24 46 41 2C 24 46 41 2C  |$FA,$FA,$FA,$FA,|
00004010: 24 46 41 2C 24 46 41 2C  24 39 38 2C 24 46 41 2C  |$FA,$FA,$98,$FA,|
00004020: 24 46 41 2C 24 46 41 00  62 48 D4 2B 2E C6 20 22  |$FA,$FA.bH.+.. "|
00004030: 42 50 4C 22 3A 2E 42 59  54 45 20 24 31 30 2C 24  |BPL":.BYTE $10,$|
00004040: 46 41 2C 24 46 41 2C 24  46 41 2C 24 46 41 2C 24  |FA,$FA,$FA,$FA,$|
00004050: 46 41 2C 24 46 41 2C 24  46 41 2C 24 46 41 2C 24  |FA,$FA,$FA,$FA,$|
00004060: 46 41 00 9D 48 DE 2B 2E  C6 20 22 41 53 4C 22 3A  |FA..H.+.. "ASL":|
00004070: 2E 42 59 54 45 20 24 30  45 2C 24 31 45 2C 24 46  |.BYTE $0E,$1E,$F|
00004080: 41 2C 24 30 36 2C 24 31  36 2C 24 46 41 2C 24 30  |A,$06,$16,$FA,$0|
00004090: 41 2C 24 46 41 2C 24 46  41 2C 24 46 41 00 D8 48  |A,$FA,$FA,$FA..H|
000040A0: E8 2B 2E C6 20 22 43 4C  43 22 3A 2E 42 59 54 45  |.+.. "CLC":.BYTE|
000040B0: 20 24 46 41 2C 24 46 41  2C 24 46 41 2C 24 46 41  | $FA,$FA,$FA,$FA|
000040C0: 2C 24 46 41 2C 24 46 41  2C 24 31 38 2C 24 46 41  |,$FA,$FA,$18,$FA|
000040D0: 2C 24 46 41 2C 24 46 41  00 13 49 F2 2B 2E C6 20  |,$FA,$FA..I.+.. |
000040E0: 22 41 44 43 22 3A 2E 42  59 54 45 20 24 36 44 2C  |"ADC":.BYTE $6D,|
000040F0: 24 37 44 2C 24 37 39 2C  24 36 35 2C 24 37 35 2C  |$7D,$79,$65,$75,|
00004100: 24 46 41 2C 24 46 41 2C  24 36 39 2C 24 36 31 2C  |$FA,$FA,$69,$61,|
00004110: 24 37 31 00 53 49 FC 2B  2E 42 59 54 45 20 24 34  |$71.SI.+.BYTE $4|
00004120: 35 2C 24 42 30 2C 30 2C  24 34 44 2C 24 35 44 2C  |5,$B0,0,$4D,$5D,|
00004130: 24 35 39 2C 24 34 35 2C  24 35 35 2C 24 46 41 2C  |$59,$45,$55,$FA,|
00004140: 24 46 41 2C 24 34 39 2C  24 34 31 2C 24 35 31 20  |$FA,$49,$41,$51 |
00004150: 3B 45 B0 00 8E 49 06 2C  2E C6 20 22 54 58 41 22  |;E...I.,.. "TXA"|
00004160: 3A 2E 42 59 54 45 20 24  46 41 2C 24 46 41 2C 24  |:.BYTE $FA,$FA,$|
00004170: 46 41 2C 24 46 41 2C 24  46 41 2C 24 46 41 2C 24  |FA,$FA,$FA,$FA,$|
00004180: 38 41 2C 24 46 41 2C 24  46 41 2C 24 46 41 00 C9  |8A,$FA,$FA,$FA..|
00004190: 49 10 2C 2E C6 20 22 43  50 58 22 3A 2E 42 59 54  |I.,.. "CPX":.BYT|
000041A0: 45 20 24 45 43 2C 24 46  41 2C 24 46 41 2C 24 45  |E $EC,$FA,$FA,$E|
000041B0: 34 2C 24 46 41 2C 24 46  41 2C 24 46 41 2C 24 45  |4,$FA,$FA,$FA,$E|
000041C0: 30 2C 24 46 41 2C 24 46  41 00 04 4A 1A 2C 2E C6  |0,$FA,$FA..J.,..|
000041D0: 20 22 4A 4D 50 22 3A 2E  42 59 54 45 20 24 34 43  | "JMP":.BYTE $4C|
000041E0: 2C 24 36 43 2C 24 46 41  2C 24 46 41 2C 24 46 41  |,$6C,$FA,$FA,$FA|
000041F0: 2C 24 46 41 2C 24 46 41  2C 24 46 41 2C 24 46 41  |,$FA,$FA,$FA,$FA|
00004200: 2C 24 46 41 00 3F 4A 24  2C 2E C6 20 22 54 41 58  |,$FA.?J$,.. "TAX|
00004210: 22 3A 2E 42 59 54 45 20  24 46 41 2C 24 46 41 2C  |":.BYTE $FA,$FA,|
00004220: 24 46 41 2C 24 46 41 2C  24 46 41 2C 24 46 41 2C  |$FA,$FA,$FA,$FA,|
00004230: 24 41 41 2C 24 46 41 2C  24 46 41 2C 24 46 41 00  |$AA,$FA,$FA,$FA.|
00004240: 7A 4A 2E 2C 2E C6 20 22  49 4E 59 22 3A 2E 42 59  |zJ.,.. "INY":.BY|
00004250: 54 45 20 24 46 41 2C 24  46 41 2C 24 46 41 2C 24  |TE $FA,$FA,$FA,$|
00004260: 46 41 2C 24 46 41 2C 24  46 41 2C 24 43 38 2C 24  |FA,$FA,$FA,$C8,$|
00004270: 46 41 2C 24 46 41 2C 24  46 41 00 B5 4A 38 2C 2E  |FA,$FA,$FA..J8,.|
00004280: C6 20 22 53 54 59 22 3A  2E 42 59 54 45 20 24 38  |. "STY":.BYTE $8|
00004290: 43 2C 24 46 41 2C 24 46  41 2C 24 38 34 2C 24 39  |C,$FA,$FA,$84,$9|
000042A0: 34 2C 24 46 41 2C 24 46  41 2C 24 46 41 2C 24 46  |4,$FA,$FA,$FA,$F|
000042B0: 41 2C 24 46 41 00 F5 4A  42 2C 2E 42 59 54 45 20  |A,$FA..JB,.BYTE |
000042C0: 24 42 30 2C 24 34 31 2C  30 2C 24 30 44 2C 24 31  |$B0,$41,0,$0D,$1|
000042D0: 44 2C 24 31 39 2C 24 30  35 2C 24 31 35 2C 24 46  |D,$19,$05,$15,$F|
000042E0: 41 2C 24 46 41 2C 24 30  39 2C 24 30 31 2C 24 31  |A,$FA,$09,$01,$1|
000042F0: 31 20 3B B0 41 00 30 4B  4C 2C 2E C6 20 22 44 45  |1 ;.A.0KL,.. "DE|
00004300: 59 22 3A 2E 42 59 54 45  20 24 46 41 2C 24 46 41  |Y":.BYTE $FA,$FA|
00004310: 2C 24 46 41 2C 24 46 41  2C 24 46 41 2C 24 46 41  |,$FA,$FA,$FA,$FA|
00004320: 2C 24 38 38 2C 24 46 41  2C 24 46 41 2C 24 46 41  |,$88,$FA,$FA,$FA|
00004330: 00 6B 4B 56 2C 2E C6 20  22 44 45 58 22 3A 2E 42  |.kKV,.. "DEX":.B|
00004340: 59 54 45 20 24 46 41 2C  24 46 41 2C 24 46 41 2C  |YTE $FA,$FA,$FA,|
00004350: 24 46 41 2C 24 46 41 2C  24 46 41 2C 24 43 41 2C  |$FA,$FA,$FA,$CA,|
00004360: 24 46 41 2C 24 46 41 2C  24 46 41 00 A6 4B 60 2C  |$FA,$FA,$FA..K`,|
00004370: 2E C6 20 22 53 54 58 22  3A 2E 42 59 54 45 20 24  |.. "STX":.BYTE $|
00004380: 38 45 2C 24 46 41 2C 24  46 41 2C 24 38 36 2C 24  |8E,$FA,$FA,$86,$|
00004390: 46 41 2C 24 39 36 2C 24  46 41 2C 24 46 41 2C 24  |FA,$96,$FA,$FA,$|
000043A0: 46 41 2C 24 46 41 00 E1  4B 6A 2C 2E C6 20 22 53  |FA,$FA..Kj,.. "S|
000043B0: 42 43 22 3A 2E 42 59 54  45 20 24 45 44 2C 24 46  |BC":.BYTE $ED,$F|
000043C0: 44 2C 24 46 39 2C 24 45  35 2C 24 46 35 2C 24 46  |D,$F9,$E5,$F5,$F|
000043D0: 41 2C 24 46 41 2C 24 45  39 2C 24 45 31 2C 24 46  |A,$FA,$E9,$E1,$F|
000043E0: 31 00 1C 4C 74 2C 2E C6  20 22 42 49 54 22 3A 2E  |1..Lt,.. "BIT":.|
000043F0: 42 59 54 45 20 24 32 43  2C 24 46 41 2C 24 46 41  |BYTE $2C,$FA,$FA|
00004400: 2C 24 32 34 2C 24 46 41  2C 24 46 41 2C 24 46 41  |,$24,$FA,$FA,$FA|
00004410: 2C 24 46 41 2C 24 46 41  2C 24 46 41 00 57 4C 7E  |,$FA,$FA,$FA.WL~|
00004420: 2C 2E C6 20 22 42 52 4B  22 3A 2E 42 59 54 45 20  |,.. "BRK":.BYTE |
00004430: 24 46 41 2C 24 46 41 2C  24 46 41 2C 24 46 41 2C  |$FA,$FA,$FA,$FA,|
00004440: 24 46 41 2C 24 46 41 2C  24 30 30 2C 24 46 41 2C  |$FA,$FA,$00,$FA,|
00004450: 24 46 41 2C 24 46 41 00  92 4C 88 2C 2E C6 20 22  |$FA,$FA..L.,.. "|
00004460: 42 56 43 22 3A 2E 42 59  54 45 20 24 35 30 2C 24  |BVC":.BYTE $50,$|
00004470: 46 41 2C 24 46 41 2C 24  46 41 2C 24 46 41 2C 24  |FA,$FA,$FA,$FA,$|
00004480: 46 41 2C 24 46 41 2C 24  46 41 2C 24 46 41 2C 24  |FA,$FA,$FA,$FA,$|
00004490: 46 41 00 CD 4C 92 2C 2E  C6 20 22 42 56 53 22 3A  |FA..L.,.. "BVS":|
000044A0: 2E 42 59 54 45 20 24 37  30 2C 24 46 41 2C 24 46  |.BYTE $70,$FA,$F|
000044B0: 41 2C 24 46 41 2C 24 46  41 2C 24 46 41 2C 24 46  |A,$FA,$FA,$FA,$F|
000044C0: 41 2C 24 46 41 2C 24 46  41 2C 24 46 41 00 08 4D  |A,$FA,$FA,$FA..M|
000044D0: 9C 2C 2E C6 20 22 43 4C  44 22 3A 2E 42 59 54 45  |.,.. "CLD":.BYTE|
000044E0: 20 24 46 41 2C 24 46 41  2C 24 46 41 2C 24 46 41  | $FA,$FA,$FA,$FA|
000044F0: 2C 24 46 41 2C 24 46 41  2C 24 44 38 2C 24 46 41  |,$FA,$FA,$D8,$FA|
00004500: 2C 24 46 41 2C 24 46 41  00 43 4D A6 2C 2E C6 20  |,$FA,$FA.CM.,.. |
00004510: 22 43 4C 49 22 3A 2E 42  59 54 45 20 24 46 41 2C  |"CLI":.BYTE $FA,|
00004520: 24 46 41 2C 24 46 41 2C  24 46 41 2C 24 46 41 2C  |$FA,$FA,$FA,$FA,|
00004530: 24 46 41 2C 24 35 38 2C  24 46 41 2C 24 46 41 2C  |$FA,$58,$FA,$FA,|
00004540: 24 46 41 00 7E 4D B0 2C  2E C6 20 22 43 4C 56 22  |$FA.~M.,.. "CLV"|
00004550: 3A 2E 42 59 54 45 20 24  46 41 2C 24 46 41 2C 24  |:.BYTE $FA,$FA,$|
00004560: 46 41 2C 24 46 41 2C 24  46 41 2C 24 46 41 2C 24  |FA,$FA,$FA,$FA,$|
00004570: 42 38 2C 24 46 41 2C 24  46 41 2C 24 46 41 00 B9  |B8,$FA,$FA,$FA..|
00004580: 4D BA 2C 2E C6 20 22 43  50 59 22 3A 2E 42 59 54  |M.,.. "CPY":.BYT|
00004590: 45 20 24 43 43 2C 24 46  41 2C 24 46 41 2C 24 43  |E $CC,$FA,$FA,$C|
000045A0: 34 2C 24 46 41 2C 24 46  41 2C 24 46 41 2C 24 43  |4,$FA,$FA,$FA,$C|
000045B0: 30 2C 24 46 41 2C 24 46  41 00 F4 4D C4 2C 2E C6  |0,$FA,$FA..M.,..|
000045C0: 20 22 49 4E 58 22 3A 2E  42 59 54 45 20 24 46 41  | "INX":.BYTE $FA|
000045D0: 2C 24 46 41 2C 24 46 41  2C 24 46 41 2C 24 46 41  |,$FA,$FA,$FA,$FA|
000045E0: 2C 24 46 41 2C 24 45 38  2C 24 46 41 2C 24 46 41  |,$FA,$E8,$FA,$FA|
000045F0: 2C 24 46 41 00 2F 4E CE  2C 2E C6 20 22 4C 53 52  |,$FA./N.,.. "LSR|
00004600: 22 3A 2E 42 59 54 45 20  24 34 45 2C 24 35 45 2C  |":.BYTE $4E,$5E,|
00004610: 24 46 41 2C 24 34 36 2C  24 35 36 2C 24 46 41 2C  |$FA,$46,$56,$FA,|
00004620: 24 34 41 2C 24 46 41 2C  24 46 41 2C 24 46 41 00  |$4A,$FA,$FA,$FA.|
00004630: 6A 4E D8 2C 2E C6 20 22  4E 4F 50 22 3A 2E 42 59  |jN.,.. "NOP":.BY|
00004640: 54 45 20 24 46 41 2C 24  46 41 2C 24 46 41 2C 24  |TE $FA,$FA,$FA,$|
00004650: 46 41 2C 24 46 41 2C 24  46 41 2C 24 45 41 2C 24  |FA,$FA,$FA,$EA,$|
00004660: 46 41 2C 24 46 41 2C 24  46 41 00 A5 4E E2 2C 2E  |FA,$FA,$FA..N.,.|
00004670: C6 20 22 50 48 41 22 3A  2E 42 59 54 45 20 24 46  |. "PHA":.BYTE $F|
00004680: 41 2C 24 46 41 2C 24 46  41 2C 24 46 41 2C 24 46  |A,$FA,$FA,$FA,$F|
00004690: 41 2C 24 46 41 2C 24 34  38 2C 24 46 41 2C 24 46  |A,$FA,$48,$FA,$F|
000046A0: 41 2C 24 46 41 00 E0 4E  EC 2C 2E C6 20 22 50 48  |A,$FA..N.,.. "PH|
000046B0: 50 22 3A 2E 42 59 54 45  20 24 46 41 2C 24 46 41  |P":.BYTE $FA,$FA|
000046C0: 2C 24 46 41 2C 24 46 41  2C 24 46 41 2C 24 46 41  |,$FA,$FA,$FA,$FA|
000046D0: 2C 24 30 38 2C 24 46 41  2C 24 46 41 2C 24 46 41  |,$08,$FA,$FA,$FA|
000046E0: 00 1B 4F F6 2C 2E C6 20  22 50 4C 41 22 3A 2E 42  |..O.,.. "PLA":.B|
000046F0: 59 54 45 20 24 46 41 2C  24 46 41 2C 24 46 41 2C  |YTE $FA,$FA,$FA,|
00004700: 24 46 41 2C 24 46 41 2C  24 46 41 2C 24 36 38 2C  |$FA,$FA,$FA,$68,|
00004710: 24 46 41 2C 24 46 41 2C  24 46 41 00 56 4F 00 2D  |$FA,$FA,$FA.VO.-|
00004720: 2E C6 20 22 50 4C 50 22  3A 2E 42 59 54 45 20 24  |.. "PLP":.BYTE $|
00004730: 46 41 2C 24 46 41 2C 24  46 41 2C 24 46 41 2C 24  |FA,$FA,$FA,$FA,$|
00004740: 46 41 2C 24 46 41 2C 24  32 38 2C 24 46 41 2C 24  |FA,$FA,$28,$FA,$|
00004750: 46 41 2C 24 46 41 00 91  4F 0A 2D 2E C6 20 22 52  |FA,$FA..O.-.. "R|
00004760: 4F 4C 22 3A 2E 42 59 54  45 20 24 32 45 2C 24 33  |OL":.BYTE $2E,$3|
00004770: 45 2C 24 46 41 2C 24 32  36 2C 24 33 36 2C 24 46  |E,$FA,$26,$36,$F|
00004780: 41 2C 24 32 41 2C 24 46  41 2C 24 46 41 2C 24 46  |A,$2A,$FA,$FA,$F|
00004790: 41 00 D1 4F 14 2D 2E 42  59 54 45 20 24 35 32 2C  |A..O.-.BYTE $52,|
000047A0: 24 42 30 2C 30 2C 24 36  45 2C 24 37 45 2C 24 46  |$B0,0,$6E,$7E,$F|
000047B0: 41 2C 24 36 36 2C 24 37  36 2C 24 46 41 2C 24 36  |A,$66,$76,$FA,$6|
000047C0: 41 2C 24 46 41 2C 24 46  41 2C 24 46 41 20 3B 52  |A,$FA,$FA,$FA ;R|
000047D0: B0 00 0C 50 1E 2D 2E C6  20 22 52 54 49 22 3A 2E  |...P.-.. "RTI":.|
000047E0: 42 59 54 45 20 24 46 41  2C 24 46 41 2C 24 46 41  |BYTE $FA,$FA,$FA|
000047F0: 2C 24 46 41 2C 24 46 41  2C 24 46 41 2C 24 34 30  |,$FA,$FA,$FA,$40|
00004800: 2C 24 46 41 2C 24 46 41  2C 24 46 41 00 47 50 28  |,$FA,$FA,$FA.GP(|
00004810: 2D 2E C6 20 22 53 45 43  22 3A 2E 42 59 54 45 20  |-.. "SEC":.BYTE |
00004820: 24 46 41 2C 24 46 41 2C  24 46 41 2C 24 46 41 2C  |$FA,$FA,$FA,$FA,|
00004830: 24 46 41 2C 24 46 41 2C  24 33 38 2C 24 46 41 2C  |$FA,$FA,$38,$FA,|
00004840: 24 46 41 2C 24 46 41 00  82 50 32 2D 2E C6 20 22  |$FA,$FA..P2-.. "|
00004850: 53 45 44 22 3A 2E 42 59  54 45 20 24 46 41 2C 24  |SED":.BYTE $FA,$|
00004860: 46 41 2C 24 46 41 2C 24  46 41 2C 24 46 41 2C 24  |FA,$FA,$FA,$FA,$|
00004870: 46 41 2C 24 46 38 2C 24  46 41 2C 24 46 41 2C 24  |FA,$F8,$FA,$FA,$|
00004880: 46 41 00 BD 50 3C 2D 2E  C6 20 22 53 45 49 22 3A  |FA..P<-.. "SEI":|
00004890: 2E 42 59 54 45 20 24 46  41 2C 24 46 41 2C 24 46  |.BYTE $FA,$FA,$F|
000048A0: 41 2C 24 46 41 2C 24 46  41 2C 24 46 41 2C 24 37  |A,$FA,$FA,$FA,$7|
000048B0: 38 2C 24 46 41 2C 24 46  41 2C 24 46 41 00 F8 50  |8,$FA,$FA,$FA..P|
000048C0: 46 2D 2E C6 20 22 54 41  59 22 3A 2E 42 59 54 45  |F-.. "TAY":.BYTE|
000048D0: 20 24 46 41 2C 24 46 41  2C 24 46 41 2C 24 46 41  | $FA,$FA,$FA,$FA|
000048E0: 2C 24 46 41 2C 24 46 41  2C 24 41 38 2C 24 46 41  |,$FA,$FA,$A8,$FA|
000048F0: 2C 24 46 41 2C 24 46 41  00 33 51 50 2D 2E C6 20  |,$FA,$FA.3QP-.. |
00004900: 22 54 53 58 22 3A 2E 42  59 54 45 20 24 46 41 2C  |"TSX":.BYTE $FA,|
00004910: 24 46 41 2C 24 46 41 2C  24 46 41 2C 24 46 41 2C  |$FA,$FA,$FA,$FA,|
00004920: 24 46 41 2C 24 42 41 2C  24 46 41 2C 24 46 41 2C  |$FA,$BA,$FA,$FA,|
00004930: 24 46 41 00 6E 51 5A 2D  2E C6 20 22 54 58 53 22  |$FA.nQZ-.. "TXS"|
00004940: 3A 2E 42 59 54 45 20 24  46 41 2C 24 46 41 2C 24  |:.BYTE $FA,$FA,$|
00004950: 46 41 2C 24 46 41 2C 24  46 41 2C 24 46 41 2C 24  |FA,$FA,$FA,$FA,$|
00004960: 39 41 2C 24 46 41 2C 24  46 41 2C 24 46 41 00 74  |9A,$FA,$FA,$FA.t|
00004970: 51 64 2D 3B 00 89 51 6E  2D 3B 53 59 4D 41 53 53  |Qd-;..Qn-;SYMASS|
00004980: 20 4D 45 53 53 41 47 45  53 00 8F 51 78 2D 3B 00  | MESSAGES..Qx-;.|
00004990: CF 51 82 2D 4D 45 53 53  53 54 41 52 20 2E C6 20  |.Q.-MESSSTAR .. |
000049A0: 22 12 53 59 4D 41 53 53  20 33 2E 31 30 20 52 4F  |".SYMASS 3.10 RO|
000049B0: 42 45 52 54 20 48 55 45  48 4E 20 46 45 42 20 31  |BERT HUEHN FEB 1|
000049C0: 39 38 36 22 3A 2E 42 59  54 45 20 31 33 2C 30 00  |986":.BYTE 13,0.|
000049D0: FF 51 8C 2D 4D 45 53 53  46 49 52 20 2E 42 59 54  |.Q.-MESSFIR .BYT|
000049E0: 45 20 31 33 3A 2E C6 20  22 46 49 52 53 54 20 50  |E 13:.. "FIRST P|
000049F0: 41 53 53 2E 2E 2E 22 3A  2E 42 59 54 45 20 30 00  |ASS...":.BYTE 0.|
00004A00: 27 52 96 2D 4D 45 53 53  53 45 43 20 2E C6 20 22  |'R.-MESSSEC .. "|
00004A10: 53 45 43 4F 4E 44 20 50  41 53 53 2E 2E 2E 22 3A  |SECOND PASS...":|
00004A20: 2E 42 59 54 45 20 30 00  5A 52 A0 2D 4D 45 53 53  |.BYTE 0.ZR.-MESS|
00004A30: 41 43 20 2E 42 59 54 45  20 31 33 3A 2E C6 20 22  |AC .BYTE 13:.. "|
00004A40: 41 53 53 45 4D 42 4C 59  20 43 4F 4D 50 4C 45 54  |ASSEMBLY COMPLET|
00004A50: 45 22 3A 2E 42 59 54 45  20 30 00 91 52 AA 2D 4D  |E":.BYTE 0..R.-M|
00004A60: 45 53 53 53 A4 20 2E 42  59 54 45 20 31 33 3A 2E  |ESSS. .BYTE 13:.|
00004A70: C6 20 22 53 59 4D 42 4F  4C 20 54 41 42 4C 45 20  |. "SYMBOL TABLE |
00004A80: 4F 56 45 52 46 4C 4F 57  22 3A 2E 42 59 54 45 20  |OVERFLOW":.BYTE |
00004A90: 30 00 C3 52 B4 2D 4D 45  53 53 49 51 20 2E 42 59  |0..R.-MESSIQ .BY|
00004AA0: 54 45 20 31 33 3A 2E C6  20 22 49 4C 4C 45 47 41  |TE 13:.. "ILLEGA|
00004AB0: 4C 20 51 55 41 4E 54 49  54 59 22 3A 2E 42 59 54  |L QUANTITY":.BYT|
00004AC0: 45 20 30 00 F5 52 BE 2D  4D 45 53 53 55 53 20 2E  |E 0..R.-MESSUS .|
00004AD0: 42 59 54 45 20 31 33 3A  2E C6 20 22 55 4E 44 45  |BYTE 13:.. "UNDE|
00004AE0: 46 49 4E 45 44 20 53 59  4D 42 4F 4C 22 3A 2E 42  |FINED SYMBOL":.B|
00004AF0: 59 54 45 20 30 00 2B 53  C8 2D 4D 45 53 53 42 4F  |YTE 0.+S.-MESSBO|
00004B00: B0 20 2E 42 59 54 45 20  31 33 3A 2E C6 20 22 42  |. .BYTE 13:.. "B|
00004B10: 52 41 4E 43 48 20 4F 55  54 20 4F 46 20 52 41 4E  |RANCH OUT OF RAN|
00004B20: 47 45 22 3A 2E 42 59 54  45 20 30 00 59 53 D2 2D  |GE":.BYTE 0.YS.-|
00004B30: 4D 45 53 53 49 4D 20 2E  42 59 54 45 20 31 33 3A  |MESSIM .BYTE 13:|
00004B40: 2E C6 20 22 49 4C 4C 45  47 41 4C 20 4D 4F 44 45  |.. "ILLEGAL MODE|
00004B50: 22 3A 2E 42 59 54 45 20  30 00 8C 53 DC 2D 4D 45  |":.BYTE 0..S.-ME|
00004B60: 53 53 49 50 20 2E 42 59  54 00 04 00 75 00 75 00  |SSIP .BYT...u.u.|
00004B70: 75 00 75 00 75 00 75 00  75 00 75 00 75 FF D2 00  |u.u.u.u.u.u.u...|
00004B80: 00 00 00 00 00 00 00 00  00 00 00 00 00 00 00     |............... |

....D..700.*.N.;      .... SYMASS 3.1 ..
...I.X.;       SYMBOLIC ASSEMBLER.N...; 
ROBERT HUEHN JUNE, OC.BER 1985.....;    
         SM3.103.......$C000... .;.....;
ZERO PAGE EQUATES.R...STASRC .$50 ;START
 OF SOURCE.....STAVAR .$2D ;. OF SOURCE.
..H.MEMSIZ .$37 ;.P OF SYMBOL TABLE.4.R.
LINK .$4E   ;BASIC LINE LINK.Y...LINE .$
39   ;CURRENT LINE NUMBER.....AD .$7A   
  ;CURRENT SOURCE ADDRESS.....SYMPTR .$5
2 ;SYMBOL EUE PO.ER.H...SYM. .$57 ;BOT.M
 OF SYMBOL TABLE.....PTR .$59    ;CURREN
T OBJECT ADDRESS.....OPPTR .$5B  ;OPCODE
 TABLE PO.ER./...C .$5D    ;CGTH OF W.D.
P.".T1 .$26     ;TEMP.ARY NUMBER.M.,.T2 
.$28     ;S.RAGE . EE...6.SS .$2A     ;S
IGN ....@.T3 .$5E...J.T4 .$5F...T.T5 .$6
0.M.^.FLAG .$02   ;FIRST . SEC.D PASS.Y.
H.;C.S.TS...R.NOPS .55    ;NUMBER OF INS
TRUCTI.S...|..Y .$A474 ;BASIC .Y.7...INL
INE .$BDC2 ;. 'IN LINE'.T....BAS .$A7AE 
;.INUE BASIC.I.... .$A6C9 ;. LINE.....FI
NDLINE .$A613 ;FIND BASIC LINE.....;....
.;MAIN PROGRAM...B.;.J.L.INIT .. ;BEGIN 
FIRST PASS.P.V.;.....LDA #0.....STA FLAG
.....LDX #.MESSSTAR ;START.....LDY #.MES
SSTAR."...JSR .MSG.....LDX $3A.6...INX.B
.&.BNE IT1.A.0.JMP .Y ;.CE IN DIRECT MOD
E...:.IT1 LDX #.MESSFIR ;FIRST PASS...D.
LDY #.MESSFIR...N.JSR .MSG.D.X.LDA MEMSI
Z ;INIT SYMBOL TABLE.Q.B.STA SYM....L.LD
A MEMSIZ.1...V.STA SYM..1.....INC AD....
.BNE IT2.....INC AD.1.$...IT2 LDA AD.3..
.STA STASRC.@...STA LINK.M...LDA AD.1.^.
F.STA STASRC.1.M.P.STA LINK.1.S.Z.;.....
.LINE .. ;START . LINE.....;.....JSR .LI
NE.....BNE .W.D.....JMP SECPASS.E...;...
 ..W.D .. ;PROCESS W.D...*.;...4.JSR W.D
...>.BNE GW1...H.CMP #$B2 ;. .KEN...R.BN
E ..(.\.JMP ADDE.F.F.GW1 LDX #0 ;CHECK .
 ....1.U.P.LDA (AD,X).J.Z.CMP #$AC ;. .K
EN.V...BNE GW2.....JSR DOPTR.....JMP ...
...GW2 LDA (AD),Y.....CMP #$B2 ;......BN
E GW3.L...JMP ADDSYM...J.GW3 JSR FINDOP.
..T.BCC GW4.....JMP DOOP.....GW4 LDY #0.
....LDA (AD),Y.#...CMP #".".1...BNE LABE
L.=...JMP CU..C...;.H.$.LABEL .. ;. W.D,
 CURRENT ADDRESS.N...;.|.8.JSR CRSYM...B
.LDY #0...L.LDA PTR...V.STA (SYMPTR),Y..
.`.INY...J.LDA PTR.1.O.T.STA (SYMPTR),Y.
U.~.;...... .. ;. .Y . . W.D.....;.....L
DY C.....LDA (AD),Y.....CMP #" ".#...BEQ
 N1.0.D.CMP #":".;.N.BEQ N1.I.X.JMP .LIN
E.T...N1 INY.\...TYA.D...CLC.O...ADC AD.
Z...STA AD.....BCC N.....INC AD.1. .(.N 
JMP .W.D...2.;.G.<.SECPASS .. ;BEGIN SEC
.D PASS.M.F.;.Z.P.INC FLAG...Z.LDX #.MES
SSEC ;SEC.D PASS...D.LDY #.MESSSEC...N.J
SR .MSG.9.X.LDA STASRC ;PUT LINK AT STAR
T.F...STA LINK.W...LDA STASRC.1.F...STA 
LINK.1.L. .;......LINE2 .. ;START . LINE
.....;.....JSR .LINE...H.BNE .W.D2...R.J
MP FINISH.....;.Y....W.D2 .. ;PROCESS W.
D.....;.....JSR W.D.....BEQ .2.....LDX #
0.....LDA (AD,X). .".CMP #$AC ;..-.,.BNE
 G2W1.;.6.JSR DOPTR.F.@.JMP .2.Z.J.G2W1 
JSR FINDOP.G.T.BCC G2W2.T.^.JMP PU.P...H
.G2W2 LDY #0...R.LDA (AD),Y. .|.CMP #"."
.....BNE .2.....JMP CU......;.U....2 .. 
;. .Y . . W.D.....;.....LDY C...B.LDA (A
D),Y...L.CMP #$20...V.BEQ N2X1.....CMP #
$3A.(...BEQ N2X1.7...JMP .LINE2.D...N2X1
 INY.L...TYA.T...CLC._...ADC AD.J.&.STA 
AD.V.0.BCC N2X...:.INC AD.1...D.N2X JMP 
.W.D2...N.;...X.FINISH .. ;....B.;.T.L.L
DX #.MESSAC ;ASSEMBLY COMP.E...V.LDY #.M
ESSAC.....JSR .MSG.....LDA PTR.....STA L
INE.....LDA PTR.1.(...STA LINE.1.7...JSR
 INLINE.B...JMP .Y.H.F.;.N.P.;SUBROUTINE
S USED BY MAIN PROGRAM.T.Z.;.....ADDSYM 
.. ;. SYMBOL WITH EUE.....;.....JSR CRSY
M.....JSR .W.D.A...JSR EE.L...LDY #0... 
.STA (SYMPTR),Y...*.INY...4.TXA...>.STA 
(SYMPTR),Y...H.JMP ....R.;.6.\.ADDE .. ;
CHANGE LABEL .O SYMBOL.<.F.;.I.P.JSR .W.
D.T.Z.JSR EE._...LDY #0.R...STA (SYMPTR)
,Y.Z...INY.....TXA.....STA (SYMPTR),Y...
..JMP ......;.M.J.CRSYM .. ;CREATE SYMBO
L TABLE ENTRY.S.T.;.....LDA SYM. ;LOWER 
SYM. ......SEC        ;MAKE ROOM.....SBC
 #10.!...STA SYM..-...BCS CS1.<...DEC SY
M..1.X...CS1 CMP STAVAR ;CHECK ..G.$.LDA
 SYM..1.X...SBC STAVAR.1...8.BCS CS2...B
.LDX #.MESSS. ;SYMBOL TABLE...L.LDY #.ME
SSS. ;OVERFLOW.K.V.JSR .MSG.Z.`.JSR INLI
NE...J.JMP .LINE...T.CS2 CLC    ;PO. SYM
PTR ..&.~.LDA SYM. ;SYMBOL EUE ADDRESS.1
...ADC #8.@...STA SYMPTR.O...LDA SYM..1.
Z...ADC #0.K...STA SYMPTR.1.....LDY #8 ;
ERASE SPACE . NAME...D.LDA #0...N.CS4 DE
Y...X.STA (SYM.),Y.....BNE CS4.W...LDY C
 ;MAX CGTH IS 8.....CS5 DEY ;COPY SYMBOL
 NAME.....LDA (AD),Y.....STA (SYM.),Y...
..TYA.)...BNE CS5.1.(.RTS.7.2.;.].<.DOOP
 .. ;MOVE PTR PAST INSTRUCTI..C.F.;.N.P.
LDY #0.}.Z.LDA (AD),Y...D.CMP #"J"...N.B
EQ DO3...X.CMP #"B".....BNE DO1.E...CPX 
#$21 ;BRK OP#.Q...BEQ DO1... .CPX #$20 ;
BIT OP#.....BEQ DO1.....JSR .W.D.....DOL
2 LDA #2...H.BNE DO.,.R.DO3 JSR .W.D.7..
.LDA #3.B...BNE DO.S...DO1 JSR .W.D._...
BNE DO2.J...LDA #1.U...BNE DO.....DO2 LD
Y #0...".LDA (AD),Y. .,.CMP #"#"...6.BEQ
 DOL2...@.CMP #"(".G.J.BEQ DOL2.Q.T.LDY 
C.Y.^.DEY...H.BEQ DO5...R.DEY...|.BEQ DO
5.....LDA (AD),Y.....CMP #",".!...BNE DO
5.@...INY ;RECOGNIZE ..ED .OLUTE.O...LDA
 (AD),Y.Z...LDY #7.G.B.CMP #"X".S.L.BEQ 
DO7.{.V.INY.....DO7 LDA (OPPTR),Y.....CM
P #$FA.....BEQ DOL3.....LDY C.A...DEY:DE
Y.K...STY C.V...JSR EE...&.INC C...0.INC
 C...:.CPX #0...D.JMP DO6...N.DO5 JSR EE
.!.X.DO6 BEQ DOL2.1.B.DOL3 LDA #3.<.L.DO
 CLC.H.V.ADC PTR.T...STA PTR.`...BCC DO4
.N...INC PTR.1.|...DO4 JMP ......;.....D
OPTR .. ;CHANGE PTR EG. ....2.....;...F.
JSR .W.D.E.P.JSR .W.D.P.Z.JSR EE.....STA
 PTR.....STX PTR.1.....RTS.....;.....;EE
 ROUTINES BEGIN HERE.....;.9. .LITERAL .
. ;. .GLE FII EUE.?.*.;.G.4.INY.V.>.LDA 
(AD),Y.A.H.STA T1.L.R.LDA #0.Y.\.STA T1.
1...F.INY:INY...P.JMP LAST...Z.;.....SYM
 .. ;FIND . . CALL FINDSYM.....;.L...SY1
 INY.V...CPY C.....BEQ SY.....LDA (AD),Y
.....CMP #$AA ;....J.BEQ SY...T.CMP #$AB
 ;..'...BNE SY1.5...SY STY T1.E...JSR FI
NDSYM.P...LDY T1.[...STA T1.H...STX T1.1
.U...JMP LAST.{.$.;.....EE .. ;EEUATE .G
LE .RESSI.. .8.;...B.LDA #0...L.STA T2.C
.V.STA T2.1.N.`.STA SS.Y.J.STA T4...T.EV
1 LDY #0...~.LDA (AD),Y.....CMP #"$"....
.BNE EV8.....JMP HEX.0...EV8 CMP #$22 ;"
.@...BEQ LITERAL.P...CMP #$AC ;..].D.BEQ
 PTRE.M.N.CMP #$B1 ;..Z.X.BEQ HILO.....C
MP #$B3 ;......BEQ HILO.....CMP #"%"....
.BNE EV9.....JMP BIN.H...EV9 SEC.U...SBC
 #$30...(.BCC SYM...2.CMP #$0A...<.BCS S
YM...F.JMP DECI...P.;.0.Z.HILO .. ;. . .
 BYTE EXTRACTI.S.6.D.;.A.N.STA T4.L.X.IN
C AD.W...BNE HL.D...INC AD.1.Q...HL DEC 
C.}. .BNE EV1.....;.....PTRE .. ;GIVE CU
RRENT ADDRESS.....;...H.INY...R.LDA PTR.
J...STA T1.X...LDA PTR.1.....STA T1.1...
..;.. ..LAST .. ;PER.M LAST SIGN.. ..;..
 ..LDA SS.% ".BNE EV3.> ,.LDA T1      ;N
O SIGN.I 6.STA T2.V @.LDA T1.1.C J.STA T
2.1.P T.JMP SIGN.. ^.EV3 CMP #$AA ;... H
.BNE EV4.. R.CLC.. |.LDA T1.. ..ADC T2..
 ..STA T2.F ..LDA T1.1.S ..ADC T2.1.. ..
BCC SIGN.. ..JMP IQ..!B.EV4 SEC ;. (.AUL
T)..!L.LDA T2..!V.SBC T1.#!..STA T2.0!..
LDA T2.1.=!..SBC T1.1.J!..STA T2.1.U!..B
CC IQ.[!..;.S!..SIGN .. ;. SIGN . ..Y!&.
;..!0.CPY C..!:.BEQ EV..!D.LDA (AD),Y..!
N.STA SS..!X.INY..!B.TYA..!L.CLC.K!V.ADC
 AD.V!..STA AD..!..BCC EV5..!..INC AD.1.
.!..EV5 SEC.."..LDA C.."..STY C.."..SBC 
C.#"F.STA C./"P.JMP EV1.="Z.EV LDA T4.I"
..BNE EV6.T"..LDA T2.A"..LDX T2.1.I"..RT
S.}"..EV6 CMP #$B1 ;..."..BNE EV7.." .LD
A T2.1.."*.LDX #0.."4.RTS..">.EV7 LDA T2
 ;..F"H.LDX #0.N"R.RTS.T"\.;.."F.HEX .. 
;C.VERT HEX NUMBER.."P.;..#Z.INY..#..LDA
 #0..#..STA T1.##..STA T1.1.6#..HX1 LDA 
(AD),Y.>#..SEC.K#..SBC #$30.V#..BCC HX.C
#J.CMP #$0A.O#T.BCC HX2.|#..SBC #$11..#.
.BCC HX..#..CMP #$06..#..BCS HX..#..ADC 
#$0A..#..HX2 ASL T1.H#..ROL T1.1.S#$.BCS
 IQ..#..ASL T1..#8.ROL T1.1..#B.BCS IQ..
$L.ASL T1..$V.ROL T1.1..$`.BCS IQ.$$J.AS
L T1.1$T.ROL T1.1.<$~.BCS IQ.G$..ADC T1.
R$..STA T1._$..LDA T1.1.J$..ADC #0.W$..S
TA T1.1..$..BCS IQ..$D.INY..$N.BNE HX1..
$X.HX JMP LAST..$..;.G$..IQ .. ;ILLEGAL 
QUANITY.X$..LDX #.MESSIQ..$..LDY #.MESSI
Q..$..JSR .MSG..%..JSR INLINE..%..JMP .L
INE..%(.;.5%2.DECI .. ;C.VERT DECIMAL.;%
<.;.F%F.LDA #0.Q%P.STA T1.^%Z.STA T1.1.Q
%D.DE1 LDA (AD),Y.Y%N.SEC..%X.SBC #$30..
%..BCC DE..%..CMP #$0A..%..BCS DE..% .PH
A..%..LDA T1.I%..LDX T1.1.T%..ASL T1..%H
.ROL T1.1..%R.BCS IQ..%..ASL T1..&..ROL 
T1.1..&..BCS IQ..&..ADC T1.%&..STA T1.-&
..TXA.:&..ADC T1.1.G&".STA T1.1.R&,.BCS 
IQ.]&6.ASL T1.J&@.ROL T1.1.U&J.BCS IQ.}&
T.PLA..&^.ADC T1..&H.STA T1. &R.LDA T1.1
..&|.ADC #0..&..STA T1.1.C&..BCS IQ.K&..
INY.W&..BNE DE1..&..DE JMP LAST..&..;..'
B.BIN .. ;C.VERT BINARY..'L.;..'V.INY. '
..LDA #0.+'..STA T1.8'..STA T1.1.K'..BN1
 LDA (AD),Y.S'..SEC.`'..SBC #$30.K'..BCC
 BN.V'&.CMP #2..'0.BCS BN..':.ASL T1..'D
.ROL T1.1..'N.BCS IQ..'X.ADC T1..'B.STA 
T1.G'L.LDA T1.1.R'V.ADC #0..'..STA T1.1.
.'..INY..'..BNE BN1..(..BN JMP LAST..(..
;.,(..FINDOP .. ;SET CARRY . OPCODE,.J(.
.;OPPTR PO.S . .ITI.,63999.F(F.;.X HOLDS
 OPCODE NUMBER.L(P.;..(Z.LDA #.OPTAB ;OP
CODE TABLE..(..STA OPPTR..(..LDA #.OPTAB
..(..STA OPPTR.1.C(..LDX #0.R(..FO1 LDY 
#0..(..FO2 LDA (OPPTR),Y..( .BEQ FO3..)*
.CMP (AD),Y..)4.BNE FO4..)>.INY.")H.CPY 
#3..)R.BCC FO2.<)\.FO3 CPY C.H)F.BNE FO4
.P)P.SEC.X)Z.RTS.D)..FO4 INX.R)..LDA OPP
TR.Z)..CLC..)..ADC #$0D..)..STA OPPTR..)
..BCC FO5..)..INC OPPTR.1.C)J.FO5 CPX #N
OPS.O)T.BNE FO1.W)..CLC..)..RTS..)..;..*
..FINDSYM .. ;FIND SYMBOL, .. *..;      
    EUE IN .A .X.&*..;.5*..LDA MEMSIZ.D*
$.STA SYMPTR.U*..LDA MEMSIZ.1.F*8.STA SY
MPTR.1.Y*B.FS1 LDA SYMPTR..*L.SEC..*V.SB
C #10..*`.STA SYMPTR..*J.BCS FS2..*T.DEC
 SYMPTR.1.J*~.FS2 CMP SYM...*..LDA SYMPT
R.1..*..SBC SYM..1..*..BCS FS3..+..LDA F
LAG..+..BNE FS8.-+..LDA PTR ;. PTR . 1ST
 PASS.;+D.LDX PTR.1.C+N.RTS.H+X.FS8 LDX 
#.MESSUS ;UN.INED SYMBOL.Y+..LDY #.MESSU
S..+..JSR .MSG..+..JSR INLINE..+..JMP .L
INE..+..FS3 LDY #0.I+..FS4 LDA (SYMPTR),
Y.U+..BEQ FS7..+(.CMP (AD),Y..+2.BNE FS1
..+<.INY..,F.CPY #8..,P.BCC FS4.$,Z.FS7 
CPY T1 ;CGTH.0,D.BNE FS1.I,N.FS9 LDY #9 
;FOUND IT.\,X.LDA (SYMPTR),Y.D,..TAX.L,.
.DEY.,..LDA (SYMPTR),Y.., .RTS..,..;..,
...LINE .. ;. OFF.ING LINE..,..;..,H.LDA
 LINE.I,R.STA $14.X,..LDA LINE.1..,..STA
 $15..,..JSR FINDLINE..,..JSR ...-..JMP 
.Y..-..;.*-...LINE .. ;.Y . . LINE.0-".;
.O-,.LDA LINK ;MOVE AD . . LINE.Z-6.STA 
AD.I-@.LDA LINK.1.V-J.STA AD.1..-T.LDY #
0 ;. LINK..-^.LDA (AD),Y..-H.STA LINK..-
R.INY..-|.LDA (AD),Y.K-..STA LINK.1..-..
BEQ NL ;. OF SOURCE . Z SET.....INY ;. L
INE NUMBER.....LDA (AD),Y.....STA LINE.&
...INY.5.B.LDA (AD),Y.D.L.STA LINE.1.F.V
.CLC ;MOVE AD OVER LINK . LINE.Q...LDA A
D.|...ADC #4.....STA AD.....BCC NL.....I
NC AD.1 ;. Z CLEAR.....NL RTS.....;.W.&.
.W.D .. ;. . W.D PAST ....0.;...:.LDY C.
..D.INY...N..BYTE $2C../X.;../B..W.D .. 
;. . W.D../L.;.(/V.LDY C.0/..TYA.8/..CLC
.C/..ADC AD.N/..STA AD.Y/..BCC NW.F/..IN
C AD.1.U/..NW JMP W.D.{/F.;../P..MSG .. 
;. MESSAGE../Z.;../..STX T1../..STY T1.1
../..LDY #0.N/..PM1 LDA (T1),Y.Y/..BEQ P
M../..JSR $FFD2 ;. CHARACTER../ .INY..0*
.BNE PM1..04.PM RTS..0>.;.70H.;PU.P ROUT
INES BEGIN HERE.=0R.;._0\.RELATIVE .. ;C
ALCULATE OFFSET.E0F.;.P0P.LDY #3..0Z.LDA
 (OPPTR),Y..0..JSR PU.U.P..0..JSR .W.D..
0..JSR EE..0..SEC..0..SBC #1.H0..BCS RL1
.P0..DEX..0J.RL1 SEC..0T.SBC PTR..0..STA
 T1..0..TXA..1..SBC PTR.1..1..TAX..1..CL
C.$1..LDA T1.11..ADC #$80.91$.TXA.D1..AD
C #0.O18.BEQ RL.P1B.LDX #.MESSBO. ;BRANC
H OUT OF..1L.LDY #.MESSBO. ;RANGE..1V.JS
R .MSG..1`.JSR INLINE..1J.JMP .LINE.A1T.
RL LDA T1.O1~.JSR PU.UT.Z1..JMP .2..1..;
..2..IMM .. ;DO IMMEDIATE MODE '#'..2..;
..2..INC AD..2..BNE IM1.,2D.INC AD.1.=2N
.IM1 LDY #$0A.O2X.LDA (OPPTR),Y.^2..JSR 
PU.U.P.H2..DEC C.S2..JSR EE..2..JSR PU.U
T..2..JMP .2..2..;..2..INDIRECT .. ;DO (
,X) ELSE (),Y..2(.;.F22.INC AD.S2<.BNE I
ND1..2F.INC AD.1..2P.IND1 LDA C..2Z.SEC.
.3D.SBC #4..3N.TAY..3X.STY C.#3..LDA (AD
),Y./3..LDY #11.<3..CMP #",".I3 .BEQ IND
2.Q3..INY.H3..IND2 LDA (OPPTR),Y.W3..JSR
 PU.U.P..3H.JSR EE..3R.JSR PU.UT..3..INC
 C..3..INC C..3..INC C..3..JMP .2..3..;.
.3..PU.P .. ;GENERATES MACHINE CODE..3..
;..3".LDY #0..4,.LDA (AD),Y..46.CMP #"J"
..4@.BNE POP5.*4J.JMP JUMP.<4T.POP5 CMP 
#"B".I4^.BNE POP1._4H.CPX #$21 ;BRK OP#.
L4R.BEQ POP1..4|.CPX #$20 ;BIT OP#..4..B
EQ POP1. 4..JMP RELATIVE..4..POP1 JSR .W
.D..4..BNE POP2.J4..LDY #9..4..LDA (OPPT
R),Y..4B.JSR PU.U.P..4L.JMP .2..5V.POP2 
LDY #0..5..LDA (AD),Y."5..CMP #"#"./5..B
NE POP3.;5..JMP IMM.M5. POP3 CMP #"(".Z5
. BNE POP4.K5. JMP INDIRECT.}5& POP4 CMP
 #"!"..50 BNE .OLUTE..5: ; .CED .OLUTE B
Y ! PREFIX..5D INC AD..5N BNE FR.M5X INC
 AD.1.Z5B FR DEC C..5L .BYTE $2C..5V ;..
6. .OLUTE .. ;THREE BYTE MODE..6. ;..6. 
LDA #0.)6. STA T5.46. LDX #3.>6. LDY C.F
6. DEY.R6F BEQ AB1.Z6P DEY.F6Z BEQ AB1.U
6. LDA (AD),Y..6. CMP #","..6. BNE AB1..
6.!STY C. 6.!INX..6.!INY..6 !LDA (AD),Y.
D6*!CMP #"X".P64!BEQ AB1.X6>!INX..6H!AB1
 STX T3..6R!JSR EE..6\!BEQ AB2..7F!AB4 L
DY T3..7P!LDA (OPPTR),Y..7Z!JSR PU.U.P.9
7.!LDA T2.G7.!JSR PU.UT.O7.!TXA.]7.!JSR 
PU.UT.I7.!JMP AB3.X7.!AB2 LDA T5..7.!BNE
 AB4..7J!LDY T3..7T!INY:INY:INY..7.!LDA 
(OPPTR),Y..7.!CMP #$FA.J7.!BEQ AB4.Y7.!J
SR PU.U.P..7."LDA T2..7."JSR PU.UT..8."A
B3 LDY T3..8$"DEY:DEY:DEY..8."BEQ AB.&88
"INC C.08B"INC C.>8L"AB JMP .2.D8V";.D8`
"JUMP .. ; JMP, JSR . JMP ().J8J";.W8T"J
SR .W.D..8~"LDY #0..8."LDA (AD),Y..8."CM
P #"("..8."BEQ JP1..8."LDY #3.G8."LDA (O
PPTR),Y.V8."JSR PU.U.P..8D"JSR EE..8N"JS
R PU.UT..8X"TXA..9."JSR PU.UT..9."JMP .2
..9."JP1 INC AD.+9.#BNE JP2.89.#INC AD.1
.F9.#JP2 DEC C.P9.#DEC C.[9(#LDY #4.M92#
LDA (OPPTR),Y.|9<#JSR PU.U.P..9F#JSR EE.
.9P#JSR PU.UT..9Z#TXA..9D#JSR PU.UT..9N#
INC C..9X#JMP .2.F9.#;..9.#PU.U.P .. ;. 
OP MODE..9.#;..9 #CMP #$FA..:.#BNE PU.UT
..:.#LDX #.MESSIM ;ILLEGAL MODE.0:.#LDY 
#.MESSIM.=:H#JSR .MSG.L:R#JSR INLINE.Z:.
#JMP .LINE.`:.#;..:.#PU.UT .. ;OUTPUT OB
JECT CODE..:.#;..:.$LDY #0..:.$STA (PTR)
,Y..:.$INC PTR..:"$BNE PT.G:,$INC PTR.1.
R:6$PT RTS.X:@$;..:J$W.D .. ;BASIC ROUTI
NE . . W.D..;T$;(AD) MUST PO. . START.0;
^$;IGN.ES LEADING SPACES.U;H$;":;= " COP
IED .LY IN QUOTE MODE.R;R$;. .Y.CGTH, . 
CHAR IN .A.X;|$;..;.$LDX #0..;.$LDY #0. 
;.$W1 LDA (AD),Y..;.$BEQ W5 ;. OF LINE.F
;.$CMP #$22 ;".Q;.$BEQ W4..;B$CPX #$80..
;L$BEQ W2..;V$CMP #":"..<.$BEQ W5..<.$CM
P #";"..<.$BEQ W5.*<.$CMP #$B2 ; ..5<.%B
EQ W5.B<.%CMP #" ".M<.%BEQ W3.^<&%W2 INY
 ;COPY.I<0%BNE W1..<:%W3 CPY #0 ;LEADING
 SPACE..<D%BNE W5..<N%INC AD..<X%BNE W1.
.<B%INC AD.1..<L%BNE W1.Q<V%W4 TXA ;.GGL
E..<.%E. #$80..<.%TAX..<.%JMP W2..<.%W5 
STY C..=.%CPY #0..=.%RTS..=.%;.3=F%CU. .
. ;CUS.M PSEUDO.OPS.9=P%;.A=Z%INY.P=.%LD
A (AD),Y.]=.%CMP #"B".I=.%BNE CP1.V=.&JM
P BYTE..=.&CP1 CMP #"W"..=.&BNE CP2..= &
JMP BYTE.2..=*&CP2 CMP #$C6 ;F.B=4&BNE C
P3.L=>&JMP F..=H&CP3 CMP #$80 ;...=R&BNE
 CP4..=\&JMP ...>F&CP4 CMP #"P"..>P&BNE 
CP5..>Z&JMP PAD.=>.&CP5 LDX #.MESSIP ;IL
LEGAL.Y>.&LDY #.MESSIP ;PSEUDO.OP.F>.&JS
R .MSG.U>.&JSR INLINE..>.&JMP .LINE..>.&
;..>.&CP LDA FLAG..>J&BNE CP6..>T&JMP ..
.>.&CP6 JMP .2.D>.&;..>.&BYTE .. ;.BYTE 
. .W.D..>.&;..>.'LDA #0..>.'STA T5..?.'J
SR .W.D..?$'STY T3.!?.'BY1 LDY #0.4?8'BY
2 LDA (AD),Y.T?B'CMP #"," ;SPLIT UP .RES
SI.S.`?L'BEQ BY3.L?V'BY9 INY.W?`'CPY T3.
.?J'BNE BY2..?T'BY3 LDA FLAG. ?~'BEQ BY6
..?.'STY C..?.'INY..?.'LDA T3.H?.'STY T3
.P?.'SEC..?.'SBC T3..?D'STA T3..?N'BCS B
Y4..?X'LDA #0..@.'STA T3..@.'BY4 JSR EE 
;EE ..:@.'JSR PU.UT ;PU.UT .E BYTE.E@.(L
DA T5.Q@.(BEQ BY5.Y@.(TXA.Q@.(JSR PU.UT 
;. .E W.D..@((BY5 LDA T3..@2(BEQ BY..@<(
LDY C..@F(INY..@P(TYA..@Z(CLC..@D(ADC AD
.C@N(STA AD.O@X(BCC BY1..@.(INC AD.1..@.
(BNE BY1..@.(BY6 CLC..@ (LDA T5..A.(BEQ 
BY7..A.(LDA #1.%A.(BY7 ADC #1.GAH(ADC PT
R ;INC PTR . FIRST PASS.SAR(STA PTR._A.(
BCC BY8.MA.(INC PTR.1.|A.(BY8 CPY T3..A.
(BNE BY9..A.)BY JMP CP..A.);..A.)F .. ;.
F..A");..A,)JSR .W.D.GA6)LDY #1.ZA@)AS1 
LDA (AD),Y..AJ)CMP #$22 ;"..AT)BEQ AS..B
^)LDX FLAG..BH)BEQ AS3..BR)STY T3.'B|)JS
R PU.UT.2B.)LDY T3.>B.)AS2 INY.HB.)CPY C
.TB.)BNE AS1.BB.)AS JMP CP.RB.)AS3 INC P
TR.~BB)BNE AS2..BL)INC PTR.1..BV)BNE AS2
..B.);..B.). .. ;....B.);..B.)LDA FLAG.I
B.*BNE EN.YB.*JMP SECPASS..B.*EN JSR .W.
D..B&*LDX #.MESSAC..C0*LDY #.MESSAC..C:*
JSR .MSG.$CD*LDA PTR.1CN*STA LINE.?CX*LD
A PTR.1.NCB*STA LINE.1.]CL*JSR INLINE.JC
V*JMP .BAS.PC.*;..C.*PAD .. ;PAD OBJECT 
WITH A 0 . AT..C.*;ODD BYTE . KEEP JMP T
ABLES SAFE.FC.*LDA PTR.OC.*. #1.ZC.*BEQ 
PA..C.*LDA FLAG..CF*BEQ PA1..CP*LDA #0..
DZ*JSR PU.UT..D.*PA JMP CP.*D.*PA1 INC P
TR.5D.*BNE PA.CD.+INC PTR.1.ND.+BNE PA.T
D.+;.OD +OPTAB .. ;OPCODE TABLE.UD*+;..D
4+.F "LDA":.BYTE $AD,$BD,$B9,$A5,$B5,$FA
,$FA,$A9,$A1,$B1..D>+.F "STA":.BYTE $8D,
$9D,$99,$85,$95,$FA,$FA,$FA,$81,$91.&EH+
.F "BNE":.BYTE $D0,$FA,$FA,$FA,$FA,$FA,$
FA,$FA,$FA,$FA.AER+.F "BEQ":.BYTE $F0,$F
A,$FA,$FA,$FA,$FA,$FA,$FA,$FA,$FA..E\+.F
 "CMP":.BYTE $CD,$DD,$D9,$C5,$D5,$FA,$FA
,$C9,$C1,$D1.WEF+.F "JSR":.BYTE $20,$FA,
$FA,$FA,$FA,$FA,$FA,$FA,$FA,$FA..FP+.F "
LDX":.BYTE $AE,$FA,$BE,$A6,$FA,$B6,$FA,$
A2,$FA,$FA.MFZ+.F "RTS":.BYTE $FA,$FA,$F
A,$FA,$FA,$FA,$60,$FA,$FA,$FA..F.+.F "LD
Y":.BYTE $AC,$BC,$FA,$A4,$B4,$FA,$FA,$A0
,$FA,$FA.CF.+.F "BMI":.BYTE $30,$FA,$FA,
$FA,$FA,$FA,$FA,$FA,$FA,$FA..F.+.F "DEC"
:.BYTE $CE,$DE,$FA,$C6,$D6,$FA,$FA,$FA,$
FA,$FA.;G.+.BYTE $AF,0,0,$2D,$3D,$39,$25
,$35,$FA,$FA,$29,$21,$31 ;..VG.+.F "BCS"
:.BYTE $B0,$FA,$FA,$FA,$FA,$FA,$FA,$FA,$
FA,$FA..G.+.F "INC":.BYTE $EE,$FE,$FA,$E
6,$F6,$FA,$FA,$FA,$FA,$FA..G.+.F "BCC":.
BYTE $90,$FA,$FA,$FA,$FA,$FA,$FA,$FA,$FA
,$FA.'HJ+.F "TYA":.BYTE $FA,$FA,$FA,$FA,
$FA,$FA,$98,$FA,$FA,$FA.BHT+.F "BPL":.BY
TE $10,$FA,$FA,$FA,$FA,$FA,$FA,$FA,$FA,$
FA..H.+.F "ASL":.BYTE $0E,$1E,$FA,$06,$1
6,$FA,$0A,$FA,$FA,$FA.XH.+.F "CLC":.BYTE
 $FA,$FA,$FA,$FA,$FA,$FA,$18,$FA,$FA,$FA
..I.+.F "ADC":.BYTE $6D,$7D,$79,$65,$75,
$FA,$FA,$69,$61,$71.SI.+.BYTE $45,$B0,0,
$4D,$5D,$59,$45,$55,$FA,$FA,$49,$41,$51 
;E...I.,.F "TXA":.BYTE $FA,$FA,$FA,$FA,$
FA,$FA,$8A,$FA,$FA,$FA.II.,.F "CPX":.BYT
E $EC,$FA,$FA,$E4,$FA,$FA,$FA,$E0,$FA,$F
A..J.,.F "JMP":.BYTE $4C,$6C,$FA,$FA,$FA
,$FA,$FA,$FA,$FA,$FA.?J$,.F "TAX":.BYTE 
$FA,$FA,$FA,$FA,$FA,$FA,$AA,$FA,$FA,$FA.
ZJ.,.F "INY":.BYTE $FA,$FA,$FA,$FA,$FA,$
FA,$C8,$FA,$FA,$FA..J8,.F "STY":.BYTE $8
C,$FA,$FA,$84,$94,$FA,$FA,$FA,$FA,$FA..J
B,.BYTE $B0,$41,0,$0D,$1D,$19,$05,$15,$F
A,$FA,$09,$01,$11 ;.A.0KL,.F "DEY":.BYTE
 $FA,$FA,$FA,$FA,$FA,$FA,$88,$FA,$FA,$FA
.KKV,.F "DEX":.BYTE $FA,$FA,$FA,$FA,$FA,
$FA,$CA,$FA,$FA,$FA..K`,.F "STX":.BYTE $
8E,$FA,$FA,$86,$FA,$96,$FA,$FA,$FA,$FA..
KJ,.F "SBC":.BYTE $ED,$FD,$F9,$E5,$F5,$F
A,$FA,$E9,$E1,$F1..LT,.F "BIT":.BYTE $2C
,$FA,$FA,$24,$FA,$FA,$FA,$FA,$FA,$FA.WL~
,.F "BRK":.BYTE $FA,$FA,$FA,$FA,$FA,$FA,
$00,$FA,$FA,$FA..L.,.F "BVC":.BYTE $50,$
FA,$FA,$FA,$FA,$FA,$FA,$FA,$FA,$FA.ML.,.
F "BVS":.BYTE $70,$FA,$FA,$FA,$FA,$FA,$F
A,$FA,$FA,$FA..M.,.F "CLD":.BYTE $FA,$FA
,$FA,$FA,$FA,$FA,$D8,$FA,$FA,$FA.CM.,.F 
"CLI":.BYTE $FA,$FA,$FA,$FA,$FA,$FA,$58,
$FA,$FA,$FA.~M.,.F "CLV":.BYTE $FA,$FA,$
FA,$FA,$FA,$FA,$B8,$FA,$FA,$FA..M.,.F "C
PY":.BYTE $CC,$FA,$FA,$C4,$FA,$FA,$FA,$C
0,$FA,$FA..MD,.F "INX":.BYTE $FA,$FA,$FA
,$FA,$FA,$FA,$E8,$FA,$FA,$FA./NN,.F "LSR
":.BYTE $4E,$5E,$FA,$46,$56,$FA,$4A,$FA,
$FA,$FA.JNX,.F "NOP":.BYTE $FA,$FA,$FA,$
FA,$FA,$FA,$EA,$FA,$FA,$FA..N.,.F "PHA":
.BYTE $FA,$FA,$FA,$FA,$FA,$FA,$48,$FA,$F
A,$FA..N.,.F "PHP":.BYTE $FA,$FA,$FA,$FA
,$FA,$FA,$08,$FA,$FA,$FA..O.,.F "PLA":.B
YTE $FA,$FA,$FA,$FA,$FA,$FA,$68,$FA,$FA,
$FA.VO.-.F "PLP":.BYTE $FA,$FA,$FA,$FA,$
FA,$FA,$28,$FA,$FA,$FA..O.-.F "ROL":.BYT
E $2E,$3E,$FA,$26,$36,$FA,$2A,$FA,$FA,$F
A.QO.-.BYTE $52,$B0,0,$6E,$7E,$FA,$66,$7
6,$FA,$6A,$FA,$FA,$FA ;R...P.-.F "RTI":.
BYTE $FA,$FA,$FA,$FA,$FA,$FA,$40,$FA,$FA
,$FA.GP(-.F "SEC":.BYTE $FA,$FA,$FA,$FA,
$FA,$FA,$38,$FA,$FA,$FA..P2-.F "SED":.BY
TE $FA,$FA,$FA,$FA,$FA,$FA,$F8,$FA,$FA,$
FA..P<-.F "SEI":.BYTE $FA,$FA,$FA,$FA,$F
A,$FA,$78,$FA,$FA,$FA..PF-.F "TAY":.BYTE
 $FA,$FA,$FA,$FA,$FA,$FA,$A8,$FA,$FA,$FA
.3QP-.F "TSX":.BYTE $FA,$FA,$FA,$FA,$FA,
$FA,$BA,$FA,$FA,$FA.NQZ-.F "TXS":.BYTE $
FA,$FA,$FA,$FA,$FA,$FA,$9A,$FA,$FA,$FA.T
QD-;..QN-;SYMASS MESSAGES..QX-;.OQ.-MESS
STAR .F ".SYMASS 3.10 ROBERT HUEHN FEB 1
986":.BYTE 13,0..Q.-MESSFIR .BYTE 13:.F 
"FIRST PASS...":.BYTE 0.'R.-MESSSEC .F "
SECOND PASS...":.BYTE 0.ZR -MESSAC .BYTE
 13:.F "ASSEMBLY COMPLETE":.BYTE 0..R.-M
ESSS. .BYTE 13:.F "SYMBOL TABLE OVERFLOW
":.BYTE 0.CR.-MESSIQ .BYTE 13:.F "ILLEGA
L QUANTITY":.BYTE 0..R.-MESSUS .BYTE 13:
.F "UNDEFINED SYMBOL":.BYTE 0.+SH-MESSBO
. .BYTE 13:.F "BRANCH OUT OF RANGE":.BYT
E 0.YSR-MESSIM .BYTE 13:.F "ILLEGAL MODE
":.BYTE 0..S.-MESSIP .BYT...U.U.U.U.U.U.
U.U.U.R................

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL