mirror of https://github.com/pret/pokecrystal.git
99 lines
1.5 KiB
NASM
99 lines
1.5 KiB
NASM
const_value set 2
|
|
const REDSHOUSE1F_REDS_MOM
|
|
|
|
RedsHouse1F_MapScriptHeader:
|
|
.SceneScripts:
|
|
db 1
|
|
scene_script .DummyScene
|
|
|
|
.MapCallbacks:
|
|
db 0
|
|
|
|
.DummyScene:
|
|
end
|
|
|
|
RedsMom:
|
|
faceplayer
|
|
opentext
|
|
checkevent EVENT_MET_REDS_MOM
|
|
iftrue .MetAlready
|
|
writetext RedsMomText1
|
|
waitbutton
|
|
closetext
|
|
setevent EVENT_MET_REDS_MOM
|
|
end
|
|
.MetAlready:
|
|
writetext RedsMomText2
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
RedsHouse1FTV:
|
|
jumptext RedsHouse1FTVText
|
|
|
|
RedsHouse1FBookshelf:
|
|
jumpstd picturebookshelf
|
|
|
|
RedsMomText1:
|
|
text "Hi!"
|
|
|
|
para "RED's been away"
|
|
line "for a long time."
|
|
|
|
para "He hasn't called"
|
|
line "either, so I have"
|
|
|
|
para "no idea where he"
|
|
line "is or what he's"
|
|
cont "been doing."
|
|
|
|
para "They say that no"
|
|
line "word is proof that"
|
|
|
|
para "he's doing fine,"
|
|
line "but I do worry"
|
|
cont "about him."
|
|
done
|
|
|
|
RedsMomText2:
|
|
text "I worry about RED"
|
|
line "getting hurt or"
|
|
|
|
para "sick, but he's a"
|
|
line "boy. I'm proud"
|
|
|
|
para "that he is doing"
|
|
line "what he wants to"
|
|
|
|
para "do."
|
|
done
|
|
|
|
RedsHouse1FTVText:
|
|
text "They have programs"
|
|
line "that aren't shown"
|
|
cont "in JOHTO…"
|
|
done
|
|
|
|
RedsHouse1F_MapEventHeader:
|
|
; filler
|
|
db 0, 0
|
|
|
|
.Warps:
|
|
db 3
|
|
warp_def $7, $2, 1, PALLET_TOWN
|
|
warp_def $7, $3, 1, PALLET_TOWN
|
|
warp_def $0, $7, 1, REDS_HOUSE_2F
|
|
|
|
.CoordEvents:
|
|
db 0
|
|
|
|
.BGEvents:
|
|
db 3
|
|
bg_event 1, 0, BGEVENT_READ, RedsHouse1FBookshelf
|
|
bg_event 1, 1, BGEVENT_READ, RedsHouse1FBookshelf
|
|
bg_event 1, 2, BGEVENT_READ, RedsHouse1FTV
|
|
|
|
.ObjectEvents:
|
|
db 1
|
|
object_event SPRITE_REDS_MOM, 3, 5, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, RedsMom, -1
|