Restore SSC flags after detection. Fixes #8
This commit is contained in:
parent
3c9c491bae
commit
06cbcd4fa9
|
@ -215,13 +215,11 @@ digit: cmp #HI('0') ; < '0' ?
|
|||
bcc :-
|
||||
|
||||
cricket_found:
|
||||
jsr restore_cmd_ctl
|
||||
jmp install_driver
|
||||
|
||||
cricket_not_found:
|
||||
lda saved_control
|
||||
sta CONTROL
|
||||
lda saved_command
|
||||
sta COMMAND
|
||||
jsr restore_cmd_ctl
|
||||
;; fall through...
|
||||
|
||||
not_found:
|
||||
|
@ -231,6 +229,13 @@ not_found:
|
|||
HIASCIIZ CR, CR, CR, PRODUCT, " - Not Found."
|
||||
jmp launch_next_sys_file
|
||||
|
||||
restore_cmd_ctl:
|
||||
lda saved_control
|
||||
sta CONTROL
|
||||
lda saved_command
|
||||
sta COMMAND
|
||||
rts
|
||||
|
||||
saved_command: .byte 0
|
||||
saved_control: .byte 0
|
||||
.endproc
|
||||
|
|
Loading…
Reference in New Issue