pokecrystal/maps/Route27SandstormHouse.asm

116 lines
2.0 KiB
NASM

const_value set 2
const ROUTE27SANDSTORMHOUSE_GRANNY
Route27SandstormHouse_MapScriptHeader:
.SceneScripts:
db 0
.MapCallbacks:
db 0
SandstormHouseWoman:
faceplayer
opentext
checkevent EVENT_GOT_TM37_SANDSTORM
iftrue .AlreadyGotItem
special GetFirstPokemonHappiness
writetext SandstormHouseWomanText1
buttonsound
if_greater_than $95, .Loyal
jump .Disloyal
.Loyal:
writetext SandstormHouseWomanLoyalText
buttonsound
verbosegiveitem TM_SANDSTORM
iffalse .Done
setevent EVENT_GOT_TM37_SANDSTORM
.AlreadyGotItem:
writetext SandstormHouseSandstormDescription
waitbutton
.Done:
closetext
end
.Disloyal:
writetext SandstormHouseWomanDisloyalText
waitbutton
closetext
end
SandstormHouseBookshelf:
jumpstd magazinebookshelf
SandstormHouseWomanText1:
text "Where are you off"
line "to with #MON?"
para "#MON LEAGUE?"
para "Are your #MON"
line "loyal enough for"
cont "you to win?"
para "Let me see…"
done
SandstormHouseWomanLoyalText:
text "Ah! Your #MON"
line "trusts you very"
cont "much."
para "It's nice to see a"
line "good trainer."
para "Here. A gift for"
line "your journey."
done
SandstormHouseSandstormDescription:
text "TM37 happens to be"
line "SANDSTORM."
para "It's a move that"
line "inflicts damage on"
cont "both battlers."
para "It's for advanced"
line "trainers only."
para "Use it if you"
line "dare. Good luck!"
done
SandstormHouseWomanDisloyalText:
text "If it doesn't come"
line "to trust you some"
para "more, it could be"
line "tough going."
para "Trust is the tie"
line "that binds #MON"
cont "and trainers."
done
Route27SandstormHouse_MapEventHeader:
; filler
db 0, 0
.Warps:
db 2
warp_def $7, $2, 1, ROUTE_27
warp_def $7, $3, 1, ROUTE_27
.CoordEvents:
db 0
.BGEvents:
db 2
bg_event 1, 0, BGEVENT_READ, SandstormHouseBookshelf
bg_event 1, 1, BGEVENT_READ, SandstormHouseBookshelf
.ObjectEvents:
db 1
object_event SPRITE_GRANNY, 4, 2, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, SandstormHouseWoman, -1