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
|
INCLUDE "constants.asm"
SECTION "scripts/Route1P2.asm", ROMX
Route1P2_ScriptLoader::
ld hl, Route1P2ScriptPointers
call RunMapScript
call WriteBackMapScriptNumber
ret
Route1P2ScriptPointers:
dw Route1P2Script
dw Route1P2NPCIDs
Route1P2NPCIDs:
db $00
db $01
db $FF
Route1P2SignPointers:
dw Route1P2TextSign1
Route1P2_TextPointers::
dw Route1P2Text1
dw Route1P2Text2
Route1P2Script::
ld a, [wYCoord]
cp $06
jr nz, .skipCheck
ld a, [wXCoord]
cp $09
jr nz, .skipCheck
ld a, 0 ; player
ld d, LEFT
call SetObjectFacing
ld a, 2
ld d, RIGHT
call SetObjectFacing
jr .endDemo
.skipCheck
ld hl, Route1P2NPCIDs ;data
ld de, Route1P2SignPointers ;start of textld pointers?
call CallMapTextSubroutine
ret
.endDemo
Route1P2Text1:
ld hl, Route1P2TextString4
call OpenTextbox
call GBFadeOutToBlack
jp Init
Route1P2Text2:
ld hl, $D3A2 ; trainer flags?
bit 1, [hl]
jr nz, .Text2Jump ; already fought
ld hl, Route1P2TextString1
call OpenTextbox
ld hl, $D3A2
set 1, [hl]
ld a, $3C
ld [wce02], a
ld a, $02
ld [wce05], a
ld hl, wc5ed
set 7, [hl]
ld a, $08
ld [wd637], a
ret
.Text2Jump
Route1P2Text3:
ld hl, Route1P2TextString3
call OpenTextbox
ret
Route1P2TextSign1:
ld hl, Route1P2TextString5
call OpenTextbox
ret
Route1P2TextString1:
text "まあ かわいらしい トレーナーやこと"
line "うちと ポケモン しはります?"
done
Route1P2TextString2: ; (unused?)
text "いやあ かんにんやわあ"
done
Route1P2TextString3:
text "かわいい かおして つよおすなあ"
line "その ちょうしで おきばりやす"
done
Route1P2TextString4:
text "シゲル『おっ サトシじゃないか!"
para "なんとか ここまで これた"
line "って かんじだな"
para "じつりょくが ないのに"
line "むり するなよな"
para "もっと ポケモン あつめるとか"
line "いろんな ポケモン そだてるとか"
cont "やること あるだろ?"
para "ここで ひきかえしたほうが いいぜ!"
line "じゃあな"
done
Route1P2TextString5:
text "ここは 1ばん どうろ"
line "サイレントヒル ⋯⋯ オールドシティ"
done
|