Fixet Esc bug (A5200) and VU meters timer set to 1minute

This commit is contained in:
Pecusx
2024-03-03 17:03:02 +01:00
parent 6312dec69e
commit 09a5459930
8 changed files with 6 additions and 7 deletions
+1 -1
View File
@@ -27,7 +27,7 @@ space = 0 ; space in screencodes
KeyRepeatSpeed = 8 ; (max 127 !!!) KeyRepeatSpeed = 8 ; (max 127 !!!)
FirstKeySpeed = 8 ; additional delay for first keypress FirstKeySpeed = 8 ; additional delay for first keypress
VuMeterTime = 4 ; Time of inactivity for VU Meter (1=5sec) VuMeterTime = 12 ; Time of inactivity for VU Meter (1=5sec)
;character codes for symbols (tank, parachute, etc. ) ;character codes for symbols (tank, parachute, etc. )
; characters from tanks.fnt (graphics screen) ; characters from tanks.fnt (graphics screen)
+1 -1
View File
@@ -234,7 +234,7 @@ FirstZpageVariable = $50
_M = $0d _M = $0d
_S = $0e _S = $0e
_atari = $fd ; not used in 5200 _atari = $fd ; not used in 5200
_ret = $fd ; not used in 5200 _ret = $0c ; fire in 5200
_none = $0f _none = $0f
.ende .ende
.ENDIF .ENDIF
BIN
View File
Binary file not shown.
BIN
View File
Binary file not shown.
+1
View File
@@ -14,6 +14,7 @@
; if 1 - activates faster graphics routines ; if 1 - activates faster graphics routines
; (direct writes to screen memory - C64 only :) ) ; (direct writes to screen memory - C64 only :) )
;--------------------------------------------------- ;---------------------------------------------------
.def VU_METER = 0 ; allways 0! (works only on Atari)
opt h-f+ opt h-f+
BIN
View File
Binary file not shown.
BIN
View File
Binary file not shown.
+3 -5
View File
@@ -1288,6 +1288,7 @@ notpressed
.ENDIF .ENDIF
ldx TankNr ; for optimize ldx TankNr ; for optimize
jsr GetKeyFast jsr GetKeyFast
mvy #00 EscFlag ; prevent for set EscFalg in GetKey! we checking this in CheckExitKeys!
and #%10111111 ; SHIFT elimination and #%10111111 ; SHIFT elimination
cmp #@kbcode._atari ; Option key cmp #@kbcode._atari ; Option key
@@ -1341,10 +1342,7 @@ jumpFromStick
.ELSE .ELSE
cmp #@kbcode._help ; Help (# in A5200) cmp #@kbcode._help ; Help (# in A5200)
bne NoVdebugSwitch bne NoVdebugSwitch
sta pressTimer ; reset 0+@kbcode._help (tricky) jsr WaitForLongPress
jsr WaitForKeyRelease.StillWait
lda pressTimer
cmp #(25+@kbcode._help) ; 1/2s - long press only
bcc NoVdebugSwitch bcc NoVdebugSwitch
.ENDIF .ENDIF
lda Vdebug lda Vdebug
@@ -1575,7 +1573,7 @@ pressedS
eor:sta noSfx eor:sta noSfx
ReleaseAndLoop ReleaseAndLoop
jsr WaitForKeyRelease jsr WaitForKeyRelease
mva #$80 pressTimer ; mva #$80 pressTimer
jmp BeforeFire jmp BeforeFire
pressedSpace pressedSpace