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
|
EventScript_1A737B:: @ 81A737B
special sub_8110AB4
compare VAR_RESULT, 2
goto_if_eq EventScript_1A7AE0
special sub_8112364
call_if_set FLAG_OAK_SAW_DEX_COMPLETION, EventScript_1A73A4
call_if_unset FLAG_OAK_SAW_DEX_COMPLETION, EventScript_1A73AD
call EventScript_1A73E0
return
EventScript_1A73A4:: @ 81A73A4
msgbox Text_1A72F2
return
EventScript_1A73AD:: @ 81A73AD
msgbox gUnknown_81A6C51
return
EventScript_1A73B6:: @ 81A73B6
copyvar VAR_0x8004, VAR_0x8009
special Special_GetProfOaksRatingMessage
waitmessage
compare VAR_RESULT, 0
call_if_eq EventScript_1A73D8
compare VAR_RESULT, 1
call_if_eq EventScript_1A73DC
waitfanfare
waitbuttonpress
return
EventScript_1A73D8:: @ 81A73D8
playfanfare MUS_FAN2
return
EventScript_1A73DC:: @ 81A73DC
playfanfare MUS_FANFA5
return
EventScript_1A73E0:: @ 81A73E0
setvar VAR_0x8004, 31
special HelpSystem_BackupSomeVariable
special Special_SetSomeVariable
setvar VAR_0x8004, 0
specialvar VAR_RESULT, Special_GetPokedexCount
copyvar VAR_0x8008, VAR_0x8005
copyvar VAR_0x8009, VAR_0x8006
copyvar VAR_0x800A, VAR_RESULT
getnumberstring 0, VAR_0x8008
getnumberstring 1, VAR_0x8009
msgbox Text_1A6CA3
call_if_unset FLAG_OAKS_RATING_IS_VIA_PC, EventScript_1A746D
call EventScript_1A73B6
compare VAR_0x800A, 0
goto_if_eq EventScript_1A748F
setvar VAR_0x8004, 1
specialvar VAR_RESULT, Special_GetPokedexCount
copyvar VAR_0x8008, VAR_0x8005
copyvar VAR_0x8009, VAR_0x8006
getnumberstring 0, VAR_0x8008
getnumberstring 1, VAR_0x8009
msgbox Text_1A71AA
specialvar VAR_RESULT, HasAllMons
compare VAR_RESULT, 0
goto_if_eq EventScript_1A7470
compare VAR_RESULT, 1
goto_if_eq EventScript_1A747E
end
EventScript_1A746D:: @ 81A746D
textcolor 0
return
EventScript_1A7470:: @ 81A7470
msgbox Text_1A71EE
goto EventScript_1A748F
end
EventScript_1A747E:: @ 81A747E
setflag FLAG_OAK_SAW_DEX_COMPLETION
msgbox Text_1A722F
goto EventScript_1A748F
end
EventScript_1A748F:: @ 81A748F
special HelpSystem_RestoreSomeVariable
return
|
