mirror of https://github.com/pret/pokecrystal.git
13 lines
260 B
NASM
13 lines
260 B
NASM
|
QueueScript::
|
||
|
|
; Push pointer hl in the current bank to wQueuedScriptBank.
|
||
|
|
ld a, [hROMBank]
|
||
|
|
|
||
|
|
FarQueueScript::
|
||
|
|
; Push pointer a:hl to wQueuedScriptBank.
|
||
|
|
ld [wQueuedScriptBank], a
|
||
|
|
ld a, l
|
||
|
|
ld [wQueuedScriptAddr], a
|
||
|
|
ld a, h
|
||
|
|
ld [wQueuedScriptAddr + 1], a
|
||
|
|
ret
|