Better VUmeter :)

This commit is contained in:
Pecusx
2024-03-13 10:14:18 +01:00
parent 9e8187fc0d
commit 06298c856b
4 changed files with 24 additions and 2 deletions
+24 -2
View File
@@ -1439,16 +1439,22 @@ FinishResultDisplay
.ENDIF .ENDIF
cmp #VuMeterTime cmp #VuMeterTime
bcc EndMeter bcc EndMeter
; Let's go!
jsr ClearTanks
; store all angles ; store all angles
ldx NumberOfPlayers ldx NumberOfPlayers
dex dex
@ lda AngleTable,x @ lda AngleTable,x
sta previousAngle,x sta previousAngle,x
lda #0
sta AngleTable,x
dex dex
bpl @- bpl @-
jsr DrawTanks
; let's go! ; let's go!
Meter Meter
jsr ClearTanks mva #1 Erase
jsr drawbarrels ; clear barrels
ldx NumberOfPlayers ldx NumberOfPlayers
@ txa @ txa
and #%00000001 and #%00000001
@@ -1458,7 +1464,8 @@ Meter
sta AngleTable,x sta AngleTable,x
dex dex
bpl @- bpl @-
jsr drawtanks mva #0 Erase
jsr drawbarrels ; draw barrels
jsr WaitOneFrame jsr WaitOneFrame
jsr GetKeyFast jsr GetKeyFast
cmp #@kbcode._none cmp #@kbcode._none
@@ -1483,6 +1490,21 @@ EndMeterAndReset
.ENDIF .ENDIF
EndMeter EndMeter
rts rts
;-----------
drawbarrels
lda TankNr
pha
ldx NumberOfPlayers
dex
stx TankNr
DrawNextTank
jsr drawtanknr.BarrelChange
dec TankNr
ldx TankNr
bpl DrawNextTank
pla
sta TankNr
rts
.endp .endp
.ENDIF .ENDIF
BIN
View File
Binary file not shown.
BIN
View File
Binary file not shown.
BIN
View File
Binary file not shown.