mirror of
https://github.com/a2-4am/passport.git
synced 2024-12-24 17:29:40 +00:00
Merge pull request #87 from peterferrie/master
restore zpage on Special Delivery failure
This commit is contained in:
commit
6ecee0b318
@ -58,6 +58,7 @@ TraceSpecDel2
|
||||
TraceSpecDel3
|
||||
lda $1212
|
||||
cmp #$D8
|
||||
sec
|
||||
bne SDfail
|
||||
ldy #$00
|
||||
lda $10D1
|
||||
@ -77,13 +78,10 @@ TraceSpecDel3
|
||||
|
||||
TraceSpecDel4
|
||||
lda $C0E8 ; turn off source drive
|
||||
lda #$0A ; restore zero page from before trace
|
||||
ldx #$00
|
||||
ldy #$01
|
||||
jsr CopyMemory
|
||||
|
||||
lda $3FFF
|
||||
cmp #$EA
|
||||
sec
|
||||
bne SDfail
|
||||
|
||||
lda #$0B
|
||||
@ -91,8 +89,15 @@ TraceSpecDel4
|
||||
ldy #$03
|
||||
jsr compare ; if $1B00 ==
|
||||
!byte $4C,$4D,$2A
|
||||
bcc SDsuccess
|
||||
SDfail
|
||||
php
|
||||
lda #$0A ; restore zero page from before trace
|
||||
ldx #$00
|
||||
ldy #$01
|
||||
jsr CopyMemory
|
||||
plp
|
||||
bcc SDsuccess
|
||||
|
||||
jmp UseUniversal
|
||||
|
||||
SDsuccess
|
||||
|
@ -280,7 +280,7 @@ StringTableHigh
|
||||
; can be set directly before calling PrintByID.
|
||||
;
|
||||
.header
|
||||
!text "Passport by 4am 2019-05-05",$00
|
||||
!text "Passport by 4am 2019-05-26",$00
|
||||
.mainmenu
|
||||
!text "________________________________________",$8D,$8D,$8D,$8D,$8D,$8D,$8D,$8D
|
||||
!text " "
|
||||
|
Loading…
Reference in New Issue
Block a user