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

PAUSE ellimintation

Browse Source
This commit is contained in:
pkali
2022-08-06 16:16:47 -04:00
parent 2cda0bfb12
commit 56ed83fbac
3 changed files with 20 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files
scorch.asm
+14 -3
View File
@@ -1253,7 +1253,7 @@ MoveBarrel
jsr DisplayStatus.displayAngle
; ldx TankNr
mva #1 Erase
PAUSE 1
jsr WaitOneFrame
jsr DrawTankNr.BarrelChange
mva #0 Erase
lda NewAngle
@@ -1437,8 +1437,9 @@ checkForHuman ; if all in skillTable other than 0 then switch to DEMO MODE
dex
bpl checkForHuman
; no people, just wait a bit
pause 250
pause 50
;pause 150
ldy #75
jsr PauseYFrames
jmp noKey
peopleAreHere
@@ -1450,6 +1451,16 @@ noKey
wait
rts
.endp
.proc PauseYFrames
; Y - number of frames to wait (divided by 2)
; pauses for maximally 510 frames (255 * 2)
@ jsr WaitOneFrame
jsr WaitOneFrame
dey
bne @-
rts
.endp
;--------------------------------------------------
.proc RmtSongSelect
;--------------------------------------------------