don't render falling tiles that are already cleared

This commit is contained in:
alpine9000
2016-05-08 10:47:31 +10:00
parent 639de63c47
commit 5db5ae95eb
+19 -1
View File
@@ -694,6 +694,24 @@ PostMissedTile:
BigBang:
finishScrollLoop:
move.l foregroundScrollX,d0
lsr.l #FOREGROUND_SCROLL_SHIFT_CONVERT,d0 ; convert to pixels
and.b #$f,d0
cmp.b #$f,d0
beq .scrollFinished
add.l #1,frameCount
move.l frameCount,d6
jsr Update
bsr RenderNextForegroundFrame
jsr RenderNextBackgroundFrame
jsr WaitVerticalBlank
bsr HoriScrollPlayfield
jsr SwitchBuffers
bra finishScrollLoop
.scrollFinished
PlaySound Falling
jsr WaitVerticalBlank
jsr PlayNextSound
@@ -728,7 +746,7 @@ BigBang:
add.l #(BITPLANE_WIDTH_BYTES*SCREEN_BIT_DEPTH*(256-(16*8)+32)/4)+BITPLANE_WIDTH_BYTES-FOREGROUND_PLAYAREA_RIGHT_MARGIN_BYTES,a0
move.l #(FOREGROUND_PLAYAREA_WIDTH_WORDS/2),d5
move.l #(FOREGROUND_PLAYAREA_WIDTH_WORDS/2)-1,d5
move.l #BIGBANG_ANIM_DELAY,d0