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
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
|
CeladonMansion3F_Script:
call EnableAutoTextBoxDrawing
ret
CeladonMansion3_PokedexCount:
ld hl, wPokedexOwned
ld b, wPokedexOwnedEnd - wPokedexOwned
call CountSetBits
ld a, [wNumSetBits]
ret
CeladonMansion3F_TextPointers:
def_text_pointers
dw_const CeladonMansion3FProgrammerText, TEXT_CELADONMANSION3F_PROGRAMMER
dw_const CeladonMansion3FGraphicArtistText, TEXT_CELADONMANSION3F_GRAPHIC_ARTIST
dw_const CeladonMansion3FWriterText, TEXT_CELADONMANSION3F_WRITER
dw_const CeladonMansion3FGameDesignerText, TEXT_CELADONMANSION3F_GAME_DESIGNER
dw_const CeladonMansion3FGameProgramPCText, TEXT_CELADONMANSION3F_GAME_PROGRAM_PC
dw_const CeladonMansion3FPlayingGamePCText, TEXT_CELADONMANSION3F_PLAYING_GAME_PC
dw_const CeladonMansion3FGameScriptPCText, TEXT_CELADONMANSION3F_GAME_SCRIPT_PC
dw_const CeladonMansion3FDevRoomSignText, TEXT_CELADONMANSION3F_DEV_ROOM_SIGN
CeladonMansion3FProgrammerText:
text_asm
call CeladonMansion3_PokedexCount
cp NUM_POKEMON - 1 ; discount Mew
ld hl, CeladonMansion3Text_486f5
jr nc, .print
ld hl, CeladonMansion3Text_486f0
.print
call PrintText
jp TextScriptEnd
CeladonMansion3Text_486f0:
text_far _CeladonMansion3FProgrammerText
text_end
CeladonMansion3Text_486f5:
text_far _CeladonMansion3FProgrammerText2
text_end
CeladonMansion3FGraphicArtistText:
text_asm
call CeladonMansion3_PokedexCount
cp NUM_POKEMON - 1 ; discount Mew
jr nc, .completed
ld hl, .Text1
jr .print
.completed
ld hl, .Text2
call PrintText
call YesNoChoice
ld a, [wCurrentMenuItem]
and a
jr nz, .declined_print
call SaveScreenTilesToBuffer2
xor a
ld [wUpdateSpritesEnabled], a
ld hl, wStatusFlags5
set BIT_NO_TEXT_DELAY, [hl]
callfar PrintDiploma
ld hl, wStatusFlags5
res BIT_NO_TEXT_DELAY, [hl]
call GBPalWhiteOutWithDelay3
call ReloadTilesetTilePatterns
call RestoreScreenTilesAndReloadTilePatterns
call LoadScreenTilesFromBuffer2
call Delay3
call GBPalNormal
ld hl, .Text5
ldh a, [hCanceledPrinting]
and a
jr nz, .print
ld hl, .Text4
jr .print
.declined_print
ld hl, .Text3
.print
call PrintText
jp TextScriptEnd
.Text1:
text_far _CeladonMansion3FGraphicArtistText
text_end
.Text2:
text_far _CeladonMansion3FGraphicArtistText2
text_end
.Text3:
text_far _CeladonMansion3FGraphicArtistText3
text_end
.Text4:
text_far _CeladonMansion3FGraphicArtistText4
text_end
.Text5:
text_far _CeladonMansion3FGraphicArtistText5
text_end
CeladonMansion3FWriterText:
text_asm
call CeladonMansion3_PokedexCount
cp NUM_POKEMON - 1 ; discount Mew
ld hl, .Text2
jr nc, .print
ld hl, .Text1
.print
call PrintText
jp TextScriptEnd
.Text1:
text_far _CeladonMansion3FWriterText
text_end
.Text2:
text_far _CeladonMansion3FWriterText2
text_end
CeladonMansion3FGameDesignerText:
text_asm
call CeladonMansion3_PokedexCount
cp NUM_POKEMON - 1 ; discount Mew
jr nc, .completed_dex
ld hl, .Text
jr .done
.completed_dex
ld hl, .CompletedDexText
call PrintText
call Delay3
xor a
ld [wDoNotWaitForButtonPressAfterDisplayingText], a
ld hl, .UnlockedDiplomaPrinting
.done
call PrintText
jp TextScriptEnd
.Text:
text_far _CeladonMansion3FGameDesignerText
text_end
.CompletedDexText:
text_far _CeladonMansion3FGameDesignerCompletedDexText
text_promptbutton
text_asm
callfar DisplayDiploma
ld a, TRUE
ld [wDoNotWaitForButtonPressAfterDisplayingText], a
jp TextScriptEnd
.UnlockedDiplomaPrinting
text_far _CeladonMansion3FGameDesignerCompletedDexText2
text_end
CeladonMansion3FGameProgramPCText:
text_asm
farcall CeladonMansion3FPrintGameProgramPCText
jp TextScriptEnd
CeladonMansion3FPlayingGamePCText:
text_asm
farcall CeladonMansion3FPrintPlayingGamePCText
jp TextScriptEnd
CeladonMansion3FGameScriptPCText:
text_asm
farcall CeladonMansion3FPrintGameScriptPCText
jp TextScriptEnd
CeladonMansion3FDevRoomSignText:
text_asm
farcall CeladonMansion3FPrintDevRoomSignText
jp TextScriptEnd
|
