mirror of https://github.com/pret/pokecrystal.git
35 lines
545 B
NASM
35 lines
545 B
NASM
GetSRAMBank:: ; 2fcb
|
|
; load sram bank a
|
|
; if invalid bank, sram is disabled
|
|
cp NUM_SRAM_BANKS
|
|
jr c, OpenSRAM
|
|
jr CloseSRAM
|
|
; 2fd1
|
|
|
|
OpenSRAM:: ; 2fd1
|
|
; switch to sram bank a
|
|
push af
|
|
; latch clock data
|
|
ld a, 1
|
|
ld [MBC3LatchClock], a
|
|
; enable sram/clock write
|
|
ld a, SRAM_ENABLE
|
|
ld [MBC3SRamEnable], a
|
|
; select sram bank
|
|
pop af
|
|
ld [MBC3SRamBank], a
|
|
ret
|
|
; 2fe1
|
|
|
|
CloseSRAM:: ; 2fe1
|
|
push af
|
|
ld a, SRAM_DISABLE
|
|
; reset clock latch for next time
|
|
ld [MBC3LatchClock], a
|
|
; disable sram/clock write
|
|
ld [MBC3SRamEnable], a
|
|
pop af
|
|
ret
|
|
; 2fec
|
|
|