pokered/engine/hidden_object_functions3.asm

; prints text for bookshelves in buildings without sign events
PrintBookshelfText:
	ld a, [wSpriteStateData1 + 9] ; player's sprite facing direction
	cp SPRITE_FACING_UP
	jr nz, .noMatch
; facing up
	ld a, [wCurMapTileset]
	ld b, a
	aCoord 8, 7
	ld c, a
	ld hl, BookshelfTileIDs
.loop
	ld a, [hli]
	cp $ff
	jr z, .noMatch
	cp b
	jr nz, .nextBookshelfEntry1
	ld a, [hli]
	cp c
	jr nz, .nextBookshelfEntry2
	ld a, [hl]
	push af
	call EnableAutoTextBoxDrawing
	pop af
	call PrintPredefTextID
	xor a
	ld [$ffdb], a
	ret
.nextBookshelfEntry1
	inc hl
.nextBookshelfEntry2
	inc hl
	jr .loop
.noMatch
	ld a, $ff
	ld [$ffdb], a
	jpba PrintCardKeyText

; format: db tileset id, bookshelf tile id, text id
BookshelfTileIDs:
	db PLATEAU,      $30
	db_tx_pre IndigoPlateauStatues
	db HOUSE,        $3D
	db_tx_pre TownMapText
	db HOUSE,        $1E
	db_tx_pre BookOrSculptureText
	db MANSION,      $32
	db_tx_pre BookOrSculptureText
	db REDS_HOUSE_1, $32
	db_tx_pre BookOrSculptureText
	db LAB,          $28
	db_tx_pre BookOrSculptureText
	db LOBBY,        $16
	db_tx_pre ElevatorText
	db GYM,          $1D
	db_tx_pre BookOrSculptureText
	db DOJO,         $1D
	db_tx_pre BookOrSculptureText
	db GATE,         $22
	db_tx_pre BookOrSculptureText
	db MART,         $54
	db_tx_pre PokemonStuffText
	db MART,         $55
	db_tx_pre PokemonStuffText
	db POKECENTER,   $54
	db_tx_pre PokemonStuffText
	db POKECENTER,   $55
	db_tx_pre PokemonStuffText
	db LOBBY,        $50
	db_tx_pre PokemonStuffText
	db LOBBY,        $52
	db_tx_pre PokemonStuffText
	db SHIP,         $36
	db_tx_pre BookOrSculptureText
	db $FF

IndigoPlateauStatues:
	TX_ASM
	ld hl, IndigoPlateauStatuesText1
	call PrintText
	ld a, [wXCoord]
	bit 0, a
	ld hl, IndigoPlateauStatuesText2
	jr nz, .ok
	ld hl, IndigoPlateauStatuesText3
.ok
	call PrintText
	jp TextScriptEnd

IndigoPlateauStatuesText1:
	TX_FAR _IndigoPlateauStatuesText1
	db "@"

IndigoPlateauStatuesText2:
	TX_FAR _IndigoPlateauStatuesText2
	db "@"

IndigoPlateauStatuesText3:
	TX_FAR _IndigoPlateauStatuesText3
	db "@"

BookOrSculptureText:
	TX_ASM
	ld hl, PokemonBooksText
	ld a, [wCurMapTileset]
	cp MANSION ; Celadon Mansion tileset
	jr nz, .ok
	aCoord 8, 6
	cp $38
	jr nz, .ok
	ld hl, DiglettSculptureText
.ok
	call PrintText
	jp TextScriptEnd

PokemonBooksText:
	TX_FAR _PokemonBooksText
	db "@"

DiglettSculptureText:
	TX_FAR _DiglettSculptureText
	db "@"

ElevatorText:
	TX_FAR _ElevatorText
	db "@"

TownMapText:
	TX_FAR _TownMapText
	TX_BLINK
	TX_ASM
	ld a, $1
	ld [wDoNotWaitForButtonPressAfterDisplayingText], a
	ld hl, wd730
	set 6, [hl]
	call GBPalWhiteOutWithDelay3
	xor a
	ld [hWY], a
	inc a
	ld [H_AUTOBGTRANSFERENABLED], a
	call LoadFontTilePatterns
	callba DisplayTownMap
	ld hl, wd730
	res 6, [hl]
	ld de, TextScriptEnd
	push de
	ld a, [H_LOADEDROMBANK]
	push af
	jp CloseTextDisplay

PokemonStuffText:
	TX_FAR _PokemonStuffText
	db "@"
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`; prints text for bookshelves in buildings without sign events`
remove address comments 2016-06-12 00:24:04 +00:00			`PrintBookshelfText:`
Commented/labelled misc functions 2014-09-14 18:29:18 +00:00			`ld a, [wSpriteStateData1 + 9] ; player's sprite facing direction`
			`cp SPRITE_FACING_UP`
			`jr nz, .noMatch`
			`; facing up`
No more W_ 2015-08-31 02:38:41 +00:00			`ld a, [wCurMapTileset]`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld b, a`
$U-Fish-PC\Daniel$ Use *Coord instead of FuncCoord Using 'Coord =' doesn't like using wTileMap So use hlCoord, deCoord, bcCoord, aCoord, Coorda, or dwCoord to avoid static addresses 2014-06-25 20:58:27 +00:00			`aCoord 8, 7`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld c, a`
Commented/labelled misc functions 2014-09-14 18:29:18 +00:00			`ld hl, BookshelfTileIDs`
			`.loop`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld a, [hli]`
			`cp $ff`
Commented/labelled misc functions 2014-09-14 18:29:18 +00:00			`jr z, .noMatch`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`cp b`
Commented/labelled misc functions 2014-09-14 18:29:18 +00:00			`jr nz, .nextBookshelfEntry1`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld a, [hli]`
			`cp c`
Commented/labelled misc functions 2014-09-14 18:29:18 +00:00			`jr nz, .nextBookshelfEntry2`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld a, [hl]`
			`push af`
			`call EnableAutoTextBoxDrawing`
			`pop af`
			`call PrintPredefTextID`
			`xor a`
			`ld [$ffdb], a`
			`ret`
Commented/labelled misc functions 2014-09-14 18:29:18 +00:00			`.nextBookshelfEntry1`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`inc hl`
Commented/labelled misc functions 2014-09-14 18:29:18 +00:00			`.nextBookshelfEntry2`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`inc hl`
Commented/labelled misc functions 2014-09-14 18:29:18 +00:00			`jr .loop`
			`.noMatch`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld a, $ff`
			`ld [$ffdb], a`
jpab/jpba macros 2015-07-19 18:56:13 +00:00			`jpba PrintCardKeyText`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00
			`; format: db tileset id, bookshelf tile id, text id`
remove address comments 2016-06-12 00:24:04 +00:00			`BookshelfTileIDs:`
Start using text predef macros also sprite direction constants 2015-07-04 05:44:12 +00:00			`db PLATEAU, $30`
more syncing with pokeyellow 2016-06-12 07:51:59 +00:00			`db_tx_pre IndigoPlateauStatues`
Start using text predef macros also sprite direction constants 2015-07-04 05:44:12 +00:00			`db HOUSE, $3D`
more syncing with pokeyellow 2016-06-12 07:51:59 +00:00			`db_tx_pre TownMapText`
Start using text predef macros also sprite direction constants 2015-07-04 05:44:12 +00:00			`db HOUSE, $1E`
more syncing with pokeyellow 2016-06-12 07:51:59 +00:00			`db_tx_pre BookOrSculptureText`
Start using text predef macros also sprite direction constants 2015-07-04 05:44:12 +00:00			`db MANSION, $32`
more syncing with pokeyellow 2016-06-12 07:51:59 +00:00			`db_tx_pre BookOrSculptureText`
Start using text predef macros also sprite direction constants 2015-07-04 05:44:12 +00:00			`db REDS_HOUSE_1, $32`
more syncing with pokeyellow 2016-06-12 07:51:59 +00:00			`db_tx_pre BookOrSculptureText`
Start using text predef macros also sprite direction constants 2015-07-04 05:44:12 +00:00			`db LAB, $28`
more syncing with pokeyellow 2016-06-12 07:51:59 +00:00			`db_tx_pre BookOrSculptureText`
Start using text predef macros also sprite direction constants 2015-07-04 05:44:12 +00:00			`db LOBBY, $16`
more syncing with pokeyellow 2016-06-12 07:51:59 +00:00			`db_tx_pre ElevatorText`
Start using text predef macros also sprite direction constants 2015-07-04 05:44:12 +00:00			`db GYM, $1D`
more syncing with pokeyellow 2016-06-12 07:51:59 +00:00			`db_tx_pre BookOrSculptureText`
Start using text predef macros also sprite direction constants 2015-07-04 05:44:12 +00:00			`db DOJO, $1D`
more syncing with pokeyellow 2016-06-12 07:51:59 +00:00			`db_tx_pre BookOrSculptureText`
Start using text predef macros also sprite direction constants 2015-07-04 05:44:12 +00:00			`db GATE, $22`
more syncing with pokeyellow 2016-06-12 07:51:59 +00:00			`db_tx_pre BookOrSculptureText`
Start using text predef macros also sprite direction constants 2015-07-04 05:44:12 +00:00			`db MART, $54`
more syncing with pokeyellow 2016-06-12 07:51:59 +00:00			`db_tx_pre PokemonStuffText`
Start using text predef macros also sprite direction constants 2015-07-04 05:44:12 +00:00			`db MART, $55`
more syncing with pokeyellow 2016-06-12 07:51:59 +00:00			`db_tx_pre PokemonStuffText`
Start using text predef macros also sprite direction constants 2015-07-04 05:44:12 +00:00			`db POKECENTER, $54`
more syncing with pokeyellow 2016-06-12 07:51:59 +00:00			`db_tx_pre PokemonStuffText`
Start using text predef macros also sprite direction constants 2015-07-04 05:44:12 +00:00			`db POKECENTER, $55`
more syncing with pokeyellow 2016-06-12 07:51:59 +00:00			`db_tx_pre PokemonStuffText`
Start using text predef macros also sprite direction constants 2015-07-04 05:44:12 +00:00			`db LOBBY, $50`
more syncing with pokeyellow 2016-06-12 07:51:59 +00:00			`db_tx_pre PokemonStuffText`
Start using text predef macros also sprite direction constants 2015-07-04 05:44:12 +00:00			`db LOBBY, $52`
more syncing with pokeyellow 2016-06-12 07:51:59 +00:00			`db_tx_pre PokemonStuffText`
Start using text predef macros also sprite direction constants 2015-07-04 05:44:12 +00:00			`db SHIP, $36`
more syncing with pokeyellow 2016-06-12 07:51:59 +00:00			`db_tx_pre BookOrSculptureText`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`db $FF`

remove address comments 2016-06-12 00:24:04 +00:00			`IndigoPlateauStatues:`
$U-Daniel-PC\Daniel$ TX_ASM 2015-07-03 19:58:50 +00:00			`TX_ASM`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld hl, IndigoPlateauStatuesText1`
			`call PrintText`
No more W_ 2015-08-31 02:38:41 +00:00			`ld a, [wXCoord]`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`bit 0, a`
			`ld hl, IndigoPlateauStatuesText2`
sync engine code with pokeyellow 2016-06-12 04:30:05 +00:00			`jr nz, .ok`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld hl, IndigoPlateauStatuesText3`
sync engine code with pokeyellow 2016-06-12 04:30:05 +00:00			`.ok`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`call PrintText`
			`jp TextScriptEnd`

remove address comments 2016-06-12 00:24:04 +00:00			`IndigoPlateauStatuesText1:`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`TX_FAR _IndigoPlateauStatuesText1`
			`db "@"`

remove address comments 2016-06-12 00:24:04 +00:00			`IndigoPlateauStatuesText2:`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`TX_FAR _IndigoPlateauStatuesText2`
			`db "@"`

remove address comments 2016-06-12 00:24:04 +00:00			`IndigoPlateauStatuesText3:`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`TX_FAR _IndigoPlateauStatuesText3`
			`db "@"`

remove address comments 2016-06-12 00:24:04 +00:00			`BookOrSculptureText:`
$U-Daniel-PC\Daniel$ TX_ASM 2015-07-03 19:58:50 +00:00			`TX_ASM`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld hl, PokemonBooksText`
No more W_ 2015-08-31 02:38:41 +00:00			`ld a, [wCurMapTileset]`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`cp MANSION ; Celadon Mansion tileset`
sync engine code with pokeyellow 2016-06-12 04:30:05 +00:00			`jr nz, .ok`
Use more *Coord also town map code relabelling YamaArashi just did town map relabelling but oh well I aleady made the changes and don't feel like redoing it 2015-07-14 05:21:03 +00:00			`aCoord 8, 6`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`cp $38`
sync engine code with pokeyellow 2016-06-12 04:30:05 +00:00			`jr nz, .ok`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld hl, DiglettSculptureText`
sync engine code with pokeyellow 2016-06-12 04:30:05 +00:00			`.ok`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`call PrintText`
			`jp TextScriptEnd`

remove address comments 2016-06-12 00:24:04 +00:00			`PokemonBooksText:`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`TX_FAR _PokemonBooksText`
			`db "@"`

remove address comments 2016-06-12 00:24:04 +00:00			`DiglettSculptureText:`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`TX_FAR _DiglettSculptureText`
			`db "@"`

remove address comments 2016-06-12 00:24:04 +00:00			`ElevatorText:`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`TX_FAR _ElevatorText`
			`db "@"`

remove address comments 2016-06-12 00:24:04 +00:00			`TownMapText:`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`TX_FAR _TownMapText`
Clean up text commands 2016-07-18 06:17:03 +00:00			`TX_BLINK`
$U-Daniel-PC\Daniel$ TX_ASM 2015-07-03 19:58:50 +00:00			`TX_ASM`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`ld a, $1`
Commented more sprite and map code 2014-09-13 07:50:56 +00:00			`ld [wDoNotWaitForButtonPressAfterDisplayingText], a`
Remove most static wram addresses. Use labels instead. For unknown addresses, use "w<address>". Label overleads are still an issue. 2014-05-26 21:04:56 +00:00			`ld hl, wd730`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`set 6, [hl]`
			`call GBPalWhiteOutWithDelay3`
			`xor a`
Rename hVBlank* constants to h*. 2014-09-23 22:02:03 +00:00			`ld [hWY], a`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`inc a`
			`ld [H_AUTOBGTRANSFERENABLED], a`
			`call LoadFontTilePatterns`
			`callba DisplayTownMap`
Remove most static wram addresses. Use labels instead. For unknown addresses, use "w<address>". Label overleads are still an issue. 2014-05-26 21:04:56 +00:00			`ld hl, wd730`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`res 6, [hl]`
			`ld de, TextScriptEnd`
			`push de`
			`ld a, [H_LOADEDROMBANK]`
			`push af`
			`jp CloseTextDisplay`

remove address comments 2016-06-12 00:24:04 +00:00			`PokemonStuffText:`
$U-Fish-PC\Daniel$ Pull a lot of engine out of main.asm 2014-05-22 22:13:20 +00:00			`TX_FAR _PokemonStuffText`
			`db "@"`