mirror of https://github.com/pret/pokecrystal.git
98 lines
1.5 KiB
NASM
98 lines
1.5 KiB
NASM
RedsHouse1F_MapScriptHeader:
|
|
; trigger count
|
|
db 1
|
|
|
|
; triggers
|
|
dw .Trigger, $0000
|
|
|
|
; callback count
|
|
db 0
|
|
|
|
.Trigger
|
|
end
|
|
|
|
RedsMom:
|
|
faceplayer
|
|
loadfont
|
|
checkevent EVENT_MET_REDS_MOM
|
|
iftrue .MetAlready
|
|
writetext RedsMomText1
|
|
closetext
|
|
loadmovesprites
|
|
setevent EVENT_MET_REDS_MOM
|
|
end
|
|
.MetAlready
|
|
writetext RedsMomText2
|
|
closetext
|
|
loadmovesprites
|
|
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, GROUP_PALLET_TOWN, MAP_PALLET_TOWN
|
|
warp_def $7, $3, 1, GROUP_PALLET_TOWN, MAP_PALLET_TOWN
|
|
warp_def $0, $7, 1, GROUP_REDS_HOUSE_2F, MAP_REDS_HOUSE_2F
|
|
|
|
; xy triggers
|
|
db 0
|
|
|
|
; signposts
|
|
db 3
|
|
signpost 1, 0, $0, RedsHouse1FBookshelf
|
|
signpost 1, 1, $0, RedsHouse1FBookshelf
|
|
signpost 1, 2, $0, RedsHouse1FTV
|
|
|
|
; people-events
|
|
db 1
|
|
person_event SPRITE_REDS_MOM, 7, 9, $8, $0, 255, 255, $0, 0, RedsMom, EVENT_ALWAYS_THERE
|