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
|
Event_TV:: @ 81A6E72
lockall
incrementgamestat GAME_STAT_WATCHED_TV
special ResetTVShowState
specialvar VAR_RESULT, CheckForBigMovieOrEmergencyNewsOnTV
compare VAR_RESULT, 2
goto_if_eq EventScript_1A6F01
compare VAR_RESULT, 1
goto_if_eq EventScript_1A6F0B
goto_if_unset FLAG_SYS_TV_START, EventScript_1A6EF1
goto_if_set FLAG_SYS_TV_WATCH, EventScript_1A6EF1
specialvar VAR_RESULT, IsTVShowInSearchOfTrainersAiring
compare VAR_RESULT, 1
goto_if_eq EventScript_1A6F66
goto EventScript_1A6F50
end
EventScript_1A6EBB:
specialvar VAR_0x8004, special_0x44
compare VAR_0x8004, 255
goto_if_eq EventScript_1A6F3F
specialvar VAR_RESULT, GetNonMassOutbreakActiveTVShow
compare VAR_RESULT, 255
goto_if_eq EventScript_1A6F3F
copyvar VAR_0x8004, VAR_RESULT
specialvar VAR_RESULT, GetTVShowType
compare VAR_RESULT, 0
goto_if_ne EventScript_1A6F21
end
EventScript_1A6EF1:
special GetMomOrDadStringForTVMessage
msgbox UnknownString_81A0E68, MSGBOX_DEFAULT
special TurnOffTVScreen
releaseall
end
EventScript_1A6F01:
msgbox UnknownString_817288C, MSGBOX_DEFAULT
releaseall
end
EventScript_1A6F0B:
.ifdef SAPPHIRE
msgbox UnknownString_8172D30, MSGBOX_DEFAULT
.else
msgbox UnknownString_8172C50, MSGBOX_DEFAULT
.endif
special InitRoamer
clearflag FLAG_SYS_TV_LATI
setflag FLAG_LATIOS_OR_LATIAS_ROAMING
special TurnOffTVScreen
releaseall
end
EventScript_1A6F21:
special DoTVShow
waitmessage
waitbuttonpress
compare VAR_RESULT, 1
goto_if_ne EventScript_1A6F21
goto EventScript_1A6F37
end
EventScript_1A6F37:
special TurnOffTVScreen
setflag FLAG_SYS_TV_WATCH
releaseall
end
EventScript_1A6F3F:
special GetMomOrDadStringForTVMessage
msgbox UnknownString_81A0E68, MSGBOX_DEFAULT
goto EventScript_1A6F37
end
EventScript_1A6F50:
special DoPokeNews
compare VAR_RESULT, 0
goto_if_eq EventScript_1A6EBB
waitmessage
waitbuttonpress
goto EventScript_1A6F37
end
EventScript_1A6F66:
special DoTVShowInSearchOfTrainers
waitmessage
waitbuttonpress
compare VAR_RESULT, 0
goto_if_eq EventScript_1A6F66
goto EventScript_1A6F37
end
|
