summaryrefslogtreecommitdiff
path: root/scripts/copycatshouse2f.asm
blob: 87946b8f1d129cf20c5a15a55a01e86dc556e53a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
CopycatsHouse2FScript:
	jp EnableAutoTextBoxDrawing

CopycatsHouse2FTextPointers:
	dw CopycatsHouse2FText1
	dw CopycatsHouse2FText2
	dw CopycatsHouse2FText3
	dw CopycatsHouse2FText4
	dw CopycatsHouse2FText5
	dw CopycatsHouse2FText6
	dw CopycatsHouse2FText7

CopycatsHouse2FText1:
	TX_ASM
	CheckEvent EVENT_GOT_TM31
	jr nz, .asm_7ccf3
	ld a, $1
	ld [wDoNotWaitForButtonPressAfterDisplayingText], a
	ld hl, CopycatsHouse2FText_5ccd4
	call PrintText
	ld b, POKE_DOLL
	call IsItemInBag
	jr z, .asm_62ecd
	ld hl, TM31PreReceiveText
	call PrintText
	lb bc, TM_31, 1
	call GiveItem
	jr nc, .BagFull
	ld hl, ReceivedTM31Text
	call PrintText
	ld a, POKE_DOLL
	ld [$ffdb], a
	callba RemoveItemByID
	SetEvent EVENT_GOT_TM31
	jr .asm_62ecd
.BagFull
	ld hl, TM31NoRoomText
	call PrintText
	jr .asm_62ecd
.asm_7ccf3
	ld hl, TM31ExplanationText2
	call PrintText
.asm_62ecd
	jp TextScriptEnd

CopycatsHouse2FText_5ccd4:
	TX_FAR _CopycatsHouse2FText_5ccd4
	db "@"

TM31PreReceiveText:
	TX_FAR _TM31PreReceiveText
	db "@"

ReceivedTM31Text:
	TX_FAR _ReceivedTM31Text
	TX_SFX_ITEM_1
TM31ExplanationText1:
	TX_FAR _TM31ExplanationText1
	TX_WAIT
	db "@"

TM31ExplanationText2:
	TX_FAR _TM31ExplanationText2
	db "@"

TM31NoRoomText:
	TX_FAR _TM31NoRoomText
	TX_WAIT
	db "@"

CopycatsHouse2FText2:
	TX_FAR _CopycatsHouse2FText2
	db "@"

CopycatsHouse2FText5:
CopycatsHouse2FText4:
CopycatsHouse2FText3:
	TX_FAR _CopycatsHouse2FText3
	db "@"

CopycatsHouse2FText6:
	TX_FAR _CopycatsHouse2FText6
	db "@"

CopycatsHouse2FText7:
	TX_ASM
	ld a, [wSpriteStateData1 + 9]
	cp SPRITE_FACING_UP
	ld hl, CopycatsHouse2FText_5cd1c
	jr nz, .notUp
	ld hl, CopycatsHouse2FText_5cd17
.notUp
	call PrintText
	jp TextScriptEnd

CopycatsHouse2FText_5cd17:
	TX_FAR _CopycatsHouse2FText_5cd17
	db "@"

CopycatsHouse2FText_5cd1c:
	TX_FAR _CopycatsHouse2FText_5cd1c
	db "@"