; f9dasm: M6800/1/2/3/8/9 / H6309 Binary/OS9/FLEX9 Disassembler V1.83 ; Original binary file 2708_22.BIN ; Converted to 22.hex ; ./f9dasm -6800 22.hex > 22.asm ;**************************************************** ;* Used Labels * ;**************************************************** M04BF EQU $04BF M08EF EQU $08EF M10CE EQU $10CE M1400 EQU $1400 M1A50 EQU $1A50 M1BE6 EQU $1BE6 M1E8E EQU $1E8E Z20A9 EQU $20A9 M22C6 EQU $22C6 M308C EQU $308C M318D EQU $318D M343F EQU $343F M3E9E EQU $3E9E M478D EQU $478D M4F8D EQU $4F8D M548D EQU $548D M6500 EQU $6500 M6CC4 EQU $6CC4 M7997 EQU $7997 M8302 EQU $8302 Z8600 EQU $8600 M8682 EQU $8682 M86FF EQU $86FF M9700 EQU $9700 M9E06 EQU $9E06 M9F22 EQU $9F22 MA28D EQU $A28D MA748 EQU $A748 MCE8D EQU $CE8D MDC01 EQU $DC01 ME396 EQU $E396 ME703 EQU $E703 ME72E EQU $E72E ME7A0 EQU $E7A0 ME7A7 EQU $E7A7 MEA60 EQU $EA60 MEF60 EQU $EF60 MEF61 EQU $EF61 MEF62 EQU $EF62 ZF006 EQU $F006 ZF015 EQU $F015 ZF018 EQU $F018 ZF01B EQU $F01B ZF021 EQU $F021 ZF024 EQU $F024 ZF02D EQU $F02D ;**************************************************** ;* Program Code / Data Areas * ;**************************************************** ORG $0000 M0000 FCB $00 ;0000: 00 '.' M0001 FCB $00 ;0001: 00 '.' M0002 FCB $00 ;0002: 00 '.' M0003 FCB $00 ;0003: 00 '.' FCB $00 ;0004: 00 '.' M0005 FCB $00 ;0005: 00 '.' M0006 FCB $00 ;0006: 00 '.' FCB $00 ;0007: 00 '.' M0008 FCB $00 ;0008: 00 '.' M0009 FCB $00 ;0009: 00 '.' M000A FCB $00 ;000A: 00 '.' M000B FCB $00 ;000B: 00 '.' FCB $00 ;000C: 00 '.' M000D FCB $00 ;000D: 00 '.' FCB $00 ;000E: 00 '.' FCB $00 ;000F: 00 '.' M0010 FCB $00 ;0010: 00 '.' FCB $00 ;0011: 00 '.' FCB $00 ;0012: 00 '.' FCB $00 ;0013: 00 '.' M0014 FCB $00 ;0014: 00 '.' FCB $00 ;0015: 00 '.' M0016 FCB $00 ;0016: 00 '.' M0017 FCB $00 ;0017: 00 '.' FCB $00 ;0018: 00 '.' M0019 FCB $00 ;0019: 00 '.' M001A FCB $00 ;001A: 00 '.' M001B FCB $00 ;001B: 00 '.' FCB $00 ;001C: 00 '.' M001D FCB $00 ;001D: 00 '.' FCB $00 ;001E: 00 '.' FCB $00 ;001F: 00 '.' M0020 FCB $00 ;0020: 00 '.' FCB $00 ;0021: 00 '.' FCB $00 ;0022: 00 '.' M0023 FCB $00 ;0023: 00 '.' M0024 FCB $00 ;0024: 00 '.' FCB $00 ;0025: 00 '.' FCB $00 ;0026: 00 '.' FCB $00 ;0027: 00 '.' FCB $00 ;0028: 00 '.' FCB $00 ;0029: 00 '.' FCB $00 ;002A: 00 '.' FCB $00 ;002B: 00 '.' FCB $00 ;002C: 00 '.' FCB $00 ;002D: 00 '.' FCB $00 ;002E: 00 '.' FCB $00 ;002F: 00 '.' FCB $00 ;0030: 00 '.' FCB $00 ;0031: 00 '.' SEC ;0032: 0D '.' CLV ;0033: 0A '.' INX ;0034: 08 '.' FCB $1C ;0035: 1C '.' BPL Z0081 ;0036: 2A 49 '*I' INX ;0038: 08 '.' FCB $00 ;0039: 00 '.' FCB $00 ;003A: 00 '.' FCB $04 ;003B: 04 '.' FCB $00 ;003C: 00 '.' FCB $00 ;003D: 00 '.' STX M10CE ;003E: FF 10 CE '...' STAB $03,X ;0041: E7 03 '..' CLRA ;0043: 4F 'O' FCB $1F ;0044: 1F '.' ADDA #$8D ;0045: 8B 8D '..' FCB $41 ;0047: 41 'A' BSR Z00B4 ;0048: 8D 6A '.j' BSR Z0092 ;004A: 8D 46 '.F' LDS #M0017 ;004C: 8E 00 17 '...' STS M0001 ;004F: 9F 01 '..' LDS #M0002 ;0051: 8E 00 02 '...' STS M0003 ;0054: 9F 03 '..' LDS #M0020 ;0056: 8E 00 20 '.. ' STS M0006 ;0059: 9F 06 '..' BSR Z00A8 ;005B: 8D 4B '.K' BSR Z0092 ;005D: 8D 33 '.3' CLI ;005F: 0E '.' M0060 BRA Z0096 ;0060: 20 34 ' 4' M0062 CLR M1A50 ;0062: 7F 1A 50 '..P' CLRA ;0065: 4F 'O' FCB $1F ;0066: 1F '.' ADDA #$0F ;0067: 8B 0F '..' FCB $1F ;0069: 1F '.' PULB ;006A: 33 '3' BSR Z0070 ;006B: 8D 03 '..' CMPB Z008D ;006D: D1 8D '..' SEC ;006F: 0D '.' Z0070 LDAA #$80 ;0070: 86 80 '..' STAA $42,X ;0072: A7 42 '.B' M0074 LDAA #$77 ;0074: 86 77 '.w' STAA $43,X ;0076: A7 43 '.C' TBA ;0078: 17 '.' FCB $00 ;0079: 00 '.' SBCA $35,X ;007A: A2 35 '.5' STX M6CC4 ;007C: FF 6C C4 '.l.' TST $44,X ;007F: 6D 44 'mD' Z0081 TST $42,X ;0081: 6D 42 'mB' Z0083 RTS ;0083: 39 '9' Z0084 BSR Z0099 ;0084: 8D 13 '..' TAB ;0086: 16 '.' FCB $02 ;0087: 02 '.' LDX M9700 ;0088: FE 97 00 '...' BRA Z0061 ;008B: 20 D4 ' .' Z008D BSR Z00C7 ;008D: 8D 38 '.8' FCB $00 ;008F: 00 '.' FCB $00 ;0090: 00 '.' FCB $00 ;0091: 00 '.' Z0092 BCC Z0083 ;0092: 24 EF '$.' BRA Z0084 ;0094: 20 EE ' .' Z0096 JMP ZF018 ;0096: 7E F0 18 '~..' Z0099 LDAA #$45 ;0099: 86 45 '.E' BSR Z0096 ;009B: 8D F9 '..' LDAA >M0008 ;009D: B6 00 08 '...' BSR Z0096 ;00A0: 8D F4 '..' LDAA #$20 ;00A2: 86 20 '. ' BSR Z0096 ;00A4: 8D F0 '..' BRA Z0096 ;00A6: 20 EE ' .' Z00A8 BSR Z00C7 ;00A8: 8D 1D '..' BRA Z00AC ;00AA: 20 00 ' .' Z00AC BRA Z008D ;00AC: 20 DF ' .' BSR Z00C7 ;00AE: 8D 17 '..' NEGA ;00B0: 40 '@' BSR Z00C7 ;00B1: 8D 14 '..' SBCB #$8D ;00B3: C2 8D '..' CBA ;00B5: 11 '.' INX ;00B6: 08 '.' BSR Z00C7 ;00B7: 8D 0E '..' SBA ;00B9: 10 '.' BSR Z00C7 ;00BA: 8D 0B '..' SBCA #$8D ;00BC: 82 8D '..' INX ;00BE: 08 '.' CMPA #$8D ;00BF: 81 8D '..' FCB $05 ;00C1: 05 '.' SUBB #$8D ;00C2: C0 8D '..' FCB $02 ;00C4: 02 '.' SUBA #$39 ;00C5: 80 39 '.9' Z00C7 FCB $1C ;00C7: 1C '.' LDX M343F ;00C8: FE 34 3F '.4?' FCB $1A ;00CB: 1A '.' NEGB ;00CC: 50 'P' CLRA ;00CD: 4F 'O' FCB $1F ;00CE: 1F '.' ADDA #$E6 ;00CF: 8B E6 '..' EORB M08EF ;00D1: F8 08 EF '...' ASL $C5,X ;00D4: 68 C5 'h.' BRA Z00FF ;00D6: 20 27 ' '' FCB $05 ;00D8: 05 '.' CLRB ;00D9: 5F '_' LDAA #$80 ;00DA: 86 80 '..' STAA M0005 ;00DC: 97 05 '..' STAB M001A ;00DE: D7 1A '..' LDAA #$30 ;00E0: 86 30 '.0' STAA M0008 ;00E2: 97 08 '..' LDS ME72E ;00E4: BE E7 2E '...' STS M001D ;00E7: 9F 1D '..' LDS #ME7A7 ;00E9: 8E E7 A7 '...' STS ME72E ;00EC: BF E7 2E '...' PULB ;00EF: 33 '3' BSR Z00F5 ;00F0: 8D 03 '..' INCA ;00F2: 4C 'L' LDS #M0010 ;00F3: 8E 00 10 '...' LDAA M0000 ;00F6: 96 00 '..' CMPA #$04 ;00F8: 81 04 '..' BCC Z0119 ;00FA: 24 1D '$.' TSX ;00FC: 30 '0' LDAA #$9F ;00FD: 86 9F '..' Z00FF ABA ;00FF: 1B '.' ORAA #$8C ;0100: 8A 8C '..' STAA $48,X ;0102: A7 48 '.H' STAA M000D ;0104: 97 0D '..' LDAA $84,X ;0106: A6 84 '..' ANDA #$7F ;0108: 84 7F '..' STAA $41,X ;010A: A7 41 '.A' LDS #M1400 ;010C: 8E 14 00 '...' Z010F TSX ;010F: 30 '0' FCB $1F ;0110: 1F '.' BNE Z010F ;0111: 26 FC '&.' LDAA $43,X ;0113: A6 43 '.C' BITA #$04 ;0115: 85 04 '..' BNE Z012A ;0117: 26 11 '&.' Z0119 LDAA #$33 ;0119: 86 33 '.3' BRA Z0179 ;011B: 20 5C ' \' LDS #M0010 ;011D: 8E 00 10 '...' LDAA #$80 ;0120: 86 80 '..' Z0122 STAA $80,X ;0122: A7 80 '..' CPX #M0014 ;0124: 8C 00 14 '...' BNE Z0122 ;0127: 26 F9 '&.' RTS ;0129: 39 '9' Z012A SEC ;012A: 0D '.' FCB $1F ;012B: 1F '.' BMI Z0138 ;012C: 2B 0A '+.' LDS #MEA60 ;012E: 8E EA 60 '..`' Z0131 FCB $12 ;0131: 12 '.' TSX ;0132: 30 '0' FCB $1F ;0133: 1F '.' BNE Z0131 ;0134: 26 FB '&.' FCB $03 ;0136: 03 '.' FCB $1F ;0137: 1F '.' Z0138 BITB #$08 ;0138: C5 08 '..' BEQ Z0171 ;013A: 27 35 ''5' TBA ;013C: 17 '.' STX M3E9E ;013D: FF 3E 9E '.>.' ABA ;0140: 1B '.' LDAA $84,X ;0141: A6 84 '..' BMI Z0154 ;0143: 2B 0F '+.' LDAA $43,X ;0145: A6 43 '.C' BITA #$08 ;0147: 85 08 '..' BEQ Z014F ;0149: 27 04 ''.' CLR $41,X ;014B: 6F 41 'oA' BRA Z0160 ;014D: 20 11 ' .' Z014F CLR $45,X ;014F: 6F 45 'oE' LDAA #$83 ;0151: 86 83 '..' CPX #M8682 ;0153: 8C 86 82 '...' STAA $42,X ;0156: A7 42 '.B' Z0158 LDAA $42,X ;0158: A6 42 '.B' CMPA #$02 ;015A: 81 02 '..' BLT Z0158 ;015C: 2D FA '-.' BNE Z01AC ;015E: 26 4C '&L' Z0160 LDAB $41,X ;0160: E6 41 '.A' LDS M001B ;0162: 9E 1B '..' STAB $84,X ;0164: E7 84 '..' Z0166 LDAA #$A0 ;0166: 86 A0 '..' STAA $42,X ;0168: A7 42 '.B' LDS M001D ;016A: 9E 1D '..' STS ME72E ;016C: BF E7 2E '...' TXS ;016F: 35 '5' STX MDC01 ;0170: FF DC 01 '...' FCB $D3 ;0173: D3 '.' FCB $03 ;0174: 03 '.' BCC Z017C ;0175: 24 05 '$.' LDAA #$36 ;0177: 86 36 '.6' Z0179 TAB ;0179: 16 '.' NOP ;017A: 01 '.' DEC M8302 ;017B: 7A 83 02 'z..' CMPA #$24 ;017E: 81 24 '.$' LDAB M86FF ;0180: F6 86 FF '...' STAA M0014 ;0183: 97 14 '..' FCB $DC ;0185: DC '.' NOP ;0186: 01 '.' Z0187 CLC ;0187: 0C '.' FCB $14 ;0188: 14 '.' FCB $83 ;0189: 83 '.' FCB $00 ;018A: 00 '.' SBA ;018B: 10 '.' BCC Z0187 ;018C: 24 F9 '$.' FCB $C3 ;018E: C3 '.' FCB $00 ;018F: 00 '.' SBA ;0190: 10 '.' STAB M000A ;0191: D7 0A '..' LDS M0003 ;0193: 9E 03 '..' STS M000B ;0195: 9F 0B '..' Z0197 TBA ;0197: 17 '.' LDX ME396 ;0198: FE E3 96 '...' FCB $14 ;019B: 14 '.' CMPA $41,X ;019C: A1 41 '.A' BEQ Z01B0 ;019E: 27 10 ''.' STAA $45,X ;01A0: A7 45 '.E' LDAA #$83 ;01A2: 86 83 '..' STAA $42,X ;01A4: A7 42 '.B' Z01A6 LDAA $42,X ;01A6: A6 42 '.B' CMPA #$02 ;01A8: 81 02 '..' BLT Z01A6 ;01AA: 2D FA '-.' Z01AC SBA ;01AC: 10 '.' BNE Z01B0 ;01AD: 26 01 '&.' FCB $1D ;01AF: 1D '.' Z01B0 LDAA $41,X ;01B0: A6 41 '.A' STAA $9F,X ;01B2: A7 9F '..' FCB $00 ;01B4: 00 '.' ABA ;01B5: 1B '.' LDAA M001A ;01B6: 96 1A '..' BITA #$10 ;01B8: 85 10 '..' BNE Z0166 ;01BA: 26 AA '&.' BRA Z01F3 ;01BC: 20 35 ' 5' LDAA $42,X ;01BE: A6 42 '.B' CMPA #$04 ;01C0: 81 04 '..' BEQ Z01CD ;01C2: 27 09 ''.' Z01C4 PULA ;01C4: 32 '2' INC $86,X ;01C5: 6C 86 'l.' SUBA $A7,X ;01C7: A0 A7 '..' FCB $42 ;01C9: 42 'B' TAB ;01CA: 16 '.' FCB $00 ;01CB: 00 '.' EORB M308C ;01CC: F8 30 8C '.0.' FCB $04 ;01CF: 04 '.' STS ME7A0 ;01D0: BF E7 A0 '...' RTI ;01D3: 3B ';' LDAB $43,X ;01D4: E6 43 '.C' LDAA $42,X ;01D6: A6 42 '.B' DECA ;01D8: 4A 'J' BNE Z01C4 ;01D9: 26 E9 '&.' BITB #$02 ;01DB: C5 02 '..' BNE Z01C4 ;01DD: 26 E5 '&.' RTI ;01DF: 3B ';' Z01E0 LDAA M001A ;01E0: 96 1A '..' BPL Z01EA ;01E2: 2A 06 '*.' ANDA #$40 ;01E4: 84 40 '.@' STAA M001A ;01E6: 97 1A '..' BNE Z0171 ;01E8: 26 87 '&.' Z01EA TAB ;01EA: 16 '.' STX M7997 ;01EB: FF 79 97 '.y.' CLV ;01EE: 0A '.' CLC ;01EF: 0C '.' FCB $14 ;01F0: 14 '.' BRA Z0197 ;01F1: 20 A4 ' .' Z01F3 CLC ;01F3: 0C '.' CLV ;01F4: 0A '.' LDAA M000A ;01F5: 96 0A '..' LDS M000B ;01F7: 9E 0B '..' BEQ Z01E0 ;01F9: 27 E5 ''.' SUBA #$11 ;01FB: 80 11 '..' BCC Z01ED ;01FD: 24 EE '$.' LDAA #$05 ;01FF: 86 05 '..' STAA M0019 ;0201: 97 19 '..' TSX ;0203: 30 '0' FCB $1F ;0204: 1F '.' LDAA #$80 ;0205: 86 80 '..' STS M000B ;0207: 9F 0B '..' BNE Z020D ;0209: 26 02 '&.' LDAA M0005 ;020B: 96 05 '..' Z020D STAA M0016 ;020D: 97 16 '..' NEGA ;020F: 40 '@' LDAB M001A ;0210: D6 1A '..' BMI Z0291 ;0212: 2B 7D '+}' ASLB ;0214: 58 'X' BPL Z0226 ;0215: 2A 0F '*.' LDAA #$06 ;0217: 86 06 '..' TSX ;0219: 30 '0' CPX #MA28D ;021A: 8C A2 8D '...' PSHA ;021D: 36 '6' STAA $42,X ;021E: A7 42 '.B' FCB $3C ;0220: 3C '<' STX $3C,X ;0221: EF 3C '.<' STX $20,X ;0223: EF 20 '. ' FCB $CD ;0225: CD '.' Z0226 ADDA #$80 ;0226: 8B 80 '..' STAA M0009 ;0228: 97 09 '..' LDAB M001A ;022A: D6 1A '..' BMI Z0291 ;022C: 2B 63 '+c' TSX ;022E: 30 '0' CPX #M318D ;022F: 8C 31 8D '.1.' FCB $21 ;0232: 21 '!' LDS M0006 ;0233: 9E 06 '..' LDAA #$04 ;0235: 86 04 '..' STAA $42,X ;0237: A7 42 '.B' FCB $3C ;0239: 3C '<' STX $96,X ;023A: EF 96 '..' TAB ;023C: 16 '.' Z023D LDAB #$01 ;023D: C6 01 '..' Z023F BITB $43,X ;023F: E5 43 '.C' BEQ Z023F ;0241: 27 FC ''.' LDAB $C4,X ;0243: E6 C4 '..' STAB $80,X ;0245: E7 80 '..' DECA ;0247: 4A 'J' BNE Z023D ;0248: 26 F3 '&.' LDAA #$01 ;024A: 86 01 '..' Z024C BITA $43,X ;024C: A5 43 '.C' BEQ Z024C ;024E: 27 FC ''.' LDAB $C4,X ;0250: E6 C4 '..' BRA Z024C ;0252: 20 F8 ' .' STS ME7A0 ;0254: BF E7 A0 '...' LDAB M000A ;0257: D6 0A '..' STAB $44,X ;0259: E7 44 '.D' LDAB M0014 ;025B: D6 14 '..' STAB $47,X ;025D: E7 47 '.G' TAB ;025F: 16 '.' LDX M1BE6 ;0260: FE 1B E6 '...' FCB $42 ;0263: 42 'B' CMPB #$04 ;0264: C1 04 '..' Z0266 SBA ;0266: 10 '.' BNE Z0268 ;0267: 26 FF '&.' DECB ;0269: 5A 'Z' TSX ;026A: 30 '0' CPX #M04BF ;026B: 8C 04 BF '...' STAB $A0,X ;026E: E7 A0 '..' RTI ;0270: 3B ';' LDAA $42,X ;0271: A6 42 '.B' DECA ;0273: 4A 'J' BNE Z0266 ;0274: 26 F0 '&.' LDAA $43,X ;0276: A6 43 '.C' BITA #$02 ;0278: 85 02 '..' BNE Z0266 ;027A: 26 EA '&.' PULA ;027C: 32 '2' INC $86,X ;027D: 6C 86 'l.' SUBA $A7,X ;027F: A0 A7 '..' FCB $42 ;0281: 42 'B' LDAA M001A ;0282: 96 1A '..' BITA #$02 ;0284: 85 02 '..' BNE Z0224 ;0286: 26 9C '&.' LDS M0006 ;0288: 9E 06 '..' LDAB M0016 ;028A: D6 16 '..' FCB $3A ;028C: 3A ':' STS M0006 ;028D: 9F 06 '..' BRA Z0224 ;028F: 20 93 ' .' Z0291 TSX ;0291: 30 '0' CPX #MCE8D ;0292: 8C CE 8D '...' LDS M9E06 ;0295: BE 9E 06 '...' LDAA M001A ;0298: 96 1A '..' BITA #$02 ;029A: 85 02 '..' BNE Z02B3 ;029C: 26 15 '&.' ANDA #$01 ;029E: 84 01 '..' ASLA ;02A0: 48 'H' ADDA #$05 ;02A1: 8B 05 '..' STAA $42,X ;02A3: A7 42 '.B' FCB $3C ;02A5: 3C '<' STX $86,X ;02A6: EF 86 '..' NOP ;02A8: 01 '.' Z02A9 BITA $43,X ;02A9: A5 43 '.C' BEQ Z02A9 ;02AB: 27 FC ''.' LDAB $80,X ;02AD: E6 80 '..' STAB $C4,X ;02AF: E7 C4 '..' BRA Z02A9 ;02B1: 20 F6 ' .' Z02B3 LDAA #$05 ;02B3: 86 05 '..' STAA $42,X ;02B5: A7 42 '.B' FCB $3C ;02B7: 3C '<' STX $86,X ;02B8: EF 86 '..' NOP ;02BA: 01 '.' Z02BB BITA $43,X ;02BB: A5 43 '.C' BEQ Z02BB ;02BD: 27 FC ''.' LDAB $84,X ;02BF: E6 84 '..' STAB $C4,X ;02C1: E7 C4 '..' BRA Z02BB ;02C3: 20 F6 ' .' LDS M000B ;02C5: 9E 0B '..' CLV ;02C7: 0A '.' DAA ;02C8: 19 '.' SBA ;02C9: 10 '.' BNE Z02CB ;02CA: 26 FF '&.' FCB $38 ;02CC: 38 '8' LDAB $44,X ;02CD: E6 44 '.D' LDAA $43,X ;02CF: A6 43 '.C' EORA #$04 ;02D1: 88 04 '..' FCB $DD ;02D3: DD '.' FCB $15 ;02D4: 15 '.' LDAA #$39 ;02D5: 86 39 '.9' ORAB #$F5 ;02D7: CA F5 '..' COMB ;02D9: 53 'S' BEQ Z02F6 ;02DA: 27 1A ''.' TSX ;02DC: 30 '0' CPX #M22C6 ;02DD: 8C 22 C6 '.".' SBA ;02E0: 10 '.' Z02E1 INX ;02E1: 08 '.' TAB ;02E2: 16 '.' DEX ;02E3: 09 '.' FCB $15 ;02E4: 15 '.' LDAA $80,X ;02E5: A6 80 '..' BEQ Z02EB ;02E7: 27 02 ''.' BCS Z02F0 ;02E9: 25 05 '%.' Z02EB DECB ;02EB: 5A 'Z' BNE Z02E1 ;02EC: 26 F3 '&.' LDAA #$30 ;02EE: 86 30 '.0' Z02F0 CMPA #$33 ;02F0: 81 33 '.3' BNE Z02F6 ;02F2: 26 02 '&.' SEI ;02F4: 0F '.' FCB $1F ;02F5: 1F '.' Z02F6 STAA M0008 ;02F6: 97 08 '..' CMPA #$30 ;02F8: 81 30 '.0' BEQ Z02FE ;02FA: 27 02 ''.' INC $E4,X ;02FC: 6C E4 'l.' Z02FE TAB ;02FE: 16 '.' LDX M6500 ;02FF: FE 65 00 '.e.' FCB $00 ;0302: 00 '.' PSHB ;0303: 37 '7' Z0304 FCB $00 ;0304: 00 '.' FCB $00 ;0305: 00 '.' PULB ;0306: 33 '3' DES ;0307: 34 '4' FCB $00 ;0308: 00 '.' PULB ;0309: 33 '3' PULA ;030A: 32 '2' FCB $00 ;030B: 00 '.' PSHB ;030C: 37 '7' TXS ;030D: 35 '5' FCB $38 ;030E: 38 '8' INS ;030F: 31 '1' TXS ;0310: 35 '5' SBA ;0311: 10 '.' LDX #ME703 ;0312: CE E7 03 '...' CLRA ;0315: 4F 'O' FCB $1F ;0316: 1F '.' ADDA #$8E ;0317: 8B 8E '..' FCB $00 ;0319: 00 '.' FCB $00 ;031A: 00 '.' STS M0001 ;031B: 9F 01 '..' STS M0060 ;031D: 9F 60 '.`' STS M0014 ;031F: 9F 14 '..' STS M000A ;0321: 9F 0A '..' LDS #M0280 ;0323: 8E 02 80 '...' STS M0003 ;0326: 9F 03 '..' TSX ;0328: 30 '0' BSR Z032C ;0329: 8D 01 '..' SBA ;032B: 10 '.' Z032C STS M0020 ;032C: 9F 20 '. ' Z032E TSX ;032E: 30 '0' BSR Z032E ;032F: 8D FD '..' CLR M9F22 ;0331: 7F 9F 22 '.."' COMA ;0334: 43 'C' STAA M0024 ;0335: 97 24 '.$' LDS #M0062 ;0337: 8E 00 62 '..b' Z033A STAA $80,X ;033A: A7 80 '..' CPX #M0074 ;033C: 8C 00 74 '..t' BNE Z033A ;033F: 26 F9 '&.' TSX ;0341: 30 '0' CPX #M548D ;0342: 8C 54 8D '.T.' INCA ;0345: 4C 'L' JSR ZF006 ;0346: BD F0 06 '...' BMI Z038F ;0349: 2B 44 '+D' STAA M0000 ;034B: 97 00 '..' TSX ;034D: 30 '0' CPX #M4F8D ;034E: 8C 4F 8D '.O.' NEGA ;0351: 40 '@' CMPA #$53 ;0352: 81 53 '.S' BEQ Z035C ;0354: 27 06 ''.' CMPA #$43 ;0356: 81 43 '.C' BNE Z038F ;0358: 26 35 '&5' CLC ;035A: 0C '.' BCC Z038D ;035B: 24 30 '$0' CPX #M478D ;035D: 8C 47 8D '.G.' INS ;0360: 31 '1' CMPA #$59 ;0361: 81 59 '.Y' BEQ Z036D ;0363: 27 08 ''.' CMPA #$4E ;0365: 81 4E '.N' BNE Z038F ;0367: 26 26 '&&' LDAA #$6F ;0369: 86 6F '.o' STAA M0023 ;036B: 97 23 '.#' Z036D JSR ZF021 ;036D: BD F0 21 '..!' BSR Z03DE ;0370: 8D 6C '.l' TBA ;0372: 17 '.' FCB $FD ;0373: FD '.' BCC Z0304 ;0374: 24 8E '$.' FCB $00 ;0376: 00 '.' NEG $BD,X ;0377: 60 BD '`.' SUBB M1E8E ;0379: F0 1E 8E '...' FCB $00 ;037C: 00 '.' FCB $14 ;037D: 14 '.' JSR ZF01B ;037E: BD F0 1B '...' LDS #M000A ;0381: 8E 00 0A '...' JSR ZF01B ;0384: BD F0 1B '...' LDAA #$03 ;0387: 86 03 '..' PULB ;0389: 33 '3' BSR Z038C ;038A: 8D 00 '..' Z038C SBCA MA748 ;038C: B2 A7 48 '..H' Z038F JMP ZF02D ;038F: 7E F0 2D '~.-' JSR ZF024 ;0392: BD F0 24 '..$' JMP ZF015 ;0395: 7E F0 15 '~..' LSRA ;0398: 44 'D' FCB $52 ;0399: 52 'R' RORB ;039A: 56 'V' BRA Z03DC ;039B: 20 3F ' ?' BRA Z03A3 ;039D: 20 04 ' .' COMB ;039F: 53 'S' BLE Z03E5 ;03A0: 2F 43 '/C' BRA Z03E3 ;03A2: 20 3F ' ?' BRA Z03AA ;03A4: 20 04 ' .' LSRA ;03A6: 44 'D' FCB $45 ;03A7: 45 'E' COMB ;03A8: 53 'S' BRA Z03EA ;03A9: 20 3F ' ?' BRA Z03B1 ;03AB: 20 04 ' .' Z03AD BSR Z03B5 ;03AD: 8D 06 '..' BSR Z041F ;03AF: 8D 6E '.n' Z03B1 LDAA #$34 ;03B1: 86 34 '.4' BSR Z03B7 ;03B3: 8D 02 '..' Z03B5 LDAA #$3C ;03B5: 86 3C '.<' Z03B7 STAA MEF61 ;03B7: B7 EF 61 '..a' RTS ;03BA: 39 '9' FCB $00 ;03BB: 00 '.' FCB $00 ;03BC: 00 '.' FCB $00 ;03BD: 00 '.' FCB $00 ;03BE: 00 '.' FCB $00 ;03BF: 00 '.' FCB $00 ;03C0: 00 '.' FCB $00 ;03C1: 00 '.' FCB $00 ;03C2: 00 '.' Z03C3 LDS #M0060 ;03C3: 8E 00 60 '..`' Z03C6 CLR $80,X ;03C6: 6F 80 'o.' CPX #M0074 ;03C8: 8C 00 74 '..t' BNE Z03C6 ;03CB: 26 F9 '&.' BRA Z03D7 ;03CD: 20 08 ' .' BRA Z03C3 ;03CF: 20 F2 ' .' Z03D1 CLRA ;03D1: 4F 'O' FCB $1F ;03D2: 1F '.' ADDA #$20 ;03D3: 8B 20 '. ' INX ;03D5: 08 '.' FCB $00 ;03D6: 00 '.' Z03D7 BSR Z03D1 ;03D7: 8D F8 '..' TBA ;03D9: 17 '.' FCB $FC ;03DA: FC '.' JSR Z20A9 ;03DB: BD 20 A9 '. .' Z03DE TBA ;03DE: 17 '.' FCB $FC ;03DF: FC '.' SUBA #$17 ;03E0: 80 17 '..' FCB $FC ;03E2: FC '.' Z03E3 SUBB M009E ;03E3: D0 9E '..' Z03E5 BRA Z0386 ;03E5: 20 9F ' .' TAP ;03E7: 06 '.' JSR $9F,X ;03E8: AD 9F '..' Z03EA FCB $00 ;03EA: 00 '.' BHI Z0383 ;03EB: 22 96 '".' BCC Z0415 ;03ED: 24 26 '$&' SEC ;03EF: 0D '.' LDAB M0008 ;03F0: D6 08 '..' ASLB ;03F2: 58 'X' FCB $1F ;03F3: 1F '.' NOP ;03F4: 01 '.' INC $01,X ;03F5: 6C 01 'l.' BNE Z03E4 ;03F7: 26 EB '&.' INC $84,X ;03F9: 6C 84 'l.' BNE Z03E4 ;03FB: 26 E7 '&.' RTS ;03FD: 39 '9' FCB $00 ;03FE: 00 '.' RTS ;03FF: 39 '9' FCB $00 ;0400: 00 '.' FCB $00 ;0401: 00 '.' FCB $00 ;0402: 00 '.' FCB $00 ;0403: 00 '.' FCB $00 ;0404: 00 '.' FCB $00 ;0405: 00 '.' FCB $00 ;0406: 00 '.' FCB $00 ;0407: 00 '.' FCB $00 ;0408: 00 '.' FCB $00 ;0409: 00 '.' FCB $00 ;040A: 00 '.' Z040B STAA MEF60 ;040B: B7 EF 60 '..`' COMA ;040E: 43 'C' BSR Z03AD ;040F: 8D 9C '..' Z0411 LDAA MEF62 ;0411: B6 EF 62 '..b' ANDA #$03 ;0414: 84 03 '..' DECA ;0416: 4A 'J' BNE Z041F ;0417: 26 06 '&.' TST MEF61 ;0419: 7D EF 61 '}.a' BPL Z0411 ;041C: 2A F3 '*.' CLRA ;041E: 4F 'O' Z041F LDAA MEF60 ;041F: B6 EF 60 '..`' RTS ;0422: 39 '9' LDAA #$0D ;0423: 86 0D '..' Z0425 BSR Z040B ;0425: 8D E4 '..' BCS Z0425 ;0427: 25 FC '%.' LDAA #$0A ;0429: 86 0A '..' BRA Z042D ;042B: 20 00 ' .' Z042D BSR Z040B ;042D: 8D DC '..' BCS Z042D ;042F: 25 FC '%.' LDAA $80,X ;0431: A6 80 '..' CMPA #$04 ;0433: 81 04 '..' BNE Z042D ;0435: 26 F6 '&.' TSX ;0437: 30 '0' FCB $1F ;0438: 1F '.' RTS ;0439: 39 '9' FCB $00 ;043A: 00 '.' FCB $00 ;043B: 00 '.' BITB $98,X ;043C: E5 98 '..' FCB $42 ;043E: 42 'B' FCB $00 ;043F: 00 '.' FCB $00 ;0440: 00 '.' JMP Z8600 ;0441: 7E 86 00 '~..' FCB $00 ;0444: 00 '.' FCB $00 ;0445: 00 '.' FCB $00 ;0446: 00 '.' FCB $00 ;0447: 00 '.' FCB $00 ;0448: 00 '.' FCB $00 ;0449: 00 '.' FCB $00 ;044A: 00 '.' FCB $00 ;044B: 00 '.' FCB $00 ;044C: 00 '.' FCB $00 ;044D: 00 '.' FCB $00 ;044E: 00 '.' FCB $00 ;044F: 00 '.' FCB $00 ;0450: 00 '.' FCB $00 ;0451: 00 '.' FCB $00 ;0452: 00 '.' FCB $00 ;0453: 00 '.' FCB $00 ;0454: 00 '.' FCB $00 ;0455: 00 '.' FCB $00 ;0456: 00 '.' FCB $00 ;0457: 00 '.' FCB $00 ;0458: 00 '.' FCB $00 ;0459: 00 '.' FCB $00 ;045A: 00 '.' FCB $00 ;045B: 00 '.' FCB $00 ;045C: 00 '.' FCB $00 ;045D: 00 '.' FCB $00 ;045E: 00 '.' FCB $00 ;045F: 00 '.' FCB $00 ;0460: 00 '.' FCB $00 ;0461: 00 '.' FCB $00 ;0462: 00 '.' FCB $00 ;0463: 00 '.' FCB $00 ;0464: 00 '.' FCB $00 ;0465: 00 '.' FCB $00 ;0466: 00 '.' FCB $00 ;0467: 00 '.' FCB $00 ;0468: 00 '.' FCB $00 ;0469: 00 '.' FCB $00 ;046A: 00 '.' FCB $00 ;046B: 00 '.' FCB $00 ;046C: 00 '.' FCB $00 ;046D: 00 '.' FCB $00 ;046E: 00 '.' FCB $00 ;046F: 00 '.' FCB $00 ;0470: 00 '.' FCB $00 ;0471: 00 '.' FCB $00 ;0472: 00 '.' FCB $00 ;0473: 00 '.' FCB 0 ;0474: 00 '.' END