pokecrystal-board/home/delay.asm

DelayFrame::
; Wait for one frame
	ld a, 1
	ld [wVBlankOccurred], a

; Wait for the next VBlank, halting to conserve battery
.halt
	halt
	nop
	ld a, [wVBlankOccurred]
	and a
	jr nz, .halt
	ret

DelayFrames::
; Wait c frames
	call DelayFrame
	dec c
	jr nz, DelayFrames
	ret
Remove all address comments 2018-06-24 07:09:41 -07:00			`DelayFrame::`
split out delay functions 2013-09-03 14:36:55 -07:00			`; Wait for one frame`
			`ld a, 1`
Prefix wram labels with w, part 2. 2018-01-23 14:39:09 -08:00			`ld [wVBlankOccurred], a`
split out delay functions 2013-09-03 14:36:55 -07:00
			`; Wait for the next VBlank, halting to conserve battery`
			`.halt`
Require rgbds 0.6.0 2022-10-02 19:03:53 -07:00			`halt`
			`nop`
Prefix wram labels with w, part 2. 2018-01-23 14:39:09 -08:00			`ld a, [wVBlankOccurred]`
split out delay functions 2013-09-03 14:36:55 -07:00			`and a`
			`jr nz, .halt`
			`ret`

Remove all address comments 2018-06-24 07:09:41 -07:00			`DelayFrames::`
split out delay functions 2013-09-03 14:36:55 -07:00			`; Wait c frames`
			`call DelayFrame`
			`dec c`
			`jr nz, DelayFrames`
			`ret`