diff --git a/definitions.asm b/definitions.asm index 990b64c..89f26d9 100644 --- a/definitions.asm +++ b/definitions.asm @@ -27,7 +27,7 @@ space = 0 ; space in screencodes KeyRepeatSpeed = 8 ; (max 127 !!!) 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. ) ; characters from tanks.fnt (graphics screen) diff --git a/scorch.asm b/scorch.asm index 896ba71..905974a 100644 --- a/scorch.asm +++ b/scorch.asm @@ -234,7 +234,7 @@ FirstZpageVariable = $50 _M = $0d _S = $0e _atari = $fd ; not used in 5200 - _ret = $fd ; not used in 5200 + _ret = $0c ; fire in 5200 _none = $0f .ende .ENDIF diff --git a/scorch.bin b/scorch.bin index dc5481c..3ea7342 100644 Binary files a/scorch.bin and b/scorch.bin differ diff --git a/scorch.xex b/scorch.xex index 7043390..8e731a7 100644 Binary files a/scorch.xex and b/scorch.xex differ diff --git a/scorchC64.asm b/scorchC64.asm index 5a954fe..6bc5d40 100644 --- a/scorchC64.asm +++ b/scorchC64.asm @@ -14,6 +14,7 @@ ; if 1 - activates faster graphics routines ; (direct writes to screen memory - C64 only :) ) ;--------------------------------------------------- +.def VU_METER = 0 ; allways 0! (works only on Atari) opt h-f+ diff --git a/scorchC64.prg b/scorchC64.prg index be8855f..1e98a3c 100644 Binary files a/scorchC64.prg and b/scorchC64.prg differ diff --git a/scorch_cart.xex b/scorch_cart.xex new file mode 100644 index 0000000..b5c9825 Binary files /dev/null and b/scorch_cart.xex differ diff --git a/weapons.asm b/weapons.asm index 4dbebe9..a614162 100644 --- a/weapons.asm +++ b/weapons.asm @@ -1288,6 +1288,7 @@ notpressed .ENDIF ldx TankNr ; for optimize jsr GetKeyFast + mvy #00 EscFlag ; prevent for set EscFalg in GetKey! we checking this in CheckExitKeys! and #%10111111 ; SHIFT elimination cmp #@kbcode._atari ; Option key @@ -1341,10 +1342,7 @@ jumpFromStick .ELSE cmp #@kbcode._help ; Help (# in A5200) bne NoVdebugSwitch - sta pressTimer ; reset 0+@kbcode._help (tricky) - jsr WaitForKeyRelease.StillWait - lda pressTimer - cmp #(25+@kbcode._help) ; 1/2s - long press only + jsr WaitForLongPress bcc NoVdebugSwitch .ENDIF lda Vdebug @@ -1575,7 +1573,7 @@ pressedS eor:sta noSfx ReleaseAndLoop jsr WaitForKeyRelease - mva #$80 pressTimer +; mva #$80 pressTimer jmp BeforeFire pressedSpace