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)
;uses: _
;--------------------------------------------------
mva #$00 Wind+1
sta Wind+2
sta Wind+3
lda random
cmp MaxWind
bcs GetRandomWind ; if more than MaxWind then randomize again
sta Wind
mva #$00 Wind+1
sta Wind+2
sta Wind+3
beq noWind
; multiply Wind by 16
; two bytes of Wind are treated as a decimal part of vx variable
:4 aslw Wind
; decide the direction
lda random
bmi @+
bmi noWindDirectionChange
sec ; Wind = -Wind
.rept 2
lda #$00
@@ -764,7 +765,9 @@ NotNegativeShieldEnergy
lda #$ff
sta Wind+2
sta Wind+3
@ rts
noWind
noWindDirectionChange
rts
.endp
;--------------------------------------------------
.proc MaxForceCalculate
+1 -1
View File
@@ -41,7 +41,7 @@
;---------------------------------------------------
.macro build
dta d"1.49" ; number of this build (4 bytes)
dta d"1.50" ; number of this build (4 bytes)
.endm
.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
dta d"1.49" ; number of this build (4 bytes)
dta d"1.50" ; number of this build (4 bytes)
.endm
.macro RMTSong
BIN
View File
Binary file not shown.
BIN
View File
Binary file not shown.