mirror of
https://github.com/a2-4am/passport.git
synced 2025-01-02 17:30:53 +00:00
fix SwapProDOS confusion in WriteRAMToDisk (always return and let caller handle rechecking for key
This commit is contained in:
parent
fa16586550
commit
ef666f7b43
@ -157,6 +157,8 @@ Pass
|
||||
jsr SwapProDOS ; ProDOS out -> in
|
||||
jsr WriteRAMToDisk
|
||||
jsr SwapProDOS ; ProDOS in -> out (preserves flags)
|
||||
lda KEY
|
||||
bmi Cancel
|
||||
bcc @printFinalMessage
|
||||
jmp FatalWriteError
|
||||
|
||||
|
@ -66,7 +66,7 @@ DeleteFileOnRAMDisk
|
||||
; in: ProDOS is in memory
|
||||
; out: if error, C set and A contains error code
|
||||
; if success, C clear
|
||||
; if a key is pressed, exits via Cancel
|
||||
; if a key is pressed, C clear and A contains keycode
|
||||
; all other flags clobbered
|
||||
; all registers clobbered
|
||||
; ProDOS is in memory
|
||||
@ -95,7 +95,7 @@ WriteRAMToDisk
|
||||
jsr WriteTrackSecondPass
|
||||
bcs @exit
|
||||
lda KEY
|
||||
bmi @cancel
|
||||
bmi @exit
|
||||
inc gTrack
|
||||
lda gTrack
|
||||
cmp #$23
|
||||
@ -104,5 +104,3 @@ WriteRAMToDisk
|
||||
jsr IncProgress
|
||||
clc
|
||||
@exit rts
|
||||
@cancel
|
||||
jmp Cancel
|
||||
|
Loading…
Reference in New Issue
Block a user