pokered/engine/predefs.asm
2020-11-14 20:52:10 -06:00

52 lines
691 B
NASM

GetPredefPointer::
; Store the contents of the register
; pairs (hl, de, bc) at wPredefRegisters.
; Then put the bank and address of predef
; wPredefID in [wPredefBank] and hl.
ld a, h
ld [wPredefRegisters], a
ld a, l
ld [wPredefRegisters + 1], a
ld hl, wPredefRegisters + 2
ld a, d
ld [hli], a
ld a, e
ld [hli], a
ld a, b
ld [hli], a
ld [hl], c
ld hl, PredefPointers
ld de, 0
ld a, [wPredefID]
ld e, a
add a
add e
ld e, a
jr nc, .nocarry
inc d
.nocarry
add hl, de
ld d, h
ld e, l
; get bank of predef routine
ld a, [de]
ld [wPredefBank], a
; get pointer
inc de
ld a, [de]
ld l, a
inc de
ld a, [de]
ld h, a
ret
INCLUDE "data/predef_pointers.asm"