summaryrefslogtreecommitdiff
path: root/data/maps/FiveIsland_WaterLabyrinth/scripts.inc
blob: ed82fc5eb09371e29b2dce20c0f7ec96336570af (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
FiveIsland_WaterLabyrinth_MapScripts:: @ 816884D
	.byte 0

FiveIsland_WaterLabyrinth_EventScript_16884E:: @ 816884E
	goto_if_questlog EventScript_ReleaseEnd
	special sub_8112364
	lock
	faceplayer
	goto_if_set FLAG_GOT_TOGEPI_EGG, EventScript_1688E3
	goto_if_set FLAG_NO_ROOM_FOR_TOGEPI_EGG, EventScript_16892C
	msgbox gUnknown_818A80D
	specialvar VAR_RESULT, Special_GetLeadMonFriendship
	compare VAR_RESULT, 6
	goto_if_eq EventScript_1688AC
	msgbox gUnknown_818A88F
	release
	end

EventScript_168895:: @ 8168895
	famechecker FAMECHECKER_DAISY, 2
	msgbox gUnknown_818AA0C
	release
	end

EventScript_1688AC:: @ 81688AC
	msgbox gUnknown_818A8A6
	goto EventScript_1688BA
	end

EventScript_1688BA:: @ 81688BA
	getpartysize
	compare VAR_RESULT, PARTY_SIZE
	goto_if_eq EventScript_16891F
	setflag FLAG_GOT_TOGEPI_EGG
	giveegg SPECIES_TOGEPI
	textcolor 3
	playfanfare MUS_FANFA1
	message Text_18A91F
	waitfanfare
	waitmessage
	call EventScript_1A6675
	goto EventScript_1688E3
	end

EventScript_1688E3:: @ 81688E3
	getspeciesname 1, SPECIES_TOGEPI
	setvar VAR_0x8004, SPECIES_TOGEPI
	specialvar VAR_RESULT, Special_PlayerPartyContainsSpeciesWithPlayerID
	compare VAR_RESULT, 1
	goto_if_eq EventScript_168895
	getspeciesname 1, SPECIES_TOGETIC
	setvar VAR_0x8004, SPECIES_TOGETIC
	specialvar VAR_RESULT, Special_PlayerPartyContainsSpeciesWithPlayerID
	compare VAR_RESULT, 1
	goto_if_eq EventScript_168895
	msgbox gUnknown_818A9C0
	release
	end

EventScript_16891F:: @ 816891F
	setflag FLAG_NO_ROOM_FOR_TOGEPI_EGG
	msgbox gUnknown_818A940
	release
	end

EventScript_16892C:: @ 816892C
	goto EventScript_1688BA
	end