ref: 1978a37e19d4cce2c97dac1b90fc099eeede5d8d
dir: /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 "@"