Add blinking cursor on input

git-svn-id: svn://svn.cc65.org/cc65/trunk@944 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
cuz
2001-09-18 12:23:28 +00:00
parent e7c270e7ac
commit 5723cfed0c
5 changed files with 134 additions and 19 deletions

View File

@@ -5,7 +5,7 @@
;
.export irq, nmi, k_irq, k_nmi
.import k_scnkey, k_udtim, k_rs232
.import k_blncur, k_scnkey, k_udtim, k_rs232
.importzp tpi1
.include "zeropage.inc"
@@ -72,6 +72,7 @@ k_irq:
cmp #%00000001 ; ticker irq?
bne irq1
jsr k_blncur ; Blink the cursor
jsr k_scnkey ; Poll the keyboard
jsr k_udtim ; Bump the time