Apple-2-SW/emailler
1
0
Fork 0
mirror of https://github.com/bobbimanners/emailler.git synced 2024-11-19 12:30:51 +00:00
Code Issues Projects Releases Wiki Activity

Have get_key display a cursor.

Browse Source 
On the Apple II this is already the case. The ATARI would need to be checked.
This commit is contained in:
Oliver Schmidt 2017-05-16 23:44:04 +02:00
parent 982b1d45f6
commit 5144fcc803
2 changed files with 8 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
drivers/c64input.s
View File

@ -12,8 +12,12 @@
; inputs: none ; inputs: none
; outputs: A contains ASCII value of key just pressed ; outputs: A contains ASCII value of key just pressed
get_key: get_key:
ldy #0
sty $cc ; cursor on
jsr get_key_if_available jsr get_key_if_available
beq get_key beq get_key
ldy #1
sty $cc ; cursor off
rts rts
; use C64 Kernel ROM function to read a key ; use C64 Kernel ROM function to read a key

4
drivers/vic20input.s
View File

@ -12,8 +12,12 @@
; inputs: none ; inputs: none
; outputs: A contains ASCII value of key just pressed ; outputs: A contains ASCII value of key just pressed
get_key: get_key:
ldy #0
sty $cc ; cursor on
jsr get_key_if_available jsr get_key_if_available
beq get_key beq get_key
ldy #1
sty $cc ; cursor off
rts rts
; use VIC 20 Kernel ROM function to read a key ; use VIC 20 Kernel ROM function to read a key