Better keyboart handling

This commit is contained in:
Pecusx
2025-12-20 16:31:51 +01:00
parent adaaf2ffbf
commit cff106297d
4 changed files with 8 additions and 2 deletions
+6
View File
@@ -82,6 +82,8 @@ OptionsMainLoop
bit escFlag bit escFlag
spl:rts spl:rts
and #$3f ;CTRL and SHIFT ellimination
cmp #@kbcode._down ; $f ;cursor down cmp #@kbcode._down ; $f ;cursor down
bne OptionsNoDown bne OptionsNoDown
ldx OptionsY ldx OptionsY
@@ -136,6 +138,10 @@ EndOfOptions
rts ; options selected rts ; options selected
OptionsNoReturn OptionsNoReturn
.IF TARGET = 800
cmp #@kbcode._G ; $61 ; G
beq TabPressed
.ENDIF
cmp #@kbcode._tab ; Tab key cmp #@kbcode._tab ; Tab key
bne OptionsNoTab bne OptionsNoTab
TabPressed TabPressed
+1 -1
View File
@@ -41,7 +41,7 @@
;--------------------------------------------------- ;---------------------------------------------------
.macro build .macro build
dta d"1.52" ; number of this build (4 bytes) dta d"1.55" ; number of this build (4 bytes)
.endm .endm
.macro RMTSong .macro RMTSong
BIN
View File
Binary file not shown.
+1 -1
View File
@@ -1406,7 +1406,7 @@ NoVdebugSwitch
cmp #@kbcode._S ; $3e ; S cmp #@kbcode._S ; $3e ; S
jeq pressedS jeq pressedS
.IF TARGET = 800 .IF TARGET = 800
cmp #61 ; G cmp #@kbcode._G ; $61 ; G
bne EndKeys bne EndKeys
jsr SelectNextGradient.NotWind jsr SelectNextGradient.NotWind
jmp ReleaseAndLoop jmp ReleaseAndLoop