27 lines
358 B
ArmAsm
27 lines
358 B
ArmAsm
.include "global.s"
|
|
|
|
.globl .get_xy_btt
|
|
;; BANKED: checked
|
|
.area _BASE
|
|
|
|
_get_bkg_tiles::
|
|
PUSH BC
|
|
|
|
LDA HL,4(SP) ; Skip return address and registers
|
|
LD D,(HL) ; D = x
|
|
INC HL
|
|
LD E,(HL) ; E = y
|
|
LDA HL,9(SP)
|
|
LD B,(HL) ; BC = tiles
|
|
DEC HL
|
|
LD C,(HL)
|
|
DEC HL
|
|
LD A,(HL-) ; A = h
|
|
LD H,(HL) ; H = w
|
|
LD L,A ; L = h
|
|
|
|
CALL .get_xy_btt
|
|
|
|
POP BC
|
|
RET
|