mirror of
https://github.com/bobbimanners/emailler.git
synced 2024-09-08 06:54:24 +00:00
16 lines
222 B
ArmAsm
16 lines
222 B
ArmAsm
|
.include "../inc/common.i"
|
||
|
|
||
|
.export _abort_key
|
||
|
|
||
|
.import abort_key
|
||
|
.importzp abort_key_default
|
||
|
.importzp abort_key_disable
|
||
|
|
||
|
_abort_key:
|
||
|
lsr
|
||
|
lda #abort_key_default
|
||
|
bcs :+
|
||
|
lda #abort_key_disable
|
||
|
: sta abort_key
|
||
|
rts
|