ORG $7800 7800: MTD: 7804: 16 00 6F LBRA $7876 7807: 16 00 1B LBRA $7825 780A: 16 04 A6 LBRA $7CB3 780D: 17 0C A8 LBSR $84B8 7810: 17 0C A5 LBSR $84B8 7813: 17 0C A2 LBSR $84B8 7816: 17 0C 9F LBSR $84B8 7819: 17 0C 9C LBSR $84B8 781C: 17 0C 99 LBSR $84B8 781F: 17 0C 96 LBSR $84B8 7822: 17 0C 93 LBSR $84B8 BOOT_FLOPPY() 7825: 8D 76 BSR $789D 7827: 0F 49 CLR $49 7829: 8D 7C BSR $78A7 782B: 17 00 D0 LBSR $78FE 782E: 86 02 LDA #$02 7830: 34 02 PSHS A 7832: 0F 58 CLR $58 7834: CC 00 01 LDD #$0001 7837: DD 4B STD $4B 7839: CE 62 00 LDU #$6200 783C: DF 4F STU $4F 783E: 17 03 66 LBSR $7BA7 7841: 8D 76 BSR $78B9 7843: DE 4F LDU $4F 7845: 24 08 BCC $784F 7847: 96 58 LDA $58 7849: 26 20 BNE $786B 784B: 03 58 COM $58 784D: 20 E5 BRA $7834 784F: 10 8E 62 7F LDY #$627F 7853: 34 20 PSHS Y 7855: 86 55 LDA #$55 7857: 6A C4 DEC ,U 7859: 63 C4 COM ,U 785B: AB C0 ADDA ,U+ 785D: 11 A3 E4 CMPU ,S 7860: 26 F5 BNE $7857 7862: 35 20 PULS Y 7864: A1 C4 CMPA ,U 7866: 26 08 BNE $7870 7868: 7E 62 00 JMP $6200 # execute BOOT erreur_boot: 786B: 35 02 PULS A 786D: 4A DECA 786E: 26 C0 BNE $7830 7870: 0F 80 CLR $80 7872: 6E 9F 00 1E JMP [$001E,X] DISC_FUNC() 7876: 34 7F PSHS U,Y,X,DP,B,A,CC 7878: 8D 23 BSR $789D 787A: 96 48 LDA $48 787C: 81 01 CMPA #$01 787E: 27 06 BEQ $7886 7880: 96 49 LDA $49 7882: 81 04 CMPA #$04 7884: 27 0D BEQ $7893 7886: 8D 1F BSR $78A7 7888: 8D 38 BSR $78C2 788A: 8D 2D BSR $78B9 788C: 35 02 PULS A 788E: 1E 8A EXG A,CC 7890: 44 LSRA 7891: 35 FE PULS A,B,DP,X,Y,U,PC ;(PUL? PC=RTS) ramdisk 7893: CE E0 04 LDU #$E004 7896: DF 55 STU $55 7898: BD FF A0 JSR $FFA0 789B: 20 EF BRA $788C 789D: 86 60 LDA #$60 789F: 1F 8B TFR A,DP 78A1: 8E E7 D0 LDX #$E7D0 78A4: 0F 4E CLR $4E 78A6: 39 RTS 78A7: DC 48 LDD $48 78A9: 81 01 CMPA #$01 78AB: 26 02 BNE $78AF 78AD: C6 01 LDB #$01 78AF: CE E0 BE LDU #$E0BE 78B2: A6 C5 LDA B,U 78B4: A7 02 STA $0002,X 78B6: 97 57 STA $57 78B8: 39 RTS 78B9: 86 40 LDA #$40 78BB: A7 02 STA $0002,X 78BD: 39 RTS table des bits des lecteurs 78BE: 41 78BF: 01 78C0: 42 78C1: 02 execution fonctions standard 78C2: 86 02 LDA #$02 78C4: 34 02 PSHS A 78C6: 4F CLRA 78C7: D6 48 LDB $48 78C9: 54 LSRB 78CA: 4C INCA 78CB: 24 FC BCC $78C9 78CD: 4A DECA 78CE: 48 ASLA 78CF: 10 8E 78 F0 LDY #$78F0 78D3: AD B6 JSR [A,Y] 78D5: 24 17 BCC $78EE 78D7: 96 4E LDA $4E 78D9: 85 51 BITA #$51 78DB: 26 11 BNE $78EE 78DD: 6A E4 DEC ,S 78DF: 27 0C BEQ $78ED 78E1: 0F 4E CLR $4E 78E3: 81 08 CMPA #$08 78E5: 27 DF BEQ $78C6 78E7: 8D 4B BSR $7934 78E9: 25 F2 BCS $78DD 78EB: 20 D9 BRA $78C6 78ED: 53 COMB 78EE: 35 82 PULS A,PC ;(PUL? PC=RTS) table des fonctions 78F0: 78 FE # reset 78F2: 7B A7 # lecture LOAD_SECTOR() 78F4: 79 6E # passage simple densité ? 78F6: 79 77 # ecriture WRITE_SECTOR() 78F8: 79 74 # double densité ? 78FA: 79 34 # recherche piste 0 TRACK0() 78FC: 7C 52 # recherche piste SEEK() 78FE: 8D 34 BSR $7934 7900: 25 31 BCS $7933 7902: 86 01 LDA #$01 7904: 97 4B STA $4B 7906: 17 03 71 LBSR $7C7A 7909: C6 44 LDB #$44 790B: A6 01 LDA $0001,X 790D: 85 08 BITA #$08 790F: 27 02 BEQ $7913 7911: C6 43 LDB #$43 7913: D7 4E STB $4E 7915: 8D 1D BSR $7934 7917: 0F 52 CLR $52 7919: 0F 54 CLR $54 791B: 6F 84 CLR ,X 791D: 0F 58 CLR $58 791F: DC E9 LDD $E9 7921: 93 ED SUBD $ED 7923: 2C 05 BGE $792A 7925: 43 COMA 7926: 53 COMB 7927: C3 00 01 ADDD #$0001 792A: 4D TSTA 792B: 26 05 BNE $7932 792D: 5D TSTB 792E: 2A 02 BPL $7932 7930: 03 58 COM $58 7932: 4F CLRA 7933: 39 RTS 7934: C6 64 LDB #$64 7936: A6 01 LDA $0001,X 7938: 85 08 BITA #$08 793A: 26 13 BNE $794F 793C: 96 57 LDA $57 793E: 8A 10 ORA #$10 7940: A7 02 STA $0002,X 7942: 84 EF ANDA #$EF 7944: A7 02 STA $0002,X 7946: 8D 1D BSR $7965 7948: 5A DECB 7949: 10 27 03 27 LBEQ $7C74 794D: 20 E7 BRA $7936 794F: 8D 0E BSR $795F 7951: 17 03 54 LBSR $7CA8 7954: 6F A4 CLR ,Y 7956: 6F 06 CLR $0006,X 7958: 39 RTS 7959: 10 8E 00 6C LDY #$006C 795D: 20 0A BRA $7969 795F: 10 8E 07 50 LDY #$0750 7963: 20 04 BRA $7969 7965: 10 8E 02 EC LDY #$02EC 7969: 31 3F LEAY -1,Y 796B: 26 FC BNE $7969 796D: 39 RTS 796E: 86 FF LDA #$FF 7970: 97 58 STA $58 7972: 4F CLRA 7973: 39 RTS 7974: 0F 58 CLR $58 7976: 39 RTS 7977: 17 02 D8 LBSR $7C52 797A: 25 FA BCS $7976 797C: A6 01 LDA $0001,X 797E: 85 04 BITA #$04 7980: 27 05 BEQ $7987 7982: 86 01 LDA #$01 7984: 16 02 EF LBRA $7C76 7987: 17 01 B7 LBSR $7B41 798A: C6 19 LDB #$19 798C: 34 01 PSHS CC 798E: 17 02 03 LBSR $7B94 7991: 10 8E 75 00 LDY #$7500 7995: 31 3F LEAY $FFFF,Y 7997: 10 27 02 A5 LBEQ $7C40 799B: E6 84 LDB ,X 799D: C5 02 BITB #$02 799F: 27 F4 BEQ $7995 79A1: A7 03 STA $0003,X 79A3: E6 84 LDB ,X 79A5: 2A FC BPL $79A3 79A7: A7 03 STA $0003,X 79A9: E6 84 LDB ,X 79AB: 2A FC BPL $79A9 79AD: C6 FB LDB #$FB 79AF: E7 03 STB $0003,X 79B1: 10 8E 02 00 LDY #$0200 79B5: E6 84 LDB ,X 79B7: 2A FC BPL $79B5 79B9: E6 C0 LDB ,U+ 79BB: E7 03 STB $0003,X 79BD: 31 3F LEAY $FFFF,Y 79BF: 26 F4 BNE $79B5 79C1: 12 NOP 79C2: 12 NOP 79C3: E6 84 LDB ,X 79C5: C5 08 BITB #$08 79C7: 27 FA BEQ $79C3 79C9: 8D 8E BSR $7959 79CB: 0D 48 TST $48 79CD: 2A 48 BPL $7A17 79CF: 17 02 88 LBSR $7C5A 79D2: C6 1B LDB #$1B 79D4: 17 01 BD LBSR $7B94 79D7: 86 04 LDA #$04 79D9: 10 8E 75 00 LDY #$7500 79DD: 31 3F LEAY $FFFF,Y 79DF: 10 27 00 F9 LBEQ $7ADC 79E3: E6 84 LDB ,X 79E5: C5 02 BITB #$02 79E7: 27 F4 BEQ $79DD 79E9: E6 03 LDB $0003,X 79EB: 4A DECA 79EC: 10 27 02 58 LBEQ $7C48 79F0: E6 84 LDB ,X 79F2: 2A FC BPL $79F0 79F4: E6 03 LDB $0003,X 79F6: C1 FB CMPB #$FB 79F8: 26 F1 BNE $79EB 79FA: 4F CLRA 79FB: E6 84 LDB ,X 79FD: 2A FC BPL $79FB 79FF: E6 03 LDB $0003,X 7A01: E1 C0 CMPB ,U+ 7A03: 26 03 BNE $7A08 7A05: 4A DECA 7A06: 26 F3 BNE $79FB 7A08: E6 84 LDB ,X 7A0A: C5 08 BITB #$08 7A0C: 27 FA BEQ $7A08 7A0E: 4D TSTA 7A0F: 26 02 BNE $7A13 7A11: C5 04 BITB #$04 7A13: 10 26 00 C5 LBNE $7ADC 7A17: 35 01 PULS CC 7A19: 6F 84 CLR ,X 7A1B: 39 RTS 7A1C: 34 01 PSHS CC 7A1E: 20 AF BRA $79CF 7A20: 17 01 31 LBSR $7B54 7A23: 17 01 35 LBSR $7B5B 7A26: 34 01 PSHS CC 7A28: 34 06 PSHS B,A 7A2A: 17 00 BD LBSR $7AEA 7A2D: 24 05 BCC $7A34 7A2F: 35 06 PULS A,B 7A31: 16 02 0C LBRA $7C40 7A34: C6 FF LDB #$FF 7A36: E7 04 STB $0004,X 7A38: CC 06 24 LDD #$0624 7A3B: E7 84 STB ,X 7A3D: E6 84 LDB ,X 7A3F: 2A FC BPL $7A3D 7A41: 6F 03 CLR $0003,X 7A43: 4A DECA 7A44: 26 F7 BNE $7A3D 7A46: E6 84 LDB ,X 7A48: 2A FC BPL $7A46 7A4A: CC FB C7 LDD #$FBC7 7A4D: ED 03 STD $0003,X 7A4F: C6 FF LDB #$FF 7A51: A6 84 LDA ,X 7A53: 2A FC BPL $7A51 7A55: A6 C0 LDA ,U+ 7A57: ED 03 STD $0003,X 7A59: 86 7F LDA #$7F 7A5B: E6 84 LDB ,X 7A5D: 2A FC BPL $7A5B 7A5F: E6 C0 LDB ,U+ 7A61: E7 03 STB $0003,X 7A63: 4A DECA 7A64: 26 F5 BNE $7A5B 7A66: E6 84 LDB ,X 7A68: 2A FC BPL $7A66 7A6A: 35 04 PULS B 7A6C: E7 03 STB $0003,X 7A6E: 43 COMA 7A6F: 26 F5 BNE $7A66 7A71: E6 84 LDB ,X 7A73: 2A FC BPL $7A71 7A75: 6F 03 CLR $0003,X 7A77: E6 84 LDB ,X 7A79: 2A FC BPL $7A77 7A7B: C6 20 LDB #$20 7A7D: E7 84 STB ,X 7A7F: E6 84 LDB ,X 7A81: 2A FC BPL $7A7F 7A83: E6 03 LDB $0003,X 7A85: 43 COMA 7A86: 26 F7 BNE $7A7F 7A88: 32 7E LEAS $FFFE,S 7A8A: 17 FE CC LBSR $7959 7A8D: 0D 48 TST $48 7A8F: 2A 42 BPL $7AD3 7A91: 17 01 C6 LBSR $7C5A 7A94: 8D 54 BSR $7AEA 7A96: 25 42 BCS $7ADA 7A98: C6 FB LDB #$FB 7A9A: E7 03 STB $0003,X 7A9C: CC 80 38 LDD #$8038 7A9F: E7 84 STB ,X 7AA1: 10 8E 01 00 LDY #$0100 7AA5: 31 3F LEAY $FFFF,Y 7AA7: 27 31 BEQ $7ADA 7AA9: E6 84 LDB ,X 7AAB: C5 01 BITB #$01 7AAD: 27 F6 BEQ $7AA5 7AAF: E6 03 LDB $0003,X 7AB1: C6 28 LDB #$28 7AB3: E7 84 STB ,X 7AB5: E6 84 LDB ,X 7AB7: 2A FC BPL $7AB5 7AB9: E6 03 LDB $0003,X 7ABB: E1 C0 CMPB ,U+ 7ABD: 26 1B BNE $7ADA 7ABF: 4A DECA 7AC0: 26 F3 BNE $7AB5 7AC2: A6 84 LDA ,X 7AC4: 2A FC BPL $7AC2 7AC6: A6 03 LDA $0003,X 7AC8: E6 84 LDB ,X 7ACA: 2A FC BPL $7AC8 7ACC: E6 03 LDB $0003,X 7ACE: 10 A3 E4 CMPD ,S 7AD1: 26 07 BNE $7ADA 7AD3: 35 06 PULS A,B 7AD5: 35 01 PULS CC 7AD7: 6F 84 CLR ,X 7AD9: 39 RTS 7ADA: 35 06 PULS A,B 7ADC: 86 20 LDA #$20 7ADE: 16 01 69 LBRA $7C4A 7AE1: 34 01 PSHS CC 7AE3: CC 5D 30 LDD #$5D30 7AE6: 34 06 PSHS B,A 7AE8: 20 A7 BRA $7A91 7AEA: 86 C7 LDA #$C7 7AEC: A7 04 STA $0004,X 7AEE: 86 FE LDA #$FE 7AF0: A7 03 STA $0003,X 7AF2: 86 30 LDA #$30 7AF4: DE 4F LDU $4F 7AF6: 1A 50 ORCC #$50 7AF8: C6 38 LDB #$38 7AFA: E7 84 STB ,X 7AFC: 10 8E 17 00 LDY #$1700 7B00: 31 3F LEAY $FFFF,Y 7B02: 27 3A BEQ $7B3E 7B04: E6 84 LDB ,X 7B06: C5 01 BITB #$01 7B08: 27 F6 BEQ $7B00 7B0A: E6 03 LDB $0003,X 7B0C: C6 28 LDB #$28 7B0E: E7 84 STB ,X 7B10: E6 84 LDB ,X 7B12: 2A FC BPL $7B10 7B14: E6 03 LDB $0003,X 7B16: D1 4B CMPB $4B 7B18: 26 21 BNE $7B3B 7B1A: E6 84 LDB ,X 7B1C: 2A FC BPL $7B1A 7B1E: E6 03 LDB $0003,X 7B20: 26 19 BNE $7B3B 7B22: E6 84 LDB ,X 7B24: 2A FC BPL $7B22 7B26: E6 03 LDB $0003,X 7B28: D1 4C CMPB $4C 7B2A: 26 0F BNE $7B3B 7B2C: E6 84 LDB ,X 7B2E: 2A FC BPL $7B2C 7B30: E6 03 LDB $0003,X 7B32: 26 07 BNE $7B3B 7B34: 17 FE 22 LBSR $7959 7B37: 4F CLRA 7B38: A6 84 LDA ,X 7B3A: 39 RTS 7B3B: 4A DECA 7B3C: 26 BA BNE $7AF8 7B3E: 53 COMB 7B3F: 20 F7 BRA $7B38 7B41: D6 4B LDB $4B 7B43: C1 39 CMPB #$39 7B45: 2A 05 BPL $7B4C 7B47: CC 9F 40 LDD #$9F40 7B4A: 20 03 BRA $7B4F 7B4C: CC 1F 42 LDD #$1F42 7B4F: A7 07 STA $0007,X 7B51: 96 49 LDA $49 7B53: 84 01 ANDA #$01 7B55: 27 02 BEQ $7B59 7B57: CB 10 ADDB #$10 7B59: E7 01 STB $0001,X 7B5B: 39 RTS 7B5C: 4F CLRA 7B5D: 10 8E 00 80 LDY #$0080 7B61: CC BF 84 LDD #$BF84 7B64: 34 06 PSHS B,A 7B66: A6 E4 LDA ,S 7B68: A8 C0 EORA ,U+ 7B6A: 34 02 PSHS A 7B6C: 44 LSRA 7B6D: 44 LSRA 7B6E: 44 LSRA 7B6F: 44 LSRA 7B70: A8 E4 EORA ,S 7B72: A7 E4 STA ,S 7B74: 1F 89 TFR A,B 7B76: 54 LSRB 7B77: 54 LSRB 7B78: 54 LSRB 7B79: 48 ASLA 7B7A: 48 ASLA 7B7B: 48 ASLA 7B7C: 48 ASLA 7B7D: E8 62 EORB $0002,S 7B7F: E7 62 STB $0002,S 7B81: 1F 89 TFR A,B 7B83: A8 62 EORA $0002,S 7B85: A7 61 STA $0001,S 7B87: 58 ASLB 7B88: E8 E4 EORB ,S 7B8A: E7 62 STB $0002,S 7B8C: 32 61 LEAS $0001,S 7B8E: 31 3F LEAY $FFFF,Y 7B90: 26 D4 BNE $7B66 7B92: 35 86 PULS A,B,PC ;(PUL? PC=RTS) init registre disques 7B94: 96 4C LDA $4C 7B96: A7 05 STA $0005,X 7B98: 86 0A LDA #$0A 7B9A: A7 04 STA $0004,X 7B9C: 86 A1 LDA #$A1 7B9E: A7 03 STA $0003,X 7BA0: 1A 50 ORCC #$50 7BA2: DE 4F LDU $4F U is user buffer 7BA4: E7 84 STB ,X store command to THFMC1 7BA6: 39 RTS LOAD_SECTOR() 7BA7: 17 00 A8 LBSR $7C52 recherche la piste 7BAA: 10 25 00 91 LBCS $7C3F sortie en erreur 7BAE: 34 01 PSHS CC 7BB0: 8D 8F BSR $7B41 fixe précompensation 7BB2: C6 1B LDB #$1B lecture auto 7BB4: 8D DE BSR $7B94 registre disques 7BB6: 86 04 LDA #$04 7BB8: 10 8E 75 00 LDY #$7500 7BBC: 31 3F LEAY -1,Y 7BBE: 27 09 BEQ $7BC9 si erreur secteur non trouvé 7BC0: E6 84 LDB ,X 7BC2: C5 02 BITB #$02 7BC4: 27 F6 BEQ $7BBC loop attente ctrl 7BC6: E6 03 LDB $0003,X 7BC8: 4A DECA 7BC9: 27 7D BEQ $7C48 7BCB: E6 84 LDB ,X 7BCD: 2A FC BPL $7BCB 7BCF: E6 03 LDB $0003,X 7BD1: C1 FB CMPB #$FB 7BD3: 26 F3 BNE $7BC8 7BD5: 10 8E 02 00 LDY #$0200 positionne compteur à 512 octets 7BD9: E6 84 LDB ,X 7BDB: 2A FC BPL $7BD9 7BDD: E6 03 LDB $0003,X 7BDF: E7 C0 STB ,U+ 7BE1: 31 3F LEAY -1,Y 7BE3: 26 F4 BNE $7BD9 loop 7BE5: E6 84 LDB ,X 7BE7: C5 08 BITB #$08 7BE9: 27 FA BEQ $7BE5 7BEB: C5 04 BITB #$04 7BED: 26 55 BNE $7C44 7BEF: 20 4A BRA $7C3B 7BF1: 17 FF 60 LBSR $7B54 7BF4: 17 FE F3 LBSR $7AEA 7BF7: 25 47 BCS $7C40 7BF9: 31 23 LEAY $0003,Y 7BFB: 17 FD 6B LBSR $7969 7BFE: C6 FB LDB #$FB 7C00: E7 03 STB $0003,X 7C02: CC 80 38 LDD #$8038 7C05: E7 84 STB ,X 7C07: 10 8E 01 00 LDY #$0100 7C0B: 31 3F LEAY $FFFF,Y 7C0D: 27 39 BEQ $7C48 7C0F: E6 84 LDB ,X 7C11: C5 01 BITB #$01 7C13: 27 F6 BEQ $7C0B 7C15: E6 03 LDB $0003,X 7C17: C6 28 LDB #$28 7C19: E7 84 STB ,X 7C1B: E6 84 LDB ,X 7C1D: 2A FC BPL $7C1B 7C1F: E6 03 LDB $0003,X 7C21: E7 C0 STB ,U+ 7C23: 4A DECA 7C24: 26 F5 BNE $7C1B 7C26: E6 84 LDB ,X 7C28: 2A FC BPL $7C26 7C2A: E6 03 LDB $0003,X 7C2C: 34 04 PSHS B 7C2E: 43 COMA 7C2F: 26 F5 BNE $7C26 7C31: 17 FF 27 LBSR $7B5B 7C34: 1E 89 EXG A,B 7C36: 10 A3 E1 CMPD ,S++ 7C39: 26 09 BNE $7C44 7C3B: 35 01 PULS CC 7C3D: 6F 84 CLR ,X 7C3F: 39 RTS 7C40: 86 04 LDA #$04 7C42: 20 06 BRA $7C4A 7C44: 86 08 LDA #$08 7C46: 20 02 BRA $7C4A 7C48: 86 02 LDA #$02 7C4A: 97 4E STA $4E 7C4C: 6F 84 CLR ,X 7C4E: 35 01 PULS CC 7C50: 43 COMA 7C51: 39 RTS SEEK() 7C52: 8D 06 BSR $7C5A # activation du lecteur 7C54: 25 03 BCS $7C59 # sortie en erreur 7C56: 8D 22 BSR $7C7A # deplacement des tetes 7C58: 4F CLRA 7C59: 39 RTS Activation du lecteur 7C5A: 10 8E 80 00 LDY #$8000 7C5E: D6 57 LDB $57 7C60: CA 04 ORB #$04 7C62: E7 02 STB $0002,X 7C64: C4 FB ANDB #$FB 7C66: E7 02 STB $0002,X 7C68: 31 3F LEAY -1,Y 7C6A: 27 08 BEQ $7C74 7C6C: E6 01 LDB $0001,X 7C6E: C4 02 ANDB #$02 7C70: 27 EC BEQ $7C5E 7C72: 4F CLRA 7C73: 39 RTS 7C74: 86 10 LDA #$10 7C76: 34 01 PSHS CC 7C78: 20 D0 BRA $7C4A deplacement des tetes: 7C7A: 17 FC E8 LBSR $7965 7C7D: 8D 29 BSR $7CA8 7C7F: E6 A4 LDB ,Y 7C81: 96 57 LDA $57 7C83: D0 4B SUBB $4B 7C85: 27 18 BEQ $7C9F 7C87: 2A 03 BPL $7C8C 7C89: 8A 20 ORA #$20 7C8B: 50 NEGB 7C8C: A7 02 STA $0002,X 7C8E: 8A 14 ORA #$14 7C90: A7 02 STA $0002,X 7C92: 84 EB ANDA #$EB 7C94: A7 02 STA $0002,X 7C96: 17 FC CC LBSR $7965 7C99: 5A DECB 7C9A: 26 F2 BNE $7C8E 7C9C: 17 FC C0 LBSR $795F 7C9F: 8D 07 BSR $7CA8 7CA1: D6 4B LDB $4B 7CA3: E7 06 STB $0006,X 7CA5: E7 A4 STB ,Y 7CA7: 39 RTS 7CA8: 10 8E 60 52 LDY #$6052 7CAC: 96 49 LDA $49 7CAE: 84 02 ANDA #$02 7CB0: 31 A6 LEAY A,Y 7CB2: 39 RTS 7CB3: 34 7F PSHS U,Y,X,DP,B,A,CC 7CB5: 17 FB E5 LBSR $789D 7CB8: 96 49 LDA $49 7CBA: 81 04 CMPA #$04 7CBC: 26 0A BNE $7CC8 7CBE: CE E0 0A LDU #$E00A 7CC1: DF 55 STU $55 7CC3: BD FF A0 JSR $FFA0 7CC6: 20 56 BRA $7D1E 7CC8: 8D 69 BSR $7D33 7CCA: 96 48 LDA $48 7CCC: 84 80 ANDA #$80 7CCE: 97 48 STA $48 7CD0: 17 FB D4 LBSR $78A7 7CD3: 17 FF 84 LBSR $7C5A 7CD6: 25 46 BCS $7D1E 7CD8: 17 FC 59 LBSR $7934 7CDB: 25 41 BCS $7D1E 7CDD: 0F 4B CLR $4B 7CDF: 8D 40 BSR $7D21 7CE1: 25 3B BCS $7D1E 7CE3: 34 01 PSHS CC 7CE5: 1A 50 ORCC #$50 7CE7: 17 00 8E LBSR $7D78 7CEA: 86 02 LDA #$02 7CEC: 34 02 PSHS A 7CEE: 17 00 B7 LBSR $7DA8 7CF1: 8E E7 D0 LDX #$E7D0 7CF4: 17 FF 63 LBSR $7C5A 7CF7: 17 00 EB LBSR $7DE5 7CFA: 24 0B BCC $7D07 7CFC: 6A E4 DEC ,S 7CFE: 26 EE BNE $7CEE 7D00: 35 02 PULS A 7D02: 35 01 PULS CC 7D04: 43 COMA 7D05: 20 17 BRA $7D1E 7D07: 35 02 PULS A 7D09: 35 01 PULS CC 7D0B: 96 4B LDA $4B 7D0D: 81 4F CMPA #$4F 7D0F: 27 04 BEQ $7D15 7D11: 8D 1B BSR $7D2E 7D13: 20 CE BRA $7CE3 7D15: 17 02 78 LBSR $7F90 7D18: 25 04 BCS $7D1E 7D1A: 86 50 LDA #$50 7D1C: 97 4B STA $4B 7D1E: 16 FB 69 LBRA $788A 7D21: A6 01 LDA $0001,X 7D23: 85 04 BITA #$04 7D25: 26 02 BNE $7D29 7D27: 4F CLRA 7D28: 39 RTS 7D29: 86 01 LDA #$01 7D2B: 16 FF 48 LBRA $7C76 7D2E: 0C 4B INC $4B 7D30: 16 FF 47 LBRA $7C7A 7D33: 34 10 PSHS X 7D35: CE E5 5E LDU #$E55E 7D38: 8E 00 03 LDX #$0003 7D3B: C6 04 LDB #$04 7D3D: A6 84 LDA ,X 7D3F: A1 C4 CMPA ,U 7D41: 27 09 BEQ $7D4C 7D43: 5C INCB 7D44: 33 C5 LEAU B,U 7D46: A6 C4 LDA ,U 7D48: 26 EE BNE $7D38 7D4A: 20 10 BRA $7D5C 7D4C: 30 1F LEAX $FFFF,X 7D4E: 26 03 BNE $7D53 7D50: 8E 00 1A LDX #$001A 7D53: 33 41 LEAU $0001,U 7D55: 5A DECB 7D56: 26 E5 BNE $7D3D 7D58: A6 C4 LDA ,U 7D5A: 97 58 STA $58 7D5C: 35 90 PULS X,PC ;(PUL? PC=RTS) ??? 7D5E: 52 Illegal Opcode 7D5F: 45 Illegal Opcode 7D60: 47 ASRA 7D61: 6E FF 43 49 JMP [$4349,S] 7D65: 50 NEGB 7D66: 4A DECA 7D67: FF 4C 45 STU $4C45 7D6A: 4D TSTA 7D6B: 74 FF 4C LSR $FF4C 7D6E: 4F CLRA 7D6F: 50 NEGB 7D70: B5 00 53 BITA $0053 7D73: 45 Illegal Opcode 7D74: 47 ASRA 7D75: B6 00 00 LDA $0000 ??? 7D78: 8E 60 D3 LDX #$60D3 7D7B: C6 10 LDB #$10 7D7D: 6F 85 CLR B,X 7D7F: 5A DECB 7D80: 26 FB BNE $7D7D 7D82: 30 88 10 LEAX $10,X 7D85: 34 10 PSHS X 7D87: 8E 60 D3 LDX #$60D3 7D8A: 86 01 LDA #$01 7D8C: D6 4D LDB $4D 7D8E: A7 84 STA ,X 7D90: 30 85 LEAX B,X 7D92: 4C INCA 7D93: 81 10 CMPA #$10 7D95: 22 0E BHI $7DA5 7D97: AC E4 CPX ,S 7D99: 25 02 BCS $7D9D 7D9B: 30 10 LEAX $FFF0,X 7D9D: 6D 84 TST ,X 7D9F: 27 ED BEQ $7D8E 7DA1: 30 01 LEAX $0001,X 7DA3: 20 F2 BRA $7D97 7DA5: 32 62 LEAS $0002,S 7DA7: 39 RTS 7DA8: 8E 60 D3 LDX #$60D3 7DAB: DE 4F LDU $4F 7DAD: E6 80 LDB ,X+ 7DAF: 27 1D BEQ $7DCE 7DB1: 96 4B LDA $4B 7DB3: A7 C4 STA ,U 7DB5: 6F 41 CLR $0001,U 7DB7: E7 42 STB $0002,U 7DB9: 10 8E 00 04 LDY #$0004 7DBD: 96 58 LDA $58 7DBF: 4C INCA 7DC0: A7 43 STA $0003,U 7DC2: 27 0B BEQ $7DCF 7DC4: CC B2 30 LDD #$B230 7DC7: 17 FD 9A LBSR $7B64 7DCA: ED C1 STD ,U++ 7DCC: 20 DF BRA $7DAD 7DCE: 39 RTS 7DCF: CC EF 21 LDD #$EF21 7DD2: 20 F3 BRA $7DC7 7DD4: E6 01 LDB $0001,X 7DD6: C5 40 BITB #$40 7DD8: 27 FA BEQ $7DD4 7DDA: E6 03 LDB $0003,X 7DDC: E6 84 LDB ,X 7DDE: 2A FA BPL $7DDA 7DE0: E6 84 LDB ,X 7DE2: 2A FC BPL $7DE0 7DE4: 39 RTS 7DE5: 86 10 LDA #$10 7DE7: 34 02 PSHS A 7DE9: DE 4F LDU $4F 7DEB: 96 58 LDA $58 7DED: 10 26 00 B9 LBNE $7EAA 7DF1: 17 FD 4D LBSR $7B41 7DF4: 8D DE BSR $7DD4 7DF6: CC 4E FF LDD #$4EFF 7DF9: ED 03 STD $0003,X 7DFB: C6 04 LDB #$04 7DFD: E7 84 STB ,X 7DFF: 86 1E LDA #$1E 7E01: E6 84 LDB ,X 7E03: 2A FC BPL $7E01 7E05: C6 4E LDB #$4E 7E07: E7 03 STB $0003,X 7E09: 4A DECA 7E0A: 26 F5 BNE $7E01 7E0C: 86 0C LDA #$0C 7E0E: E6 84 LDB ,X 7E10: 2A FC BPL $7E0E 7E12: 6F 03 CLR $0003,X 7E14: 4A DECA 7E15: 26 F7 BNE $7E0E 7E17: E6 84 LDB ,X 7E19: 2A FC BPL $7E17 7E1B: CC A1 0A LDD #$A10A 7E1E: ED 03 STD $0003,X 7E20: E6 84 LDB ,X 7E22: 2A FC BPL $7E20 7E24: A7 03 STA $0003,X 7E26: E6 84 LDB ,X 7E28: 2A FC BPL $7E26 7E2A: A7 03 STA $0003,X 7E2C: E6 84 LDB ,X 7E2E: 2A FC BPL $7E2C 7E30: CC FE FF LDD #$FEFF 7E33: ED 03 STD $0003,X 7E35: 86 06 LDA #$06 7E37: E6 84 LDB ,X 7E39: 2A FC BPL $7E37 7E3B: E6 C0 LDB ,U+ 7E3D: E7 03 STB $0003,X 7E3F: 4A DECA 7E40: 26 F5 BNE $7E37 7E42: 86 16 LDA #$16 7E44: E6 84 LDB ,X 7E46: 2A FC BPL $7E44 7E48: C6 4E LDB #$4E 7E4A: E7 03 STB $0003,X 7E4C: 4A DECA 7E4D: 26 F5 BNE $7E44 7E4F: 86 0C LDA #$0C 7E51: E6 84 LDB ,X 7E53: 2A FC BPL $7E51 7E55: 6F 03 CLR $0003,X 7E57: 4A DECA 7E58: 26 F7 BNE $7E51 7E5A: E6 84 LDB ,X 7E5C: 2A FC BPL $7E5A 7E5E: CC A1 0A LDD #$A10A 7E61: ED 03 STD $0003,X 7E63: E6 84 LDB ,X 7E65: 2A FC BPL $7E63 7E67: A7 03 STA $0003,X 7E69: E6 84 LDB ,X 7E6B: 2A FC BPL $7E69 7E6D: A7 03 STA $0003,X 7E6F: E6 84 LDB ,X 7E71: 2A FC BPL $7E6F 7E73: CC FB FF LDD #$FBFF 7E76: ED 03 STD $0003,X 7E78: 4F CLRA 7E79: E6 84 LDB ,X 7E7B: 2A FC BPL $7E79 7E7D: C6 E5 LDB #$E5 7E7F: E7 03 STB $0003,X 7E81: 4A DECA 7E82: 26 F5 BNE $7E79 7E84: E6 84 LDB ,X 7E86: 2A FC BPL $7E84 7E88: C6 78 LDB #$78 7E8A: E7 03 STB $0003,X 7E8C: E6 84 LDB ,X 7E8E: 2A FC BPL $7E8C 7E90: C6 27 LDB #$27 7E92: E7 03 STB $0003,X 7E94: 86 2C LDA #$2C 7E96: E6 84 LDB ,X 7E98: 2A FC BPL $7E96 7E9A: C6 4E LDB #$4E 7E9C: E7 03 STB $0003,X 7E9E: 4A DECA 7E9F: 26 F5 BNE $7E96 7EA1: 6A E4 DEC ,S 7EA3: 10 26 FF 65 LBNE $7E0C 7EA7: 16 00 A1 LBRA $7F4B 7EAA: 17 FC A7 LBSR $7B54 7EAD: 17 FF 24 LBSR $7DD4 7EB0: CC FF FF LDD #$FFFF 7EB3: ED 03 STD $0003,X 7EB5: C6 24 LDB #$24 7EB7: E7 84 STB ,X 7EB9: 86 10 LDA #$10 7EBB: E6 84 LDB ,X 7EBD: 2A FC BPL $7EBB 7EBF: C6 FF LDB #$FF 7EC1: E7 03 STB $0003,X 7EC3: 4A DECA 7EC4: 26 F5 BNE $7EBB 7EC6: 86 06 LDA #$06 7EC8: E6 84 LDB ,X 7ECA: 2A FC BPL $7EC8 7ECC: 6F 03 CLR $0003,X 7ECE: 4A DECA 7ECF: 26 F7 BNE $7EC8 7ED1: E6 84 LDB ,X 7ED3: 2A FC BPL $7ED1 7ED5: CC FE C7 LDD #$FEC7 7ED8: ED 03 STD $0003,X 7EDA: E6 84 LDB ,X 7EDC: 2A FC BPL $7EDA 7EDE: C6 FF LDB #$FF 7EE0: A6 C0 LDA ,U+ 7EE2: ED 03 STD $0003,X 7EE4: 86 05 LDA #$05 7EE6: E6 84 LDB ,X 7EE8: 2A FC BPL $7EE6 7EEA: E6 C0 LDB ,U+ 7EEC: E7 03 STB $0003,X 7EEE: 4A DECA 7EEF: 26 F5 BNE $7EE6 7EF1: 86 0C LDA #$0C 7EF3: E6 84 LDB ,X 7EF5: 2A FC BPL $7EF3 7EF7: C6 FF LDB #$FF 7EF9: E7 03 STB $0003,X 7EFB: 4A DECA 7EFC: 26 F5 BNE $7EF3 7EFE: 86 06 LDA #$06 7F00: E6 84 LDB ,X 7F02: 2A FC BPL $7F00 7F04: 6F 03 CLR $0003,X 7F06: 4A DECA 7F07: 26 F7 BNE $7F00 7F09: E6 84 LDB ,X 7F0B: 2A FC BPL $7F09 7F0D: CC FB C7 LDD #$FBC7 7F10: ED 03 STD $0003,X 7F12: E6 84 LDB ,X 7F14: 2A FC BPL $7F12 7F16: CC E5 FF LDD #$E5FF 7F19: ED 03 STD $0003,X 7F1B: 86 7F LDA #$7F 7F1D: E6 84 LDB ,X 7F1F: 2A FC BPL $7F1D 7F21: C6 E5 LDB #$E5 7F23: E7 03 STB $0003,X 7F25: 4A DECA 7F26: 26 F5 BNE $7F1D 7F28: E6 84 LDB ,X 7F2A: 2A FC BPL $7F28 7F2C: C6 5D LDB #$5D 7F2E: E7 03 STB $0003,X 7F30: E6 84 LDB ,X 7F32: 2A FC BPL $7F30 7F34: C6 30 LDB #$30 7F36: E7 03 STB $0003,X 7F38: 86 16 LDA #$16 7F3A: E6 84 LDB ,X 7F3C: 2A FC BPL $7F3A 7F3E: C6 FF LDB #$FF 7F40: E7 03 STB $0003,X 7F42: 4A DECA 7F43: 26 F5 BNE $7F3A 7F45: 6A E4 DEC ,S 7F47: 10 26 FF 7B LBNE $7EC6 7F4B: A6 01 LDA $0001,X 7F4D: 85 40 BITA #$40 7F4F: 26 08 BNE $7F59 7F51: A6 84 LDA ,X 7F53: 2A FC BPL $7F51 7F55: E7 03 STB $0003,X 7F57: 20 F2 BRA $7F4B 7F59: 35 02 PULS A 7F5B: 6F 84 CLR ,X 7F5D: 0D 48 TST $48 7F5F: 2A 22 BPL $7F83 7F61: 86 E5 LDA #$E5 7F63: 8D 1F BSR $7F84 7F65: CE 60 D3 LDU #$60D3 7F68: 17 FC EF LBSR $7C5A 7F6B: A6 C0 LDA ,U+ 7F6D: 27 14 BEQ $7F83 7F6F: 97 4C STA $4C 7F71: 34 40 PSHS U 7F73: 96 58 LDA $58 7F75: 27 05 BEQ $7F7C 7F77: 17 FB 67 LBSR $7AE1 7F7A: 20 03 BRA $7F7F 7F7C: 17 FA 9D LBSR $7A1C 7F7F: 35 40 PULS U 7F81: 24 E8 BCC $7F6B 7F83: 39 RTS 7F84: DE 4F LDU $4F 7F86: D6 58 LDB $58 7F88: C4 80 ANDB #$80 7F8A: A7 C0 STA ,U+ 7F8C: 5A DECB 7F8D: 26 FB BNE $7F8A 7F8F: 39 RTS 7F90: 86 14 LDA #$14 7F92: 97 4B STA $4B 7F94: 17 FC E3 LBSR $7C7A 7F97: 86 FF LDA #$FF 7F99: 8D E9 BSR $7F84 7F9B: 86 10 LDA #$10 7F9D: 97 4C STA $4C 7F9F: 17 FC B8 LBSR $7C5A 7FA2: 17 F9 E2 LBSR $7987 7FA5: 25 18 BCS $7FBF 7FA7: 0A 4C DEC $4C 7FA9: 26 F4 BNE $7F9F 7FAB: DE 4F LDU $4F 7FAD: 6F C4 CLR ,U 7FAF: CC FE FE LDD #$FEFE 7FB2: ED C8 29 STD $29,U 7FB5: 86 02 LDA #$02 7FB7: 97 4C STA $4C 7FB9: 17 F9 CB LBSR $7987 7FBC: 25 01 BCS $7FBF 7FBE: 4F CLRA 7FBF: 39 RTS