$C312/49938:   Preserve drive number

Jump from $D84C, $EE0D:

C312: AD 78 02  LDA $0278       ; number of commas
C315: 8D 77 02  STA $0277       ; save
C318: A9 01     LDA #$01
C31A: 8D 78 02  STA $0278       ; number of drive numbers
C31D: 8D 79 02  STA $0279

Jump from $C826, $C90F, $CA88, $DA9B:

C320: AC 8E 02  LDY $028E       ; last drive number
C323: A2 00     LDX #$00

Jump from $C339:

C325: 86 D3     STX $D3
C327: BD 7A 02  LDA $027A,X     ; position of the colon
C32A: 20 3C C3  JSR $C33C       ; get drive number before colon
C32D: A6 D3     LDX $D3
C32F: 9D 7A 02  STA $027A,X     ; save exact position
C332: 98        TYA
C333: 95 E2     STA $E2,X       ; drive number in table
C335: E8        INX
C336: EC 78 02  CPX $0278       ; got all drive numbers?
C339: 90 EA     BCC $C325       ; no, continue
C33B: 60        RTS

    Previous Page / Next Page