Strong port flaut fixed!

This commit is contained in:
Pecusx
2024-03-13 22:42:09 +01:00
parent ce741f05dd
commit 630c5eaa1a
8 changed files with 10 additions and 7 deletions
+8 -5
View File
@@ -742,19 +742,20 @@ NotNegativeShieldEnergy
;out: Wind (word) ;out: Wind (word)
;uses: _ ;uses: _
;-------------------------------------------------- ;--------------------------------------------------
mva #$00 Wind+1
sta Wind+2
sta Wind+3
lda random lda random
cmp MaxWind cmp MaxWind
bcs GetRandomWind ; if more than MaxWind then randomize again bcs GetRandomWind ; if more than MaxWind then randomize again
sta Wind sta Wind
mva #$00 Wind+1 beq noWind
sta Wind+2
sta Wind+3
; multiply Wind by 16 ; multiply Wind by 16
; two bytes of Wind are treated as a decimal part of vx variable ; two bytes of Wind are treated as a decimal part of vx variable
:4 aslw Wind :4 aslw Wind
; decide the direction ; decide the direction
lda random lda random
bmi @+ bmi noWindDirectionChange
sec ; Wind = -Wind sec ; Wind = -Wind
.rept 2 .rept 2
lda #$00 lda #$00
@@ -764,7 +765,9 @@ NotNegativeShieldEnergy
lda #$ff lda #$ff
sta Wind+2 sta Wind+2
sta Wind+3 sta Wind+3
@ rts noWind
noWindDirectionChange
rts
.endp .endp
;-------------------------------------------------- ;--------------------------------------------------
.proc MaxForceCalculate .proc MaxForceCalculate
+1 -1
View File
@@ -41,7 +41,7 @@
;--------------------------------------------------- ;---------------------------------------------------
.macro build .macro build
dta d"1.49" ; number of this build (4 bytes) dta d"1.50" ; number of this build (4 bytes)
.endm .endm
.macro RMTSong .macro RMTSong
BIN
View File
Binary file not shown.
BIN
View File
Binary file not shown.
BIN
View File
Binary file not shown.
+1 -1
View File
@@ -25,7 +25,7 @@
;--------------------------------------------------- ;---------------------------------------------------
.macro build .macro build
dta d"1.49" ; number of this build (4 bytes) dta d"1.50" ; number of this build (4 bytes)
.endm .endm
.macro RMTSong .macro RMTSong
BIN
View File
Binary file not shown.
BIN
View File
Binary file not shown.