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
103
104
105
106
107
108
109
110
111
|
Route120_EventScript_Kecleon1::
lock
faceplayer
setvar VAR_0x8009, 1
goto EventScript_Kecleon
end
Route120_EventScript_Kecleon2::
lock
faceplayer
setvar VAR_0x8009, 2
goto EventScript_Kecleon
end
Route120_EventScript_Kecleon3::
lock
faceplayer
setvar VAR_0x8009, 3
goto EventScript_Kecleon
end
Route120_EventScript_Kecleon4::
lock
faceplayer
setvar VAR_0x8009, 4
goto EventScript_Kecleon
end
Route120_EventScript_Kecleon5::
lock
faceplayer
setvar VAR_0x8009, 5
goto EventScript_Kecleon
end
Route119_EventScript_Kecleon1::
lock
faceplayer
setvar VAR_0x8009, 6
goto EventScript_Kecleon
end
Route119_EventScript_Kecleon2::
lock
faceplayer
setvar VAR_0x8009, 7
goto EventScript_Kecleon
end
EventScript_Kecleon::
checkitem ITEM_DEVON_SCOPE
goto_if_eq VAR_RESULT, TRUE, EventScript_AskUseDevonScope
msgbox Kecleon_Text_SomethingUnseeable, MSGBOX_DEFAULT
release
end
EventScript_AskUseDevonScope::
msgbox Kecleon_Text_WantToUseDevonScope, MSGBOX_YESNO
goto_if_eq VAR_RESULT, YES, EventScript_BattleKecleon
release
end
EventScript_BattleKecleon::
msgbox Kecleon_Text_UseDevonScopeMonAttacked, MSGBOX_DEFAULT
closemessage
applymovement VAR_LAST_TALKED, Common_Movement_FacePlayer
waitmovement 0
applymovement VAR_LAST_TALKED, Movement_KecleonAppears
waitmovement 0
waitse
playmoncry SPECIES_KECLEON, CRY_MODE_ENCOUNTER
delay 40
waitmoncry
setwildbattle SPECIES_KECLEON, 30
setflag FLAG_SYS_CTRL_OBJ_DELETE
dowildbattle
clearflag FLAG_SYS_CTRL_OBJ_DELETE
specialvar VAR_RESULT, GetBattleOutcome
goto_if_eq VAR_RESULT, B_OUTCOME_WON, EventScript_RemoveKecleon
goto_if_eq VAR_RESULT, B_OUTCOME_RAN, EventScript_RemoveKecleon
goto_if_eq VAR_RESULT, B_OUTCOME_PLAYER_TELEPORTED, EventScript_RemoveKecleon
release
end
EventScript_RemoveKecleon::
goto Common_EventScript_RemoveStaticPokemon
end
Movement_KecleonAppears:
set_visible
delay_4
set_invisible
delay_4
set_visible
delay_4
set_invisible
delay_4
set_visible
delay_8
set_invisible
delay_8
set_visible
delay_8
set_invisible
delay_8
set_visible
delay_16
set_invisible
delay_16
set_visible
step_end
|
