pokered/scripts/celadoncity.asm
2016-07-18 01:17:03 -05:00

133 lines
2.0 KiB
NASM
Executable File

CeladonCityScript:
call EnableAutoTextBoxDrawing
ResetEvents EVENT_1B8, EVENT_1BF
ResetEvent EVENT_67F
ret
CeladonCityTextPointers:
dw CeladonCityText1
dw CeladonCityText2
dw CeladonCityText3
dw CeladonCityText4
dw CeladonCityText5
dw CeladonCityText6
dw CeladonCityText7
dw CeladonCityText8
dw CeladonCityText9
dw CeladonCityText10
dw CeladonCityText11
dw PokeCenterSignText
dw CeladonCityText13
dw CeladonCityText14
dw CeladonCityText15
dw CeladonCityText16
dw CeladonCityText17
dw CeladonCityText18
CeladonCityText1:
TX_FAR _CeladonCityText1
db "@"
CeladonCityText2:
TX_FAR _CeladonCityText2
db "@"
CeladonCityText3:
TX_FAR _CeladonCityText3
db "@"
CeladonCityText4:
TX_FAR _CeladonCityText4
db "@"
CeladonCityText5:
TX_ASM
CheckEvent EVENT_GOT_TM41
jr nz, .asm_7053f
ld hl, TM41PreText
call PrintText
lb bc, TM_41, 1
call GiveItem
jr c, .Success
ld hl, TM41NoRoomText
call PrintText
jr .Done
.Success
ld hl, ReceivedTM41Text
call PrintText
SetEvent EVENT_GOT_TM41
jr .Done
.asm_7053f
ld hl, TM41ExplanationText
call PrintText
.Done
jp TextScriptEnd
TM41PreText:
TX_FAR _TM41PreText
db "@"
ReceivedTM41Text:
TX_FAR _ReceivedTM41Text
TX_SFX_ITEM_1
db "@"
TM41ExplanationText:
TX_FAR _TM41ExplanationText
db "@"
TM41NoRoomText:
TX_FAR _TM41NoRoomText
db "@"
CeladonCityText6:
TX_FAR _CeladonCityText6
db "@"
CeladonCityText7:
TX_FAR _CeladonCityText7
TX_ASM
ld a, POLIWRATH
call PlayCry
jp TextScriptEnd
CeladonCityText8:
TX_FAR _CeladonCityText8
db "@"
CeladonCityText9:
TX_FAR _CeladonCityText9
db "@"
CeladonCityText10:
TX_FAR _CeladonCityText10
db "@"
CeladonCityText11:
TX_FAR _CeladonCityText11
db "@"
CeladonCityText13:
TX_FAR _CeladonCityText13
db "@"
CeladonCityText14:
TX_FAR _CeladonCityText14
db "@"
CeladonCityText15:
TX_FAR _CeladonCityText15
db "@"
CeladonCityText16:
TX_FAR _CeladonCityText16
db "@"
CeladonCityText17:
TX_FAR _CeladonCityText17
db "@"
CeladonCityText18:
TX_FAR _CeladonCityText18
db "@"