shithub: pokered

ref: 6137f5accb77db2d5d07df2f058e85115caf073c
dir: /scripts/MrFujisHouse.asm/

View raw version
MrFujisHouse_Script:
	call EnableAutoTextBoxDrawing
	ret

MrFujisHouse_TextPointers:
	dw LavenderHouse1Text1
	dw LavenderHouse1Text2
	dw LavenderHouse1Text3
	dw LavenderHouse1Text4
	dw LavenderHouse1Text5
	dw LavenderHouse1Text6

LavenderHouse1Text1:
	text_asm
	CheckEvent EVENT_RESCUED_MR_FUJI
	jr nz, .asm_72e5d
	ld hl, LavenderHouse1Text_1d8d1
	call PrintText
	jr .asm_6957f
.asm_72e5d
	ld hl, LavenderHouse1Text_1d8d6
	call PrintText
.asm_6957f
	jp TextScriptEnd

LavenderHouse1Text_1d8d1:
	text_far _LavenderHouse1Text_1d8d1
	text_end

LavenderHouse1Text_1d8d6:
	text_far _LavenderHouse1Text_1d8d6
	text_end

LavenderHouse1Text2:
	text_asm
	CheckEvent EVENT_RESCUED_MR_FUJI
	jr nz, .asm_06470
	ld hl, LavenderHouse1Text_1d8f4
	call PrintText
	jr .asm_3d208
.asm_06470
	ld hl, LavenderHouse1Text_1d8f9
	call PrintText
.asm_3d208
	jp TextScriptEnd

LavenderHouse1Text_1d8f4:
	text_far _LavenderHouse1Text_1d8f4
	text_end

LavenderHouse1Text_1d8f9:
	text_far _LavenderHouse1Text_1d8f9
	text_end

LavenderHouse1Text3:
	text_far _LavenderHouse1Text3
	text_asm
	ld a, PSYDUCK
	call PlayCry
	jp TextScriptEnd

LavenderHouse1Text4:
	text_far _LavenderHouse1Text4
	text_asm
	ld a, NIDORINO
	call PlayCry
	jp TextScriptEnd

LavenderHouse1Text5:
	text_asm
	CheckEvent EVENT_GOT_POKE_FLUTE
	jr nz, .asm_15ac2
	ld hl, LavenderHouse1Text_1d94c
	call PrintText
	lb bc, POKE_FLUTE, 1
	call GiveItem
	jr nc, .BagFull
	ld hl, ReceivedFluteText
	call PrintText
	SetEvent EVENT_GOT_POKE_FLUTE
	jr .asm_da749
.BagFull
	ld hl, FluteNoRoomText
	call PrintText
	jr .asm_da749
.asm_15ac2
	ld hl, MrFujiAfterFluteText
	call PrintText
.asm_da749
	jp TextScriptEnd

LavenderHouse1Text_1d94c:
	text_far _LavenderHouse1Text_1d94c
	text_end

ReceivedFluteText:
	text_far _ReceivedFluteText
	sound_get_key_item
	text_far _FluteExplanationText
	text_end

FluteNoRoomText:
	text_far _FluteNoRoomText
	text_end

MrFujiAfterFluteText:
	text_far _MrFujiAfterFluteText
	text_end

LavenderHouse1Text6:
	text_far _LavenderHouse1Text6
	text_end