MC68705-ASSEMBL.
FILE INFORMATION
FILENAME(S): MC68705-ASSEMBL.
FILE TYPE(S): PRG
FILE SIZE: 15.4K
FIRST SEEN: 2025-11-30 01:12:35
APPEARS ON: 3 disk(s)
FILE HASH
56c346e1d4e5b88628749414f86ad9b5f80cdcd78de7d758f2ecc6ba33545839
FOUND ON DISKS (3 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| L6 86 12D | MC68705-ASSEMBL. | PRG | C64er, DuncanTwain | 12 | 0 | DOWNLOAD FILE |
| L6 86 12D | MC68705-ASSEMBL. | PRG | DuncanTwain | 12 | 0 | DOWNLOAD FILE |
| L6 86 12D | MC68705-ASSEMBL. | PRG | DuncanTwain | 12 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 18 08 0A 00 83 20 2A 50 4F 52 54 2D 41 20 |....... *PORT-A |
00000010: 45 51 55 20 30 30 30 30 00 2F 08 14 00 83 20 2A |EQU 0000./.... *|
00000020: 50 4F 52 54 2D 42 20 45 51 55 20 30 30 30 31 00 |PORT-B EQU 0001.|
00000030: 46 08 1E 00 83 20 2A 50 4F 52 54 2D 43 20 45 51 |F.... *PORT-C EQ|
00000040: 55 20 30 30 30 32 00 5C 08 28 00 83 20 2A 44 44 |U 0002.\.(.. *DD|
00000050: 52 2D 41 20 45 51 55 20 30 30 30 34 00 72 08 32 |R-A EQU 0004.r.2|
00000060: 00 83 20 2A 44 44 52 2D 42 20 45 51 55 20 30 30 |.. *DDR-B EQU 00|
00000070: 30 35 00 88 08 3C 00 83 20 2A 44 44 52 2D 43 20 |05...<.. *DDR-C |
00000080: 45 51 55 20 30 30 30 36 00 A1 08 46 00 83 20 2A |EQU 0006...F.. *|
00000090: 45 4F 49 2D 46 4C 41 47 20 45 51 55 20 30 30 31 |EOI-FLAG EQU 001|
000000A0: 31 00 B7 08 50 00 83 20 2A 44 45 56 2D 23 20 45 |1...P.. *DEV-# E|
000000B0: 51 55 20 30 30 31 32 00 D0 08 5A 00 83 20 2A 53 |QU 0012...Z.. *S|
000000C0: 45 43 2E 46 4C 41 47 20 45 51 55 20 30 30 31 33 |EC.FLAG EQU 0013|
000000D0: 00 E8 08 64 00 83 20 2A 4C 41 42 45 4C 31 34 20 |...d.. *LABEL14 |
000000E0: 45 51 55 20 30 30 31 34 00 01 09 6E 00 83 20 2A |EQU 0014...n.. *|
000000F0: 43 42 4D 2D 46 4C 41 47 20 45 51 55 20 30 30 31 |CBM-FLAG EQU 001|
00000100: 35 00 19 09 78 00 83 20 2A 4C 46 2D 46 4C 41 47 |5...x.. *LF-FLAG|
00000110: 20 45 51 55 20 30 30 31 36 00 32 09 82 00 83 20 | EQU 0016.2.... |
00000120: 2A 24 32 32 2D 46 4C 41 47 20 45 51 55 20 30 30 |*$22-FLAG EQU 00|
00000130: 31 37 00 4C 09 8C 00 83 20 2A 43 52 53 52 2D 46 |17.L.... *CRSR-F|
00000140: 4C 41 47 20 45 51 55 20 30 30 31 38 00 64 09 96 |LAG EQU 0018.d..|
00000150: 00 83 20 2A 52 45 53 54 4F 52 45 20 45 51 55 20 |.. *RESTORE EQU |
00000160: 30 30 31 39 00 7D 09 A0 00 83 20 2A 44 4F 54 2D |0019.}.... *DOT-|
00000170: 46 4C 41 47 20 45 51 55 20 30 30 31 41 00 96 09 |FLAG EQU 001A...|
00000180: AA 00 83 20 2A 41 53 43 2E 46 4C 41 47 20 45 51 |... *ASC.FLAG EQ|
00000190: 55 20 30 30 31 42 00 AF 09 AF 00 83 20 2A 46 52 |U 001B...... *FR|
000001A0: 5A 2D 46 4C 41 47 20 45 51 55 20 30 30 31 43 00 |Z-FLAG EQU 001C.|
000001B0: C6 09 B4 00 83 20 2A 4F 50 43 4F 44 45 20 45 51 |..... *OPCODE EQ|
000001C0: 55 20 30 30 32 30 00 DE 09 BE 00 83 20 2A 48 49 |U 0020...... *HI|
000001D0: 2D 42 59 54 45 20 45 51 55 20 30 30 32 31 00 F6 |-BYTE EQU 0021..|
000001E0: 09 C8 00 83 20 2A 4C 4F 2D 42 59 54 45 20 45 51 |.... *LO-BYTE EQ|
000001F0: 55 20 30 30 32 32 00 0E 0A D2 00 83 20 2A 4C 41 |U 0022...... *LA|
00000200: 42 45 4C 32 33 20 45 51 55 20 30 30 32 33 00 1D |BEL23 EQU 0023..|
00000210: 0A DC 00 83 20 4F 52 47 20 30 37 46 45 00 2A 0A |.... ORG 07FE.*.|
00000220: E6 00 83 20 44 41 54 20 30 34 00 37 0A F0 00 83 |... DAT 04.7....|
00000230: 20 44 41 54 20 30 30 00 46 0A FA 00 83 20 4F 52 | DAT 00.F.... OR|
00000240: 47 20 30 37 38 34 00 53 0A 04 01 83 20 44 41 54 |G 0784.S.... DAT|
00000250: 20 38 30 00 62 0A 0E 01 83 20 4F 52 47 20 30 30 | 80.b.... ORG 00|
00000260: 38 30 00 7A 0A 18 01 83 20 2A 47 45 54 2D 42 59 |80.z.... *GET-BY|
00000270: 54 45 20 4C 44 41 40 20 31 38 00 93 0A 22 01 83 |TE LDA@ 18..."..|
00000280: 20 2A 43 4C 4F 43 4B 4C 20 42 49 4C 20 43 4C 4F | *CLOCKL BIL CLO|
00000290: 43 4B 4C 00 AC 0A 2C 01 83 20 2A 4C 43 4C 4F 43 |CKL...,.. *LCLOC|
000002A0: 4B 20 42 49 4C 20 4C 43 4C 4F 43 4B 00 BE 0A 36 |K BIL LCLOCK...6|
000002B0: 01 83 20 42 43 4C 30 20 50 4F 52 54 2D 43 00 D5 |.. BCL0 PORT-C..|
000002C0: 0A 40 01 83 20 2A 42 49 4C 20 42 49 4C 20 43 4C |.@.. *BIL BIL CL|
000002D0: 4F 43 4B 31 48 00 E6 0A 4A 01 83 20 2A 44 45 43 |OCK1H...J.. *DEC|
000002E0: 41 20 44 45 43 41 00 F4 0A 54 01 83 20 42 4E 45 |A DECA...T.. BNE|
000002F0: 20 42 49 4C 00 02 0B 5E 01 83 20 4C 44 41 40 20 | BIL...^.. LDA@ |
00000300: 31 30 00 14 0B 68 01 83 20 42 53 54 30 20 50 4F |10...h.. BST0 PO|
00000310: 52 54 2D 43 00 24 0B 72 01 83 20 2A 44 45 43 20 |RT-C.$.r.. *DEC |
00000320: 44 45 43 41 00 32 0B 7C 01 83 20 42 4E 45 20 44 |DECA.2.|.. BNE D|
00000330: 45 43 00 46 0B 86 01 83 20 42 53 54 37 20 45 4F |EC.F.... BST7 EO|
00000340: 49 2D 46 4C 41 47 00 58 0B 90 01 83 20 42 43 4C |I-FLAG.X.... BCL|
00000350: 30 20 50 4F 52 54 2D 43 00 73 0B 9A 01 83 20 2A |0 PORT-C.s.... *|
00000360: 43 4C 4F 43 4B 31 48 20 42 49 48 20 43 4C 4F 43 |CLOCK1H BIH CLOC|
00000370: 4B 31 48 00 8E 0B A4 01 83 20 2A 43 4C 4F 43 4B |K1H...... *CLOCK|
00000380: 31 4C 20 42 49 4C 20 43 4C 4F 43 4B 31 4C 00 A6 |1L BIL CLOCK1L..|
00000390: 0B AE 01 83 20 42 42 43 31 20 50 4F 52 54 2D 43 |.... BBC1 PORT-C|
000003A0: 20 42 49 54 2D 31 00 B8 0B B8 01 83 20 2A 42 49 | BIT-1...... *BI|
000003B0: 54 2D 31 20 52 4F 52 58 00 D3 0B C2 01 83 20 2A |T-1 RORX...... *|
000003C0: 43 4C 4F 43 4B 32 48 20 42 49 48 20 43 4C 4F 43 |CLOCK2H BIH CLOC|
000003D0: 4B 32 48 00 EE 0B CC 01 83 20 2A 43 4C 4F 43 4B |K2H...... *CLOCK|
000003E0: 32 4C 20 42 49 4C 20 43 4C 4F 43 4B 32 4C 00 06 |2L BIL CLOCK2L..|
000003F0: 0C D6 01 83 20 42 42 43 31 20 50 4F 52 54 2D 43 |.... BBC1 PORT-C|
00000400: 20 42 49 54 2D 32 00 18 0C E0 01 83 20 2A 42 49 | BIT-2...... *BI|
00000410: 54 2D 32 20 52 4F 52 58 00 33 0C EA 01 83 20 2A |T-2 RORX.3.... *|
00000420: 43 4C 4F 43 4B 33 48 20 42 49 48 20 43 4C 4F 43 |CLOCK3H BIH CLOC|
00000430: 4B 33 48 00 4E 0C F4 01 83 20 2A 43 4C 4F 43 4B |K3H.N.... *CLOCK|
00000440: 33 4C 20 42 49 4C 20 43 4C 4F 43 4B 33 4C 00 66 |3L BIL CLOCK3L.f|
00000450: 0C FE 01 83 20 42 42 43 31 20 50 4F 52 54 2D 43 |.... BBC1 PORT-C|
00000460: 20 42 49 54 2D 33 00 78 0C 08 02 83 20 2A 42 49 | BIT-3.x.... *BI|
00000470: 54 2D 33 20 52 4F 52 58 00 93 0C 12 02 83 20 2A |T-3 RORX...... *|
00000480: 43 4C 4F 43 4B 34 48 20 42 49 48 20 43 4C 4F 43 |CLOCK4H BIH CLOC|
00000490: 4B 34 48 00 AE 0C 1C 02 83 20 2A 43 4C 4F 43 4B |K4H...... *CLOCK|
000004A0: 34 4C 20 42 49 4C 20 43 4C 4F 43 4B 34 4C 00 C6 |4L BIL CLOCK4L..|
000004B0: 0C 26 02 83 20 42 42 43 31 20 50 4F 52 54 2D 43 |.&.. BBC1 PORT-C|
000004C0: 20 42 49 54 2D 34 00 D8 0C 30 02 83 20 2A 42 49 | BIT-4...0.. *BI|
000004D0: 54 2D 34 20 52 4F 52 58 00 F3 0C 3A 02 83 20 2A |T-4 RORX...:.. *|
000004E0: 43 4C 4F 43 4B 35 48 20 42 49 48 20 43 4C 4F 43 |CLOCK5H BIH CLOC|
000004F0: 4B 35 48 00 0E 0D 44 02 83 20 2A 43 4C 4F 43 4B |K5H...D.. *CLOCK|
00000500: 35 4C 20 42 49 4C 20 43 4C 4F 43 4B 35 4C 00 26 |5L BIL CLOCK5L.&|
00000510: 0D 4E 02 83 20 42 42 43 31 20 50 4F 52 54 2D 43 |.N.. BBC1 PORT-C|
00000520: 20 42 49 54 2D 35 00 38 0D 58 02 83 20 2A 42 49 | BIT-5.8.X.. *BI|
00000530: 54 2D 35 20 52 4F 52 58 00 53 0D 62 02 83 20 2A |T-5 RORX.S.b.. *|
00000540: 43 4C 4F 43 4B 36 48 20 42 49 48 20 43 4C 4F 43 |CLOCK6H BIH CLOC|
00000550: 4B 36 48 00 6E 0D 6C 02 83 20 2A 43 4C 4F 43 4B |K6H.n.l.. *CLOCK|
00000560: 36 4C 20 42 49 4C 20 43 4C 4F 43 4B 36 4C 00 86 |6L BIL CLOCK6L..|
00000570: 0D 76 02 83 20 42 42 43 31 20 50 4F 52 54 2D 43 |.v.. BBC1 PORT-C|
00000580: 20 42 49 54 2D 36 00 98 0D 80 02 83 20 2A 42 49 | BIT-6...... *BI|
00000590: 54 2D 36 20 52 4F 52 58 00 B3 0D 8A 02 83 20 2A |T-6 RORX...... *|
000005A0: 43 4C 4F 43 4B 37 48 20 42 49 48 20 43 4C 4F 43 |CLOCK7H BIH CLOC|
000005B0: 4B 37 48 00 CE 0D 94 02 83 20 2A 43 4C 4F 43 4B |K7H...... *CLOCK|
000005C0: 37 4C 20 42 49 4C 20 43 4C 4F 43 4B 37 4C 00 E6 |7L BIL CLOCK7L..|
000005D0: 0D 9E 02 83 20 42 42 43 31 20 50 4F 52 54 2D 43 |.... BBC1 PORT-C|
000005E0: 20 42 49 54 2D 37 00 F8 0D A8 02 83 20 2A 42 49 | BIT-7...... *BI|
000005F0: 54 2D 37 20 52 4F 52 58 00 13 0E B2 02 83 20 2A |T-7 RORX...... *|
00000600: 43 4C 4F 43 4B 38 48 20 42 49 48 20 43 4C 4F 43 |CLOCK8H BIH CLOC|
00000610: 4B 38 48 00 2E 0E BC 02 83 20 2A 43 4C 4F 43 4B |K8H...... *CLOCK|
00000620: 38 4C 20 42 49 4C 20 43 4C 4F 43 4B 38 4C 00 46 |8L BIL CLOCK8L.F|
00000630: 0E C6 02 83 20 42 42 43 31 20 50 4F 52 54 2D 43 |.... BBC1 PORT-C|
00000640: 20 42 49 54 2D 38 00 58 0E D0 02 83 20 2A 42 49 | BIT-8.X.... *BI|
00000650: 54 2D 38 20 52 4F 52 58 00 6D 0E DA 02 83 20 2A |T-8 RORX.m.... *|
00000660: 42 59 54 45 20 42 49 48 20 42 59 54 45 00 7F 0E |BYTE BIH BYTE...|
00000670: E4 02 83 20 42 53 54 30 20 50 4F 52 54 2D 43 00 |... BST0 PORT-C.|
00000680: 89 0E EE 02 83 20 52 54 53 00 9F 0E F8 02 83 20 |..... RTS...... |
00000690: 2A 44 41 54 41 20 4A 53 52 20 43 48 45 43 4B 00 |*DATA JSR CHECK.|
000006A0: BC 0E 02 03 83 20 2A 42 55 53 59 20 42 42 53 30 |..... *BUSY BBS0|
000006B0: 20 50 4F 52 54 2D 41 20 42 55 53 59 00 CD 0E 0C | PORT-A BUSY....|
000006C0: 03 83 20 53 54 41 20 50 4F 52 54 2D 42 00 DF 0E |.. STA PORT-B...|
000006D0: 16 03 83 20 42 43 4C 33 20 50 4F 52 54 2D 43 00 |... BCL3 PORT-C.|
000006E0: F1 0E 20 03 83 20 42 53 54 33 20 50 4F 52 54 2D |.. .. BST3 PORT-|
000006F0: 43 00 0B 0F 2A 03 83 20 2A 4A 53 52 38 30 20 4A |C...*.. *JSR80 J|
00000700: 53 52 20 47 45 54 2D 42 59 54 45 00 22 0F 34 03 |SR GET-BYTE.".4.|
00000710: 83 20 42 42 53 32 20 50 4F 52 54 2D 43 20 44 41 |. BBS2 PORT-C DA|
00000720: 54 41 00 35 0F 3E 03 83 20 4A 4D 50 20 54 45 53 |TA.5.>.. JMP TES|
00000730: 54 2D 44 45 56 00 44 0F 48 03 83 20 4F 52 47 20 |T-DEV.D.H.. ORG |
00000740: 30 34 30 30 00 52 0F 52 03 83 20 4C 44 41 40 20 |0400.R.R.. LDA@ |
00000750: 30 30 00 62 0F 5C 03 83 20 53 54 41 20 44 44 52 |00.b.\.. STA DDR|
00000760: 2D 41 00 70 0F 66 03 83 20 4C 44 41 40 20 46 46 |-A.p.f.. LDA@ FF|
00000770: 00 80 0F 70 03 83 20 53 54 41 20 44 44 52 2D 42 |...p.. STA DDR-B|
00000780: 00 8B 0F 7A 03 83 20 49 4E 43 41 00 9C 0F 84 03 |...z.. INCA.....|
00000790: 83 20 53 54 41 20 50 4F 52 54 2D 42 00 AA 0F 8E |. STA PORT-B....|
000007A0: 03 83 20 4C 44 41 40 20 30 39 00 BA 0F 98 03 83 |.. LDA@ 09......|
000007B0: 20 53 54 41 20 44 44 52 2D 43 00 C5 0F A2 03 83 | STA DDR-C......|
000007C0: 20 44 45 43 41 00 D6 0F AC 03 83 20 53 54 41 20 | DECA...... STA |
000007D0: 50 4F 52 54 2D 43 00 E9 0F B6 03 83 20 43 4C 52 |PORT-C...... CLR|
000007E0: 20 45 4F 49 2D 46 4C 41 47 00 FC 0F C0 03 83 20 | EOI-FLAG...... |
000007F0: 43 4C 52 20 43 42 4D 2D 46 4C 41 47 00 0F 10 CA |CLR CBM-FLAG....|
00000800: 03 83 20 43 4C 52 20 44 4F 54 2D 46 4C 41 47 00 |.. CLR DOT-FLAG.|
00000810: 21 10 D4 03 83 20 43 4C 52 20 4C 46 2D 46 4C 41 |!.... CLR LF-FLA|
00000820: 47 00 34 10 DE 03 83 20 43 4C 52 20 41 53 43 2E |G.4.... CLR ASC.|
00000830: 46 4C 41 47 00 47 10 E3 03 83 20 43 4C 52 20 46 |FLAG.G.... CLR F|
00000840: 52 5A 2D 46 4C 41 47 00 58 10 E8 03 83 20 4C 44 |RZ-FLAG.X.... LD|
00000850: 41 20 50 4F 52 54 2D 41 00 66 10 F2 03 83 20 45 |A PORT-A.f.... E|
00000860: 4F 52 40 20 46 46 00 70 10 FC 03 83 20 54 41 58 |OR@ FF.p.... TAX|
00000870: 00 7B 10 06 04 83 20 41 53 52 41 00 89 10 10 04 |.{.... ASRA.....|
00000880: 83 20 41 4E 44 40 20 30 33 00 97 10 1A 04 83 20 |. AND@ 03...... |
00000890: 41 44 44 40 20 32 34 00 A7 10 24 04 83 20 53 54 |ADD@ 24...$.. ST|
000008A0: 41 20 44 45 56 2D 23 00 B5 10 2E 04 83 20 4C 44 |A DEV-#...... LD|
000008B0: 41 40 20 44 36 00 C6 10 38 04 83 20 53 54 41 20 |A@ D6...8.. STA |
000008C0: 4F 50 43 4F 44 45 00 D4 10 42 04 83 20 4C 44 41 |OPCODE...B.. LDA|
000008D0: 40 20 30 31 00 E6 10 4C 04 83 20 53 54 41 20 48 |@ 01...L.. STA H|
000008E0: 49 2D 42 59 54 45 00 F8 10 56 04 83 20 43 4C 52 |I-BYTE...V.. CLR|
000008F0: 20 4C 4F 2D 42 59 54 45 00 06 11 60 04 83 20 4C | LO-BYTE...`.. L|
00000900: 44 41 40 20 38 31 00 18 11 6A 04 83 20 53 54 41 |DA@ 81...j.. STA|
00000910: 20 4C 41 42 45 4C 32 33 00 22 11 74 04 83 20 43 | LABEL23.".t.. C|
00000920: 4C 43 00 2C 11 7E 04 83 20 54 58 41 00 37 11 88 |LC.,.~.. TXA.7..|
00000930: 04 83 20 41 53 4C 41 00 49 11 92 04 83 20 42 43 |.. ASLA.I.... BC|
00000940: 43 20 54 45 53 54 2D 4C 46 00 5D 11 9C 04 83 20 |C TEST-LF.].... |
00000950: 42 53 54 37 20 44 4F 54 2D 46 4C 41 47 00 70 11 |BST7 DOT-FLAG.p.|
00000960: A6 04 83 20 2A 54 45 53 54 2D 4C 46 20 43 4C 43 |... *TEST-LF CLC|
00000970: 00 7B 11 B0 04 83 20 41 53 4C 41 00 89 11 BA 04 |.{.... ASLA.....|
00000980: 83 20 42 43 43 20 41 54 4E 00 9C 11 C4 04 83 20 |. BCC ATN...... |
00000990: 42 53 54 37 20 4C 46 2D 46 4C 41 47 00 B7 11 CE |BST7 LF-FLAG....|
000009A0: 04 83 20 2A 41 54 4E 20 42 42 53 32 20 50 4F 52 |.. *ATN BBS2 POR|
000009B0: 54 2D 43 20 41 54 4E 00 CE 11 D8 04 83 20 2A 43 |T-C ATN...... *C|
000009C0: 4C 4F 43 4B 20 42 49 48 20 43 4C 4F 43 4B 00 E1 |LOCK BIH CLOCK..|
000009D0: 11 E2 04 83 20 43 4C 52 20 53 45 43 2E 46 4C 41 |.... CLR SEC.FLA|
000009E0: 47 00 F4 11 EC 04 83 20 43 4C 52 20 24 32 32 2D |G...... CLR $22-|
000009F0: 46 4C 41 47 00 08 12 F6 04 83 20 43 4C 52 20 43 |FLAG...... CLR C|
00000A00: 52 53 52 2D 46 4C 41 47 00 1A 12 00 05 83 20 43 |RSR-FLAG...... C|
00000A10: 4C 52 20 52 45 53 54 4F 52 45 00 2D 12 0A 05 83 |LR RESTORE.-....|
00000A20: 20 43 4C 52 20 41 53 43 2E 46 4C 41 47 00 3F 12 | CLR ASC.FLAG.?.|
00000A30: 14 05 83 20 42 53 54 30 20 50 4F 52 54 2D 43 00 |... BST0 PORT-C.|
00000A40: 52 12 1E 05 83 20 4A 53 52 20 47 45 54 2D 42 59 |R.... JSR GET-BY|
00000A50: 54 45 00 6C 12 28 05 83 20 2A 54 45 53 54 2D 44 |TE.l.(.. *TEST-D|
00000A60: 45 56 20 43 50 58 20 44 45 56 2D 23 00 7D 12 32 |EV CPX DEV-#.}.2|
00000A70: 05 83 20 42 45 51 20 50 4C 55 53 31 33 00 93 12 |.. BEQ PLUS13...|
00000A80: 3C 05 83 20 2A 55 4E 4C 49 53 54 20 43 50 58 40 |<.. *UNLIST CPX@|
00000A90: 20 33 46 00 A2 12 46 05 83 20 42 4E 45 20 41 54 | 3F...F.. BNE AT|
00000AA0: 4E 32 00 BB 12 50 05 83 20 2A 44 41 54 41 4C 20 |N2...P.. *DATAL |
00000AB0: 42 52 41 20 52 45 4C 45 41 53 45 00 D9 12 5A 05 |BRA RELEASE...Z.|
00000AC0: 83 20 2A 41 54 4E 32 20 42 42 43 37 20 45 4F 49 |. *ATN2 BBC7 EOI|
00000AD0: 2D 46 4C 41 47 20 53 4C 52 00 F0 12 64 05 83 20 |-FLAG SLR...d.. |
00000AE0: 2A 52 45 4C 45 41 53 45 20 4C 44 41 40 20 30 45 |*RELEASE LDA@ 0E|
00000AF0: 00 02 13 6E 05 83 20 42 53 54 30 20 50 4F 52 54 |...n.. BST0 PORT|
00000B00: 2D 43 00 12 13 78 05 83 20 2A 54 46 52 20 44 45 |-C...x.. *TFR DE|
00000B10: 43 41 00 20 13 82 05 83 20 42 4E 45 20 54 46 52 |CA. .... BNE TFR|
00000B20: 00 34 13 8C 05 83 20 42 43 4C 37 20 45 4F 49 2D |.4.... BCL7 EOI-|
00000B30: 46 4C 41 47 00 4B 13 96 05 83 20 2A 53 4C 52 20 |FLAG.K.... *SLR |
00000B40: 42 43 4C 30 20 50 4F 52 54 2D 43 00 68 13 A0 05 |BCL0 PORT-C.h...|
00000B50: 83 20 2A 57 41 49 54 20 42 42 43 32 20 50 4F 52 |. *WAIT BBC2 POR|
00000B60: 54 2D 43 20 57 41 49 54 00 76 13 AA 05 83 20 42 |T-C WAIT.v.... B|
00000B70: 52 41 20 41 54 4E 00 91 13 B4 05 83 20 2A 50 4C |RA ATN...... *PL|
00000B80: 55 53 31 33 20 4A 53 52 20 47 45 54 2D 42 59 54 |US13 JSR GET-BYT|
00000B90: 45 00 AC 13 BE 05 83 20 42 42 43 32 20 50 4F 52 |E...... BBC2 POR|
00000BA0: 54 2D 43 20 53 45 43 2E 41 44 52 2E 00 BB 13 C8 |T-C SEC.ADR.....|
00000BB0: 05 83 20 4A 4D 50 20 44 41 54 41 00 D3 13 D2 05 |.. JMP DATA.....|
00000BC0: 83 20 2A 53 45 43 2E 41 44 52 2E 20 43 50 58 40 |. *SEC.ADR. CPX@|
00000BD0: 20 33 46 00 E5 13 DC 05 83 20 42 45 51 20 52 45 | 3F...... BEQ RE|
00000BE0: 4C 45 41 53 45 00 FF 13 DE 05 83 20 42 42 53 37 |LEASE...... BBS7|
00000BF0: 20 46 52 5A 2D 46 4C 41 47 20 53 54 4F 52 45 00 | FRZ-FLAG STORE.|
00000C00: 09 14 E6 05 83 20 54 58 41 00 17 14 F0 05 83 20 |..... TXA...... |
00000C10: 41 4E 44 40 20 30 46 00 25 14 FA 05 83 20 43 4D |AND@ 0F.%.... CM|
00000C20: 50 40 20 30 45 00 38 14 04 06 83 20 42 48 53 20 |P@ 0E.8.... BHS |
00000C30: 41 55 54 4F 46 45 45 44 00 46 14 0E 06 83 20 43 |AUTOFEED.F.... C|
00000C40: 4D 50 40 20 30 31 00 56 14 18 06 83 20 42 45 51 |MP@ 01.V.... BEQ|
00000C50: 20 54 52 55 54 48 00 64 14 22 06 83 20 43 4D 50 | TRUTH.d.".. CMP|
00000C60: 40 20 30 32 00 74 14 2C 06 83 20 42 45 51 20 41 |@ 02.t.,.. BEQ A|
00000C70: 53 43 49 49 00 82 14 2E 06 83 20 43 4D 50 40 20 |SCII...... CMP@ |
00000C80: 30 33 00 93 14 30 06 83 20 42 45 51 20 46 52 45 |03...0.. BEQ FRE|
00000C90: 45 5A 45 00 A1 14 36 06 83 20 43 4D 50 40 20 30 |EZE...6.. CMP@ 0|
00000CA0: 35 00 B1 14 40 06 83 20 42 45 51 20 54 52 55 54 |5...@.. BEQ TRUT|
00000CB0: 48 00 BF 14 4A 06 83 20 43 4D 50 40 20 30 36 00 |H...J.. CMP@ 06.|
00000CC0: CF 14 54 06 83 20 42 45 51 20 54 52 55 54 48 00 |..T.. BEQ TRUTH.|
00000CD0: DD 14 5E 06 83 20 43 4D 50 40 20 30 37 00 ED 14 |..^.. CMP@ 07...|
00000CE0: 68 06 83 20 42 45 51 20 42 55 53 49 4E 00 0B 15 |h.. BEQ BUSIN...|
00000CF0: 72 06 83 20 2A 43 4C 52 2E 53 45 43 2E 20 42 43 |r.. *CLR.SEC. BC|
00000D00: 4C 37 20 53 45 43 2E 46 4C 41 47 00 22 15 7C 06 |L7 SEC.FLAG.".|.|
00000D10: 83 20 2A 53 54 4F 52 45 20 4A 4D 50 20 4A 53 52 |. *STORE JMP JSR|
00000D20: 38 30 00 3A 15 86 06 83 20 2A 41 55 54 4F 46 45 |80.:.... *AUTOFE|
00000D30: 45 44 20 43 4D 50 40 20 30 46 00 48 15 90 06 83 |ED CMP@ 0F.H....|
00000D40: 20 42 4E 45 20 4F 46 46 00 5B 15 9A 06 83 20 42 | BNE OFF.[.... B|
00000D50: 53 54 37 20 4C 46 2D 46 4C 41 47 00 6B 15 A4 06 |ST7 LF-FLAG.k...|
00000D60: 83 20 42 52 41 20 53 54 4F 52 45 00 87 15 A7 06 |. BRA STORE.....|
00000D70: 83 20 2A 46 52 45 45 5A 45 20 42 53 54 37 20 46 |. *FREEZE BST7 F|
00000D80: 52 5A 2D 46 4C 41 47 00 97 15 AA 06 83 20 42 52 |RZ-FLAG...... BR|
00000D90: 41 20 53 54 4F 52 45 00 AF 15 AE 06 83 20 2A 4F |A STORE...... *O|
00000DA0: 46 46 20 42 43 4C 37 20 4C 46 2D 46 4C 41 47 00 |FF BCL7 LF-FLAG.|
00000DB0: BF 15 B8 06 83 20 42 52 41 20 53 54 4F 52 45 00 |..... BRA STORE.|
00000DC0: DA 15 C2 06 83 20 2A 54 52 55 54 48 20 42 53 54 |..... *TRUTH BST|
00000DD0: 37 20 43 42 4D 2D 46 4C 41 47 00 EE 15 CC 06 83 |7 CBM-FLAG......|
00000DE0: 20 42 43 4C 37 20 53 45 43 2E 46 4C 41 47 00 FE | BCL7 SEC.FLAG..|
00000DF0: 15 D6 06 83 20 42 52 41 20 53 54 4F 52 45 00 19 |.... BRA STORE..|
00000E00: 16 E0 06 83 20 2A 42 55 53 49 4E 20 42 53 54 37 |.... *BUSIN BST7|
00000E10: 20 53 45 43 2E 46 4C 41 47 00 2C 16 EA 06 83 20 | SEC.FLAG.,.... |
00000E20: 42 53 54 37 20 52 45 53 54 4F 52 45 00 3C 16 F4 |BST7 RESTORE.<..|
00000E30: 06 83 20 42 52 41 20 53 54 4F 52 45 00 57 16 FE |.. BRA STORE.W..|
00000E40: 06 83 20 2A 41 53 43 49 49 20 42 43 4C 37 20 53 |.. *ASCII BCL7 S|
00000E50: 45 43 2E 46 4C 41 47 00 6A 16 08 07 83 20 42 43 |EC.FLAG.j.... BC|
00000E60: 4C 37 20 52 45 53 54 4F 52 45 00 7E 16 12 07 83 |L7 RESTORE.~....|
00000E70: 20 42 53 54 37 20 41 53 43 2E 46 4C 41 47 00 8E | BST7 ASC.FLAG..|
00000E80: 16 1C 07 83 20 42 52 41 20 53 54 4F 52 45 00 9F |.... BRA STORE..|
00000E90: 16 26 07 83 20 2A 43 48 45 43 4B 20 54 58 41 00 |.&.. *CHECK TXA.|
00000EA0: BB 16 30 07 83 20 42 42 43 37 20 43 42 4D 2D 46 |..0.. BBC7 CBM-F|
00000EB0: 4C 41 47 20 43 48 45 43 4B 2D 32 00 C9 16 3A 07 |LAG CHECK-2...:.|
00000EC0: 83 20 43 4D 50 40 20 30 44 00 D9 16 44 07 83 20 |. CMP@ 0D...D.. |
00000ED0: 42 4E 45 20 50 52 49 4E 54 00 F2 16 4E 07 83 20 |BNE PRINT...N.. |
00000EE0: 42 42 43 37 20 4C 46 2D 46 4C 41 47 20 50 52 49 |BBC7 LF-FLAG PRI|
00000EF0: 4E 54 00 00 17 58 07 83 20 4A 53 52 20 4F 55 54 |NT...X.. JSR OUT|
00000F00: 00 0E 17 62 07 83 20 4C 44 41 40 20 30 41 00 1F |...b.. LDA@ 0A..|
00000F10: 17 6C 07 83 20 2A 50 52 49 4E 54 20 52 54 53 00 |.l.. *PRINT RTS.|
00000F20: 44 17 76 07 83 20 2A 43 48 45 43 4B 2D 32 20 42 |D.v.. *CHECK-2 B|
00000F30: 42 53 37 20 41 53 43 2E 46 4C 41 47 20 41 53 43 |BS7 ASC.FLAG ASC|
00000F40: 49 49 2D 31 00 52 17 80 07 83 20 43 4D 50 40 20 |II-1.R.... CMP@ |
00000F50: 32 32 00 63 17 8A 07 83 20 42 4E 45 20 56 45 52 |22.c.... BNE VER|
00000F60: 44 45 52 00 76 17 94 07 83 20 49 4E 43 20 24 32 |DER.v.... INC $2|
00000F70: 32 2D 46 4C 41 47 00 8C 17 9E 07 83 20 2A 56 45 |2-FLAG...... *VE|
00000F80: 52 44 45 52 20 41 4E 44 40 20 37 46 00 9A 17 A8 |RDER AND@ 7F....|
00000F90: 07 83 20 43 4D 50 40 20 31 46 00 AA 17 B2 07 83 |.. CMP@ 1F......|
00000FA0: 20 42 4C 53 20 43 4F 44 45 53 00 B4 17 BC 07 83 | BLS CODES......|
00000FB0: 20 54 58 41 00 D0 17 C6 07 83 20 42 42 53 37 20 | TXA...... BBS7 |
00000FC0: 53 45 43 2E 46 4C 41 47 20 54 52 41 4E 53 4C 2E |SEC.FLAG TRANSL.|
00000FD0: 00 DE 17 D0 07 83 20 43 4D 50 40 20 35 42 00 F0 |...... CMP@ 5B..|
00000FE0: 17 DA 07 83 20 42 48 53 20 47 52 41 50 48 49 43 |.... BHS GRAPHIC|
00000FF0: 00 FA 17 E4 07 83 20 52 54 53 00 15 18 EE 07 83 |...... RTS......|
00001000: 20 2A 41 53 43 49 49 2D 31 20 4A 4D 50 20 41 53 | *ASCII-1 JMP AS|
00001010: 43 49 49 2D 32 00 2C 18 F8 07 83 20 2A 47 52 41 |CII-2.,.... *GRA|
00001020: 50 48 49 43 20 43 4D 50 40 20 36 30 00 3D 18 02 |PHIC CMP@ 60.=..|
00001030: 08 83 20 42 48 53 20 42 49 54 2D 38 48 00 4B 18 |.. BHS BIT-8H.K.|
00001040: 0C 08 83 20 4C 44 41 40 20 30 33 00 5D 18 16 08 |... LDA@ 03.]...|
00001050: 83 20 53 54 41 20 48 49 2D 42 59 54 45 00 6B 18 |. STA HI-BYTE.k.|
00001060: 20 08 83 20 4C 44 41 40 20 34 30 00 7D 18 2A 08 | .. LDA@ 40.}.*.|
00001070: 83 20 53 54 41 20 4C 4F 2D 42 59 54 45 00 87 18 |. STA LO-BYTE...|
00001080: 34 08 83 20 54 58 41 00 95 18 3E 08 83 20 53 55 |4.. TXA...>.. SU|
00001090: 42 40 20 35 42 00 A7 18 48 08 83 20 53 54 41 20 |B@ 5B...H.. STA |
000010A0: 4C 41 42 45 4C 31 34 00 B2 18 52 08 83 20 41 53 |LABEL14...R.. AS|
000010B0: 4C 41 00 BD 18 5C 08 83 20 41 53 4C 41 00 CF 18 |LA...\.. ASLA...|
000010C0: 66 08 83 20 41 44 44 20 4C 41 42 45 4C 31 34 00 |f.. ADD LABEL14.|
000010D0: E1 18 70 08 83 20 41 44 44 20 4C 41 42 45 4C 31 |..p.. ADD LABEL1|
000010E0: 34 00 F3 18 7A 08 83 20 41 44 44 20 4C 4F 2D 42 |4...z.. ADD LO-B|
000010F0: 59 54 45 00 05 19 84 08 83 20 53 54 41 20 4C 4F |YTE...... STA LO|
00001100: 2D 42 59 54 45 00 18 19 8E 08 83 20 4A 4D 50 20 |-BYTE...... JMP |
00001110: 42 49 54 2D 49 4D 4D 2E 00 2E 19 98 08 83 20 2A |BIT-IMM....... *|
00001120: 42 49 54 2D 38 48 20 43 4D 50 40 20 39 46 00 3F |BIT-8H CMP@ 9F.?|
00001130: 19 A2 08 83 20 42 48 49 20 4D 2E 41 44 52 2E 00 |.... BHI M.ADR..|
00001140: 4D 19 AC 08 83 20 41 44 44 40 20 36 30 00 57 19 |M.... ADD@ 60.W.|
00001150: B6 08 83 20 54 41 58 00 71 19 C0 08 83 20 2A 4D |... TAX.q.... *M|
00001160: 2E 41 44 52 2E 20 43 4C 52 20 4C 4F 2D 42 59 54 |.ADR. CLR LO-BYT|
00001170: 45 00 7F 19 CA 08 83 20 4C 44 41 40 20 30 31 00 |E...... LDA@ 01.|
00001180: 91 19 D4 08 83 20 53 54 41 20 48 49 2D 42 59 54 |..... STA HI-BYT|
00001190: 45 00 A4 19 DE 08 83 20 4A 53 52 20 4D 55 4C 54 |E...... JSR MULT|
000011A0: 49 50 4C 59 00 B7 19 E8 08 83 20 4A 4D 50 20 42 |IPLY...... JMP B|
000011B0: 49 54 2D 49 4D 4D 2E 00 D0 19 F2 08 83 20 2A 43 |IT-IMM....... *C|
000011C0: 4F 44 45 53 20 4A 4D 50 20 43 4F 44 45 53 2D 31 |ODES JMP CODES-1|
000011D0: 00 EC 19 FC 08 83 20 2A 54 52 41 4E 53 4C 2E 20 |...... *TRANSL. |
000011E0: 4A 4D 50 20 42 55 53 49 4E 45 53 53 00 00 1A 06 |JMP BUSINESS....|
000011F0: 09 83 20 2A 4D 55 4C 54 49 50 4C 59 20 54 58 41 |.. *MULTIPLY TXA|
00001200: 00 0E 1A 10 09 83 20 53 55 42 40 20 41 30 00 20 |...... SUB@ A0. |
00001210: 1A 1A 09 83 20 53 54 41 20 4C 41 42 45 4C 31 34 |.... STA LABEL14|
00001220: 00 31 1A 24 09 83 20 2A 4D 55 4C 54 49 20 43 4C |.1.$.. *MULTI CL|
00001230: 43 00 3C 1A 2E 09 83 20 41 53 4C 41 00 4E 1A 38 |C.<.... ASLA.N.8|
00001240: 09 83 20 42 43 43 20 4D 55 4C 54 49 2D 34 00 60 |.. BCC MULTI-4.`|
00001250: 1A 42 09 83 20 49 4E 43 20 48 49 2D 42 59 54 45 |.B.. INC HI-BYTE|
00001260: 00 6A 1A 4C 09 83 20 43 4C 43 00 7E 1A 56 09 83 |.j.L.. CLC.~.V..|
00001270: 20 2A 4D 55 4C 54 49 2D 34 20 41 53 4C 41 00 90 | *MULTI-4 ASLA..|
00001280: 1A 60 09 83 20 42 43 43 20 4D 55 4C 54 49 2D 35 |.`.. BCC MULTI-5|
00001290: 00 A2 1A 6A 09 83 20 49 4E 43 20 48 49 2D 42 59 |...j.. INC HI-BY|
000012A0: 54 45 00 AC 1A 74 09 83 20 43 4C 43 00 C7 1A 7E |TE...t.. CLC...~|
000012B0: 09 83 20 2A 4D 55 4C 54 49 2D 35 20 41 44 43 20 |.. *MULTI-5 ADC |
000012C0: 4C 41 42 45 4C 31 34 00 D5 1A 88 09 83 20 42 43 |LABEL14...... BC|
000012D0: 43 20 53 55 4D 00 E7 1A 92 09 83 20 49 4E 43 20 |C SUM...... INC |
000012E0: 48 49 2D 42 59 54 45 00 F1 1A 9C 09 83 20 43 4C |HI-BYTE...... CL|
000012F0: 43 00 08 1B A6 09 83 20 2A 53 55 4D 20 41 44 43 |C...... *SUM ADC|
00001300: 20 4C 41 42 45 4C 31 34 00 19 1B B0 09 83 20 42 | LABEL14...... B|
00001310: 43 43 20 52 45 53 55 4C 54 00 2B 1B BA 09 83 20 |CC RESULT.+.... |
00001320: 49 4E 43 20 48 49 2D 42 59 54 45 00 35 1B C4 09 |INC HI-BYTE.5...|
00001330: 83 20 43 4C 43 00 4F 1B CE 09 83 20 2A 52 45 53 |. CLC.O.... *RES|
00001340: 55 4C 54 20 53 54 41 20 4C 4F 2D 42 59 54 45 00 |ULT STA LO-BYTE.|
00001350: 59 1B D8 09 83 20 52 54 53 00 75 1B E2 09 83 20 |Y.... RTS.u.... |
00001360: 2A 42 49 54 2D 49 4D 4D 2E 20 4A 53 52 20 44 4F |*BIT-IMM. JSR DO|
00001370: 54 54 45 53 54 00 8B 1B EC 09 83 20 2A 4E 58 54 |TTEST...... *NXT|
00001380: 20 4A 53 52 20 4F 50 43 4F 44 45 00 99 1B F6 09 | JSR OPCODE.....|
00001390: 83 20 4A 53 52 20 4F 55 54 00 A4 1B 00 0A 83 20 |. JSR OUT...... |
000013A0: 49 4E 43 58 00 B2 1B 0A 0A 83 20 43 50 58 40 20 |INCX...... CPX@ |
000013B0: 30 36 00 C0 1B 14 0A 83 20 42 4E 45 20 4E 58 54 |06...... BNE NXT|
000013C0: 00 CB 1B 1E 0A 83 20 43 4C 52 41 00 DD 1B 28 0A |...... CLRA...(.|
000013D0: 83 20 2A 52 45 54 55 52 4E 20 52 53 50 00 ED 1B |. *RETURN RSP...|
000013E0: 32 0A 83 20 4A 4D 50 20 4A 53 52 38 30 00 08 1C |2.. JMP JSR80...|
000013F0: 3C 0A 83 20 2A 4F 55 54 20 42 42 53 30 20 50 4F |<.. *OUT BBS0 PO|
00001400: 52 54 2D 41 20 4F 55 54 00 19 1C 46 0A 83 20 53 |RT-A OUT...F.. S|
00001410: 54 41 20 50 4F 52 54 2D 42 00 2B 1C 50 0A 83 20 |TA PORT-B.+.P.. |
00001420: 42 43 4C 33 20 50 4F 52 54 2D 43 00 3D 1C 5A 0A |BCL3 PORT-C.=.Z.|
00001430: 83 20 42 53 54 33 20 50 4F 52 54 2D 43 00 47 1C |. BST3 PORT-C.G.|
00001440: 64 0A 83 20 52 54 53 00 5F 1C 6E 0A 83 20 2A 42 |d.. RTS._.n.. *B|
00001450: 55 53 49 4E 45 53 53 20 43 4D 50 40 20 35 42 00 |USINESS CMP@ 5B.|
00001460: 71 1C 78 0A 83 20 42 48 53 20 55 50 50 45 52 2D |q.x.. BHS UPPER-|
00001470: 31 00 7F 1C 82 0A 83 20 43 4D 50 40 20 34 31 00 |1...... CMP@ 41.|
00001480: 8F 1C 8C 0A 83 20 42 48 53 20 4C 4F 57 45 52 00 |..... BHS LOWER.|
00001490: 99 1C 96 0A 83 20 52 54 53 00 AE 1C A0 0A 83 20 |..... RTS...... |
000014A0: 2A 4C 4F 57 45 52 20 4F 52 41 40 20 32 30 00 B8 |*LOWER ORA@ 20..|
000014B0: 1C AA 0A 83 20 52 54 53 00 CF 1C B4 0A 83 20 2A |.... RTS...... *|
000014C0: 55 50 50 45 52 2D 31 20 43 4D 50 40 20 36 31 00 |UPPER-1 CMP@ 61.|
000014D0: E1 1C BE 0A 83 20 42 48 53 20 55 50 50 45 52 2D |..... BHS UPPER-|
000014E0: 32 00 EF 1C C8 0A 83 20 53 55 42 40 20 35 42 00 |2...... SUB@ 5B.|
000014F0: 01 1D D2 0A 83 20 53 54 41 20 4C 41 42 45 4C 31 |..... STA LABEL1|
00001500: 34 00 0F 1D DC 0A 83 20 4C 44 41 40 20 30 33 00 |4...... LDA@ 03.|
00001510: 21 1D E6 0A 83 20 53 54 41 20 48 49 2D 42 59 54 |!.... STA HI-BYT|
00001520: 45 00 33 1D F0 0A 83 20 4C 44 41 20 4C 41 42 45 |E.3.... LDA LABE|
00001530: 4C 31 34 00 43 1D FA 0A 83 20 4A 53 52 20 4D 55 |L14.C.... JSR MU|
00001540: 4C 54 49 00 51 1D 04 0B 83 20 41 44 44 40 20 34 |LTI.Q.... ADD@ 4|
00001550: 30 00 63 1D 0E 0B 83 20 53 54 41 20 4C 4F 2D 42 |0.c.... STA LO-B|
00001560: 59 54 45 00 76 1D 18 0B 83 20 4A 4D 50 20 42 49 |YTE.v.... JMP BI|
00001570: 54 2D 49 4D 4D 2E 00 8D 1D 22 0B 83 20 2A 55 50 |T-IMM....".. *UP|
00001580: 50 45 52 2D 32 20 43 4D 50 40 20 37 42 00 9F 1D |PER-2 CMP@ 7B...|
00001590: 2C 0B 83 20 42 48 53 20 47 52 41 50 48 2D 32 00 |,.. BHS GRAPH-2.|
000015A0: AD 1D 36 0B 83 20 41 4E 44 40 20 35 46 00 B7 1D |..6.. AND@ 5F...|
000015B0: 40 0B 83 20 52 54 53 00 CE 1D 4A 0B 83 20 2A 47 |@.. RTS...J.. *G|
000015C0: 52 41 50 48 2D 32 20 43 4D 50 40 20 38 30 00 DF |RAPH-2 CMP@ 80..|
000015D0: 1D 54 0B 83 20 42 48 53 20 4B 41 52 2D 41 39 00 |.T.. BHS KAR-A9.|
000015E0: ED 1D 5E 0B 83 20 53 55 42 40 20 37 42 00 08 1E |..^.. SUB@ 7B...|
000015F0: 68 0B 83 20 2A 47 52 41 50 48 2D 33 20 53 54 41 |h.. *GRAPH-3 STA|
00001600: 20 4C 41 42 45 4C 31 34 00 16 1E 72 0B 83 20 4C | LABEL14...r.. L|
00001610: 44 41 40 20 30 33 00 28 1E 7C 0B 83 20 53 54 41 |DA@ 03.(.|.. STA|
00001620: 20 48 49 2D 42 59 54 45 00 3A 1E 86 0B 83 20 4C | HI-BYTE.:.... L|
00001630: 44 41 20 4C 41 42 45 4C 31 34 00 4A 1E 90 0B 83 |DA LABEL14.J....|
00001640: 20 4A 53 52 20 4D 55 4C 54 49 00 58 1E 9A 0B 83 | JSR MULTI.X....|
00001650: 20 41 44 44 40 20 36 34 00 6A 1E A4 0B 83 20 53 | ADD@ 64.j.... S|
00001660: 54 41 20 4C 4F 2D 42 59 54 45 00 7D 1E AE 0B 83 |TA LO-BYTE.}....|
00001670: 20 4A 4D 50 20 42 49 54 2D 49 4D 4D 2E 00 93 1E | JMP BIT-IMM....|
00001680: B8 0B 83 20 2A 4B 41 52 2D 41 39 20 43 4D 50 40 |... *KAR-A9 CMP@|
00001690: 20 41 39 00 A4 1E C2 0B 83 20 42 4E 45 20 4B 41 | A9...... BNE KA|
000016A0: 52 2D 42 41 00 B2 1E CC 0B 83 20 4C 44 41 40 20 |R-BA...... LDA@ |
000016B0: 30 33 00 C4 1E D6 0B 83 20 53 54 41 20 48 49 2D |03...... STA HI-|
000016C0: 42 59 54 45 00 D2 1E E0 0B 83 20 4C 44 41 40 20 |BYTE...... LDA@ |
000016D0: 38 32 00 E4 1E EA 0B 83 20 53 54 41 20 4C 4F 2D |82...... STA LO-|
000016E0: 42 59 54 45 00 F7 1E F4 0B 83 20 4A 4D 50 20 42 |BYTE...... JMP B|
000016F0: 49 54 2D 49 4D 4D 2E 00 0D 1F FE 0B 83 20 2A 4B |IT-IMM....... *K|
00001700: 41 52 2D 42 41 20 43 4D 50 40 20 42 41 00 1E 1F |AR-BA CMP@ BA...|
00001710: 08 0C 83 20 42 4E 45 20 4B 41 52 2D 46 46 00 2C |... BNE KAR-FF.,|
00001720: 1F 12 0C 83 20 4C 44 41 40 20 30 33 00 3E 1F 1C |.... LDA@ 03.>..|
00001730: 0C 83 20 53 54 41 20 48 49 2D 42 59 54 45 00 4C |.. STA HI-BYTE.L|
00001740: 1F 26 0C 83 20 4C 44 41 40 20 38 38 00 5E 1F 30 |.&.. LDA@ 88.^.0|
00001750: 0C 83 20 53 54 41 20 4C 4F 2D 42 59 54 45 00 71 |.. STA LO-BYTE.q|
00001760: 1F 3A 0C 83 20 4A 4D 50 20 42 49 54 2D 49 4D 4D |.:.. JMP BIT-IMM|
00001770: 2E 00 87 1F 44 0C 83 20 2A 4B 41 52 2D 46 46 20 |....D.. *KAR-FF |
00001780: 43 4D 50 40 20 46 46 00 98 1F 4E 0C 83 20 42 4E |CMP@ FF...N.. BN|
00001790: 45 20 4B 41 52 2D 43 30 00 A6 1F 58 0C 83 20 4C |E KAR-C0...X.. L|
000017A0: 44 41 40 20 30 33 00 B8 1F 62 0C 83 20 53 54 41 |DA@ 03...b.. STA|
000017B0: 20 48 49 2D 42 59 54 45 00 C6 1F 6C 0C 83 20 4C | HI-BYTE...l.. L|
000017C0: 44 41 40 20 37 36 00 D8 1F 76 0C 83 20 53 54 41 |DA@ 76...v.. STA|
000017D0: 20 4C 4F 2D 42 59 54 45 00 EB 1F 80 0C 83 20 4A | LO-BYTE...... J|
000017E0: 4D 50 20 42 49 54 2D 49 4D 4D 2E 00 01 20 8A 0C |MP BIT-IMM... ..|
000017F0: 83 20 2A 4B 41 52 2D 43 30 20 43 4D 50 40 20 43 |. *KAR-C0 CMP@ C|
00001800: 30 00 13 20 94 0C 83 20 42 4E 45 20 47 52 41 50 |0.. ... BNE GRAP|
00001810: 48 2D 34 00 21 20 9E 0C 83 20 4C 44 41 40 20 30 |H-4.! ... LDA@ 0|
00001820: 33 00 33 20 A8 0C 83 20 53 54 41 20 48 49 2D 42 |3.3 ... STA HI-B|
00001830: 59 54 45 00 41 20 B2 0C 83 20 4C 44 41 40 20 35 |YTE.A ... LDA@ 5|
00001840: 45 00 53 20 BC 0C 83 20 53 54 41 20 4C 4F 2D 42 |E.S ... STA LO-B|
00001850: 59 54 45 00 66 20 C6 0C 83 20 4A 4D 50 20 42 49 |YTE.f ... JMP BI|
00001860: 54 2D 49 4D 4D 2E 00 7D 20 D0 0C 83 20 2A 47 52 |T-IMM..} ... *GR|
00001870: 41 50 48 2D 34 20 43 4D 50 40 20 45 30 00 8F 20 |APH-4 CMP@ E0.. |
00001880: DA 0C 83 20 42 48 53 20 47 52 41 50 48 2D 35 00 |... BHS GRAPH-5.|
00001890: 9D 20 E4 0C 83 20 43 4D 50 40 20 43 31 00 AF 20 |. ... CMP@ C1.. |
000018A0: EE 0C 83 20 42 48 53 20 55 50 50 45 52 2D 33 00 |... BHS UPPER-3.|
000018B0: C0 20 F8 0C 83 20 4A 4D 50 20 4D 2E 41 44 52 2E |. ... JMP M.ADR.|
000018C0: 00 D7 20 02 0D 83 20 2A 47 52 41 50 48 2D 35 20 |.. ... *GRAPH-5 |
000018D0: 41 4E 44 40 20 42 46 00 E8 20 0C 0D 83 20 4A 4D |AND@ BF.. ... JM|
000018E0: 50 20 4B 41 52 2D 41 39 00 FF 20 16 0D 83 20 2A |P KAR-A9.. ... *|
000018F0: 55 50 50 45 52 2D 33 20 43 4D 50 40 20 44 42 00 |UPPER-3 CMP@ DB.|
00001900: 11 21 20 0D 83 20 42 48 53 20 47 52 41 50 48 2D |.! .. BHS GRAPH-|
00001910: 36 00 1F 21 2A 0D 83 20 41 4E 44 40 20 37 46 00 |6..!*.. AND@ 7F.|
00001920: 29 21 34 0D 83 20 52 54 53 00 40 21 3E 0D 83 20 |)!4.. RTS.@!>.. |
00001930: 2A 47 52 41 50 48 2D 36 20 53 55 42 40 20 44 42 |*GRAPH-6 SUB@ DB|
00001940: 00 52 21 48 0D 83 20 4A 4D 50 20 47 52 41 50 48 |.R!H.. JMP GRAPH|
00001950: 2D 33 00 65 21 52 0D 83 20 2A 43 4F 44 45 53 2D |-3.e!R.. *CODES-|
00001960: 31 20 54 58 41 00 73 21 5C 0D 83 20 43 4D 50 40 |1 TXA.s!\.. CMP@|
00001970: 20 30 44 00 85 21 66 0D 83 20 42 4E 45 20 43 4F | 0D..!f.. BNE CO|
00001980: 44 45 53 2D 32 00 9F 21 70 0D 83 20 42 42 43 37 |DES-2..!p.. BBC7|
00001990: 20 43 52 53 52 2D 46 4C 41 47 20 43 52 2D 31 00 | CRSR-FLAG CR-1.|
000019A0: B1 21 7A 0D 83 20 4C 44 41 20 52 45 53 54 4F 52 |.!z.. LDA RESTOR|
000019B0: 45 00 C4 21 84 0D 83 20 53 54 41 20 53 45 43 2E |E..!... STA SEC.|
000019C0: 46 4C 41 47 00 D8 21 8E 0D 83 20 43 4C 52 20 43 |FLAG..!... CLR C|
000019D0: 52 53 52 2D 46 4C 41 47 00 F4 21 98 0D 83 20 2A |RSR-FLAG..!... *|
000019E0: 43 52 2D 31 20 42 42 53 37 20 4C 46 2D 46 4C 41 |CR-1 BBS7 LF-FLA|
000019F0: 47 20 4C 46 00 07 22 A2 0D 83 20 43 4C 52 20 24 |G LF.."... CLR $|
00001A00: 32 32 2D 46 4C 41 47 00 11 22 AC 0D 83 20 52 54 |22-FLAG.."... RT|
00001A10: 53 00 23 22 B6 0D 83 20 2A 4C 46 20 4A 53 52 20 |S.#"... *LF JSR |
00001A20: 4F 55 54 00 36 22 C0 0D 83 20 43 4C 52 20 24 32 |OUT.6"... CLR $2|
00001A30: 32 2D 46 4C 41 47 00 44 22 CA 0D 83 20 4C 44 41 |2-FLAG.D"... LDA|
00001A40: 40 20 30 41 00 4E 22 D4 0D 83 20 52 54 53 00 65 |@ 0A.N"... RTS.e|
00001A50: 22 DE 0D 83 20 2A 43 4F 44 45 53 2D 32 20 43 4D |"... *CODES-2 CM|
00001A60: 50 40 20 31 31 00 77 22 E8 0D 83 20 42 45 51 20 |P@ 11.w"... BEQ |
00001A70: 43 4F 44 45 53 2D 33 00 85 22 F2 0D 83 20 43 4D |CODES-3.."... CM|
00001A80: 50 40 20 39 31 00 97 22 FC 0D 83 20 42 45 51 20 |P@ 91.."... BEQ |
00001A90: 43 4F 44 45 53 2D 34 00 A5 22 06 0E 83 20 43 4D |CODES-4.."... CM|
00001AA0: 50 40 20 31 32 00 B7 22 10 0E 83 20 42 45 51 20 |P@ 12.."... BEQ |
00001AB0: 43 4F 44 45 53 2D 35 00 C5 22 1A 0E 83 20 43 4D |CODES-5.."... CM|
00001AC0: 50 40 20 31 33 00 D7 22 24 0E 83 20 42 45 51 20 |P@ 13.."$.. BEQ |
00001AD0: 43 4F 44 45 53 2D 36 00 E5 22 2E 0E 83 20 43 4D |CODES-6.."... CM|
00001AE0: 50 40 20 30 45 00 F7 22 38 0E 83 20 42 45 51 20 |P@ 0E.."8.. BEQ |
00001AF0: 43 4F 44 45 53 2D 37 00 05 23 42 0E 83 20 43 4D |CODES-7..#B.. CM|
00001B00: 50 40 20 30 46 00 17 23 4C 0E 83 20 42 45 51 20 |P@ 0F..#L.. BEQ |
00001B10: 43 4F 44 45 53 2D 38 00 29 23 56 0E 83 20 42 4E |CODES-8.)#V.. BN|
00001B20: 45 20 43 4F 44 45 53 2D 39 00 4E 23 60 0E 83 20 |E CODES-9.N#`.. |
00001B30: 2A 43 4F 44 45 53 2D 33 20 42 42 53 30 20 24 32 |*CODES-3 BBS0 $2|
00001B40: 32 2D 46 4C 41 47 20 50 52 49 4E 54 2D 44 00 62 |2-FLAG PRINT-D.b|
00001B50: 23 6A 0E 83 20 42 53 54 37 20 53 45 43 2E 46 4C |#j.. BST7 SEC.FL|
00001B60: 41 47 00 77 23 74 0E 83 20 42 53 54 37 20 43 52 |AG.w#t.. BST7 CR|
00001B70: 53 52 2D 46 4C 41 47 00 88 23 7E 0E 83 20 4A 4D |SR-FLAG..#~.. JM|
00001B80: 50 20 52 45 54 55 52 4E 00 AD 23 88 0E 83 20 2A |P RETURN..#... *|
00001B90: 43 4F 44 45 53 2D 34 20 42 42 53 30 20 24 32 32 |CODES-4 BBS0 $22|
00001BA0: 2D 46 4C 41 47 20 43 4F 44 45 53 2D 39 00 C1 23 |-FLAG CODES-9..#|
00001BB0: 92 0E 83 20 42 43 4C 37 20 53 45 43 2E 46 4C 41 |... BCL7 SEC.FLA|
00001BC0: 47 00 D6 23 9C 0E 83 20 42 53 54 37 20 43 52 53 |G..#... BST7 CRS|
00001BD0: 52 2D 46 4C 41 47 00 E7 23 A6 0E 83 20 4A 4D 50 |R-FLAG..#... JMP|
00001BE0: 20 52 45 54 55 52 4E 00 0C 24 B0 0E 83 20 2A 43 | RETURN..$... *C|
00001BF0: 4F 44 45 53 2D 35 20 42 42 53 30 20 24 32 32 2D |ODES-5 BBS0 $22-|
00001C00: 46 4C 41 47 20 50 52 49 4E 54 2D 52 00 1D 24 BA |FLAG PRINT-R..$.|
00001C10: 0E 83 20 4A 4D 50 20 52 45 54 55 52 4E 00 42 24 |.. JMP RETURN.B$|
00001C20: C4 0E 83 20 2A 43 4F 44 45 53 2D 36 20 42 42 53 |... *CODES-6 BBS|
00001C30: 30 20 24 32 32 2D 46 4C 41 47 20 50 52 49 4E 54 |0 $22-FLAG PRINT|
00001C40: 2D 53 00 53 24 CE 0E 83 20 4A 4D 50 20 52 45 54 |-S.S$... JMP RET|
00001C50: 55 52 4E 00 6A 24 D8 0E 83 20 2A 50 52 49 4E 54 |URN.j$... *PRINT|
00001C60: 2D 44 20 4C 44 41 40 20 38 45 00 7C 24 E2 0E 83 |-D LDA@ 8E.|$...|
00001C70: 20 53 54 41 20 4C 4F 2D 42 59 54 45 00 93 24 EC | STA LO-BYTE..$.|
00001C80: 0E 83 20 2A 50 52 2D 43 4F 44 45 20 4C 44 41 40 |.. *PR-CODE LDA@|
00001C90: 20 30 33 00 A5 24 F6 0E 83 20 53 54 41 20 48 49 | 03..$... STA HI|
00001CA0: 2D 42 59 54 45 00 B8 24 00 0F 83 20 4A 4D 50 20 |-BYTE..$... JMP |
00001CB0: 42 49 54 2D 49 4D 4D 2E 00 CF 24 0A 0F 83 20 2A |BIT-IMM...$... *|
00001CC0: 50 52 49 4E 54 2D 52 20 4C 44 41 40 20 39 34 00 |PRINT-R LDA@ 94.|
00001CD0: E1 24 14 0F 83 20 53 54 41 20 4C 4F 2D 42 59 54 |.$... STA LO-BYT|
00001CE0: 45 00 F3 24 1E 0F 83 20 42 52 41 20 50 52 2D 43 |E..$... BRA PR-C|
00001CF0: 4F 44 45 00 0A 25 28 0F 83 20 2A 50 52 49 4E 54 |ODE..%(.. *PRINT|
00001D00: 2D 53 20 4C 44 41 40 20 39 41 00 1C 25 32 0F 83 |-S LDA@ 9A..%2..|
00001D10: 20 53 54 41 20 4C 4F 2D 42 59 54 45 00 2E 25 3C | STA LO-BYTE..%<|
00001D20: 0F 83 20 42 52 41 20 50 52 2D 43 4F 44 45 00 53 |.. BRA PR-CODE.S|
00001D30: 25 46 0F 83 20 2A 43 4F 44 45 53 2D 37 20 42 42 |%F.. *CODES-7 BB|
00001D40: 53 30 20 24 32 32 2D 46 4C 41 47 20 43 4F 44 45 |S0 $22-FLAG CODE|
00001D50: 53 2D 39 00 61 25 50 0F 83 20 4C 44 41 40 20 31 |S-9.a%P.. LDA@ 1|
00001D60: 42 00 6F 25 5A 0F 83 20 4A 53 52 20 4F 55 54 00 |B.o%Z.. JSR OUT.|
00001D70: 7D 25 64 0F 83 20 4C 44 41 40 20 35 37 00 8B 25 |}%d.. LDA@ 57..%|
00001D80: 6E 0F 83 20 4A 53 52 20 4F 55 54 00 99 25 78 0F |n.. JSR OUT..%x.|
00001D90: 83 20 4C 44 41 40 20 30 31 00 A7 25 82 0F 83 20 |. LDA@ 01..%... |
00001DA0: 4A 53 52 20 4F 55 54 00 B8 25 8C 0F 83 20 4A 4D |JSR OUT..%... JM|
00001DB0: 50 20 52 45 54 55 52 4E 00 DD 25 96 0F 83 20 2A |P RETURN..%... *|
00001DC0: 43 4F 44 45 53 2D 38 20 42 42 53 30 20 24 32 32 |CODES-8 BBS0 $22|
00001DD0: 2D 46 4C 41 47 20 43 4F 44 45 53 2D 39 00 EB 25 |-FLAG CODES-9..%|
00001DE0: A0 0F 83 20 4C 44 41 40 20 31 42 00 F9 25 AA 0F |... LDA@ 1B..%..|
00001DF0: 83 20 4A 53 52 20 4F 55 54 00 07 26 B4 0F 83 20 |. JSR OUT..&... |
00001E00: 4C 44 41 40 20 35 37 00 15 26 BE 0F 83 20 4A 53 |LDA@ 57..&... JS|
00001E10: 52 20 4F 55 54 00 23 26 C8 0F 83 20 4C 44 41 40 |R OUT.#&... LDA@|
00001E20: 20 30 30 00 31 26 D2 0F 83 20 4A 53 52 20 4F 55 | 00.1&... JSR OU|
00001E30: 54 00 42 26 DC 0F 83 20 4A 4D 50 20 52 45 54 55 |T.B&... JMP RETU|
00001E40: 52 4E 00 63 26 E6 0F 83 20 2A 43 4F 44 45 53 2D |RN.c&... *CODES-|
00001E50: 39 20 42 42 53 30 20 24 32 32 2D 46 4C 41 47 20 |9 BBS0 $22-FLAG |
00001E60: 45 4E 44 00 71 26 F0 0F 83 20 43 4D 50 40 20 31 |END.q&... CMP@ 1|
00001E70: 30 00 82 26 FA 0F 83 20 42 45 51 20 43 48 52 24 |0..&... BEQ CHR$|
00001E80: 31 36 00 90 26 04 10 83 20 43 4D 50 40 20 30 38 |16..&... CMP@ 08|
00001E90: 00 A1 26 0E 10 83 20 42 45 51 20 43 48 52 24 32 |..&... BEQ CHR$2|
00001EA0: 36 00 AB 26 18 10 83 20 52 54 53 00 C6 26 22 10 |6..&... RTS..&".|
00001EB0: 83 20 2A 43 48 52 24 32 36 20 4A 53 52 20 47 45 |. *CHR$26 JSR GE|
00001EC0: 54 2D 42 59 54 45 00 D0 26 2C 10 83 20 54 58 41 |T-BYTE..&,.. TXA|
00001ED0: 00 DE 26 36 10 83 20 43 4D 50 40 20 31 41 00 EF |..&6.. CMP@ 1A..|
00001EE0: 26 40 10 83 20 42 45 51 20 52 45 50 45 41 44 00 |&@.. BEQ REPEAD.|
00001EF0: F9 26 4A 10 83 20 52 54 53 00 15 27 54 10 83 20 |.&J.. RTS..'T.. |
00001F00: 2A 52 45 50 45 41 44 20 4A 4D 50 20 52 45 50 2D |*REPEAD JMP REP-|
00001F10: 43 48 41 52 2E 00 2F 27 5E 10 83 20 2A 43 48 52 |CHAR../'^.. *CHR|
00001F20: 24 31 36 20 4A 4D 50 20 53 45 54 2D 54 41 50 00 |$16 JMP SET-TAP.|
00001F30: 42 27 68 10 83 20 2A 45 4E 44 20 41 44 44 40 20 |B'h.. *END ADD@ |
00001F40: 34 30 00 4C 27 72 10 83 20 54 41 58 00 5A 27 7C |40.L'r.. TAX.Z'||
00001F50: 10 83 20 43 4D 50 40 20 34 35 00 6C 27 86 10 83 |.. CMP@ 45.l'...|
00001F60: 20 42 4E 45 20 48 4F 47 45 52 2D 31 00 7A 27 90 | BNE HOGER-1.z'.|
00001F70: 10 83 20 4C 44 41 40 20 41 30 00 8C 27 9A 10 83 |.. LDA@ A0..'...|
00001F80: 20 53 54 41 20 4C 4F 2D 42 59 54 45 00 9A 27 A4 | STA LO-BYTE..'.|
00001F90: 10 83 20 4C 44 41 40 20 30 33 00 AC 27 AE 10 83 |.. LDA@ 03..'...|
00001FA0: 20 53 54 41 20 48 49 2D 42 59 54 45 00 BF 27 B8 | STA HI-BYTE..'.|
00001FB0: 10 83 20 4A 4D 50 20 42 49 54 2D 49 4D 4D 2E 00 |.. JMP BIT-IMM..|
00001FC0: D6 27 C2 10 83 20 2A 48 4F 47 45 52 2D 31 20 43 |.'... *HOGER-1 C|
00001FD0: 4D 50 40 20 38 30 00 E8 27 CC 10 83 20 42 48 53 |MP@ 80..'... BHS|
00001FE0: 20 48 4F 47 45 52 2D 32 00 F6 27 D6 10 83 20 4C | HOGER-2..'... L|
00001FF0: 44 41 40 20 30 33 00 08 28 E0 10 83 20 53 54 41 |DA@ 03..(... STA|
00002000: 20 48 49 2D 42 59 54 45 00 12 28 EA 10 83 20 54 | HI-BYTE..(... T|
00002010: 58 41 00 20 28 F4 10 83 20 53 55 42 40 20 35 42 |XA. (... SUB@ 5B|
00002020: 00 32 28 FE 10 83 20 53 54 41 20 4C 41 42 45 4C |.2(... STA LABEL|
00002030: 31 34 00 42 28 08 11 83 20 4A 53 52 20 4D 55 4C |14.B(... JSR MUL|
00002040: 54 49 00 50 28 12 11 83 20 41 44 44 40 20 34 30 |TI.P(... ADD@ 40|
00002050: 00 62 28 1C 11 83 20 53 54 41 20 4C 4F 2D 42 59 |.b(... STA LO-BY|
00002060: 54 45 00 75 28 26 11 83 20 4A 4D 50 20 42 49 54 |TE.u(&.. JMP BIT|
00002070: 2D 52 45 56 2E 00 90 28 30 11 83 20 2A 48 4F 47 |-REV...(0.. *HOG|
00002080: 45 52 2D 32 20 43 4C 52 20 4C 4F 2D 42 59 54 45 |ER-2 CLR LO-BYTE|
00002090: 00 9E 28 3A 11 83 20 4C 44 41 40 20 30 31 00 B0 |..(:.. LDA@ 01..|
000020A0: 28 44 11 83 20 53 54 41 20 48 49 2D 42 59 54 45 |(D.. STA HI-BYTE|
000020B0: 00 C3 28 4E 11 83 20 4A 53 52 20 4D 55 4C 54 49 |..(N.. JSR MULTI|
000020C0: 50 4C 59 00 DF 28 58 11 83 20 2A 42 49 54 2D 52 |PLY..(X.. *BIT-R|
000020D0: 45 56 2E 20 4A 53 52 20 44 4F 54 54 45 53 54 00 |EV. JSR DOTTEST.|
000020E0: F7 28 62 11 83 20 2A 47 4F 2D 4F 4E 20 4A 53 52 |.(b.. *GO-ON JSR|
000020F0: 20 4F 50 43 4F 44 45 00 05 29 6C 11 83 20 45 4F | OPCODE..)l.. EO|
00002100: 52 40 20 46 45 00 13 29 76 11 83 20 4A 53 52 20 |R@ FE..)v.. JSR |
00002110: 4F 55 54 00 1E 29 80 11 83 20 49 4E 43 58 00 2C |OUT..)... INCX.,|
00002120: 29 8A 11 83 20 43 50 58 40 20 30 36 00 3C 29 94 |)... CPX@ 06.<).|
00002130: 11 83 20 42 4E 45 20 47 4F 2D 4F 4E 00 47 29 9E |.. BNE GO-ON.G).|
00002140: 11 83 20 43 4C 52 41 00 51 29 A8 11 83 20 52 53 |.. CLRA.Q)... RS|
00002150: 50 00 61 29 B2 11 83 20 4A 4D 50 20 4A 53 52 38 |P.a)... JMP JSR8|
00002160: 30 00 82 29 BC 11 83 20 2A 44 4F 54 54 45 53 54 |0..)... *DOTTEST|
00002170: 20 42 42 53 37 20 44 4F 54 2D 46 4C 41 47 20 49 | BBS7 DOT-FLAG I|
00002180: 42 4D 00 90 29 C6 11 83 20 4C 44 41 40 20 31 42 |BM..)... LDA@ 1B|
00002190: 00 9E 29 D0 11 83 20 4A 53 52 20 4F 55 54 00 AC |..)... JSR OUT..|
000021A0: 29 DA 11 83 20 4C 44 41 40 20 34 42 00 BA 29 E4 |)... LDA@ 4B..).|
000021B0: 11 83 20 4A 53 52 20 4F 55 54 00 C8 29 EE 11 83 |.. JSR OUT..)...|
000021C0: 20 4C 44 41 40 20 30 36 00 D6 29 F8 11 83 20 4A | LDA@ 06..)... J|
000021D0: 53 52 20 4F 55 54 00 E1 29 02 12 83 20 43 4C 52 |SR OUT..)... CLR|
000021E0: 58 00 EC 29 0C 12 83 20 43 4C 52 41 00 FA 29 16 |X..)... CLRA..).|
000021F0: 12 83 20 4A 53 52 20 4F 55 54 00 04 2A 20 12 83 |.. JSR OUT..* ..|
00002200: 20 52 54 53 00 17 2A 2A 12 83 20 2A 49 42 4D 20 | RTS..**.. *IBM |
00002210: 4C 44 41 40 20 31 42 00 25 2A 34 12 83 20 4A 53 |LDA@ 1B.%*4.. JS|
00002220: 52 20 4F 55 54 00 33 2A 3E 12 83 20 4C 44 41 40 |R OUT.3*>.. LDA@|
00002230: 20 32 41 00 41 2A 48 12 83 20 4A 53 52 20 4F 55 | 2A.A*H.. JSR OU|
00002240: 54 00 4F 2A 52 12 83 20 4C 44 41 40 20 30 30 00 |T.O*R.. LDA@ 00.|
00002250: 5D 2A 5C 12 83 20 4A 53 52 20 4F 55 54 00 6B 2A |]*\.. JSR OUT.k*|
00002260: 66 12 83 20 4C 44 41 40 20 30 36 00 79 2A 70 12 |f.. LDA@ 06.y*p.|
00002270: 83 20 4A 53 52 20 4F 55 54 00 84 2A 7A 12 83 20 |. JSR OUT..*z.. |
00002280: 43 4C 52 58 00 8F 2A 84 12 83 20 43 4C 52 41 00 |CLRX..*... CLRA.|
00002290: 9D 2A 8E 12 83 20 4A 53 52 20 4F 55 54 00 A7 2A |.*... JSR OUT..*|
000022A0: 98 12 83 20 52 54 53 00 B6 2A A2 12 83 20 4F 52 |... RTS..*... OR|
000022B0: 47 20 30 33 41 38 00 CD 2A AC 12 83 20 2A 53 45 |G 03A8..*... *SE|
000022C0: 54 2D 54 41 50 20 4C 44 41 40 20 31 42 00 DB 2A |T-TAP LDA@ 1B..*|
000022D0: B6 12 83 20 4A 53 52 20 4F 55 54 00 E9 2A C0 12 |... JSR OUT..*..|
000022E0: 83 20 4C 44 41 40 20 34 34 00 F7 2A CA 12 83 20 |. LDA@ 44..*... |
000022F0: 4A 53 52 20 4F 55 54 00 0A 2B D4 12 83 20 4A 53 |JSR OUT..+... JS|
00002300: 52 20 47 45 54 2D 42 59 54 45 00 14 2B DE 12 83 |R GET-BYTE..+...|
00002310: 20 54 58 41 00 22 2B E8 12 83 20 41 4E 44 40 20 | TXA."+... AND@ |
00002320: 30 46 00 2D 2B F2 12 83 20 41 53 4C 41 00 3F 2B |0F.-+... ASLA.?+|
00002330: FC 12 83 20 53 54 41 20 4C 41 42 45 4C 31 34 00 |... STA LABEL14.|
00002340: 4A 2B 06 13 83 20 41 53 4C 41 00 55 2B 10 13 83 |J+... ASLA.U+...|
00002350: 20 41 53 4C 41 00 67 2B 1A 13 83 20 41 44 44 20 | ASLA.g+... ADD |
00002360: 4C 41 42 45 4C 31 34 00 79 2B 24 13 83 20 53 54 |LABEL14.y+$.. ST|
00002370: 41 20 4C 41 42 45 4C 31 34 00 8C 2B 2E 13 83 20 |A LABEL14..+... |
00002380: 4A 53 52 20 47 45 54 2D 42 59 54 45 00 96 2B 38 |JSR GET-BYTE..+8|
00002390: 13 83 20 54 58 41 00 A4 2B 42 13 83 20 41 4E 44 |.. TXA..+B.. AND|
000023A0: 40 20 30 46 00 B6 2B 4C 13 83 20 41 44 44 20 4C |@ 0F..+L.. ADD L|
000023B0: 41 42 45 4C 31 34 00 C4 2B 56 13 83 20 4A 53 52 |ABEL14..+V.. JSR|
000023C0: 20 4F 55 54 00 D2 2B 60 13 83 20 4C 44 41 40 20 | OUT..+`.. LDA@ |
000023D0: 30 30 00 E0 2B 6A 13 83 20 4A 53 52 20 4F 55 54 |00..+j.. JSR OUT|
000023E0: 00 EE 2B 74 13 83 20 4C 44 41 40 20 30 39 00 FC |..+t.. LDA@ 09..|
000023F0: 2B 7E 13 83 20 4A 53 52 20 4F 55 54 00 0D 2C 88 |+~.. JSR OUT..,.|
00002400: 13 83 20 4A 4D 50 20 52 45 54 55 52 4E 00 1C 2C |.. JMP RETURN..,|
00002410: 92 13 83 20 4F 52 47 20 30 33 44 38 00 33 2C 9C |... ORG 03D8.3,.|
00002420: 13 83 20 2A 41 53 43 49 49 2D 32 20 43 4D 50 40 |.. *ASCII-2 CMP@|
00002430: 20 39 46 00 44 2C 9F 13 83 20 42 4C 53 20 43 4D | 9F.D,... BLS CM|
00002440: 50 2D 30 44 00 52 2C A2 13 83 20 41 4E 44 40 20 |P-0D.R,... AND@ |
00002450: 37 46 00 68 2C A6 13 83 20 2A 43 4D 50 2D 30 44 |7F.h,... *CMP-0D|
00002460: 20 43 4D 50 40 20 30 44 00 79 2C B0 13 83 20 42 | CMP@ 0D.y,... B|
00002470: 45 51 20 41 53 43 2D 4C 46 00 87 2C BA 13 83 20 |EQ ASC-LF..,... |
00002480: 43 4D 50 40 20 36 30 00 99 2C C4 13 83 20 42 48 |CMP@ 60..,... BH|
00002490: 53 20 41 53 43 2E 4C 4F 57 00 A7 2C CE 13 83 20 |S ASC.LOW..,... |
000024A0: 43 4D 50 40 20 34 30 00 B8 2C D8 13 83 20 42 48 |CMP@ 40..,... BH|
000024B0: 53 20 41 53 43 2E 55 50 00 CB 2C E2 13 83 20 2A |S ASC.UP..,... *|
000024C0: 50 52 49 4E 54 45 4E 20 52 54 53 00 E2 2C EC 13 |PRINTEN RTS..,..|
000024D0: 83 20 2A 41 53 43 2E 4C 4F 57 20 41 4E 44 40 20 |. *ASC.LOW AND@ |
000024E0: 35 46 00 F4 2C F6 13 83 20 42 52 41 20 50 52 49 |5F..,... BRA PRI|
000024F0: 4E 54 45 4E 00 0A 2D 00 14 83 20 2A 41 53 43 2E |NTEN..-... *ASC.|
00002500: 55 50 20 4F 52 41 40 20 32 30 00 1C 2D 0A 14 83 |UP ORA@ 20..-...|
00002510: 20 42 52 41 20 50 52 49 4E 54 45 4E 00 3F 2D 14 | BRA PRINTEN.?-.|
00002520: 14 83 20 2A 41 53 43 2D 4C 46 20 42 42 43 37 20 |.. *ASC-LF BBC7 |
00002530: 4C 46 2D 46 4C 41 47 20 50 52 49 4E 54 45 4E 00 |LF-FLAG PRINTEN.|
00002540: 4D 2D 1E 14 83 20 4A 53 52 20 4F 55 54 00 5B 2D |M-... JSR OUT.[-|
00002550: 28 14 83 20 4C 44 41 40 20 30 41 00 65 2D 32 14 |(.. LDA@ 0A.e-2.|
00002560: 83 20 52 54 53 00 74 2D 3C 14 83 20 4F 52 47 20 |. RTS.t-<.. ORG |
00002570: 30 37 33 38 00 8D 2D 46 14 83 20 2A 52 45 50 2D |0738..-F.. *REP-|
00002580: 43 48 41 52 2E 20 4C 44 41 40 20 31 42 00 9B 2D |CHAR. LDA@ 1B..-|
00002590: 50 14 83 20 4A 53 52 20 4F 55 54 00 B5 2D 5A 14 |P.. JSR OUT..-Z.|
000025A0: 83 20 42 42 53 37 20 44 4F 54 2D 46 4C 41 47 20 |. BBS7 DOT-FLAG |
000025B0: 49 42 4D 2D 32 00 C3 2D 64 14 83 20 4C 44 41 40 |IBM-2..-d.. LDA@|
000025C0: 20 34 42 00 D1 2D 6E 14 83 20 4A 53 52 20 4F 55 | 4B..-n.. JSR OU|
000025D0: 54 00 E1 2D 78 14 83 20 42 52 41 20 52 45 50 2D |T..-x.. BRA REP-|
000025E0: 32 00 F6 2D 82 14 83 20 2A 49 42 4D 2D 32 20 4C |2..-... *IBM-2 L|
000025F0: 44 41 40 20 32 41 00 04 2E 8C 14 83 20 4A 53 52 |DA@ 2A...... JSR|
00002600: 20 4F 55 54 00 12 2E 96 14 83 20 4C 44 41 40 20 | OUT...... LDA@ |
00002610: 30 30 00 20 2E A0 14 83 20 4A 53 52 20 4F 55 54 |00. .... JSR OUT|
00002620: 00 3A 2E AA 14 83 20 2A 52 45 50 2D 32 20 4A 53 |.:.... *REP-2 JS|
00002630: 52 20 47 45 54 2D 42 59 54 45 00 44 2E B4 14 83 |R GET-BYTE.D....|
00002640: 20 54 58 41 00 56 2E BE 14 83 20 53 54 41 20 4C | TXA.V.... STA L|
00002650: 41 42 45 4C 31 34 00 64 2E C8 14 83 20 4A 53 52 |ABEL14.d.... JSR|
00002660: 20 4F 55 54 00 72 2E D2 14 83 20 4C 44 41 40 20 | OUT.r.... LDA@ |
00002670: 30 30 00 80 2E DC 14 83 20 4A 53 52 20 4F 55 54 |00...... JSR OUT|
00002680: 00 93 2E E6 14 83 20 4A 53 52 20 47 45 54 2D 42 |...... JSR GET-B|
00002690: 59 54 45 00 9D 2E F0 14 83 20 54 58 41 00 AF 2E |YTE...... TXA...|
000026A0: FA 14 83 20 4C 44 58 20 4C 41 42 45 4C 31 34 00 |... LDX LABEL14.|
000026B0: C4 2E 04 15 83 20 2A 52 45 50 2D 33 20 4A 53 52 |..... *REP-3 JSR|
000026C0: 20 4F 55 54 00 CF 2E 0E 15 83 20 44 45 43 58 00 | OUT...... DECX.|
000026D0: DF 2E 18 15 83 20 42 4E 45 20 52 45 50 2D 33 00 |..... BNE REP-3.|
000026E0: F0 2E 22 15 83 20 4A 4D 50 20 52 45 54 55 52 4E |..".. JMP RETURN|
000026F0: 00 12 2F 2C 15 8F 20 35 35 30 20 53 54 41 54 45 |../,.. 550 STATE|
00002700: 4D 45 4E 54 53 20 2D 20 31 34 38 20 4C 41 42 45 |MENTS - 148 LABE|
00002710: 4C 53 00 3F 2F 10 27 99 22 93 22 3A 99 22 41 53 |LS.?/.'.".":."AS|
00002720: 53 45 4D 42 4C 45 52 20 46 4F 52 20 4D 4F 54 4F |SEMBLER FOR MOTO|
00002730: 52 4F 4C 41 20 4D 43 36 38 37 30 35 22 3A 99 00 |ROLA MC68705":..|
00002740: 52 2F 1A 27 9F 34 2C 34 3A 97 35 36 2C 31 34 34 |R/.'.4,4:.56,144|
00002750: 3A 9C 00 6E 2F 24 27 99 22 45 56 45 4E 20 47 45 |:..n/$'."EVEN GE|
00002760: 44 55 4C 44 20 41 2E 55 2E 42 2E 22 3A 99 00 8D |DULD A.U.B.":...|
00002770: 2F 2E 27 81 20 43 4C B2 33 36 38 36 34 20 A4 20 |/.'. CL.36864 . |
00002780: 33 38 39 31 32 3A 97 43 4C 2C 30 3A 82 00 A5 2F |38912:.CL,0:.../|
00002790: 38 27 97 33 38 39 31 30 2C 34 3A 97 33 38 37 38 |8'.38910,4:.3878|
000027A0: 38 2C 31 32 38 00 DC 2F 42 27 99 22 42 41 53 45 |8,128../B'."BASE|
000027B0: 20 41 44 52 45 53 53 20 4F 46 20 41 53 53 2E 20 | ADRESS OF ASS. |
000027C0: 43 4F 44 45 20 42 55 46 46 45 52 20 24 39 30 30 |CODE BUFFER $900|
000027D0: 30 22 3A 50 B2 33 36 38 36 34 3A 99 00 06 30 4C |0":P.36864:...0L|
000027E0: 27 85 22 48 4F 57 20 4D 41 4E 59 20 4C 49 4E 45 |'."HOW MANY LINE|
000027F0: 53 20 54 4F 20 42 45 20 41 53 53 45 4D 42 4C 45 |S TO BE ASSEMBLE|
00002800: 44 22 3B 44 3A 99 00 2C 30 56 27 85 22 48 4F 57 |D";D:..,0V'."HOW|
00002810: 20 4D 41 4E 59 20 4C 41 42 45 4C 53 20 41 52 45 | MANY LABELS ARE|
00002820: 20 55 53 45 44 22 3B 43 3A 99 3A 99 00 40 30 60 | USED";C:.:..@0`|
00002830: 27 86 4C 24 28 43 29 2C 41 28 43 29 3A 5A B2 31 |'.L$(C),A(C):Z.1|
00002840: 00 5E 30 6A 27 99 22 46 49 52 53 54 20 50 41 53 |.^0j'."FIRST PAS|
00002850: 53 20 52 55 4E 4E 49 4E 47 22 3A 99 3A 99 00 6A |S RUNNING":.:..j|
00002860: 30 74 27 4B B2 30 3A 51 B2 30 00 7C 30 7E 27 81 |0t'K.0:Q.0.|0~'.|
00002870: 20 58 B2 31 20 A4 20 44 3A 99 58 3B 00 8E 30 88 | X.1 . D:.X;..0.|
00002880: 27 8B 20 5A B2 33 20 A7 20 98 34 2C 58 3B 00 9A |'. Z.3 . .4,X;..|
00002890: 30 92 27 8D 20 31 32 32 35 30 00 A6 30 9C 27 89 |0.'. 12250..0.'.|
000028A0: 20 31 30 32 34 30 00 B2 30 A6 27 8D 20 31 32 34 | 10240..0.'. 124|
000028B0: 35 30 00 BA 30 B0 27 82 20 58 00 C4 30 BA 27 5A |50..0.'. X..0.'Z|
000028C0: B2 5A AA 31 00 D6 30 C4 27 8B 20 5A B2 34 20 A7 |.Z.1..0.'. Z.4 .|
000028D0: 20 31 30 32 31 30 00 FC 30 CE 27 8B 20 5A B2 33 | 10210..0.'. Z.3|
000028E0: 20 A7 20 99 22 50 52 49 4E 54 2D 4F 55 54 22 3A | . ."PRINT-OUT":|
000028F0: 99 3A 99 3A 8C 3A 89 31 30 31 30 30 00 25 31 D8 |.:.:.:.10100.%1.|
00002900: 27 99 22 53 45 43 55 4E 44 20 50 41 53 53 20 52 |'."SECUND PASS R|
00002910: 55 4E 4E 49 4E 47 22 3A 99 3A 99 3A 8C 3A 89 20 |UNNING":.:.:.:. |
00002920: 31 30 31 30 30 00 5F 31 E2 27 99 3A 99 3A 99 22 |10100._1.'.:.:."|
00002930: 41 53 53 45 4D 42 4C 59 20 43 4F 4D 50 4C 45 54 |ASSEMBLY COMPLET|
00002940: 45 22 3A 98 34 3A 98 34 3A 98 34 2C 22 41 53 53 |E":.4:.4:.4,"ASS|
00002950: 45 4D 42 4C 59 20 43 4F 4D 50 4C 45 54 45 22 00 |EMBLY COMPLETE".|
00002960: 69 31 EC 27 98 34 3A 98 34 00 73 31 F6 27 A0 20 |i1.'.4:.4.s1.'. |
00002970: 34 3A 80 00 82 31 00 28 87 20 53 24 3A 50 24 B2 |4:...1.(. S$:P$.|
00002980: 53 24 00 9E 31 0A 28 8B 20 C8 28 53 24 2C 31 29 |S$..1.(. .(S$,1)|
00002990: B2 22 2A 22 20 A7 20 8D 20 31 30 39 33 30 00 C0 |."*" . . 10930..|
000029A0: 31 14 28 4D 24 B2 C8 28 53 24 2C 33 29 3A 53 24 |1.(M$..(S$,3):S$|
000029B0: B2 C9 28 53 24 2C 28 C3 28 53 24 29 AB 33 29 29 |..(S$,(.(S$).3))|
000029C0: 00 DF 31 1E 28 8B 20 4D 24 B2 22 41 44 43 22 20 |..1.(. M$."ADC" |
000029D0: A7 20 42 B2 31 36 39 3A 89 20 31 31 30 35 30 00 |. B.169:. 11050.|
000029E0: FE 31 28 28 8B 20 4D 24 B2 22 41 44 44 22 20 A7 |.1((. M$."ADD" .|
000029F0: 20 42 B2 31 37 31 3A 89 20 31 31 30 35 30 00 1D | B.171:. 11050..|
00002A00: 32 32 28 8B 20 4D 24 B2 22 41 4E 44 22 20 A7 20 |22(. M$."AND" . |
00002A10: 42 B2 31 36 34 3A 89 20 31 31 30 35 30 00 3B 32 |B.164:. 11050.;2|
00002A20: 3C 28 8B 20 4D 24 B2 22 41 53 4C 22 20 A7 20 42 |<(. M$."ASL" . B|
00002A30: B2 35 36 3A 89 20 31 30 39 39 30 00 59 32 46 28 |.56:. 10990.Y2F(|
00002A40: 8B 20 4D 24 B2 22 41 53 52 22 20 A7 20 42 B2 35 |. M$."ASR" . B.5|
00002A50: 35 3A 89 20 31 30 39 39 30 00 77 32 50 28 8B 20 |5:. 10990.w2P(. |
00002A60: 4D 24 B2 22 42 43 43 22 20 A7 20 4F B2 33 36 3A |M$."BCC" . O.36:|
00002A70: 89 20 31 31 34 35 30 00 95 32 5A 28 8B 20 4D 24 |. 11450..2Z(. M$|
00002A80: B2 22 42 43 4C 22 20 A7 20 42 B2 31 37 3A 89 20 |."BCL" . B.17:. |
00002A90: 31 31 36 31 30 00 B3 32 64 28 8B 20 4D 24 B2 22 |11610..2d(. M$."|
00002AA0: 42 43 53 22 20 A7 20 4F B2 33 37 3A 89 20 31 31 |BCS" . O.37:. 11|
00002AB0: 34 35 30 00 D1 32 6E 28 8B 20 4D 24 B2 22 42 45 |450..2n(. M$."BE|
00002AC0: 51 22 20 A7 20 4F B2 33 39 3A 89 20 31 31 34 35 |Q" . O.39:. 1145|
00002AD0: 30 00 EF 32 78 28 8B 20 4D 24 B2 22 42 48 43 22 |0..2x(. M$."BHC"|
00002AE0: 20 A7 20 4F B2 34 30 3A 89 20 31 31 34 35 30 00 | . O.40:. 11450.|
00002AF0: 0D 33 82 28 8B 20 4D 24 B2 22 42 48 46 22 20 A7 |.3.(. M$."BHF" .|
00002B00: 20 4F B2 34 31 3A 89 20 31 31 34 35 30 00 2B 33 | O.41:. 11450.+3|
00002B10: 8C 28 8B 20 4D 24 B2 22 42 48 49 22 20 A7 20 4F |.(. M$."BHI" . O|
00002B20: B2 33 34 3A 89 20 31 31 34 35 30 00 49 33 96 28 |.34:. 11450.I3.(|
00002B30: 8B 20 4D 24 B2 22 42 48 53 22 20 A7 20 4F B2 33 |. M$."BHS" . O.3|
00002B40: 36 3A 89 20 31 31 34 35 30 00 67 33 A0 28 8B 20 |6:. 11450.g3.(. |
00002B50: 4D 24 B2 22 42 49 48 22 20 A7 20 4F B2 34 37 3A |M$."BIH" . O.47:|
00002B60: 89 20 31 31 34 35 30 00 85 33 AA 28 8B 20 4D 24 |. 11450..3.(. M$|
00002B70: B2 22 42 49 4C 22 20 A7 20 4F B2 34 36 3A 89 20 |."BIL" . O.46:. |
00002B80: 31 31 34 35 30 00 A4 33 B4 28 8B 20 4D 24 B2 22 |11450..3.(. M$."|
00002B90: 42 49 54 22 20 A7 20 42 B2 31 36 35 3A 89 20 31 |BIT" . B.165:. 1|
00002BA0: 31 30 35 30 00 C2 33 BE 28 8B 20 4D 24 B2 22 42 |1050..3.(. M$."B|
00002BB0: 4C 4F 22 20 A7 20 4F B2 33 37 3A 89 20 31 31 34 |LO" . O.37:. 114|
00002BC0: 35 30 00 E0 33 C8 28 8B 20 4D 24 B2 22 42 4C 53 |50..3.(. M$."BLS|
00002BD0: 22 20 A7 20 4F B2 33 35 3A 89 20 31 31 34 35 30 |" . O.35:. 11450|
00002BE0: 00 FE 33 D2 28 8B 20 4D 24 B2 22 42 4D 43 22 20 |..3.(. M$."BMC" |
00002BF0: A7 20 4F B2 34 34 3A 89 20 31 31 34 35 30 00 1C |. O.44:. 11450..|
00002C00: 34 DC 28 8B 20 4D 24 B2 22 42 4D 49 22 20 A7 20 |4.(. M$."BMI" . |
00002C10: 4F B2 34 33 3A 89 20 31 31 34 35 30 00 3A 34 E6 |O.43:. 11450.:4.|
00002C20: 28 8B 20 4D 24 B2 22 42 4D 53 22 20 A7 20 4F B2 |(. M$."BMS" . O.|
00002C30: 34 35 3A 89 20 31 31 34 35 30 00 58 34 F0 28 8B |45:. 11450.X4.(.|
00002C40: 20 4D 24 B2 22 42 4E 45 22 20 A7 20 4F B2 33 38 | M$."BNE" . O.38|
00002C50: 3A 89 20 31 31 34 35 30 00 76 34 FA 28 8B 20 4D |:. 11450.v4.(. M|
00002C60: 24 B2 22 42 50 4C 22 20 A7 20 4F B2 34 32 3A 89 |$."BPL" . O.42:.|
00002C70: 20 31 31 34 35 30 00 94 34 04 29 8B 20 4D 24 B2 | 11450..4.). M$.|
00002C80: 22 42 52 41 22 20 A7 20 4F B2 33 32 3A 89 20 31 |"BRA" . O.32:. 1|
00002C90: 31 34 35 30 00 B2 34 0E 29 8B 20 4D 24 B2 22 42 |1450..4.). M$."B|
00002CA0: 52 4E 22 20 A7 20 4F B2 33 33 3A 89 20 31 31 34 |RN" . O.33:. 114|
00002CB0: 35 30 00 CF 34 18 29 8B 20 4D 24 B2 22 42 42 43 |50..4.). M$."BBC|
00002CC0: 22 20 A7 20 42 B2 31 3A 89 20 31 31 37 32 30 00 |" . B.1:. 11720.|
00002CD0: EC 34 22 29 8B 20 4D 24 B2 22 42 42 53 22 20 A7 |.4"). M$."BBS" .|
00002CE0: 20 42 B2 30 3A 89 20 31 31 37 32 30 00 0A 35 2C | B.0:. 11720..5,|
00002CF0: 29 8B 20 4D 24 B2 22 42 53 54 22 20 A7 20 42 B2 |). M$."BST" . B.|
00002D00: 31 36 3A 89 20 31 31 36 31 30 00 29 35 36 29 8B |16:. 11610.)56).|
00002D10: 20 4D 24 B2 22 42 53 52 22 20 A7 20 4F B2 31 37 | M$."BSR" . O.17|
00002D20: 33 3A 89 20 31 31 34 35 30 00 48 35 40 29 8B 20 |3:. 11450.H5@). |
00002D30: 4D 24 B2 22 43 4C 43 22 20 A7 20 4F B2 31 35 32 |M$."CLC" . O.152|
00002D40: 3A 89 20 31 31 37 38 30 00 67 35 4A 29 8B 20 4D |:. 11780.g5J). M|
00002D50: 24 B2 22 43 4C 49 22 20 A7 20 4F B2 31 35 34 3A |$."CLI" . O.154:|
00002D60: 89 20 31 31 37 38 30 00 85 35 54 29 8B 20 4D 24 |. 11780..5T). M$|
00002D70: B2 22 43 4C 52 22 20 A7 20 42 B2 36 33 3A 89 20 |."CLR" . B.63:. |
00002D80: 31 30 39 39 30 00 A4 35 5E 29 8B 20 4D 24 B2 22 |10990..5^). M$."|
00002D90: 43 4D 50 22 20 A7 20 42 B2 31 36 31 3A 89 20 31 |CMP" . B.161:. 1|
00002DA0: 31 30 35 30 00 C2 35 68 29 8B 20 4D 24 B2 22 43 |1050..5h). M$."C|
00002DB0: 4F 4D 22 20 A7 20 42 B2 35 31 3A 89 20 31 30 39 |OM" . B.51:. 109|
00002DC0: 39 30 00 E1 35 72 29 8B 20 4D 24 B2 22 43 50 58 |90..5r). M$."CPX|
00002DD0: 22 20 A7 20 42 B2 31 36 33 3A 89 20 31 31 30 35 |" . B.163:. 1105|
00002DE0: 30 00 F8 35 7C 29 8B 20 4D 24 B2 22 44 41 54 22 |0..5|). M$."DAT"|
00002DF0: 20 A7 20 31 32 30 36 30 00 15 36 86 29 8B 20 4D | . 12060..6.). M|
00002E00: 24 B2 22 44 45 43 22 20 A7 20 42 B2 35 38 3A 89 |$."DEC" . B.58:.|
00002E10: 31 30 39 39 30 00 33 36 90 29 8B 20 4D 24 B2 22 |10990.36.). M$."|
00002E20: 45 4F 52 22 20 A7 20 42 B2 31 36 38 3A 89 31 31 |EOR" . B.168:.11|
00002E30: 30 35 30 00 4A 36 9A 29 8B 20 4D 24 B2 22 45 51 |050.J6.). M$."EQ|
00002E40: 55 22 20 A7 20 31 32 31 36 30 00 67 36 A4 29 8B |U" . 12160.g6.).|
00002E50: 20 4D 24 B2 22 49 4E 43 22 20 A7 20 42 B2 36 30 | M$."INC" . B.60|
00002E60: 3A 89 31 30 39 39 30 00 85 36 AE 29 8B 20 4D 24 |:.10990..6.). M$|
00002E70: B2 22 4A 4D 50 22 20 A7 20 42 B2 31 37 32 3A 89 |."JMP" . B.172:.|
00002E80: 31 31 30 35 30 00 A3 36 B8 29 8B 20 4D 24 B2 22 |11050..6.). M$."|
00002E90: 4A 53 52 22 20 A7 20 42 B2 31 37 33 3A 89 31 31 |JSR" . B.173:.11|
00002EA0: 30 35 30 00 C1 36 C2 29 8B 20 4D 24 B2 22 4C 44 |050..6.). M$."LD|
00002EB0: 41 22 20 A7 20 42 B2 31 36 36 3A 89 31 31 30 35 |A" . B.166:.1105|
00002EC0: 30 00 DF 36 CC 29 8B 20 4D 24 B2 22 4C 44 58 22 |0..6.). M$."LDX"|
00002ED0: 20 A7 20 42 B2 31 37 34 3A 89 31 31 30 35 30 00 | . B.174:.11050.|
00002EE0: FC 36 D6 29 8B 20 4D 24 B2 22 4C 53 4C 22 20 A7 |.6.). M$."LSL" .|
00002EF0: 20 42 B2 35 36 3A 89 31 30 39 39 30 00 19 37 E0 | B.56:.10990..7.|
00002F00: 29 8B 20 4D 24 B2 22 4C 53 52 22 20 A7 20 42 B2 |). M$."LSR" . B.|
00002F10: 35 32 3A 89 31 30 39 39 30 00 36 37 EA 29 8B 20 |52:.10990.67.). |
00002F20: 4D 24 B2 22 4E 45 47 22 20 A7 20 42 B2 34 38 3A |M$."NEG" . B.48:|
00002F30: 89 31 30 39 39 30 00 54 37 F4 29 8B 20 4D 24 B2 |.10990.T7.). M$.|
00002F40: 22 4E 4F 50 22 20 A7 20 4F B2 31 35 37 3A 89 31 |"NOP" . O.157:.1|
00002F50: 31 37 38 30 00 72 37 FE 29 8B 20 4D 24 B2 22 4F |1780.r7.). M$."O|
00002F60: 52 41 22 20 A7 20 42 B2 31 37 30 3A 89 31 31 30 |RA" . B.170:.110|
00002F70: 35 30 00 89 37 08 2A 8B 20 4D 24 B2 22 4F 52 47 |50..7.*. M$."ORG|
00002F80: 22 20 A7 20 31 32 30 39 30 00 A6 37 12 2A 8B 20 |" . 12090..7.*. |
00002F90: 4D 24 B2 22 52 4F 4C 22 20 A7 20 42 B2 35 37 3A |M$."ROL" . B.57:|
00002FA0: 89 31 30 39 39 30 00 C3 37 1C 2A 8B 20 4D 24 B2 |.10990..7.*. M$.|
00002FB0: 22 52 4F 52 22 20 A7 20 42 B2 35 34 3A 89 31 30 |"ROR" . B.54:.10|
00002FC0: 39 39 30 00 E1 37 26 2A 8B 20 4D 24 B2 22 52 53 |990..7&*. M$."RS|
00002FD0: 50 22 20 A7 20 4F B2 31 35 36 3A 89 31 31 37 38 |P" . O.156:.1178|
00002FE0: 30 00 FF 37 30 2A 8B 20 4D 24 B2 22 52 54 49 22 |0..70*. M$."RTI"|
00002FF0: 20 A7 20 4F B2 31 32 38 3A 89 31 31 37 38 30 00 | . O.128:.11780.|
00003000: 1D 38 3A 2A 8B 20 4D 24 B2 22 52 54 53 22 20 A7 |.8:*. M$."RTS" .|
00003010: 20 4F B2 31 32 39 3A 89 31 31 37 38 30 00 3B 38 | O.129:.11780.;8|
00003020: 44 2A 8B 20 4D 24 B2 22 53 42 43 22 20 A7 20 42 |D*. M$."SBC" . B|
00003030: B2 31 36 32 3A 89 31 31 30 35 30 00 59 38 4E 2A |.162:.11050.Y8N*|
00003040: 8B 20 4D 24 B2 22 53 45 43 22 20 A7 20 4F B2 31 |. M$."SEC" . O.1|
00003050: 35 33 3A 89 31 31 37 38 30 00 77 38 58 2A 8B 20 |53:.11780.w8X*. |
00003060: 4D 24 B2 22 53 45 49 22 20 A7 20 4F B2 31 35 35 |M$."SEI" . O.155|
00003070: 3A 89 31 31 37 38 30 00 95 38 62 2A 8B 20 4D 24 |:.11780..8b*. M$|
00003080: B2 22 53 54 41 22 20 A7 20 42 B2 31 36 37 3A 89 |."STA" . B.167:.|
00003090: 31 31 30 35 30 00 B3 38 6C 2A 8B 20 4D 24 B2 22 |11050..8l*. M$."|
000030A0: 53 54 58 22 20 A7 20 42 B2 31 37 35 3A 89 31 31 |STX" . B.175:.11|
000030B0: 30 35 30 00 D1 38 76 2A 8B 20 4D 24 B2 22 53 55 |050..8v*. M$."SU|
000030C0: 42 22 20 A7 20 42 B2 31 36 30 3A 89 31 31 30 35 |B" . B.160:.1105|
000030D0: 30 00 EF 38 80 2A 8B 20 4D 24 B2 22 53 57 49 22 |0..8.*. M$."SWI"|
000030E0: 20 A7 20 4F B2 31 33 30 3A 89 31 31 37 38 30 00 | . O.130:.11780.|
000030F0: 0D 39 8A 2A 8B 20 4D 24 B2 22 54 41 58 22 20 A7 |.9.*. M$."TAX" .|
00003100: 20 4F B2 31 35 31 3A 89 31 31 37 38 30 00 2A 39 | O.151:.11780.*9|
00003110: 94 2A 8B 20 4D 24 B2 22 54 53 54 22 20 A7 20 42 |.*. M$."TST" . B|
00003120: B2 36 31 3A 89 31 30 39 39 30 00 48 39 9E 2A 8B |.61:.10990.H9.*.|
00003130: 20 4D 24 B2 22 54 58 41 22 20 A7 20 4F B2 31 35 | M$."TXA" . O.15|
00003140: 39 3A 89 31 31 37 38 30 00 6E 39 A8 2A 99 22 4D |9:.11780.n9.*."M|
00003150: 4E 45 4D 4F 4E 49 43 20 45 52 52 4F 52 20 49 4E |NEMONIC ERROR IN|
00003160: 20 4C 49 4E 45 20 22 3B 58 3A A0 34 3A 80 00 92 | LINE ";X:.4:...|
00003170: 39 B2 2A 4C 24 B2 CA 28 53 24 2C 32 2C 31 29 3A |9.*L$..(S$,2,1):|
00003180: 53 24 B2 C9 28 53 24 2C 28 C3 28 53 24 29 AB 32 |S$..(S$,(.(S$).2|
00003190: 29 29 00 AC 39 BC 2A 8B 20 C8 28 53 24 2C 31 29 |))..9.*. .(S$,1)|
000031A0: B2 22 20 22 20 A7 20 31 30 39 37 30 00 C6 39 C6 |." " . 10970..9.|
000031B0: 2A 4C 24 B2 4C 24 AA C8 28 53 24 2C 31 29 3A 8D |*L$.L$..(S$,1):.|
000031C0: 20 31 32 32 33 30 00 D2 39 D0 2A 89 20 31 30 39 | 12230..9.*. 109|
000031D0: 34 30 00 ED 39 DA 2A 8D 20 31 32 32 33 30 3A 4B |40..9.*. 12230:K|
000031E0: B2 4B AA 31 3A 4C 24 28 4B 29 B2 4C 24 00 FA 39 |.K.1:L$(K).L$..9|
000031F0: E4 2A 41 28 4B 29 B2 51 3A 8E 00 15 3A EE 2A 54 |.*A(K).Q:...:.*T|
00003200: B2 31 3A 4D 24 B2 C8 28 53 24 2C 31 29 3A 8D 20 |.1:M$..(S$,1):. |
00003210: 31 32 32 33 30 00 2F 3A F8 2A 8B 20 4D 24 B2 22 |12230./:.*. M$."|
00003220: 20 22 20 A7 20 4D B2 30 3A 89 31 31 31 34 30 00 | " . M.0:.11140.|
00003230: 4A 3A 02 2B 8B 20 4D 24 B2 22 41 22 20 A7 20 4D |J:.+. M$."A" . M|
00003240: B2 31 3A 89 20 31 31 31 30 30 00 65 3A 0C 2B 8B |.1:. 11100.e:.+.|
00003250: 20 4D 24 B2 22 58 22 20 A7 20 4D B2 32 3A 89 20 | M$."X" . M.2:. |
00003260: 31 31 31 30 30 00 80 3A 16 2B 8B 20 4D 24 B2 22 |11100..:.+. M$."|
00003270: 28 22 20 A7 20 4D B2 33 3A 89 20 31 31 31 32 30 |(" . M.3:. 11120|
00003280: 00 A9 3A 20 2B 99 22 41 44 52 45 53 53 20 4D 4F |..: +."ADRESS MO|
00003290: 44 45 20 45 52 52 4F 52 20 49 4E 20 4C 49 4E 45 |DE ERROR IN LINE|
000032A0: 20 22 3B 58 3A A0 34 3A 80 00 C4 3A 2A 2B 54 B2 | ";X:.4:...:*+T.|
000032B0: 32 3A 4D 24 B2 C8 28 53 24 2C 31 29 3A 8D 20 31 |2:M$..(S$,1):. 1|
000032C0: 32 32 33 30 00 DF 3A 34 2B 8B 20 4D 24 B2 22 40 |2230..:4+. M$."@|
000032D0: 22 20 A7 20 4D B2 30 3A 89 20 31 31 33 35 30 00 |" . M.0:. 11350.|
000032E0: FA 3A 3E 2B 8B 20 4D 24 B2 22 20 22 20 A7 20 4D |.:>+. M$." " . M|
000032F0: B2 32 3A 89 20 31 31 31 34 30 00 15 3B 48 2B 8B |.2:. 11140..;H+.|
00003300: 20 4D 24 B2 22 28 22 20 A7 20 4D B2 33 3A 89 20 | M$."(" . M.3:. |
00003310: 31 31 31 32 30 00 21 3B 52 2B 89 20 31 31 30 34 |11120.!;R+. 1104|
00003320: 30 00 2D 3B 5C 2B 8D 20 31 31 38 30 30 00 39 3B |0.-;\+. 11800.9;|
00003330: 66 2B 89 20 31 30 31 35 30 00 48 3B 70 2B 4D 24 |f+. 10150.H;p+M$|
00003340: B2 C8 28 53 24 2C 31 29 00 5D 3B 7A 2B 8B 20 4D |..(S$,1).];z+. M|
00003350: 24 B2 22 29 22 20 A7 20 31 31 32 31 30 00 69 3B |$.")" . 11210.i;|
00003360: 84 2B 8D 20 31 31 39 31 30 00 7B 3B 8E 2B 8B 20 |.+. 11910.{;.+. |
00003370: 46 B2 30 20 A7 20 31 31 32 35 30 00 8D 3B 98 2B |F.0 . 11250..;.+|
00003380: 8B 20 54 B2 32 20 A7 20 31 31 33 30 30 00 D5 3B |. T.2 . 11300..;|
00003390: A2 2B 8B 48 B1 30 A7 99 22 52 45 41 44 2F 4D 4F |.+.H.0.."READ/MO|
000033A0: 44 45 46 59 2F 57 52 49 54 45 20 54 4F 20 50 41 |DEFY/WRITE TO PA|
000033B0: 47 45 20 5A 45 52 4F 20 4F 4E 4C 59 20 2D 20 45 |GE ZERO ONLY - E|
000033C0: 52 52 4F 52 20 49 4E 20 4C 49 4E 45 20 22 3B 58 |RROR IN LINE ";X|
000033D0: 3A A0 34 3A 80 00 E1 3B AC 2B 8D 20 31 31 38 30 |:.4:...;.+. 1180|
000033E0: 30 00 ED 3B B6 2B 8D 20 31 31 38 38 30 00 F9 3B |0..;.+. 11880..;|
000033F0: C0 2B 89 20 31 30 31 35 30 00 11 3C CA 2B 8B 20 |.+. 10150..<.+. |
00003400: 54 B2 32 20 A7 20 4D B2 35 3A 89 20 31 31 32 33 |T.2 . M.5:. 1123|
00003410: 30 00 19 3C D4 2B 4D B2 34 00 25 3C DE 2B 8D 20 |0..<.+M.4.%<.+. |
00003420: 31 31 38 30 30 00 31 3C E8 2B 89 20 31 30 31 35 |11800.1<.+. 1015|
00003430: 30 00 60 3C F2 2B 8B 20 5A B2 32 20 A7 20 99 22 |0.`<.+. Z.2 . ."|
00003440: 55 4E 44 45 46 49 4E 45 44 20 4C 41 42 45 4C 20 |UNDEFINED LABEL |
00003450: 49 4E 20 4C 49 4E 45 20 22 3B 58 3A A0 34 3A 80 |IN LINE ";X:.4:.|
00003460: 00 72 3C FC 2B 8B 20 54 B2 31 20 A7 20 31 31 31 |.r<.+. T.1 . 111|
00003470: 38 30 00 7E 3C 06 2C 8D 20 31 31 38 30 30 00 8A |80.~<.,. 11800..|
00003480: 3C 10 2C 8D 20 31 31 38 34 30 00 96 3C 1A 2C 89 |<.,. 11840..<.,.|
00003490: 20 31 30 31 35 30 00 AB 3C 24 2C 8B 20 41 28 59 | 10150..<$,. A(Y|
000034A0: 29 B1 51 20 A7 20 31 31 32 37 30 00 BD 3C 2E 2C |).Q . 11270..<.,|
000034B0: 8B 20 48 B1 30 20 A7 20 31 31 32 37 30 00 D5 3C |. H.0 . 11270..<|
000034C0: 38 2C 8B 20 4D B2 32 20 A7 20 4D B2 31 3A 89 20 |8,. M.2 . M.1:. |
000034D0: 31 31 33 34 30 00 DD 3C 42 2C 4D B2 34 00 E9 3C |11340..<B,M.4..<|
000034E0: 4C 2C 89 20 31 31 31 38 30 00 F5 3C 56 2C 8D 20 |L,. 11180..<V,. |
000034F0: 31 32 32 33 30 00 01 3D 60 2C 8D 20 31 31 33 38 |12230..=`,. 1138|
00003500: 30 00 0D 3D 6A 2C 89 20 31 31 31 38 30 00 1C 3D |0..=j,. 11180..=|
00003510: 74 2C 4D 24 B2 C8 28 53 24 2C 31 29 00 51 3D 7E |t,M$..(S$,1).Q=~|
00003520: 2C 8B 20 C6 28 4D 24 29 B3 37 31 20 AF 20 C6 28 |,. .(M$).71 . .(|
00003530: 4D 24 29 B1 20 36 34 20 A7 20 4C B2 28 C6 28 4D |M$). 64 . L.(.(M|
00003540: 24 29 AB 35 35 29 AC 31 36 3A 89 20 31 31 34 31 |$).55).16:. 1141|
00003550: 30 00 65 3D 88 2C 4C B2 28 C6 28 4D 24 29 AB 34 |0.e=.,L.(.(M$).4|
00003560: 38 29 AC 31 36 00 76 3D 92 2C 4D 24 B2 CA 28 53 |8).16.v=.,M$..(S|
00003570: 24 2C 32 2C 31 29 00 A7 3D 9C 2C 8B 20 C6 28 4D |$,2,1)..=.,. .(M|
00003580: 24 29 B3 37 31 20 AF 20 C6 28 4D 24 29 B1 36 34 |$).71 . .(M$).64|
00003590: 20 A7 20 4C B2 4C AA C6 28 4D 24 29 AB 35 35 3A | . L.L..(M$).55:|
000035A0: 89 20 31 31 34 34 30 00 B8 3D A6 2C 4C B2 4C AA |. 11440..=.,L.L.|
000035B0: C6 28 4D 24 29 AB 34 38 00 BE 3D B0 2C 8E 00 CA |.(M$).48..=.,...|
000035C0: 3D BA 2C 8D 20 31 31 38 31 30 00 D6 3D C4 2C 8D |=.,. 11810..=.,.|
000035D0: 20 31 32 32 33 30 00 E2 3D CE 2C 8D 20 31 31 39 | 12230..=.,. 119|
000035E0: 31 30 00 F4 3D D8 2C 8B 20 46 B2 30 20 A7 20 31 |10..=.,. F.0 . 1|
000035F0: 31 35 36 30 00 0B 3E E2 2C 8B 20 41 28 59 29 B1 |1560..>.,. A(Y).|
00003600: 51 AA 31 20 A7 20 31 31 35 33 30 00 49 3E EC 2C |Q.1 . 11530.I>.,|
00003610: 8B 20 28 51 AA 31 29 AB 41 28 59 29 B1 31 32 38 |. (Q.1).A(Y).128|
00003620: 20 A7 20 99 22 42 52 41 4E 43 48 20 4F 55 54 20 | . ."BRANCH OUT |
00003630: 4F 46 20 52 41 4E 47 45 20 49 4E 20 4C 49 4E 45 |OF RANGE IN LINE|
00003640: 20 22 3B 58 3A A0 34 3A 80 00 60 3E F6 2C 4C B2 | ";X:.4:..`>.,L.|
00003650: 32 35 36 AB 28 28 51 AA 31 29 AB 41 28 59 29 29 |256.((Q.1).A(Y))|
00003660: 00 6C 3E 00 2D 89 20 31 31 35 38 30 00 AA 3E 0A |.l>.-. 11580..>.|
00003670: 2D 8B 20 41 28 59 29 AB 28 51 AA 31 29 B1 31 32 |-. A(Y).(Q.1).12|
00003680: 37 20 A7 20 99 22 42 52 41 4E 43 48 20 4F 55 54 |7 . ."BRANCH OUT|
00003690: 20 4F 46 20 52 41 4E 47 45 20 49 4E 20 4C 49 4E | OF RANGE IN LIN|
000036A0: 45 20 22 3B 58 3A A0 34 3A 80 00 BB 3E 14 2D 4C |E ";X:.4:...>.-L|
000036B0: B2 41 28 59 29 AB 28 51 AA 31 29 00 C7 3E 1E 2D |.A(Y).(Q.1)..>.-|
000036C0: 89 20 31 31 35 38 30 00 F8 3E 28 2D 8B 20 5A B2 |. 11580..>(-. Z.|
000036D0: 32 20 A7 20 99 22 55 4E 44 45 46 49 4E 45 44 20 |2 . ."UNDEFINED |
000036E0: 4C 41 42 45 4C 20 49 4E 20 4C 49 4E 45 20 22 3B |LABEL IN LINE ";|
000036F0: 58 AB 31 3A A0 34 3A 80 00 00 3F 32 2D 4C B2 30 |X.1:.4:...?2-L.0|
00003700: 00 0F 3F 3C 2D 8B 20 4F B3 31 36 20 A7 20 8E 00 |..?<-. O.16 . ..|
00003710: 1B 3F 46 2D 8D 20 31 31 38 38 30 00 27 3F 50 2D |.?F-. 11880.'?P-|
00003720: 89 20 31 30 31 35 30 00 3E 3F 5A 2D 4D 24 B2 C8 |. 10150.>?Z-M$..|
00003730: 28 53 24 2C 31 29 3A 8D 20 31 32 32 33 30 00 7C |(S$,1):. 12230.||
00003740: 3F 64 2D 8B 20 C5 28 4D 24 29 B3 30 20 B0 20 C5 |?d-. .(M$).0 . .|
00003750: 28 4D 24 29 B1 37 20 A7 20 99 22 42 49 54 20 4E |(M$).7 . ."BIT N|
00003760: 55 4D 42 45 52 20 45 52 52 4F 52 20 49 4E 20 4C |UMBER ERROR IN L|
00003770: 49 4E 45 20 22 3B 58 3A A0 34 3A 80 00 88 3F 6E |INE ";X:.4:...?n|
00003780: 2D 4D B2 C5 28 4D 24 29 00 9C 3F 78 2D 8D 20 31 |-M..(M$)..?x-. 1|
00003790: 32 32 33 30 3A 8D 20 31 31 39 31 30 00 CB 3F 82 |2230:. 11910..?.|
000037A0: 2D 8B 20 46 B2 30 20 A7 20 99 22 55 4E 44 45 46 |-. F.0 . ."UNDEF|
000037B0: 49 4E 45 44 20 4C 41 42 45 4C 20 49 4E 20 4C 49 |INED LABEL IN LI|
000037C0: 4E 45 20 22 3B 58 3A A0 34 3A 80 00 0C 40 8C 2D |NE ";X:.4:...@.-|
000037D0: 8B 20 41 28 59 29 B1 31 32 37 A7 99 22 54 41 52 |. A(Y).127.."TAR|
000037E0: 47 45 54 20 42 59 54 45 20 4E 4F 54 20 49 4E 20 |GET BYTE NOT IN |
000037F0: 52 41 4D 20 2D 20 45 52 52 4F 52 20 49 4E 20 4C |RAM - ERROR IN L|
00003800: 49 4E 45 20 22 3B 58 3A A0 34 3A 80 00 1A 40 96 |INE ";X:.4:...@.|
00003810: 2D 4F B2 42 AA 28 32 AC 4D 29 00 26 40 A0 2D 8D |-O.B.(2.M).&@.-.|
00003820: 20 31 31 38 31 30 00 35 40 AA 2D 8B 20 42 B3 31 | 11810.5@.-. B.1|
00003830: 36 20 A7 20 8E 00 41 40 B4 2D 8D 20 31 31 38 38 |6 . ..A@.-. 1188|
00003840: 30 00 4D 40 BE 2D 89 20 31 30 31 35 30 00 59 40 |0.M@.-. 10150.Y@|
00003850: C8 2D 8D 20 31 31 36 31 30 00 61 40 D2 2D 4A B2 |.-. 11610.a@.-J.|
00003860: 4C 00 6D 40 DC 2D 8D 20 31 31 34 37 30 00 75 40 |L.m@.-. 11470.u@|
00003870: E6 2D 48 B2 4A 00 81 40 F0 2D 8D 20 31 31 38 34 |.-H.J..@.-. 1184|
00003880: 30 00 8D 40 FA 2D 89 20 31 30 31 35 30 00 99 40 |0..@.-. 10150..@|
00003890: 04 2E 8D 20 31 31 38 31 30 00 A5 40 0E 2E 89 20 |... 11810..@... |
000038A0: 31 30 31 35 30 00 B4 40 18 2E 4F B2 42 AA 28 31 |10150..@..O.B.(1|
000038B0: 36 AC 4D 29 00 C7 40 22 2E 97 28 50 AA 51 29 2C |6.M)..@"..(P.Q),|
000038C0: 4F 3A 51 B2 51 AA 31 00 D3 40 2C 2E 8D 20 31 32 |O:Q.Q.1..@,.. 12|
000038D0: 33 30 30 00 D9 40 36 2E 8E 00 EC 40 40 2E 97 28 |300..@6....@@..(|
000038E0: 50 AA 51 29 2C 48 3A 51 B2 51 AA 31 00 F8 40 4A |P.Q),H:Q.Q.1..@J|
000038F0: 2E 8D 20 31 32 33 35 30 00 10 41 54 2E 8B 20 42 |.. 12350..AT.. B|
00003900: B2 30 20 B0 20 42 B2 31 20 A7 20 4C B2 4C AB 31 |.0 . B.1 . L.L.1|
00003910: 00 20 41 5E 2E 8B 20 4C B3 30 20 A7 20 4C B2 30 |. A^.. L.0 . L.0|
00003920: 00 33 41 68 2E 97 28 50 AA 51 29 2C 4C 3A 51 B2 |.3Ah..(P.Q),L:Q.|
00003930: 51 AA 31 00 3F 41 72 2E 8D 20 31 32 34 30 30 00 |Q.1.?Ar.. 12400.|
00003940: 45 41 7C 2E 8E 00 4F 41 86 2E 4C 24 B2 22 22 00 |EA|...OA..L$."".|
00003950: 65 41 90 2E 8B 20 C3 28 53 24 29 B2 30 20 A7 20 |eA... .(S$).0 . |
00003960: 31 31 39 36 30 00 7F 41 9A 2E 4C 24 B2 4C 24 AA |11960..A..L$.L$.|
00003970: C8 28 53 24 2C 31 29 3A 8D 20 31 32 32 33 30 00 |.(S$,1):. 12230.|
00003980: B6 41 A4 2E 8B C9 28 4C 24 2C 31 29 B2 22 29 22 |.A....(L$,1).")"|
00003990: B0 C9 28 4C 24 2C 31 29 B2 22 20 22 A7 4C 24 B2 |..(L$,1)." ".L$.|
000039A0: C8 28 4C 24 2C 28 C3 28 4C 24 29 AB 31 29 29 3A |.(L$,(.(L$).1)):|
000039B0: 89 31 31 39 36 30 00 C2 41 AE 2E 89 20 31 31 39 |.11960..A... 119|
000039C0: 32 30 00 CA 41 B8 2E 59 B2 30 00 D4 41 C2 2E 59 |20..A..Y.0..A..Y|
000039D0: B2 59 AA 31 00 E6 41 CC 2E 8B 20 59 B1 4B 20 A7 |.Y.1..A... Y.K .|
000039E0: 20 31 32 30 33 30 00 FD 41 D6 2E 8B 20 4C 24 B2 | 12030..A... L$.|
000039F0: 4C 24 28 59 29 20 A7 20 31 32 30 32 30 00 09 42 |L$(Y) . 12020..B|
00003A00: E0 2E 89 20 31 31 39 37 30 00 1F 42 EA 2E 46 B2 |... 11970..B..F.|
00003A10: 30 3A 48 B2 32 35 35 3A 4C B2 32 35 35 3A 8E 00 |0:H.255:L.255:..|
00003A20: 46 42 F4 2E 46 B2 31 3A 48 B2 B5 28 41 28 59 29 |FB..F.1:H..(A(Y)|
00003A30: AD 32 35 36 29 3A 4C B2 41 28 59 29 AB 28 48 AC |.256):L.A(Y).(H.|
00003A40: 32 35 36 29 3A 8E 00 58 42 FE 2E 8B 20 5A B2 31 |256):..XB... Z.1|
00003A50: 20 A7 20 31 32 30 31 30 00 6A 42 08 2F 8B 20 59 | . 12010.jB./. Y|
00003A60: B1 43 20 A7 20 31 32 30 31 30 00 76 42 12 2F 89 |.C . 12010.vB./.|
00003A70: 20 31 31 39 39 30 00 82 42 1C 2F 8D 20 31 32 32 | 11990..B./. 122|
00003A80: 33 30 00 8E 42 26 2F 8D 20 31 31 33 38 30 00 A2 |30..B&/. 11380..|
00003A90: 42 30 2F 8D 20 31 31 38 38 30 3A 89 20 31 30 31 |B0/. 11880:. 101|
00003AA0: 35 30 00 AE 42 3A 2F 8D 20 31 32 32 33 30 00 BA |50..B:/. 12230..|
00003AB0: 42 44 2F 8D 20 31 31 33 38 30 00 C2 42 4E 2F 48 |BD/. 11380..BN/H|
00003AC0: B2 4C 00 D9 42 58 2F 53 24 B2 C9 28 53 24 2C 28 |.L..BX/S$..(S$,(|
00003AD0: C3 28 53 24 29 AB 32 29 29 00 E5 42 62 2F 8D 20 |.(S$).2))..Bb/. |
00003AE0: 31 31 33 38 30 00 F5 42 6C 2F 51 B2 4C AA 28 32 |11380..Bl/Q.L.(2|
00003AF0: 35 36 AC 48 29 00 01 43 76 2F 89 20 31 30 31 35 |56.H)..Cv/. 1015|
00003B00: 30 00 0D 43 80 2F 8D 20 31 32 32 33 30 00 19 43 |0..C./. 12230..C|
00003B10: 8A 2F 8D 20 31 31 33 38 30 00 28 43 94 2F 41 28 |./. 11380.(C./A(|
00003B20: 4B 29 B2 32 35 36 AC 4C 00 3F 43 9E 2F 53 24 B2 |K).256.L.?C./S$.|
00003B30: C9 28 53 24 2C 28 C3 28 53 24 29 AB 32 29 29 00 |.(S$,(.(S$).2)).|
00003B40: 4B 43 A8 2F 8D 20 31 31 33 38 30 00 5B 43 B2 2F |KC./. 11380.[C./|
00003B50: 41 28 4B 29 B2 41 28 4B 29 AA 4C 00 67 43 BC 2F |A(K).A(K).L.gC./|
00003B60: 89 20 31 30 31 35 30 00 7E 43 C6 2F 53 24 B2 C9 |. 10150.~C./S$..|
00003B70: 28 53 24 2C 28 C3 28 53 24 29 AB 31 29 29 00 84 |(S$,(.(S$).1))..|
00003B80: 43 D0 2F 8E 00 92 43 DA 2F 8B 20 5A B3 33 20 A7 |C./...C./. Z.3 .|
00003B90: 20 8E 00 9E 43 E4 2F 52 B2 51 3A 45 B2 33 00 AA | ...C./R.Q:E.3..|
00003BA0: 43 EE 2F 8D 20 31 32 35 36 30 00 B9 43 F8 2F 98 |C./. 12560..C./.|
00003BB0: 34 2C A3 36 29 20 52 24 3B 00 BF 43 02 30 8E 00 |4,.6) R$;..C.0..|
00003BC0: CD 43 0C 30 8B 20 5A B3 33 20 A7 20 8E 00 D9 43 |.C.0. Z.3 . ...C|
00003BD0: 16 30 52 B2 4F 3A 45 B2 32 00 E5 43 20 30 8D 20 |.0R.O:E.2..C 0. |
00003BE0: 31 32 35 36 30 00 F4 43 2A 30 98 34 2C A3 31 31 |12560..C*0.4,.11|
00003BF0: 29 52 24 3B 00 FA 43 34 30 8E 00 08 44 3E 30 8B |)R$;..C40...D>0.|
00003C00: 20 5A B3 33 20 A7 20 8E 00 14 44 48 30 52 B2 48 | Z.3 . ...DH0R.H|
00003C10: 3A 45 B2 32 00 20 44 52 30 8D 20 31 32 35 36 30 |:E.2. DR0. 12560|
00003C20: 00 2F 44 5C 30 98 34 2C A3 31 34 29 52 24 3B 00 |./D\0.4,.14)R$;.|
00003C30: 35 44 66 30 8E 00 43 44 70 30 8B 20 5A B3 33 20 |5Df0..CDp0. Z.3 |
00003C40: A7 20 8E 00 4F 44 7A 30 52 B2 4C 3A 45 B2 32 00 |. ..ODz0R.L:E.2.|
00003C50: 5B 44 84 30 8D 20 31 32 35 36 30 00 6A 44 8E 30 |[D.0. 12560.jD.0|
00003C60: 98 34 2C A3 31 37 29 52 24 3B 00 70 44 98 30 8E |.4,.17)R$;.pD.0.|
00003C70: 00 7E 44 A2 30 8B 20 5A B3 33 20 A7 20 8E 00 89 |.~D.0. Z.3 . ...|
00003C80: 44 AC 30 48 50 24 B2 22 22 00 A3 44 B6 30 8B 20 |D.0HP$.""..D.0. |
00003C90: C8 28 50 24 2C 31 29 B2 22 2A 22 20 A7 20 31 32 |.(P$,1)."*" . 12|
00003CA0: 34 39 30 00 AF 44 C0 30 89 20 31 32 35 33 30 00 |490..D.0. 12530.|
00003CB0: C5 44 CA 30 48 50 24 B2 48 50 24 AA 28 C8 28 50 |.D.0HP$.HP$.(.(P|
00003CC0: 24 2C 31 29 29 00 DC 44 D4 30 50 24 B2 C9 28 50 |$,1))..D.0P$..(P|
00003CD0: 24 2C 28 C3 28 50 24 29 AB 31 29 29 00 F7 44 DE |$,(.(P$).1))..D.|
00003CE0: 30 8B 20 C8 28 50 24 2C 31 29 B3 B1 22 20 22 20 |0. .(P$,1).." " |
00003CF0: A7 20 31 32 34 39 30 00 15 45 E8 30 98 34 2C A3 |. 12490..E.0.4,.|
00003D00: 32 31 29 48 50 24 3B A3 33 32 29 50 24 3A 89 20 |21)HP$;.32)P$:. |
00003D10: 31 32 35 34 30 00 23 45 F2 30 98 34 2C A3 33 33 |12540.#E.0.4,.33|
00003D20: 29 50 24 00 29 45 FC 30 3A 00 2F 45 06 31 8E 00 |)P$.)E.0:./E.1..|
00003D30: 39 45 10 31 52 24 B2 22 22 00 4B 45 1A 31 81 20 |9E.1R$."".KE.1. |
00003D40: 59 B2 45 20 A4 20 31 20 A9 AB 31 00 73 45 24 31 |Y.E . 1 ..1.sE$1|
00003D50: 49 B2 B5 28 52 AD 31 36 AE 28 59 AB 31 29 29 29 |I..(R.16.(Y.1)))|
00003D60: 3A 52 B2 52 AB 28 49 AC 28 31 36 AE 28 59 AB 31 |:R.R.(I.(16.(Y.1|
00003D70: 29 29 29 00 92 45 2E 31 8B 20 49 B1 39 20 A7 20 |)))..E.1. I.9 . |
00003D80: 49 24 B2 C7 28 49 AA 35 35 29 3A 89 20 31 32 36 |I$..(I.55):. 126|
00003D90: 31 30 00 A1 45 38 31 49 24 B2 C7 28 49 AA 34 38 |10..E81I$..(I.48|
00003DA0: 29 00 AE 45 42 31 52 24 B2 52 24 AA 49 24 00 B6 |)..EB1R$.R$.I$..|
00003DB0: 45 4C 31 82 20 59 00 BC 45 56 31 8E 00 00 00 |EL1. Y..EV1.... |
....... *PORT-A EQU 0000./.... *PORT-B E
QU 0001.F.... *PORT-C EQU 0002.\.(.. *DD
R-A EQU 0004.R.2.. *DDR-B EQU 0005...<..
*DDR-C EQU 0006...F.. *EOI-FLAG EQU 001
1...P.. *DEV-# EQU 0012.P.Z.. *SEC.FLAG
EQU 0013...D.. *LABEL14 EQU 0014...N.. *
CBM-FLAG EQU 0015...X.. *LF-FLAG EQU 001
6.2.... *$22-FLAG EQU 0017.L.... *CRSR-F
LAG EQU 0018.D.... *RESTORE EQU 0019.}.
.. *DOT-FLAG EQU 001A...... *ASC.FLAG EQ
U 001B...... *FRZ-FLAG EQU 001C.F.... *O
PCODE EQU 0020...... *HI-BYTE EQU 0021..
.H.. *LO-BYTE EQU 0022...R.. *LABEL23 EQ
U 0023...... ORG 07FE.*.... DAT 04.7....
DAT 00.F.... ORG 0784.S.... DAT 80.B...
. ORG 0080.Z.... *GET-BYTE LDA@ 18..."..
*CLOCKL BIL CLOCKL...,.. *LCLOCK BIL LC
LOCK...6.. BCL0 PORT-C.U.@.. *BIL BIL CL
OCK1H...J.. *DECA DECA...T.. BNE BIL...^
.. LDA@ 10...H.. BST0 PORT-C.$.R.. *DEC
DECA.2.|.. BNE DEC.F.... BST7 EOI-FLAG.X
.... BCL0 PORT-C.S.... *CLOCK1H BIH CLOC
K1H...... *CLOCK1L BIL CLOCK1L...... BBC
1 PORT-C BIT-1...... *BIT-1 RORX.S.B.. *
CLOCK2H BIH CLOCK2H...L.. *CLOCK2L BIL C
LOCK2L...V.. BBC1 PORT-C BIT-2...... *BI
T-2 RORX.3.... *CLOCK3H BIH CLOCK3H.N...
. *CLOCK3L BIL CLOCK3L.F.... BBC1 PORT-C
BIT-3.X.... *BIT-3 RORX...... *CLOCK4H
BIH CLOCK4H...... *CLOCK4L BIL CLOCK4L.F
.&.. BBC1 PORT-C BIT-4.X.0.. *BIT-4 RORX
...:.. *CLOCK5H BIH CLOCK5H...D.. *CLOCK
5L BIL CLOCK5L.&.N.. BBC1 PORT-C BIT-5.8
.X.. *BIT-5 RORX.S.B.. *CLOCK6H BIH CLOC
K6H.N.L.. *CLOCK6L BIL CLOCK6L...V.. BBC
1 PORT-C BIT-6...... *BIT-6 RORX...... *
CLOCK7H BIH CLOCK7H.N.... *CLOCK7L BIL C
LOCK7L...... BBC1 PORT-C BIT-7...... *BI
T-7 RORX...... *CLOCK8H BIH CLOCK8H.....
. *CLOCK8L BIL CLOCK8L.F.F.. BBC1 PORT-C
BIT-8.X.P.. *BIT-8 RORX.M.Z.. *BYTE BIH
BYTE..... BST0 PORT-C...... RTS......
*DATA JSR CHECK...... *BUSY BBS0 PORT-A
BUSY.M.... STA PORT-B...... BCL3 PORT-C.
.. .. BST3 PORT-C...*.. *JSR80 JSR GET-B
YTE.".4.. BBS2 PORT-C DATA.5.>.. JMP TES
T-DEV.D.H.. ORG 0400.R.R.. LDA@ 00.B.\..
STA DDR-A.P.F.. LDA@ FF...P.. STA DDR-B
...Z.. INCA...... STA PORT-B...... LDA@
09...... STA DDR-C.E.... DECA.V.... STA
PORT-C...... CLR EOI-FLAG...... CLR CBM-
FLAG...J.. CLR DOT-FLAG.!.T.. CLR LF-FLA
G.4.... CLR ASC.FLAG.G.... CLR FRZ-FLAG.
X.... LDA PORT-A.F.... EOR@ FF.P.... TAX
.{.... ASRA...... AND@ 03...... ADD@ 24.
..$.. STA DEV-#...... LDA@ D6.F.8.. STA
OPCODE.T.B.. LDA@ 01...L.. STA HI-BYTE..
.V.. CLR LO-BYTE...`.. LDA@ 81...J.. STA
LABEL23.".T.. CLC.,.~.. TXA.7.... ASLA.
I.... BCC TEST-LF.].... BST7 DOT-FLAG.P.
... *TEST-LF CLC.{.... ASLA...... BCC AT
N...D.. BST7 LF-FLAG...N.. *ATN BBS2 POR
T-C ATN.N.X.. *CLOCK BIH CLOCK...... CLR
SEC.FLAG...... CLR $22-FLAG...... CLR C
RSR-FLAG...... CLR RESTORE.-.... CLR ASC
.FLAG.?.... BST0 PORT-C.R.... JSR GET-BY
TE.L.(.. *TEST-DEV CPX DEV-#.}.2.. BEQ P
LUS13...<.. *UNLIST CPX@ 3F...F.. BNE AT
N2...P.. *DATAL BRA RELEASE.Y.Z.. *ATN2
BBC7 EOI-FLAG SLR...D.. *RELEASE LDA@ 0E
...N.. BST0 PORT-C...X.. *TFR DECA. ....
BNE TFR.4.... BCL7 EOI-FLAG.K.... *SLR
BCL0 PORT-C.H. .. *WAIT BBC2 PORT-C WAIT
.V.... BRA ATN...... *PLUS13 JSR GET-BYT
E...... BBC2 PORT-C SEC.ADR....H.. JMP D
ATA.S.R.. *SEC.ADR. CPX@ 3F...... BEQ RE
LEASE...... BBS7 FRZ-FLAG STORE...... TX
A...... AND@ 0F.%.... CMP@ 0E.8.... BHS
AUTOFEED.F.... CMP@ 01.V.... BEQ TRUTH.D
.".. CMP@ 02.T.,.. BEQ ASCII...... CMP@
03...0.. BEQ FREEZE...6.. CMP@ 05...@..
BEQ TRUTH...J.. CMP@ 06.O.T.. BEQ TRUTH.
..^.. CMP@ 07...H.. BEQ BUSIN...R.. *CLR
.SEC. BCL7 SEC.FLAG.".|.. *STORE JMP JSR
80.:.... *AUTOFEED CMP@ 0F.H.... BNE OFF
.[.... BST7 LF-FLAG.K.... BRA STORE.....
. *FREEZE BST7 FRZ-FLAG...... BRA STORE.
..... *OFF BCL7 LF-FLAG...... BRA STORE.
Z.B.. *TRUTH BST7 CBM-FLAG...L.. BCL7 SE
C.FLAG...V.. BRA STORE...... *BUSIN BST7
SEC.FLAG.,.... BST7 RESTORE.<.... BRA S
TORE.W.... *ASCII BCL7 SEC.FLAG.J.... BC
L7 RESTORE.~.... BST7 ASC.FLAG...... BRA
STORE...&.. *CHECK TXA...0.. BBC7 CBM-F
LAG CHECK-2.I.:.. CMP@ 0D.Y.D.. BNE PRIN
T...N.. BBC7 LF-FLAG PRINT...X.. JSR OUT
...B.. LDA@ 0A...L.. *PRINT RTS.D.V.. *C
HECK-2 BBS7 ASC.FLAG ASCII-1.R.... CMP@
22.C.... BNE VERDER.V.... INC $22-FLAG..
.... *VERDER AND@ 7F...... CMP@ 1F......
BLS CODES...... TXA.P.F.. BBS7 SEC.FLAG
TRANSL....P.. CMP@ 5B...Z.. BHS GRAPHIC
...... RTS...... *ASCII-1 JMP ASCII-2.,.
... *GRAPHIC CMP@ 60.=.... BHS BIT-8H.K.
... LDA@ 03.].... STA HI-BYTE.K. .. LDA@
40.}.*.. STA LO-BYTE...4.. TXA...>.. SU
B@ 5B...H.. STA LABEL14...R.. ASLA...\..
ASLA.O.F.. ADD LABEL14...P.. ADD LABEL1
4...Z.. ADD LO-BYTE...... STA LO-BYTE...
... JMP BIT-IMM....... *BIT-8H CMP@ 9F.?
.... BHI M.ADR..M.... ADD@ 60.W.... TAX.
Q.... *M.ADR. CLR LO-BYTE..J.. LDA@ 01.
..T.. STA HI-BYTE...... JSR MULTIPLY....
.. JMP BIT-IMM..P.... *CODES JMP CODES-1
...... *TRANSL. JMP BUSINESS...... *MULT
IPLY TXA...... SUB@ A0. .... STA LABEL14
.1.$.. *MULTI CLC.<.... ASLA.N.8.. BCC M
ULTI-4.`.B.. INC HI-BYTE.J.L.. CLC.~.V..
*MULTI-4 ASLA...`.. BCC MULTI-5...J.. I
NC HI-BYTE...T.. CLC.G.~.. *MULTI-5 ADC
LABEL14.U.... BCC SUM...... INC HI-BYTE.
..... CLC...... *SUM ADC LABEL14...... B
CC RESULT.+.... INC HI-BYTE.5.D.. CLC.O.
N.. *RESULT STA LO-BYTE.Y.X.. RTS.U....
*BIT-IMM. JSR DOTTEST...... *NXT JSR OPC
ODE...... JSR OUT...... INCX...... CPX@
06...... BNE NXT.K.... CLRA...(.. *RETUR
N RSP...2.. JMP JSR80...<.. *OUT BBS0 PO
RT-A OUT...F.. STA PORT-B.+.P.. BCL3 POR
T-C.=.Z.. BST3 PORT-C.G.D.. RTS._.N.. *B
USINESS CMP@ 5B.Q.X.. BHS UPPER-1.....
CMP@ 41...... BHS LOWER...... RTS... ..
*LOWER ORA@ 20...... RTS.O.... *UPPER-1
CMP@ 61...... BHS UPPER-2...H.. SUB@ 5B.
..R.. STA LABEL14...... LDA@ 03.!.... ST
A HI-BYTE.3.... LDA LABEL14.C.... JSR MU
LTI.Q.... ADD@ 40.C.... STA LO-BYTE.V...
. JMP BIT-IMM....".. *UPPER-2 CMP@ 7B...
,.. BHS GRAPH-2...6.. AND@ 5F...@.. RTS.
N.J.. *GRAPH-2 CMP@ 80...T.. BHS KAR-A9.
..^.. SUB@ 7B...H.. *GRAPH-3 STA LABEL14
...R.. LDA@ 03.(.|.. STA HI-BYTE.:.... L
DA LABEL14.J.... JSR MULTI.X.... ADD@ 64
.J.... STA LO-BYTE.}.... JMP BIT-IMM....
... *KAR-A9 CMP@ A9...B.. BNE KAR-BA...L
.. LDA@ 03.D.V.. STA HI-BYTE.R.... LDA@
82...... STA LO-BYTE...... JMP BIT-IMM..
..... *KAR-BA CMP@ BA...... BNE KAR-FF.,
.... LDA@ 03.>.... STA HI-BYTE.L.&.. LDA
@ 88.^.0.. STA LO-BYTE.Q.:.. JMP BIT-IMM
....D.. *KAR-FF CMP@ FF...N.. BNE KAR-C0
...X.. LDA@ 03...B.. STA HI-BYTE.F.L.. L
DA@ 76.X.V.. STA LO-BYTE...... JMP BIT-I
MM... ... *KAR-C0 CMP@ C0.. ... BNE GRAP
H-4.! ... LDA@ 03.3 ... STA HI-BYTE.A ..
. LDA@ 5E.S ... STA LO-BYTE.F F.. JMP BI
T-IMM..} P.. *GRAPH-4 CMP@ E0.. Z.. BHS
GRAPH-5.. ... CMP@ C1.. ... BHS UPPER-3.
. ... JMP M.ADR..W ... *GRAPH-5 AND@ BF.
. ... JMP KAR-A9.. ... *UPPER-3 CMP@ DB.
.! .. BHS GRAPH-6..!*.. AND@ 7F.)!4.. RT
S.@!>.. *GRAPH-6 SUB@ DB.R!H.. JMP GRAPH
-3.E!R.. *CODES-1 TXA.S!\.. CMP@ 0D..!F.
. BNE CODES-2..!P.. BBC7 CRSR-FLAG CR-1.
.!Z.. LDA RESTORE.D!... STA SEC.FLAG.X!.
.. CLR CRSR-FLAG..!... *CR-1 BBS7 LF-FLA
G LF.."... CLR $22-FLAG.."... RTS.#"...
*LF JSR OUT.6"... CLR $22-FLAG.D"J.. LDA
@ 0A.N"T.. RTS.E"... *CODES-2 CMP@ 11.W"
... BEQ CODES-3.."... CMP@ 91.."... BEQ
CODES-4.."... CMP@ 12.."... BEQ CODES-5.
E"... CMP@ 13.W"$.. BEQ CODES-6.."... CM
P@ 0E.."8.. BEQ CODES-7..#B.. CMP@ 0F..#
L.. BEQ CODES-8.)#V.. BNE CODES-9.N#`..
*CODES-3 BBS0 $22-FLAG PRINT-D.B#J.. BST
7 SEC.FLAG.W#T.. BST7 CRSR-FLAG..#~.. JM
P RETURN..#... *CODES-4 BBS0 $22-FLAG CO
DES-9.A#... BCL7 SEC.FLAG.V#... BST7 CRS
R-FLAG..#... JMP RETURN..$... *CODES-5 B
BS0 $22-FLAG PRINT-R..$... JMP RETURN.B$
D.. *CODES-6 BBS0 $22-FLAG PRINT-S.S$N..
JMP RETURN.J$X.. *PRINT-D LDA@ 8E.|$...
STA LO-BYTE..$... *PR-CODE LDA@ 03..$..
. STA HI-BYTE..$... JMP BIT-IMM..O$... *
PRINT-R LDA@ 94..$... STA LO-BYTE..$...
BRA PR-CODE..%(.. *PRINT-S LDA@ 9A..%2..
STA LO-BYTE..%<.. BRA PR-CODE.S%F.. *CO
DES-7 BBS0 $22-FLAG CODES-9.A%P.. LDA@ 1
B.O%Z.. JSR OUT.}%D.. LDA@ 57..%N.. JSR
OUT..%X.. LDA@ 01..%... JSR OUT..%... JM
P RETURN..%... *CODES-8 BBS0 $22-FLAG CO
DES-9..% .. LDA@ 1B..%... JSR OUT..&...
LDA@ 57..&... JSR OUT.#&H.. LDA@ 00.1&R.
. JSR OUT.B&... JMP RETURN.C&... *CODES-
9 BBS0 $22-FLAG END.Q&... CMP@ 10..&...
BEQ CHR$16..&... CMP@ 08..&... BEQ CHR$2
6..&... RTS.F&".. *CHR$26 JSR GET-BYTE.P
&,.. TXA..&6.. CMP@ 1A..&@.. BEQ REPEAD.
.&J.. RTS..'T.. *REPEAD JMP REP-CHAR../'
^.. *CHR$16 JMP SET-TAP.B'H.. *END ADD@
40.L'R.. TAX.Z'|.. CMP@ 45.L'... BNE HOG
ER-1.Z'... LDA@ A0..'... STA LO-BYTE..'.
.. LDA@ 03..'... STA HI-BYTE..'... JMP B
IT-IMM..V'B.. *HOGER-1 CMP@ 80..'L.. BHS
HOGER-2..'V.. LDA@ 03..(... STA HI-BYTE
..(... TXA. (... SUB@ 5B.2(... STA LABEL
14.B(... JSR MULTI.P(... ADD@ 40.B(... S
TA LO-BYTE.U(&.. JMP BIT-REV...(0.. *HOG
ER-2 CLR LO-BYTE..(:.. LDA@ 01..(D.. STA
HI-BYTE.C(N.. JSR MULTIPLY..(X.. *BIT-R
EV. JSR DOTTEST..(B.. *GO-ON JSR OPCODE.
.)L.. EOR@ FE..)V.. JSR OUT..)... INCX.,
)... CPX@ 06.<)... BNE GO-ON.G)... CLRA.
Q)... RSP.A)... JMP JSR80..)... *DOTTEST
BBS7 DOT-FLAG IBM..)F.. LDA@ 1B..)P.. J
SR OUT..)Z.. LDA@ 4B..)... JSR OUT.H)...
LDA@ 06.V)... JSR OUT..)... CLRX..)...
CLRA..)... JSR OUT..* .. RTS..**.. *IBM
LDA@ 1B.%*4.. JSR OUT.3*>.. LDA@ 2A.A*H.
. JSR OUT.O*R.. LDA@ 00.]*\.. JSR OUT.K*
F.. LDA@ 06.Y*P.. JSR OUT..*Z.. CLRX..*.
.. CLRA..*... JSR OUT..*... RTS..*... OR
G 03A8.M*... *SET-TAP LDA@ 1B..*... JSR
OUT..*... LDA@ 44..*J.. JSR OUT..+T.. JS
R GET-BYTE..+... TXA."+... AND@ 0F.-+...
ASLA.?+... STA LABEL14.J+... ASLA.U+...
ASLA.G+... ADD LABEL14.Y+$.. STA LABEL1
4..+... JSR GET-BYTE..+8.. TXA..+B.. AND
@ 0F..+L.. ADD LABEL14.D+V.. JSR OUT.R+`
.. LDA@ 00..+J.. JSR OUT..+T.. LDA@ 09..
+~.. JSR OUT..,... JMP RETURN..,... ORG
03D8.3,... *ASCII-2 CMP@ 9F.D,... BLS CM
P-0D.R,... AND@ 7F.H,... *CMP-0D CMP@ 0D
.Y,... BEQ ASC-LF..,... CMP@ 60..,D.. BH
S ASC.LOW..,N.. CMP@ 40..,X.. BHS ASC.UP
.K,... *PRINTEN RTS..,... *ASC.LOW AND@
5F..,... BRA PRINTEN..-... *ASC.UP ORA@
20..-... BRA PRINTEN.?-... *ASC-LF BBC7
LF-FLAG PRINTEN.M-... JSR OUT.[-(.. LDA@
0A.E-2.. RTS.T-<.. ORG 0738..-F.. *REP-
CHAR. LDA@ 1B..-P.. JSR OUT..-Z.. BBS7 D
OT-FLAG IBM-2.C-D.. LDA@ 4B.Q-N.. JSR OU
T..-X.. BRA REP-2..-... *IBM-2 LDA@ 2A..
.... JSR OUT...... LDA@ 00. . .. JSR OUT
.:.... *REP-2 JSR GET-BYTE.D.... TXA.V..
.. STA LABEL14.D.H.. JSR OUT.R.R.. LDA@
00...... JSR OUT...... JSR GET-BYTE.....
. TXA...... LDX LABEL14.D.... *REP-3 JSR
OUT.O.... DECX...... BNE REP-3...".. JM
P RETURN../,.. 550 STATEMENTS - 148 LABE
LS.?/.'.".":."ASSEMBLER FOR MOTOROLA MC6
8705":..R/.'.4,4:.56,144:..N/$'."EVEN GE
DULD A.U.B.":.../.'. CL.36864 . 38912:.C
L,0:.../8'.38910,4:.38788,128../B'."BASE
ADRESS OF ASS. CODE BUFFER $9000":P.368
64:...0L'."HOW MANY LINES TO BE ASSEMBLE
D";D:..,0V'."HOW MANY LABELS ARE USED";C
:.:..@0`'.L$(C),A(C):Z.1.^0J'."FIRST PAS
S RUNNING":.:..J0T'K.0:Q.0.|0~'. X.1 . D
:.X;..0.'. Z.3 . .4,X;..0.'. 12250..0.'.
10240..0.'. 12450..0.'. X.D0.'Z.Z.1.V0D
'. Z.4 . 10210..0N'. Z.3 . ."PRINT-OUT":
.:.:.:.10100.%1X'."SECUND PASS RUNNING":
.:.:.:. 10100._1.'.:.:."ASSEMBLY COMPLET
E":.4:.4:.4,"ASSEMBLY COMPLETE".I1.'.4:.
4.S1.' 4:...1.(. S$:P$.S$..1.(. H(S$,1)
."*" . . 10930..1.(M$.H(S$,3):S$.I(S$,(C
(S$).3))..1.(. M$."ADC" . B.169:. 11050.
.1((. M$."ADD" . B.171:. 11050..22(. M$.
"AND" . B.164:. 11050.;2<(. M$."ASL" . B
.56:. 10990.Y2F(. M$."ASR" . B.55:. 1099
0.W2P(. M$."BCC" . O.36:. 11450..2Z(. M$
."BCL" . B.17:. 11610..2D(. M$."BCS" . O
.37:. 11450.Q2N(. M$."BEQ" . O.39:. 1145
0..2X(. M$."BHC" . O.40:. 11450..3.(. M$
."BHF" . O.41:. 11450.+3.(. M$."BHI" . O
.34:. 11450.I3.(. M$."BHS" . O.36:. 1145
0.G3 (. M$."BIH" . O.47:. 11450..3.(. M$
."BIL" . O.46:. 11450..3.(. M$."BIT" . B
.165:. 11050.B3.(. M$."BLO" . O.37:. 114
50..3H(. M$."BLS" . O.35:. 11450..3R(. M
$."BMC" . O.44:. 11450..4.(. M$."BMI" .
O.43:. 11450.:4.(. M$."BMS" . O.45:. 114
50.X4.(. M$."BNE" . O.38:. 11450.V4.(. M
$."BPL" . O.42:. 11450..4.). M$."BRA" .
O.32:. 11450..4.). M$."BRN" . O.33:. 114
50.O4.). M$."BBC" . B.1:. 11720..4"). M$
."BBS" . B.0:. 11720..5,). M$."BST" . B.
16:. 11610.)56). M$."BSR" . O.173:. 1145
0.H5@). M$."CLC" . O.152:. 11780.G5J). M
$."CLI" . O.154:. 11780..5T). M$."CLR" .
B.63:. 10990..5^). M$."CMP" . B.161:. 1
1050.B5H). M$."COM" . B.51:. 10990..5R).
M$."CPX" . B.163:. 11050..5|). M$."DAT"
. 12060..6.). M$."DEC" . B.58:.10990.36
.). M$."EOR" . B.168:.11050.J6.). M$."EQ
U" . 12160.G6.). M$."INC" . B.60:.10990.
.6.). M$."JMP" . B.172:.11050..6.). M$."
JSR" . B.173:.11050.A6B). M$."LDA" . B.1
66:.11050..6L). M$."LDX" . B.174:.11050.
.6V). M$."LSL" . B.56:.10990..7.). M$."L
SR" . B.52:.10990.67.). M$."NEG" . B.48:
.10990.T7.). M$."NOP" . O.157:.11780.R7.
). M$."ORA" . B.170:.11050..7.*. M$."ORG
" . 12090..7.*. M$."ROL" . B.57:.10990.C
7.*. M$."ROR" . B.54:.10990..7&*. M$."RS
P" . O.156:.11780..70*. M$."RTI" . O.128
:.11780..8:*. M$."RTS" . O.129:.11780.;8
D*. M$."SBC" . B.162:.11050.Y8N*. M$."SE
C" . O.153:.11780.W8X*. M$."SEI" . O.155
:.11780..8B*. M$."STA" . B.167:.11050..8
L*. M$."STX" . B.175:.11050.Q8V*. M$."SU
B" . B.160:.11050..8.*. M$."SWI" . O.130
:.11780..9.*. M$."TAX" . O.151:.11780.*9
.*. M$."TST" . B.61:.10990.H9.*. M$."TXA
" . O.159:.11780.N9.*."MNEMONIC ERROR IN
LINE ";X: 4:...9.*L$.J(S$,2,1):S$.I(S$,
(C(S$).2))..9.*. H(S$,1)." " . 10970.F9F
*L$.L$.H(S$,1):. 12230.R9P*. 10940..9Z*.
12230:K.K.1:L$(K).L$..9.*A(K).Q:...:.*T
.1:M$.H(S$,1):. 12230./:.*. M$." " . M.0
:.11140.J:.+. M$."A" . M.1:. 11100.E:.+.
M$."X" . M.2:. 11100..:.+. M$."(" . M.3
:. 11120..: +."ADRESS MODE ERROR IN LINE
";X: 4:..D:*+T.2:M$.H(S$,1):. 12230..:4
+. M$."@" . M.0:. 11350..:>+. M$." " . M
.2:. 11140..;H+. M$."(" . M.3:. 11120.!;
R+. 11040.-;\+. 11800.9;F+. 10150.H;P+M$
.H(S$,1).];Z+. M$.")" . 11210.I;.+. 1191
0.{;.+. F.0 . 11250..;.+. T.2 . 11300.U;
.+.H.0.."READ/MODEFY/WRITE TO PAGE ZERO
ONLY - ERROR IN LINE ";X: 4:...;.+. 1180
0..;.+. 11880..;.+. 10150..<J+. T.2 . M.
5:. 11230..<T+M.4.%<.+. 11800.1<.+. 1015
0.`<.+. Z.2 . ."UNDEFINED LABEL IN LINE
";X: 4:..R<.+. T.1 . 11180.~<.,. 11800..
<.,. 11840..<.,. 10150..<$,. A(Y).Q . 11
270..<.,. H.0 . 11270.U<8,. M.2 . M.1:.
11340..<B,M.4..<L,. 11180..<V,. 12230..=
`,. 11380..=J,. 11180..=T,M$.H(S$,1).Q=~
,. F(M$).71 . F(M$). 64 . L.(F(M$).55).1
6:. 11410.E=.,L.(F(M$).48).16.V=.,M$.J(S
$,2,1)..=.,. F(M$).71 . F(M$).64 . L.L.F
(M$).55:. 11440..=.,L.L.F(M$).48..=.,..J
=.,. 11810.V=D,. 12230..=N,. 11910..=X,.
F.0 . 11560..>.,. A(Y).Q.1 . 11530.I>.,
. (Q.1).A(Y).128 . ."BRANCH OUT OF RANGE
IN LINE ";X: 4:..`>.,L.256.((Q.1).A(Y))
.L>.-. 11580..>.-. A(Y).(Q.1).127 . ."BR
ANCH OUT OF RANGE IN LINE ";X: 4:...>.-L
.A(Y).(Q.1).G>.-. 11580..>(-. Z.2 . ."UN
DEFINED LABEL IN LINE ";X.1: 4:...?2-L.0
..?<-. O.16 . ...?F-. 11880.'?P-. 10150.
>?Z-M$.H(S$,1):. 12230.|?D-. E(M$).0 . E
(M$).7 . ."BIT NUMBER ERROR IN LINE ";X:
4:...?N-M.E(M$)..?X-. 12230:. 11910.K?.
-. F.0 . ."UNDEFINED LABEL IN LINE ";X:
4:...@.-. A(Y).127.."TARGET BYTE NOT IN
RAM - ERROR IN LINE ";X: 4:...@.-O.B.(2.
M).&@ -. 11810.5@.-. B.16 . ..A@.-. 1188
0.M@.-. 10150.Y@H-. 11610.A@R-J.L.M@.-.
11470.U@.-H.J..@.-. 11840..@.-. 10150..@
... 11810..@... 10150..@..O.B.(16.M).G@"
..(P.Q),O:Q.Q.1.S@,.. 12300.Y@6....@@..(
P.Q),H:Q.Q.1..@J.. 12350..AT.. B.0 . B.1
. L.L.1. A^.. L.0 . L.0.3AH..(P.Q),L:Q.
Q.1.?AR.. 12400.EA|...OA..L$."".EA... C(
S$).0 . 11960.A..L$.L$.H(S$,1):. 12230.
.A...I(L$,1).")".I(L$,1)." ".L$.H(L$,(C(
L$).1)):.11960.BA... 11920.JA..Y.0.TAB.Y
.Y.1..AL.. Y.K . 12030..AV.. L$.L$(Y) .
12020..B... 11970..B..F.0:H.255:L.255:..
FB..F.1:H..(A(Y).256):L.A(Y).(H.256):..X
B... Z.1 . 12010.JB./. Y.C . 12010.VB./.
11990..B./. 12230..B&/. 11380..B0/. 118
80:. 10150..B:/. 12230..BD/. 11380.BBN/H
.L.YBX/S$.I(S$,(C(S$).2))..BB/. 11380..B
L/Q.L.(256.H)..CV/. 10150..C./. 12230..C
./. 11380.(C./A(K).256.L.?C./S$.I(S$,(C(
S$).2)).KC./. 11380.[C./A(K).A(K).L.GC./
. 10150.~CF/S$.I(S$,(C(S$).1))..CP/...CZ
/. Z.3 . ...C./R.Q:E.3..C./. 12560..C./.
4,.6) R$;..C.0..MC.0. Z.3 . ..YC.0R.O:E.
2..C 0. 12560..C*0.4,.11)R$;..C40...D>0.
Z.3 . ...DH0R.H:E.2. DR0. 12560./D\0.4,
.14)R$;.5DF0..CDP0. Z.3 . ..ODZ0R.L:E.2.
[D.0. 12560.JD.0.4,.17)R$;.PD.0..~D.0. Z
.3 . ...D.0HP$.""..D.0. H(P$,1)."*" . 12
490..D.0. 12530.EDJ0HP$.HP$.(H(P$,1))..D
T0P$.I(P$,(C(P$).1))..D.0. H(P$,1).." "
. 12490..E.0.4,.21)HP$;.32)P$:. 12540.#E
.0.4,.33)P$.)E.0:./E.1..9E.1R$."".KE.1.
Y.E . 1 ..1.SE$1I..(R.16.(Y.1))):R.R.(I.
(16.(Y.1)))..E.1. I.9 . I$.G(I.55):. 126
10..E81I$.G(I.48)..EB1R$.R$.I$..EL1. Y..
EV1....
> CLICK IMAGE PREVIEW FOR FULL MODAL