@@@@@@@@ SERIAL COMMUNICATION @@@@@@@@ $F040: F6 01CA LDAB EXT B<=M $F043: D7 56 STAB DIR M<=B $F045: 97 5A STAA DIR M<=A $F047: DF 52 STX DIR M:M+1<=IX $F049: 86 B3 LDAA IMM A<=M $F04B: 7B 107A TIM EXT IM&M $F04E: 27 4C BEQ REL Branch=> $F09C if Z=1 $F050: 96 11 LDAA DIR A<=M $F052: 97 5B STAA DIR M<=A $F054: 71 EF11 AIM EXT M<=IM&M $F057: 71 FB03 AIM EXT M<=IM&M $F05A: 72 047D OIM EXT M<=IM|M $F05D: 7D 01CE TST EXT M-0 $F060: 26 3D BNE REL Branch=> $F09F if Z=0 $F062: B6 01C5 LDAA EXT A<=M $F065: A1 01 CMPA IND A-M $F067: 27 36 BEQ REL Branch=> $F09F if Z=1 $F069: 86 04 LDAA IMM A<=M $F06B: 8D 7D BSR REL Branch to Subr=> $F0EA $F06D: F6 01CF LDAB EXT B<=M $F070: 86 96 LDAA IMM A<=M $F072: 4A DECA IMP M<=M-1 $F073: 26 FD BNE REL Branch=> $F072 if Z=0 $F075: 5A DECB IMP M<=M-1 $F076: 26 F8 BNE REL Branch=> $F070 if Z=0 $F078: 86 31 LDAA IMM A<=M $F07A: 8D 6E BSR REL Branch to Subr=> $F0EA $F07C: EC 01 LDD IND A:B<=M:M+1 $F07E: 8D 6A BSR REL Branch to Subr=> $F0EA $F080: 17 TBA IMP A<=B $F081: 8D 67 BSR REL Branch to Subr=> $F0EA $F083: 86 05 LDAA IMM A<=M $F085: 8D 63 BSR REL Branch to Subr=> $F0EA $F087: 8D 75 BSR REL Branch to Subr=> $F0FE $F089: 25 11 BCS REL Branch=> $F09C if C=1 $F08B: 29 04 BVS REL Branch=> $F091 if V=1 $F08D: 88 06 EORA IMM A<=A^M $F08F: 27 0E BEQ REL Branch=> $F09F if Z=1 $F091: 96 56 LDAA DIR A<=M $F093: 27 D4 BEQ REL Branch=> $F069 if Z=1 $F095: 7A 0056 DEC EXT M<=M-1 $F098: 26 CF BNE REL Branch=> $F069 if Z=0 $F09A: 86 B1 LDAA IMM A<=M $F09C: 7E F17A JMP EXT Jump=>Address $F17A $F09F: C6 04 LDAB IMM B<=M $F0A1: DE 52 LDX DIR IX<=M:M+1 $F0A3: 3A ABX IMP IX<=IX+B $F0A4: A6 00 LDAA IND A<=M $F0A6: CE 01C4 LDX IMM IX<=M:M+1 $F0A9: 3A ABX IMP IX<=IX+B $F0AA: A7 00 STAA IND M<=A $F0AC: 5A DECB IMP M<=M-1 $F0AD: 2A F2 BPL REL Branch=> $F0A1 if N=0 $F0AF: 86 01 LDAA IMM A<=M $F0B1: DE 52 LDX DIR IX<=M:M+1 $F0B3: E6 04 LDAB IND B<=M $F0B5: DD 54 STD DIR M:M+1<=A:B $F0B7: 86 04 LDAA IMM A<=M $F0B9: 8D 5B BSR REL Branch to Subr=> $F116 $F0BB: 25 DF BCS REL Branch=> $F09C if C=1 $F0BD: 26 12 BNE REL Branch=> $F0D1 if Z=0 $F0BF: CC 0203 LDD IMM A:B<=M:M+1 $F0C2: DD 54 STD DIR M:M+1<=A:B $F0C4: DE 52 LDX DIR IX<=M:M+1 $F0C6: C6 04 LDAB IMM B<=M $F0C8: 3A ABX IMP IX<=IX+B $F0C9: A6 00 LDAA IND A<=M $F0CB: 4C INCA IMP M<=M+1 $F0CC: 08 INX IMP IX<=IX+1 $F0CD: 8D 47 BSR REL Branch to Subr=> $F116 $F0CF: 25 CB BCS REL Branch=> $F09C if C=1 $F0D1: DE 52 LDX DIR IX<=M:M+1 $F0D3: 4D TSTA IMP M-0 $F0D4: 26 C6 BNE REL Branch=> $F09C if Z=0 $F0D6: 7D 01CE TST EXT M-0 $F0D9: 27 06 BEQ REL Branch=> $F0E1 if Z=1 $F0DB: 86 04 LDAA IMM A<=M $F0DD: 8D 0B BSR REL Branch to Subr=> $F0EA $F0DF: 25 BB BCS REL Branch=> $F09C if C=1 $F0E1: 4F CLRA IMP M<=0 $F0E2: 7B 015A TIM EXT IM&M $F0E5: 27 B5 BEQ REL Branch=> $F09C if Z=1 $F0E7: 7E F18B JMP EXT Jump=>Address $F18B $F0EA: 0D SEC IMP C<=1 $F0EB: 7B B07D TIM EXT IM&M $F0EE: 26 0D BNE REL Branch=> $F0FD if Z=0 $F0F0: 7B 0403 TIM EXT IM&M $F0F3: 26 08 BNE REL Branch=> $F0FD if Z=0 $F0F5: 7B 2011 TIM EXT IM&M $F0F8: 27 F0 BEQ REL Branch=> $F0EA if Z=1 $F0FA: 97 13 STAA DIR M<=A $F0FC: 0C CLC IMP C<=0 $F0FD: 39 RTS IMP Return from Subroutine $F0FE: 5F CLRB IMP M<=0 $F0FF: B6 01CD LDAA EXT A<=M $F102: BD F26A JSR EXT Jump to Subr=>Address $F26A $F105: 25 0E BCS REL Branch=> $F115 if C=1 $F107: 29 0C BVS REL Branch=> $F115 if V=1 $F109: 36 PSHA IMP =>A;SP<=SP-1 $F10A: 17 TBA IMP A<=B $F10B: 32 PULA IMP SP<=SP+1;<=A $F10C: 4D TSTA IMP M-0 $F10D: 26 06 BNE REL Branch=> $F115 if Z=0 $F10F: 17 TBA IMP A<=B $F110: 81 10 CMPA IMM A-M $F112: 27 EB BEQ REL Branch=> $F0FF if Z=1 $F114: 5F CLRB IMP M<=0 $F115: 39 RTS IMP Return from Subroutine $F116: 97 50 STAA DIR M<=A $F118: DF 58 STX DIR M:M+1<=IX $F11A: B6 01CA LDAA EXT A<=M $F11D: 97 56 STAA DIR M<=A $F11F: 96 50 LDAA DIR A<=M $F121: 97 51 STAA DIR M<=A $F123: DE 58 LDX DIR IX<=M:M+1 $F125: 96 54 LDAA DIR A<=M $F127: 16 TAB IMP B<=A $F128: 8D C0 BSR REL Branch to Subr=> $F0EA $F12A: A6 00 LDAA IND A<=M $F12C: 8D BC BSR REL Branch to Subr=> $F0EA $F12E: 1B ABA IMP A<=A+B $F12F: 16 TAB IMP B<=A $F130: 08 INX IMP IX<=IX+1 $F131: 7A 0051 DEC EXT M<=M-1 $F134: 26 F4 BNE REL Branch=> $F12A if Z=0 $F136: 96 55 LDAA DIR A<=M $F138: 8D B0 BSR REL Branch to Subr=> $F0EA $F13A: 1B ABA IMP A<=A+B $F13B: 40 NEGA IMP M<= -M $F13C: D6 12 LDAB DIR B<=M $F13E: 8D AA BSR REL Branch to Subr=> $F0EA $F140: 8D BC BSR REL Branch to Subr=> $F0FE $F142: 25 2B BCS REL Branch=> $F16F if C=1 $F144: 29 17 BVS REL Branch=> $F15D if V=1 $F146: 81 06 CMPA IMM A-M $F148: 27 24 BEQ REL Branch=> $F16E if Z=1 $F14A: 81 15 CMPA IMM A-M $F14C: 27 11 BEQ REL Branch=> $F15F if Z=1 $F14E: 83 103B SUBD IMM A:B<=A:B-M:M+1 $F151: 26 0A BNE REL Branch=> $F15D if Z=0 $F153: CE 4E20 LDX IMM IX<=M:M+1 $F156: 09 DEX IMP IX<=IX-1 $F157: 26 FD BNE REL Branch=> $F156 if Z=0 $F159: 86 05 LDAA IMM A<=M $F15B: 20 DF BRA REL Branch=> $F13C if (Always) $F15D: 86 05 LDAA IMM A<=M $F15F: D6 56 LDAB DIR B<=M $F161: 27 05 BEQ REL Branch=> $F168 if Z=1 $F163: 7A 0056 DEC EXT M<=M-1 $F166: 27 0C BEQ REL Branch=> $F174 if Z=1 $F168: 81 15 CMPA IMM A-M $F16A: 27 B3 BEQ REL Branch=> $F11F if Z=1 $F16C: 20 CE BRA REL Branch=> $F13C if (Always) $F16E: 4F CLRA IMP M<=0 $F16F: 39 RTS IMP Return from Subroutine $F170: 86 B0 LDAA IMM A<=M $F172: 20 06 BRA REL Branch=> $F17A if (Always) $F174: 86 B1 LDAA IMM A<=M $F176: 20 02 BRA REL Branch=> $F17A if (Always) $F178: 86 B3 LDAA IMM A<=M $F17A: 7F 01C5 CLR EXT M<=0 $F17D: 7E F229 JMP EXT Jump=>Address $F229 $F180: DF 52 STX DIR M:M+1<=IX $F182: 7B 107A TIM EXT IM&M $F185: 27 F1 BEQ REL Branch=> $F178 if Z=1 $F187: 96 11 LDAA DIR A<=M $F189: 97 5B STAA DIR M<=A $F18B: 0F SEI IMP I<=1 $F18C: 71 EF11 AIM EXT M<=IM&M $F18F: 71 FB03 AIM EXT M<=IM&M $F192: 7D 01CE TST EXT M-0 $F195: 26 05 BNE REL Branch=> $F19C if Z=0 $F197: 86 04 LDAA IMM A<=M $F199: BD F0EA JSR EXT Jump to Subr=>Address $F0EA $F19C: 4F CLRA IMP M<=0 $F19D: 4C INCA IMP M<=M+1 $F19E: 97 59 STAA DIR M<=A $F1A0: B6 01CA LDAA EXT A<=M $F1A3: 97 56 STAA DIR M<=A $F1A5: DE 52 LDX DIR IX<=M:M+1 $F1A7: B6 01CC LDAA EXT A<=M $F1AA: BD F26A JSR EXT Jump to Subr=>Address $F26A $F1AD: 25 CE BCS REL Branch=> $F17D if C=1 $F1AF: 29 BF BVS REL Branch=> $F170 if V=1 $F1B1: C6 04 LDAB IMM B<=M $F1B3: 81 01 CMPA IMM A-M $F1B5: 27 2A BEQ REL Branch=> $F1E1 if Z=1 $F1B7: 5C INCB IMP M<=M+1 $F1B8: 3A ABX IMP IX<=IX+B $F1B9: F6 01C8 LDAB EXT B<=M $F1BC: 81 02 CMPA IMM A-M $F1BE: 27 21 BEQ REL Branch=> $F1E1 if Z=1 $F1C0: 81 05 CMPA IMM A-M $F1C2: 27 15 BEQ REL Branch=> $F1D9 if Z=1 $F1C4: BD F27B JSR EXT Jump to Subr=>Address $F27B $F1C7: 25 60 BCS REL Branch=> $F229 if C=1 $F1C9: 28 F9 BVC REL Branch=> $F1C4 if V=0 $F1CB: 86 15 LDAA IMM A<=M $F1CD: B7 01C9 STAA EXT M<=A $F1D0: D6 56 LDAB DIR B<=M $F1D2: 27 A0 BEQ REL Branch=> $F174 if Z=1 $F1D4: 7A 0056 DEC EXT M<=M-1 $F1D7: 27 9B BEQ REL Branch=> $F174 if Z=1 $F1D9: B6 01C9 LDAA EXT A<=M $F1DC: BD F0EA JSR EXT Jump to Subr=>Address $F0EA $F1DF: 20 C4 BRA REL Branch=> $F1A5 if (Always) $F1E1: 5C INCB IMP M<=M+1 $F1E2: D7 55 STAB DIR M<=B $F1E4: 97 58 STAA DIR M<=A $F1E6: 97 50 STAA DIR M<=A $F1E8: 16 TAB IMP B<=A $F1E9: 8D 7C BSR REL Branch to Subr=> $F267 $F1EB: 25 3C BCS REL Branch=> $F229 if C=1 $F1ED: 29 DC BVS REL Branch=> $F1CB if V=1 $F1EF: A7 00 STAA IND M<=A $F1F1: 08 INX IMP IX<=IX+1 $F1F2: 1B ABA IMP A<=A+B $F1F3: 16 TAB IMP B<=A $F1F4: 7A 0055 DEC EXT M<=M-1 $F1F7: 26 F0 BNE REL Branch=> $F1E9 if Z=0 $F1F9: 8D 6C BSR REL Branch to Subr=> $F267 $F1FB: 25 2C BCS REL Branch=> $F229 if C=1 $F1FD: 29 CC BVS REL Branch=> $F1CB if V=1 $F1FF: 1B ABA IMP A<=A+B $F200: 16 TAB IMP B<=A $F201: 7A 0050 DEC EXT M<=M-1 $F204: 26 F3 BNE REL Branch=> $F1F9 if Z=0 $F206: 5D TSTB IMP M-0 $F207: 26 C2 BNE REL Branch=> $F1CB if Z=0 $F209: 86 06 LDAA IMM A<=M $F20B: B7 01C9 STAA EXT M<=A $F20E: BD F0EA JSR EXT Jump to Subr=>Address $F0EA $F211: 25 16 BCS REL Branch=> $F229 if C=1 $F213: DC 58 LDD DIR A:B<=M:M+1 $F215: 88 01 EORA IMM A<=A^M $F217: 26 0A BNE REL Branch=> $F223 if Z=0 $F219: DE 52 LDX DIR IX<=M:M+1 $F21B: E6 04 LDAB IND B<=M $F21D: F7 01C8 STAB EXT M<=B $F220: 7E F19E JMP EXT Jump=>Address $F19E $F223: 7D 01CE TST EXT M-0 $F226: 27 28 BEQ REL Branch=> $F250 if Z=1 $F228: 4F CLRA IMP M<=0 $F229: 0E CLI IMP I<=0 $F22A: DE 52 LDX DIR IX<=M:M+1 $F22C: 71 FB7D AIM EXT M<=IM&M $F22F: 7B B07D TIM EXT IM&M $F232: 27 01 BEQ REL Branch=> $F235 if Z=1 $F234: 0D SEC IMP C<=1 $F235: 7B 037A TIM EXT IM&M $F238: 27 0E BEQ REL Branch=> $F248 if Z=1 $F23A: 36 PSHA IMP =>A;SP<=SP-1 $F23B: 86 32 LDAA IMM A<=M $F23D: 4A DECA IMP M<=M-1 $F23E: 26 FD BNE REL Branch=> $F23D if Z=0 $F240: 72 0403 OIM EXT M<=IM|M $F243: 96 5B LDAA DIR A<=M $F245: 97 11 STAA DIR M<=A $F247: 32 PULA IMP SP<=SP+1;<=A $F248: 8A 00 ORAA IMM A<=A|M $F24A: 39 RTS IMP Return from Subroutine $F24B: 86 06 LDAA IMM A<=M $F24D: BD F0EA JSR EXT Jump to Subr=>Address $F0EA $F250: 7F 01C5 CLR EXT M<=0 $F253: BD F0FE JSR EXT Jump to Subr=>Address $F0FE $F256: 25 D1 BCS REL Branch=> $F229 if C=1 $F258: 29 CE BVS REL Branch=> $F228 if V=1 $F25A: 81 05 CMPA IMM A-M $F25C: 27 ED BEQ REL Branch=> $F24B if Z=1 $F25E: 81 04 CMPA IMM A-M $F260: 26 C6 BNE REL Branch=> $F228 if Z=0 $F262: BD F0EA JSR EXT Jump to Subr=>Address $F0EA $F265: 20 C1 BRA REL Branch=> $F228 if (Always) $F267: B6 01CB LDAA EXT A<=M $F26A: 37 PSHB IMP =>B;SP<=SP-1 $F26B: 16 TAB IMP B<=A $F26C: 8D 0D BSR REL Branch to Subr=> $F27B $F26E: 25 09 BCS REL Branch=> $F279 if C=1 $F270: 28 07 BVC REL Branch=> $F279 if V=0 $F272: 5D TSTB IMP M-0 $F273: 27 F7 BEQ REL Branch=> $F26C if Z=1 $F275: 5A DECB IMP M<=M-1 $F276: 26 F4 BNE REL Branch=> $F26C if Z=0 $F278: 0B SEV IMP V<=1 $F279: 33 PULB IMP SP<=SP+1;<=B $F27A: 39 RTS IMP Return from Subroutine $F27B: 3C PSHX IMP =>IX;SP<=SP-2 $F27C: CE 0BB8 LDX IMM IX<=M:M+1 $F27F: 4F CLRA IMP M<=0 $F280: 09 DEX IMP IX<=IX-1 $F281: 0B SEV IMP V<=1 $F282: 27 12 BEQ REL Branch=> $F296 if Z=1 $F284: 0D SEC IMP C<=1 $F285: 7B B07D TIM EXT IM&M $F288: 26 0C BNE REL Branch=> $F296 if Z=0 $F28A: 7B 0403 TIM EXT IM&M $F28D: 26 07 BNE REL Branch=> $F296 if Z=0 $F28F: 7D 0011 TST EXT M-0 $F292: 2A EB BPL REL Branch=> $F27F if N=0 $F294: 96 12 LDAA DIR A<=M $F296: 38 PULX IMP SP<=SP-2;<=IX $F297: 39 RTS IMP Return from Subroutine $F298: 36 PSHA IMP =>A;SP<=SP-1 $F299: CC 0011 LDD IMM A:B<=M:M+1 $F29C: CE 01C4 LDX IMM IX<=M:M+1 $F29F: 3C PSHX IMP =>IX;SP<=SP-2 $F2A0: 8D 11 BSR REL Branch to Subr=> $F2B3 $F2A2: 38 PULX IMP SP<=SP-2;<=IX $F2A3: 32 PULA IMP SP<=SP+1;<=A $F2A4: A7 0A STAA IND M<=A $F2A6: 62 0306 OIM IND M<=IM|M $F2A9: CC 0A64 LDD IMM A:B<=M:M+1 $F2AC: ED 07 STD IND M:M+1<=A:B $F2AE: A7 09 STAA IND M<=A $F2B0: 6C 0B INC IND M<=M+1 $F2B2: 39 RTS IMP Return from Subroutine $F2B3: A7 00 STAA IND M<=A $F2B5: 08 INX IMP IX<=IX+1 $F2B6: 5A DECB IMP M<=M-1 $F2B7: 26 FA BNE REL Branch=> $F2B3 if Z=0 $F2B9: 39 RTS IMP Return from Subroutine ' END @@@@@@@@ PROM CASSETTE @@@@@@@@ $F2BA: 97 52 STAA DIR M<=A $F2BC: DF 50 STX DIR M:M+1<=IX $F2BE: BD F3A6 JSR EXT Jump to Subr=>Address $F3A6 $F2C1: 26 7B BNE REL Branch=> $F33E if Z=0 $F2C3: 97 55 STAA DIR M<=A $F2C5: 86 81 LDAA IMM A<=M $F2C7: B7 0208 STAA EXT M<=A $F2CA: 5F CLRB IMP M<=0 $F2CB: D7 53 STAB DIR M<=B $F2CD: DE 50 LDX DIR IX<=M:M+1 $F2CF: 3A ABX IMP IX<=IX+B $F2D0: BD F37C JSR EXT Jump to Subr=>Address $F37C $F2D3: 25 72 BCS REL Branch=> $F347 if C=1 $F2D5: 5D TSTB IMP M-0 $F2D6: 26 07 BNE REL Branch=> $F2DF if Z=0 $F2D8: 81 FF CMPA IMM A-M $F2DA: 27 6C BEQ REL Branch=> $F348 if Z=1 $F2DC: 4D TSTA IMP M-0 $F2DD: 27 2A BEQ REL Branch=> $F309 if Z=1 $F2DF: 7D 0052 TST EXT M-0 $F2E2: 27 02 BEQ REL Branch=> $F2E6 if Z=1 $F2E4: A7 10 STAA IND M<=A $F2E6: 7D 0053 TST EXT M-0 $F2E9: 2B 14 BMI REL Branch=> $F2FF if N=1 $F2EB: 36 PSHA IMP =>A;SP<=SP-1 $F2EC: 86 2A LDAA IMM A<=M $F2EE: A1 00 CMPA IND A-M $F2F0: 32 PULA IMP SP<=SP+1;<=A $F2F1: 26 05 BNE REL Branch=> $F2F8 if Z=0 $F2F3: 72 8053 OIM EXT M<=IM|M $F2F6: 20 07 BRA REL Branch=> $F2FF if (Always) $F2F8: A1 00 CMPA IND A-M $F2FA: 27 03 BEQ REL Branch=> $F2FF if Z=1 $F2FC: 7C 0053 INC EXT M<=M+1 $F2FF: 5C INCB IMP M<=M+1 $F300: C1 10 CMPB IMM B-M $F302: 26 C9 BNE REL Branch=> $F2CD if Z=0 $F304: 7B 0F53 TIM EXT IM&M $F307: 27 12 BEQ REL Branch=> $F31B if Z=1 $F309: 7C 0055 INC EXT M<=M+1 $F30C: D6 55 LDAB DIR B<=M $F30E: C1 40 CMPB IMM B-M $F310: 2A 36 BPL REL Branch=> $F348 if N=0 $F312: 86 20 LDAA IMM A<=M $F314: 3D MUL IMP A:B<=A*B $F315: 18 XGDX IMP A:B<==>IX $F316: BD F408 JSR EXT Jump to Subr=>Address $F408 $F319: 20 AF BRA REL Branch=> $F2CA if (Always) $F31B: CE 0204 LDX IMM IX<=M:M+1 $F31E: 8D 5C BSR REL Branch to Subr=> $F37C $F320: 36 PSHA IMP =>A;SP<=SP-1 $F321: 8D 59 BSR REL Branch to Subr=> $F37C $F323: 16 TAB IMP B<=A $F324: 32 PULA IMP SP<=SP+1;<=A $F325: BD F425 JSR EXT Jump to Subr=>Address $F425 $F328: 26 15 BNE REL Branch=> $F33F if Z=0 $F32A: A7 07 STAA IND M<=A $F32C: 08 INX IMP IX<=IX+1 $F32D: 8C 0208 CPX IMM IX-M:M+1 $F330: 26 EC BNE REL Branch=> $F31E if Z=0 $F332: EC 05 LDD IND A:B<=M:M+1 $F334: A3 03 SUBD IND A:B<=A:B-M:M+1 $F336: FD 012E STD EXT M:M+1<=A:B $F339: 86 81 LDAA IMM A<=M $F33B: A7 00 STAA IND M<=A $F33D: 4F CLRA IMP M<=0 $F33E: 39 RTS IMP Return from Subroutine $F33F: 86 A4 LDAA IMM A<=M $F341: 36 PSHA IMP =>A;SP<=SP-1 $F342: BD F3F0 JSR EXT Jump to Subr=>Address $F3F0 $F345: 32 PULA IMP SP<=SP+1;<=A $F346: 16 TAB IMP B<=A $F347: 39 RTS IMP Return from Subroutine $F348: 86 A1 LDAA IMM A<=M $F34A: 20 F5 BRA REL Branch=> $F341 if (Always) $F34C: 3C PSHX IMP =>IX;SP<=SP-2 $F34D: C6 A3 LDAB IMM B<=M $F34F: B6 0208 LDAA EXT A<=M $F352: 2A 0D BPL REL Branch=> $F361 if N=0 $F354: 47 ASRA IMP %=>########=>C $F355: 24 0A BCC REL Branch=> $F361 if C=0 $F357: FC 020D LDD EXT A:B<=M:M+1 $F35A: B3 020B SUBD EXT A:B<=A:B-M:M+1 $F35D: 26 06 BNE REL Branch=> $F365 if Z=0 $F35F: C6 01 LDAB IMM B<=M $F361: 4F CLRA IMP M<=0 $F362: 5D TSTB IMP M-0 $F363: 38 PULX IMP SP<=SP-2;<=IX $F364: 39 RTS IMP Return from Subroutine $F365: 18 XGDX IMP A:B<==>IX $F366: 09 DEX IMP IX<=IX-1 $F367: FF 012E STX EXT M:M+1<=IX $F36A: C6 A5 LDAB IMM B<=M $F36C: 25 F3 BCS REL Branch=> $F361 if C=1 $F36E: FE 020B LDX EXT IX<=M:M+1 $F371: 3C PSHX IMP =>IX;SP<=SP-2 $F372: BD F408 JSR EXT Jump to Subr=>Address $F408 $F375: 38 PULX IMP SP<=SP-2;<=IX $F376: 08 INX IMP IX<=IX+1 $F377: FF 020B STX EXT M:M+1<=IX $F37A: 5F CLRB IMP M<=0 $F37B: 38 PULX IMP SP<=SP-2;<=IX $F37C: 37 PSHB IMP =>B;SP<=SP-1 $F37D: 86 01 LDAA IMM A<=M $F37F: 97 54 STAA DIR M<=A $F381: 5F CLRB IMP M<=0 $F382: C4 7F ANDB IMM B<=B&M $F384: 86 C0 LDAA IMM A<=M $F386: BD E32F JSR EXT Jump to Subr=>Address $E32F $F389: CA 80 ORAB IMM B<=B|M $F38B: BD E32F JSR EXT Jump to Subr=>Address $E32F $F38E: 96 02 LDAA DIR A<=M $F390: 48 ASLA IMP C<=########<=0 $F391: 79 0054 ROL EXT C<=########<=C $F394: CA 40 ORAB IMM B<=B|M $F396: 24 EA BCC REL Branch=> $F382 if C=0 $F398: FC 0209 LDD EXT A:B<=M:M+1 $F39B: C3 0001 ADDD IMM A:B<=A:B+M:M+1 $F39E: FD 0209 STD EXT M:M+1<=A:B $F3A1: 96 54 LDAA DIR A<=M $F3A3: 33 PULB IMP SP<=SP+1;<=B $F3A4: 5D TSTB IMP M-0 $F3A5: 39 RTS IMP Return from Subroutine $F3A6: BD EB3E JSR EXT Jump to Subr=>Address $EB3E $F3A9: 25 1F BCS REL Branch=> $F3CA if C=1 $F3AB: 16 TAB IMP B<=A $F3AC: 26 1C BNE REL Branch=> $F3CA if Z=0 $F3AE: 72 207C OIM EXT M<=IM|M $F3B1: FD 0209 STD EXT M:M+1<=A:B $F3B4: 86 C0 LDAA IMM A<=M $F3B6: BD E32F JSR EXT Jump to Subr=>Address $E32F $F3B9: 86 51 LDAA IMM A<=M $F3BB: BD E418 JSR EXT Jump to Subr=>Address $E418 $F3BE: 25 0A BCS REL Branch=> $F3CA if C=1 $F3C0: 79 0208 ROL EXT C<=########<=C $F3C3: 0D SEC IMP C<=1 $F3C4: 76 0208 ROR EXT C=>########=>C $F3C7: 4F CLRA IMP M<=0 $F3C8: 20 33 BRA REL Branch=> $F3FD if (Always) $F3CA: 86 A0 LDAA IMM A<=M $F3CC: 39 RTS IMP Return from Subroutine $F3CD: 16 TAB IMP B<=A $F3CE: 86 A3 LDAA IMM A<=M $F3D0: C1 40 CMPB IMM B-M $F3D2: 24 29 BCC REL Branch=> $F3FD if C=0 $F3D4: DF 50 STX DIR M:M+1<=IX $F3D6: 37 PSHB IMP =>B;SP<=SP-1 $F3D7: 8D CD BSR REL Branch to Subr=> $F3A6 $F3D9: 33 PULB IMP SP<=SP+1;<=B $F3DA: 26 21 BNE REL Branch=> $F3FD if Z=0 $F3DC: 86 20 LDAA IMM A<=M $F3DE: 3D MUL IMP A:B<=A*B $F3DF: 18 XGDX IMP A:B<==>IX $F3E0: 8D 26 BSR REL Branch to Subr=> $F408 $F3E2: C6 20 LDAB IMM B<=M $F3E4: DE 50 LDX DIR IX<=M:M+1 $F3E6: 37 PSHB IMP =>B;SP<=SP-1 $F3E7: 8D 93 BSR REL Branch to Subr=> $F37C $F3E9: A7 00 STAA IND M<=A $F3EB: 08 INX IMP IX<=IX+1 $F3EC: 33 PULB IMP SP<=SP+1;<=B $F3ED: 5A DECB IMP M<=M-1 $F3EE: 26 F6 BNE REL Branch=> $F3E6 if Z=0 $F3F0: 7F 0208 CLR EXT M<=0 $F3F3: 86 52 LDAA IMM A<=M $F3F5: BD E418 JSR EXT Jump to Subr=>Address $E418 $F3F8: 71 DF7C AIM EXT M<=IM&M $F3FB: 86 00 LDAA IMM A<=M $F3FD: 7E E4BF JMP EXT Jump=>Address $E4BF $F400: 8D A4 BSR REL Branch to Subr=> $F3A6 $F402: 26 20 BNE REL Branch=> $F424 if Z=0 $F404: 5F CLRB IMP M<=0 $F405: FD 0209 STD EXT M:M+1<=A:B $F408: 3C PSHX IMP =>IX;SP<=SP-2 $F409: 32 PULA IMP SP<=SP+1;<=A $F40A: 33 PULB IMP SP<=SP+1;<=B $F40B: B3 0209 SUBD EXT A:B<=A:B-M:M+1 $F40E: 27 14 BEQ REL Branch=> $F424 if Z=1 $F410: 25 EE BCS REL Branch=> $F400 if C=1 $F412: FF 0209 STX EXT M:M+1<=IX $F415: 18 XGDX IMP A:B<==>IX $F416: 5F CLRB IMP M<=0 $F417: 86 C0 LDAA IMM A<=M $F419: BD E32F JSR EXT Jump to Subr=>Address $E32F $F41C: C6 40 LDAB IMM B<=M $F41E: BD E32F JSR EXT Jump to Subr=>Address $E32F $F421: 09 DEX IMP IX<=IX-1 $F422: 26 F2 BNE REL Branch=> $F416 if Z=0 $F424: 39 RTS IMP Return from Subroutine $F425: 3C PSHX IMP =>IX;SP<=SP-2 $F426: CE 0002 LDX IMM IX<=M:M+1 $F429: 37 PSHB IMP =>B;SP<=SP-1 $F42A: 5F CLRB IMP M<=0 $F42B: 81 30 CMPA IMM A-M $F42D: 25 1A BCS REL Branch=> $F449 if C=1 $F42F: 81 3A CMPA IMM A-M $F431: 25 0A BCS REL Branch=> $F43D if C=1 $F433: 81 41 CMPA IMM A-M $F435: 25 12 BCS REL Branch=> $F449 if C=1 $F437: 81 47 CMPA IMM A-M $F439: 24 0E BCC REL Branch=> $F449 if C=0 $F43B: 80 07 SUBA IMM A<=A-M $F43D: 80 30 SUBA IMM A<=A-M $F43F: 09 DEX IMP IX<=IX-1 $F440: 27 0C BEQ REL Branch=> $F44E if Z=1 $F442: 04 LSRD IMP 0=>################=>C $F443: 04 LSRD IMP 0=>################=>C $F444: 04 LSRD IMP 0=>################=>C $F445: 04 LSRD IMP 0=>################=>C $F446: 32 PULA IMP SP<=SP+1;<=A $F447: 20 E2 BRA REL Branch=> $F42B if (Always) $F449: C6 FF LDAB IMM B<=M $F44B: 09 DEX IMP IX<=IX-1 $F44C: 26 F8 BNE REL Branch=> $F446 if Z=0 $F44E: 1B ABA IMP A<=A+B $F44F: C4 01 ANDB IMM B<=B&M $F451: 38 PULX IMP SP<=SP-2;<=IX $F452: 39 RTS IMP Return from Subroutine ' END @@@@@@@@ LCD DRIVER ROUTINE @@@@@@@@ $F453: 72 017D OIM EXT M<=IM|M $F456: 37 PSHB IMP =>B;SP<=SP-1 $F457: 36 PSHA IMP =>A;SP<=SP-1 $F458: 3C PSHX IMP =>IX;SP<=SP-2 $F459: CE 0286 LDX IMM IX<=M:M+1 $F45C: BD FA85 JSR EXT Jump to Subr=>Address $FA85 $F45F: 32 PULA IMP SP<=SP+1;<=A $F460: 33 PULB IMP SP<=SP+1;<=B $F461: 38 PULX IMP SP<=SP-2;<=IX $F462: 81 13 CMPA IMM A-M $F464: 25 02 BCS REL Branch=> $F468 if C=1 $F466: 86 13 LDAA IMM A<=M $F468: C4 03 ANDB IMM B<=B&M $F46A: 39 RTS IMP Return from Subroutine $F46B: 8D E6 BSR REL Branch to Subr=> $F453 $F46D: 3C PSHX IMP =>IX;SP<=SP-2 $F46E: 20 15 BRA REL Branch=> $F485 if (Always) $F470: 8D E1 BSR REL Branch to Subr=> $F453 $F472: 3C PSHX IMP =>IX;SP<=SP-2 $F473: 37 PSHB IMP =>B;SP<=SP-1 $F474: 36 PSHA IMP =>A;SP<=SP-1 $F475: 86 14 LDAA IMM A<=M $F477: 3D MUL IMP A:B<=A*B $F478: 30 TSX IMP IX<=SP+1 $F479: EB 00 ADDB IND B<=B+M $F47B: A6 02 LDAA IND A<=M $F47D: CE 0220 LDX IMM IX<=M:M+1 $F480: 3A ABX IMP IX<=IX+B $F481: A7 00 STAA IND M<=A $F483: 32 PULA IMP SP<=SP+1;<=A $F484: 33 PULB IMP SP<=SP+1;<=B $F485: 37 PSHB IMP =>B;SP<=SP-1 $F486: 36 PSHA IMP =>A;SP<=SP-1 $F487: 37 PSHB IMP =>B;SP<=SP-1 $F488: 48 ASLA IMP C<=########<=0 $F489: 16 TAB IMP B<=A $F48A: 48 ASLA IMP C<=########<=0 $F48B: 1B ABA IMP A<=A+B $F48C: 33 PULB IMP SP<=SP+1;<=B $F48D: 37 PSHB IMP =>B;SP<=SP-1 $F48E: 36 PSHA IMP =>A;SP<=SP-1 $F48F: CE 0286 LDX IMM IX<=M:M+1 $F492: 3C PSHX IMP =>IX;SP<=SP-2 $F493: 5F CLRB IMP M<=0 $F494: 37 PSHB IMP =>B;SP<=SP-1 $F495: 30 TSX IMP IX<=SP+1 $F496: EC 03 LDD IND A:B<=M:M+1 $F498: 8D 56 BSR REL Branch to Subr=> $F4F0 $F49A: 16 TAB IMP B<=A $F49B: 86 64 LDAA IMM A<=M $F49D: 8D 76 BSR REL Branch to Subr=> $F515 $F49F: 17 TBA IMP A<=B $F4A0: 8A 80 ORAA IMM A<=A|M $F4A2: 8D 71 BSR REL Branch to Subr=> $F515 $F4A4: CC 0800 LDD IMM A:B<=M:M+1 $F4A7: BD F52C JSR EXT Jump to Subr=>Address $F52C $F4AA: E6 00 LDAB IND B<=M $F4AC: EE 01 LDX IND IX<=M:M+1 $F4AE: 3A ABX IMP IX<=IX+B $F4AF: A6 00 LDAA IND A<=M $F4B1: C1 05 CMPB IMM B-M $F4B3: 27 09 BEQ REL Branch=> $F4BE if Z=1 $F4B5: F6 0280 LDAB EXT B<=M $F4B8: C5 20 BITB IMM B&M $F4BA: 27 02 BEQ REL Branch=> $F4BE if Z=1 $F4BC: 8A 80 ORAA IMM A<=A|M $F4BE: 8D 55 BSR REL Branch to Subr=> $F515 $F4C0: 30 TSX IMP IX<=SP+1 $F4C1: 6C 00 INC IND M<=M+1 $F4C3: A6 00 LDAA IND A<=M $F4C5: 81 06 CMPA IMM A-M $F4C7: 27 0E BEQ REL Branch=> $F4D7 if Z=1 $F4C9: 6C 03 INC IND M<=M+1 $F4CB: A6 03 LDAA IND A<=M $F4CD: 81 28 CMPA IMM A-M $F4CF: 27 C5 BEQ REL Branch=> $F496 if Z=1 $F4D1: 81 50 CMPA IMM A-M $F4D3: 27 C1 BEQ REL Branch=> $F496 if Z=1 $F4D5: 20 D3 BRA REL Branch=> $F4AA if (Always) $F4D7: CC 0F08 LDD IMM A:B<=M:M+1 $F4DA: 8D 50 BSR REL Branch to Subr=> $F52C $F4DC: 31 INS IMP SP<=SP+1 $F4DD: 38 PULX IMP SP<=SP-2;<=IX $F4DE: 38 PULX IMP SP<=SP-2;<=IX $F4DF: 32 PULA IMP SP<=SP+1;<=A $F4E0: 33 PULB IMP SP<=SP+1;<=B $F4E1: 4C INCA IMP M<=M+1 $F4E2: 81 14 CMPA IMM A-M $F4E4: 26 04 BNE REL Branch=> $F4EA if Z=0 $F4E6: 4F CLRA IMP M<=0 $F4E7: 5C INCB IMP M<=M+1 $F4E8: C4 03 ANDB IMM B<=B&M $F4EA: 71 FE7D AIM EXT M<=IM&M $F4ED: 38 PULX IMP SP<=SP-2;<=IX $F4EE: 18 XGDX IMP A:B<==>IX $F4EF: 39 RTS IMP Return from Subroutine $F4F0: 3C PSHX IMP =>IX;SP<=SP-2 $F4F1: 37 PSHB IMP =>B;SP<=SP-1 $F4F2: 30 TSX IMP IX<=SP+1 $F4F3: 5F CLRB IMP M<=0 $F4F4: 80 28 SUBA IMM A<=A-M $F4F6: 5C INCB IMP M<=M+1 $F4F7: 24 FB BCC REL Branch=> $F4F4 if C=0 $F4F9: 8B 28 ADDA IMM A<=A+M $F4FB: 6B 0100 TIM IND IM&M $F4FE: 27 02 BEQ REL Branch=> $F502 if Z=1 $F500: 8A 40 ORAA IMM A<=A|M $F502: 6B 0200 TIM IND IM&M $F505: 27 02 BEQ REL Branch=> $F509 if Z=1 $F507: CB 03 ADDB IMM B<=B+M $F509: 31 INS IMP SP<=SP+1 $F50A: 38 PULX IMP SP<=SP-2;<=IX $F50B: 36 PSHA IMP =>A;SP<=SP-1 $F50C: CA 08 ORAB IMM B<=B|M $F50E: 86 0F LDAA IMM A<=M $F510: BD E32F JSR EXT Jump to Subr=>Address $E32F $F513: 32 PULA IMP SP<=SP+1;<=A $F514: 39 RTS IMP Return from Subroutine $F515: 97 2A STAA DIR M<=A $F517: 36 PSHA IMP =>A;SP<=SP-1 $F518: 07 TPA IMP A<=CCR $F519: 0F SEI IMP I<=1 $F51A: 3C PSHX IMP =>IX;SP<=SP-2 $F51B: 7D 0028 TST EXT M-0 $F51E: 2A FB BPL REL Branch=> $F51B if N=0 $F520: DE 2A LDX DIR IX<=M:M+1 $F522: DE 2A LDX DIR IX<=M:M+1 $F524: DE 2A LDX DIR IX<=M:M+1 $F526: DE 2A LDX DIR IX<=M:M+1 $F528: 38 PULX IMP SP<=SP-2;<=IX $F529: 06 TAP IMP CCR<=A $F52A: 32 PULA IMP SP<=SP+1;<=A $F52B: 39 RTS IMP Return from Subroutine $F52C: 7D 0028 TST EXT M-0 $F52F: 2A FB BPL REL Branch=> $F52C if N=0 $F531: 7E E32F JMP EXT Jump=>Address $E32F $F534: 86 10 LDAA IMM A<=M $F536: 8D 0F BSR REL Branch to Subr=> $F547 $F538: 86 1E LDAA IMM A<=M $F53A: 8D 0B BSR REL Branch to Subr=> $F547 $F53C: 86 08 LDAA IMM A<=M $F53E: 8D 07 BSR REL Branch to Subr=> $F547 $F540: 7F 0280 CLR EXT M<=0 $F543: 8D 18 BSR REL Branch to Subr=> $F55D $F545: 86 09 LDAA IMM A<=M $F547: 5F CLRB IMP M<=0 $F548: 5C INCB IMP M<=M+1 $F549: 37 PSHB IMP =>B;SP<=SP-1 $F54A: CA 08 ORAB IMM B<=B|M $F54C: 36 PSHA IMP =>A;SP<=SP-1 $F54D: 86 0F LDAA IMM A<=M $F54F: BD E32F JSR EXT Jump to Subr=>Address $E32F $F552: 32 PULA IMP SP<=SP+1;<=A $F553: 8D C0 BSR REL Branch to Subr=> $F515 $F555: 84 FD ANDA IMM A<=A&M $F557: 33 PULB IMP SP<=SP+1;<=B $F558: C1 06 CMPB IMM B-M $F55A: 26 EC BNE REL Branch=> $F548 if Z=0 $F55C: 39 RTS IMP Return from Subroutine $F55D: CE 0000 LDX IMM IX<=M:M+1 $F560: 86 20 LDAA IMM A<=M $F562: BD F470 JSR EXT Jump to Subr=>Address $F470 $F565: 08 INX IMP IX<=IX+1 $F566: 09 DEX IMP IX<=IX-1 $F567: 26 F7 BNE REL Branch=> $F560 if Z=0 $F569: 39 RTS IMP Return from Subroutine $F56A: 5D TSTB IMP M-0 $F56B: 27 F0 BEQ REL Branch=> $F55D if Z=1 $F56D: 37 PSHB IMP =>B;SP<=SP-1 $F56E: 3C PSHX IMP =>IX;SP<=SP-2 $F56F: EE 00 LDX IND IX<=M:M+1 $F571: 3C PSHX IMP =>IX;SP<=SP-2 $F572: 5F CLRB IMP M<=0 $F573: 30 TSX IMP IX<=SP+1 $F574: EE 02 LDX IND IX<=M:M+1 $F576: 3A ABX IMP IX<=IX+B $F577: A6 02 LDAA IND A<=M $F579: 38 PULX IMP SP<=SP-2;<=IX $F57A: BD F470 JSR EXT Jump to Subr=>Address $F470 $F57D: 3C PSHX IMP =>IX;SP<=SP-2 $F57E: 5C INCB IMP M<=M+1 $F57F: 30 TSX IMP IX<=SP+1 $F580: E1 04 CMPB IND B-M $F582: 26 F0 BNE REL Branch=> $F574 if Z=0 $F584: 38 PULX IMP SP<=SP-2;<=IX $F585: 38 PULX IMP SP<=SP-2;<=IX $F586: 33 PULB IMP SP<=SP+1;<=B $F587: 39 RTS IMP Return from Subroutine $F588--$F58F NUL DATA FF FF FF FF FF FF FF FF ' END