From 5aa31dfafee6cbd5c36a77978aac80c4d44abc5e Mon Sep 17 00:00:00 2001 From: David Stancu Date: Sun, 4 Feb 2018 17:00:31 -0500 Subject: [PATCH] much better handling of this, checking against bit 7 is more correct than z flag --- src/main.S | 70 ++++++++++++++++++++++++++++++++++++++---------------- 1 file changed, 50 insertions(+), 20 deletions(-) diff --git a/src/main.S b/src/main.S index 8f20886..6bc031b 100644 --- a/src/main.S +++ b/src/main.S @@ -27,31 +27,22 @@ ; show the current char on screen ; read keyboard then hit strobe to reset + ldx #0 -eloop ldal $00C000 -skip stal $000400,X - clc - bit %1 - jsr handlekey ldal $00C010 - jmp eloop -handlekey cmp #$1088 - beq left - cmp #$1095 - beq right -outkey rts +inloop clc + ldal $00C000 + bit #%1 + bmi keybranch + jmp inloop -left clc - cpx #0 - beq outkey - dex - rts +keybranch jsr keydown + jmp inloop -right clc - cpx #39 - beq outkey - inx +keydown nop + stal $000400,X + ldal $00C010 rts ; working text blit @@ -153,6 +144,45 @@ brkboi brk + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +