Apple-2-SW/franklin
1
0
Fork 0
mirror of https://github.com/a2stuff/franklin.git synced 2025-03-12 04:34:05 +00:00
Code Issues Projects Releases Wiki Activity

wip

Browse Source
This commit is contained in:
Joshua Bell 2021-11-06 20:27:30 -07:00
parent 8f2fdae81d
commit 6c17e6d09d
2 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
ace2000_c300_cfff.s
View File

@ -670,7 +670,7 @@ jt1:
.addr DoEnableMouseText ; $1B Ctrl-[ Enable MouseText .addr DoEnableMouseText ; $1B Ctrl-[ Enable MouseText
.addr DoForwardSpace ; $1C Ctrl-\ Forward space .addr DoForwardSpace ; $1C Ctrl-\ Forward space
.addr DoClearEOL ; $1D Ctrl-] Clear EOL .addr DoClearEOL ; $1D Ctrl-] Clear EOL
.addr LC9F8 ; $1E Ctrl-^ ??? .addr DoCtrlCaret ; $1E Ctrl-^ ???
.addr DoUp ; $1F Ctrl-_ Up .addr DoUp ; $1F Ctrl-_ Up
;;; ============================================================ ;;; ============================================================
@ -823,7 +823,8 @@ DoQuit:
;;; ============================================================ ;;; ============================================================
;;; Adusting MODE Bits ;;; Adusting MODE Bits
LC9F8: lda #$FC ; clear mode bits %xxxxxx00 DoCtrlCaret:
lda #$FC ; clear mode bits %xxxxxx00
jsr PreserveModeBits jsr PreserveModeBits
lda #$32 ; set mode bits %xx11xx1x lda #$32 ; set mode bits %xx11xx1x
bra SetModeBits bra SetModeBits

4
ace500_c300_cfff.s
View File

@ -1044,7 +1044,7 @@ jt1:
.addr DoEnableMouseText ; $1B Ctrl-[ Enable MouseText .addr DoEnableMouseText ; $1B Ctrl-[ Enable MouseText
.addr DoForwardSpace ; $1C Ctrl-\ Forward space .addr DoForwardSpace ; $1C Ctrl-\ Forward space
.addr DoClearEOL ; $1D Ctrl-] Clear EOL .addr DoClearEOL ; $1D Ctrl-] Clear EOL
.addr XC9F8 ; $1E Ctrl-^ ??? .addr DoCtrlCaret ; $1E Ctrl-^ ???
.addr DoUp ; $1F Ctrl-_ Up .addr DoUp ; $1F Ctrl-_ Up
;;; ============================================================ ;;; ============================================================
@ -1269,7 +1269,7 @@ DoQuit:
;;; ============================================================ ;;; ============================================================
XC9F8: DoCtrlCaret:
lda #$FC lda #$FC
jsr LCA21 jsr LCA21
lda #$32 lda #$32