Apple-2gs-SW/mrbuffer
1
0
Fork 0
mirror of https://github.com/mach-kernel/mrbuffer.git synced 2024-06-16 20:29:31 +00:00
Code Issues Projects Releases Wiki Activity

refactor this to be more legible, but the problem still remains: how can we debug the stuck cursor?

Browse Source
This commit is contained in:
David Stancu 2018-01-30 23:15:31 -05:00
parent aed2add6ce
commit fbf0a03b36
1 changed files with 18 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
src/main.S
View File

@ -28,26 +28,34 @@
; show the current char on screen ; show the current char on screen
; first check and discard to clear strobe, then enter loop ; first check and discard to clear strobe, then enter loop
ldx #0 ldx #0
eloop stal $000400,X eloop stal $000480,X
clc
ldal $00C010 ldal $00C010
clc
bit %1 bit %1
bne hndlkey jsr handlekey
jmp eloop jmp eloop
hndlkey cmp #$1088 handlekey cmp #$1088
beq down beq down
clc
cmp #$1095 cmp #$1095
beq up beq up
jmp eloop outkey rts
up inx up clc
jmp eloop cpx #39
bcs outkey
inx
jmp outkey
down dex down clc
jmp eloop cpx #0
bcs outkey
dex
jmp outkey
; working text blit ; working text blit