pokecrystal/engine/menus/empty_sram.asm

16 lines
197 B
NASM

EmptyAllSRAMBanks:
for x, NUM_SRAM_BANKS
ld a, x
call .EmptyBank
endr
ret
.EmptyBank:
call OpenSRAM
ld hl, SRAM_Begin
ld bc, SRAM_End - SRAM_Begin
xor a
call ByteFill
call CloseSRAM
ret