chris/open-roms
1
0 Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

work on cursor control keys in editor

Browse Source
This commit is contained in:
Paul Gardner-Stephen committed 2019-04-20 23:09:55 +09:30
1 parent ab34a1de51
commit a51c8e9579
2 files changed
+18 -2
Download Patch File Download Diff File Expand all files Collapse all files

No files matched your search

c64/kernal/chrout.s
+17 -1
View File
@@ -33,9 +33,13 @@ not_0a:
;; Carriage return ;; Carriage return
cmp #$0d cmp #$0d
beq screen_advance_to_next_line bne not_0d
jmp screen_advance_to_next_line
not_0d:
;; Check for cursor movement keys ;; Check for cursor movement keys
sta $0400
cmp #$11 cmp #$11
bne not_11 bne not_11
inc current_screen_y inc current_screen_y
@@ -48,6 +52,18 @@ not_11:
jsr calculate_screen_line_pointer jsr calculate_screen_line_pointer
jmp chrout_done jmp chrout_done
not_1d: not_1d:
cmp #$91
bne not_91
dec current_screen_y
jsr calculate_screen_line_pointer
jmp chrout_done
not_91:
cmp #$9d
bne not_9d
dec current_screen_x
jsr calculate_screen_line_pointer
jmp chrout_done
not_9d:
cmp #$14 cmp #$14
bne not_14 bne not_14
c64/kernal/keyboard_matrix.s
+1 -1
View File
@@ -26,7 +26,7 @@ keyboard_matrixes:
.byte $25,$72,$64,$26,$63,$66,$74,$78 .byte $25,$72,$64,$26,$63,$66,$74,$78
.byte $27,$79,$67,$28,$62,$68,$75,$76 .byte $27,$79,$67,$28,$62,$68,$75,$76
.byte $12,$69,$6A,$92,$6D,$6B,$6F,$6E .byte $12,$69,$6A,$92,$6D,$6B,$6F,$6E
.byte $DB,$70,$6C,$DD,43E,$5B,$BA,$3C .byte $DB,$70,$6C,$DD,$3E,$5B,$BA,$3C
.byte $A9,$C0,$5D,$93,$00,$3D,$DE,$3F .byte $A9,$C0,$5D,$93,$00,$3D,$DE,$3F
.byte $21,$5F,$00,$22,$A0,$00,$71,$83 .byte $21,$5F,$00,$22,$A0,$00,$71,$83