mirror of
https://github.com/a2-4am/passport.git
synced 2024-05-28 21:41:27 +00:00
21 lines
387 B
Plaintext
Executable File
21 lines
387 B
Plaintext
Executable File
KEY = $C000
|
|
STROBE = $C010
|
|
|
|
WaitForKey
|
|
bit STROBE
|
|
k lda KEY
|
|
bpl k
|
|
bit STROBE
|
|
cmp #"*"
|
|
bne noast
|
|
jsr TEXT
|
|
lda #s_reset
|
|
jsr PrintByID
|
|
jmp $FF59
|
|
noast
|
|
cmp #$E1
|
|
bcc +
|
|
and #$DF ; force uppercase
|
|
+
|
|
rts
|