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
112
113
114
115
116
|
Route120_EventScript_Kecleon1:: @ 82722DB
lock
faceplayer
setvar VAR_0x8009, 1
goto EventScript_Kecleon
end
Route120_EventScript_Kecleon2:: @ 82722E8
lock
faceplayer
setvar VAR_0x8009, 2
goto EventScript_Kecleon
end
Route120_EventScript_Kecleon3:: @ 82722F5
lock
faceplayer
setvar VAR_0x8009, 3
goto EventScript_Kecleon
end
Route120_EventScript_Kecleon4:: @ 8272302
lock
faceplayer
setvar VAR_0x8009, 4
goto EventScript_Kecleon
end
Route120_EventScript_Kecleon5:: @ 827230F
lock
faceplayer
setvar VAR_0x8009, 5
goto EventScript_Kecleon
end
Route119_EventScript_Kecleon1:: @ 827231C
lock
faceplayer
setvar VAR_0x8009, 6
goto EventScript_Kecleon
end
Route119_EventScript_Kecleon2:: @ 8272329
lock
faceplayer
setvar VAR_0x8009, 7
goto EventScript_Kecleon
end
EventScript_Kecleon:: @ 8272336
checkitem ITEM_DEVON_SCOPE, 1
compare VAR_RESULT, 1
goto_if_eq EventScript_AskUseDevonScope
msgbox Kecleon_Text_SomethingUnseeable, MSGBOX_DEFAULT
release
end
EventScript_AskUseDevonScope:: @ 8272350
msgbox Kecleon_Text_WantToUseDevonScope, MSGBOX_YESNO
compare VAR_RESULT, YES
goto_if_eq EventScript_BattleKecleon
release
end
EventScript_BattleKecleon:: @ 8272365
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, 2
delay 40
waitmoncry
setwildbattle SPECIES_KECLEON, 30, ITEM_NONE
setflag FLAG_SYS_CTRL_OBJ_DELETE
dowildbattle
clearflag FLAG_SYS_CTRL_OBJ_DELETE
specialvar VAR_RESULT, GetBattleOutcome
compare VAR_RESULT, B_OUTCOME_WON
goto_if_eq EventScript_RemoveKecleon
compare VAR_RESULT, B_OUTCOME_RAN
goto_if_eq EventScript_RemoveKecleon
compare VAR_RESULT, B_OUTCOME_PLAYER_TELEPORTED
goto_if_eq EventScript_RemoveKecleon
release
end
EventScript_RemoveKecleon:: @ 82723C1
goto Common_EventScript_RemoveStaticPokemon
end
Movement_KecleonAppears: @ 82723C7
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
|
