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
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
|
KrissHouse2F_MapScriptHeader:
.MapTriggers:
db 0
.MapCallbacks:
db 2
; callbacks
dbw 5, .InitializeRoom
dbw 1, .SetSpawn
.Null:
end
.InitializeRoom:
special ToggleDecorationsVisibility
setevent EVENT_IN_YOUR_ROOM
checkevent EVENT_INITIALIZED_EVENTS
iftrue .SkipInizialization
jumpstd initializeevents
return
.SkipInizialization:
return
.SetSpawn:
special ToggleMaptileDecorations
return
db 0, 0, 0 ; filler
Doll1:
describedecoration $1
Doll2:
describedecoration $2
BigDoll:
describedecoration $3
GameConsole:
describedecoration $4
KrissHousePoster:
dw EVENT_KRISS_ROOM_POSTER ; event
dw .Script
.Script
describedecoration $0
KrissHouseRadio:
checkevent EVENT_GOT_A_POKEMON_FROM_ELM
iftrue .NormalRadio
checkevent EVENT_LISTENED_TO_INITIAL_RADIO
iftrue .AbbreviatedRadio
playmusic MUSIC_POKEMON_TALK
loadfont
writetext KrisRadioText1
pause 45
writetext KrisRadioText2
pause 45
writetext KrisRadioText3
pause 45
musicfadeout MUSIC_NEW_BARK_TOWN, $10
writetext KrisRadioText4
pause 45
loadmovesprites
setevent EVENT_LISTENED_TO_INITIAL_RADIO
end
.NormalRadio
jumpstd radio1
.AbbreviatedRadio
loadfont
writetext KrisRadioText4
pause 45
loadmovesprites
end
KrissHouseBookshelf:
jumpstd picturebookshelf
KrissHousePC:
loadfont
special Special_KrissHousePC
iftrue .Warp
loadmovesprites
end
.Warp
warp NONE, $0, $0
end
KrisRadioText1:
text "PROF.OAK'S #MON"
line "TALK! Please tune"
cont "in next time!"
done
KrisRadioText2:
text "#MON CHANNEL!"
done
KrisRadioText3:
text "This is DJ MARY,"
line "your co-host!"
done
KrisRadioText4:
text "#MON!"
line "#MON CHANNEL…"
done
KrissHouse2F_MapEventHeader:
; filler
db 0, 0
.Warps:
db 1
warp_def $0, $7, 3, KRISS_HOUSE_1F
.XYTriggers:
db 0
.Signposts:
db 4
signpost 1, 2, SIGNPOST_UP, KrissHousePC
signpost 1, 3, SIGNPOST_READ, KrissHouseRadio
signpost 1, 5, SIGNPOST_READ, KrissHouseBookshelf
signpost 0, 6, SIGNPOST_IFSET, KrissHousePoster
.PersonEvents:
db 4
person_event SPRITE_CONSOLE, 2, 4, $1, 0, 0, -1, -1, 0, 0, 0, GameConsole, EVENT_KRISS_HOUSE_2F_CONSOLE
person_event SPRITE_DOLL_1, 4, 4, $1, 0, 0, -1, -1, 0, 0, 0, Doll1, EVENT_KRISS_HOUSE_2F_DOLL_1
person_event SPRITE_DOLL_2, 4, 5, $1, 0, 0, -1, -1, 0, 0, 0, Doll2, EVENT_KRISS_HOUSE_2F_DOLL_2
person_event SPRITE_BIG_DOLL, 1, 0, $21, 0, 0, -1, -1, 0, 0, 0, BigDoll, EVENT_KRISS_HOUSE_2F_BIG_DOLL
|
