$CA35/51765:   ?

Jump from $C9D8, $E81B, $E839:

CA35: A9 11     LDA #$11        ; 11
CA37: 85 83     STA $83

Jump from $DA2A:

CA39: 20 9B D3  JSR $D39B       ; open channel and get byte
CA3C: 85 85     STA $85
CA3E: A6 82     LDX $82         ; channel number
CA40: B5 F2     LDA $F2,X
CA42: 29 08     AND #$08        ; isolate end marker
CA44: 85 F8     STA $F8
CA46: D0 0A     BNE $CA52       ; not set?
CA48: 20 25 D1  JSR $D125       ; get data type
CA4B: F0 05     BEQ $CA52       ; rel-file?
CA4D: A9 80     LDA #$80
CA4F: 20 97 DD  JSR $DD97       ; set bit 7

Jump from $CA46, $CA4B:

CA52: 60        RTS

Jump from $C9CB:

CA53: 20 D3 D1  JSR $D1D3       ; set drive number
CA56: 20 CB E1  JSR $E1CB
CA59: A5 D6     LDA $D6
CA5B: 48        PHA
CA5C: A5 D5     LDA $D5
CA5E: 48        PHA
CA5F: A9 12     LDA #$12        ; 18
CA61: 85 83     STA $83
CA63: 20 07 D1  JSR $D107       ; open write channel
CA66: 20 D3 D1  JSR $D1D3       ; set drive number
CA69: 20 CB E1  JSR $E1CB
CA6C: 20 9C E2  JSR $E29C
CA6F: A5 D6     LDA $D6
CA71: 85 87     STA $87
CA73: A5 D5     LDA $D5
CA75: 85 86     STA $86
CA77: A9 00     LDA #$00
CA79: 85 88     STA $88
CA7B: 85 D4     STA $D4
CA7D: 85 D7     STA $D7
CA7F: 68        PLA
CA80: 85 D5     STA $D5
CA82: 68        PLA
CA83: 85 D6     STA $D6
CA85: 4C 3B E3  JMP $E33B

    Previous Page / Next Page