pokecrystal/home/lcd.asm

; LCD handling

Unreferenced_Function547::
	ldh a, [hLCDCPointer]
	cp LOW(rSCX)
	ret nz
	ld c, a
	ld a, [wLYOverrides]
	ld [$ff00+c], a
	ret

LCD::
	push af
	ldh a, [hLCDCPointer]
	and a
	jr z, .done

; At this point it's assumed we're in WRAM bank 5!
	push bc
	ldh a, [rLY]
	ld c, a
	ld b, HIGH(wLYOverrides)
	ld a, [bc]
	ld b, a
	ldh a, [hLCDCPointer]
	ld c, a
	ld a, b
	ld [$ff00+c], a
	pop bc

.done
	pop af
	reti

DisableLCD::
; Turn the LCD off

; Don't need to do anything if the LCD is already off
	ldh a, [rLCDC]
	bit rLCDC_ENABLE, a
	ret z

	xor a
	ldh [rIF], a
	ldh a, [rIE]
	ld b, a

; Disable VBlank
	res 0, a ; vblank
	ldh [rIE], a

.wait
; Wait until VBlank would normally happen
	ldh a, [rLY]
	cp LY_VBLANK + 1
	jr nz, .wait

	ldh a, [rLCDC]
	and $ff ^ (1 << rLCDC_ENABLE)
	ldh [rLCDC], a

	xor a
	ldh [rIF], a
	ld a, b
	ldh [rIE], a
	ret

EnableLCD::
	ldh a, [rLCDC]
	set rLCDC_ENABLE, a
	ldh [rLCDC], a
	ret
split lcd functions out of main.asm 2013-08-29 22:52:16 +00:00			`; LCD handling`

Remove all address comments 2018-06-24 14:09:41 +00:00			`Unreferenced_Function547::`
Use labels instead of constants for HRAM Use explicit ldh instruction to access HRAM locations, don't rely on optimizing ld 2018-08-25 18:28:22 +00:00			`ldh a, [hLCDCPointer]`
hLabel - $ff00 -> LOW(hLabel) 2018-08-25 18:34:25 +00:00			`cp LOW(rSCX)`
split lcd functions out of main.asm 2013-08-29 22:52:16 +00:00			`ret nz`
			`ld c, a`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld a, [wLYOverrides]`
split lcd functions out of main.asm 2013-08-29 22:52:16 +00:00			`ld [$ff00+c], a`
			`ret`

Remove all address comments 2018-06-24 14:09:41 +00:00			`LCD::`
split lcd functions out of main.asm 2013-08-29 22:52:16 +00:00			`push af`
Use labels instead of constants for HRAM Use explicit ldh instruction to access HRAM locations, don't rely on optimizing ld 2018-08-25 18:28:22 +00:00			`ldh a, [hLCDCPointer]`
split lcd functions out of main.asm 2013-08-29 22:52:16 +00:00			`and a`
			`jr z, .done`

			`; At this point it's assumed we're in WRAM bank 5!`
			`push bc`
Use labels instead of constants for HRAM Use explicit ldh instruction to access HRAM locations, don't rely on optimizing ld 2018-08-25 18:28:22 +00:00			`ldh a, [rLY]`
split lcd functions out of main.asm 2013-08-29 22:52:16 +00:00			`ld c, a`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld b, HIGH(wLYOverrides)`
split lcd functions out of main.asm 2013-08-29 22:52:16 +00:00			`ld a, [bc]`
			`ld b, a`
Use labels instead of constants for HRAM Use explicit ldh instruction to access HRAM locations, don't rely on optimizing ld 2018-08-25 18:28:22 +00:00			`ldh a, [hLCDCPointer]`
split lcd functions out of main.asm 2013-08-29 22:52:16 +00:00			`ld c, a`
			`ld a, b`
			`ld [$ff00+c], a`
			`pop bc`

			`.done`
			`pop af`
			`reti`

Remove all address comments 2018-06-24 14:09:41 +00:00			`DisableLCD::`
split lcd functions out of main.asm 2013-08-29 22:52:16 +00:00			`; Turn the LCD off`

			`; Don't need to do anything if the LCD is already off`
Use labels instead of constants for HRAM Use explicit ldh instruction to access HRAM locations, don't rely on optimizing ld 2018-08-25 18:28:22 +00:00			`ldh a, [rLCDC]`
LY_BLANK and rLCDC constants 2017-12-29 17:53:21 +00:00			`bit rLCDC_ENABLE, a`
split lcd functions out of main.asm 2013-08-29 22:52:16 +00:00			`ret z`

			`xor a`
Use labels instead of constants for HRAM Use explicit ldh instruction to access HRAM locations, don't rely on optimizing ld 2018-08-25 18:28:22 +00:00			`ldh [rIF], a`
			`ldh a, [rIE]`
split lcd functions out of main.asm 2013-08-29 22:52:16 +00:00			`ld b, a`
Local labels starting with capital letters are now decorated with a trailing colon; remove trailing whitespace; globally correct line endings to UNIX style 2016-04-10 18:42:14 +00:00
split lcd functions out of main.asm 2013-08-29 22:52:16 +00:00			`; Disable VBlank`
			`res 0, a ; vblank`
Use labels instead of constants for HRAM Use explicit ldh instruction to access HRAM locations, don't rely on optimizing ld 2018-08-25 18:28:22 +00:00			`ldh [rIE], a`
split lcd functions out of main.asm 2013-08-29 22:52:16 +00:00
			`.wait`
			`; Wait until VBlank would normally happen`
Use labels instead of constants for HRAM Use explicit ldh instruction to access HRAM locations, don't rely on optimizing ld 2018-08-25 18:28:22 +00:00			`ldh a, [rLY]`
LY_BLANK and rLCDC constants 2017-12-29 17:53:21 +00:00			`cp LY_VBLANK + 1`
split lcd functions out of main.asm 2013-08-29 22:52:16 +00:00			`jr nz, .wait`

Use labels instead of constants for HRAM Use explicit ldh instruction to access HRAM locations, don't rely on optimizing ld 2018-08-25 18:28:22 +00:00			`ldh a, [rLCDC]`
Clean up changes in 3c6c80f 2017-12-29 18:22:33 +00:00			`and $ff ^ (1 << rLCDC_ENABLE)`
Use labels instead of constants for HRAM Use explicit ldh instruction to access HRAM locations, don't rely on optimizing ld 2018-08-25 18:28:22 +00:00			`ldh [rLCDC], a`
split lcd functions out of main.asm 2013-08-29 22:52:16 +00:00
			`xor a`
Use labels instead of constants for HRAM Use explicit ldh instruction to access HRAM locations, don't rely on optimizing ld 2018-08-25 18:28:22 +00:00			`ldh [rIF], a`
split lcd functions out of main.asm 2013-08-29 22:52:16 +00:00			`ld a, b`
Use labels instead of constants for HRAM Use explicit ldh instruction to access HRAM locations, don't rely on optimizing ld 2018-08-25 18:28:22 +00:00			`ldh [rIE], a`
split lcd functions out of main.asm 2013-08-29 22:52:16 +00:00			`ret`

Remove all address comments 2018-06-24 14:09:41 +00:00			`EnableLCD::`
Use labels instead of constants for HRAM Use explicit ldh instruction to access HRAM locations, don't rely on optimizing ld 2018-08-25 18:28:22 +00:00			`ldh a, [rLCDC]`
LY_BLANK and rLCDC constants 2017-12-29 17:53:21 +00:00			`set rLCDC_ENABLE, a`
Use labels instead of constants for HRAM Use explicit ldh instruction to access HRAM locations, don't rely on optimizing ld 2018-08-25 18:28:22 +00:00			`ldh [rLCDC], a`
split lcd functions out of main.asm 2013-08-29 22:52:16 +00:00			`ret`