Update 'src/field.asm'
This commit is contained in:
parent
03fd8ad969
commit
79d6706ef8
|
@ -1022,7 +1022,6 @@ FieldProcess::
|
||||||
; Otherwise, look it up.
|
; Otherwise, look it up.
|
||||||
call GetTileShade
|
call GetTileShade
|
||||||
|
|
||||||
; TODO: What tile do we use to draw the piece?
|
|
||||||
.drawpiece
|
.drawpiece
|
||||||
ldh a, [hCurrentPieceY]
|
ldh a, [hCurrentPieceY]
|
||||||
ld b, a
|
ld b, a
|
||||||
|
@ -1524,7 +1523,7 @@ ClearLines:
|
||||||
ld de, 0
|
ld de, 0
|
||||||
|
|
||||||
DEF row = 23
|
DEF row = 23
|
||||||
REPT 24
|
REPT 23
|
||||||
; Check if the row begins with a clearing tile.
|
; Check if the row begins with a clearing tile.
|
||||||
ld hl, wField+(row*10)
|
ld hl, wField+(row*10)
|
||||||
ld a, [hl]
|
ld a, [hl]
|
||||||
|
@ -1587,6 +1586,16 @@ ClearLines:
|
||||||
DEF row -= 1
|
DEF row -= 1
|
||||||
ENDR
|
ENDR
|
||||||
|
|
||||||
|
; Make sure there's no garbage in the top de lines.
|
||||||
|
ld hl, wField
|
||||||
|
: xor a, a
|
||||||
|
or a, d
|
||||||
|
or a, e
|
||||||
|
ret z
|
||||||
|
ld a, TILE_FIELD_EMPTY
|
||||||
|
ld [hl+], a
|
||||||
|
dec de
|
||||||
|
jr :-
|
||||||
ret
|
ret
|
||||||
|
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue