Pecus/scorch_src
1
0
Fork 0
mirror of https://github.com/Pecusx/scorch_src.git synced 2026-05-20 22:33:43 +02:00
Code Issues Packages Projects Releases Wiki Activity

Merge pull request #170 from pkali/develop

Browse Source 
Better keyboard handling
This commit is contained in:
Pecusx
2025-01-20 09:13:46 +01:00
committed by GitHub
parent ad88cebcb4 e8af94ba5d
commit be491ae737
3 changed files with 6 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files
Atari/inputs.asm
+6 -10
View File
@@ -23,10 +23,8 @@ getKeyAfterWait
;-------------------------------------------------- ;--------------------------------------------------
.IF TARGET = 800 .IF TARGET = 800
lda SKSTAT lda SKSTAT
cmp #$ff and #%00000100 ; any key
beq checkJoyGetKey ; key not pressed, check Joy bne checkJoyGetKey ; key not pressed, check Joy
cmp #$f7 ; SHIFT
beq checkJoyGetKey
.ELIF TARGET = 5200 .ELIF TARGET = 5200
lda SkStatSimulator lda SkStatSimulator
and #%11111110 and #%11111110
@@ -137,8 +135,8 @@ StillWait
beq StillWait beq StillWait
.IF TARGET = 800 .IF TARGET = 800
lda SKSTAT lda SKSTAT
cmp #$ff and #%00000100 ; any key
bne StillWait beq StillWait
lda CONSOL lda CONSOL
and #%00000110 ; Select and Option only and #%00000110 ; Select and Option only
cmp #%00000110 cmp #%00000110
@@ -186,10 +184,8 @@ KeyAutoReleased ; autorepeat
and #%00000101 ; Start + Option and #%00000101 ; Start + Option
beq QuitToGameover beq QuitToGameover
lda SKSTAT lda SKSTAT
cmp #$ff and #%00000100 ; any key
jeq nokeys jne nokeys
cmp #$f7 ; SHIFT
jeq nokeys
lda kbcode lda kbcode
and #%10111111 ; SHIFT elimination and #%10111111 ; SHIFT elimination
scorch.xex
BIN
View File
Binary file not shown.
scorch_cart.xex
BIN
View File
Binary file not shown.