From 6c17e6d09decb3e27d21e12745200cc8096b020a Mon Sep 17 00:00:00 2001 From: Joshua Bell Date: Sat, 6 Nov 2021 20:27:30 -0700 Subject: [PATCH] wip --- ace2000_c300_cfff.s | 5 +++-- ace500_c300_cfff.s | 4 ++-- 2 files changed, 5 insertions(+), 4 deletions(-) diff --git a/ace2000_c300_cfff.s b/ace2000_c300_cfff.s index 76930fc..2773741 100644 --- a/ace2000_c300_cfff.s +++ b/ace2000_c300_cfff.s @@ -670,7 +670,7 @@ jt1: .addr DoEnableMouseText ; $1B Ctrl-[ Enable MouseText .addr DoForwardSpace ; $1C Ctrl-\ Forward space .addr DoClearEOL ; $1D Ctrl-] Clear EOL - .addr LC9F8 ; $1E Ctrl-^ ??? + .addr DoCtrlCaret ; $1E Ctrl-^ ??? .addr DoUp ; $1F Ctrl-_ Up ;;; ============================================================ @@ -823,7 +823,8 @@ DoQuit: ;;; ============================================================ ;;; Adusting MODE Bits -LC9F8: lda #$FC ; clear mode bits %xxxxxx00 +DoCtrlCaret: + lda #$FC ; clear mode bits %xxxxxx00 jsr PreserveModeBits lda #$32 ; set mode bits %xx11xx1x bra SetModeBits diff --git a/ace500_c300_cfff.s b/ace500_c300_cfff.s index e5ca48b..d2ecc54 100644 --- a/ace500_c300_cfff.s +++ b/ace500_c300_cfff.s @@ -1044,7 +1044,7 @@ jt1: .addr DoEnableMouseText ; $1B Ctrl-[ Enable MouseText .addr DoForwardSpace ; $1C Ctrl-\ Forward space .addr DoClearEOL ; $1D Ctrl-] Clear EOL - .addr XC9F8 ; $1E Ctrl-^ ??? + .addr DoCtrlCaret ; $1E Ctrl-^ ??? .addr DoUp ; $1F Ctrl-_ Up ;;; ============================================================ @@ -1269,7 +1269,7 @@ DoQuit: ;;; ============================================================ -XC9F8: +DoCtrlCaret: lda #$FC jsr LCA21 lda #$32