Fix for lonely pixel in Liquid Dirt.

This commit is contained in:
Pecusx
2022-11-29 11:21:35 +01:00
parent ee9d6b7ce9
commit 18cce6377e
5 changed files with 8 additions and 3 deletions
+4
View File
@@ -1362,6 +1362,9 @@ NoClearTanks
adw RangeLeft #mountaintable temp
adw RangeLeft #mountaintable2 tempor2
cpw xdraw RangeRight
jcs NothingToFall
NextColumn1
mwa #0 ydraw
NextPoint1
@@ -1450,6 +1453,7 @@ ColumnIsReady
jeq MainFallout2
; now correct heights are in the mountaintable
sta color ; Pozor! :) we know - now A=1
NothingToFall
mva #sfx_silencer sfx_effect
jsr DrawTanks
rts
+1 -1
View File
@@ -15,7 +15,7 @@
;---------------------------------------------------
.macro build
dta d"1.20" ; number of this build (4 bytes)
dta d"1.21" ; number of this build (4 bytes)
.endm
.macro RMTSong
BIN
View File
Binary file not shown.
BIN
View File
Binary file not shown.
+3 -2
View File
@@ -1075,13 +1075,14 @@ FillHole
sta ydraw
beq ToHighFill ; if we filled all playfield (very rare but possible)
dec ydraw ; one pixel up
ToHighFill
lda ydraw
sta (tempXROLLER),y ;mountaintable update
mva #1 color
jsr plot.MakePlot
ToHighFill
.nowarn dew FillCounter
cpw FillCounter #0
lda FillCounter
ora FillCounter+1
jne RepeatFill
rts
.endp