fix printing of shifted and vendor modified keys.

This commit is contained in:
Paul Gardner-Stephen committed 2019-04-22 01:35:02 +09:30
1 parent dd2200965d
commit 6dad8d491b
1 file changed
+25 -2
+25 -2
View File
@@ -151,11 +151,34 @@ not_13:
not_clearscreen:
;; Convert PETSCII to screen code
;; Unshifted letters
cmp #$40
bcc chrout_l1
bcc not_lower
cmp #$41+26
bcs chrout_l1
bcs not_lower
and #$1f
jmp chrout_l1
not_lower:
;; Shifted letters
cmp #$60
bcc not_upper
cmp #$60+26
bcs not_upper
sec
sbc #$20
jmp chrout_l1
not_upper:
cmp #$a0
bcc not_vendor
sec
sbc #$40
not_vendor:
chrout_l1:
;; Write normal character on the screen