mirror of https://github.com/pret/pokecrystal.git
93 lines
1.6 KiB
NASM
93 lines
1.6 KiB
NASM
object_const_def ; object_event constants
|
|
const ROUTE12SUPERRODHOUSE_FISHING_GURU
|
|
|
|
Route12SuperRodHouse_MapScripts:
|
|
db 0 ; scene scripts
|
|
|
|
db 0 ; callbacks
|
|
|
|
Route12SuperRodHouseFishingGuruScript:
|
|
faceplayer
|
|
opentext
|
|
checkevent EVENT_GOT_SUPER_ROD
|
|
iftrue .GotSuperRod
|
|
writetext OfferSuperRodText
|
|
yesorno
|
|
iffalse .Refused
|
|
writetext GiveSuperRodText
|
|
promptbutton
|
|
verbosegiveitem SUPER_ROD
|
|
iffalse .NoRoom
|
|
setevent EVENT_GOT_SUPER_ROD
|
|
.GotSuperRod:
|
|
writetext GaveSuperRodText
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
.Refused:
|
|
writetext DontWantSuperRodText
|
|
waitbutton
|
|
.NoRoom:
|
|
closetext
|
|
end
|
|
|
|
SuperRodHouseBookshelf:
|
|
; unused
|
|
jumpstd PictureBookshelfScript
|
|
|
|
OfferSuperRodText:
|
|
text "I'm the FISHING"
|
|
line "GURU's younger"
|
|
cont "brother."
|
|
|
|
para "I can see that you"
|
|
line "like fishing."
|
|
|
|
para "There's no doubt"
|
|
line "in my mind at all!"
|
|
|
|
para "So? I know I'm"
|
|
line "right."
|
|
done
|
|
|
|
GiveSuperRodText:
|
|
text "Yes, yes. Just as"
|
|
line "I thought!"
|
|
|
|
para "Here, fishing fan!"
|
|
line "Take this--it's a"
|
|
cont "SUPER ROD."
|
|
done
|
|
|
|
GaveSuperRodText:
|
|
text "Try your hand at"
|
|
line "fishing wherever"
|
|
cont "there is water."
|
|
|
|
para "Remember--you can"
|
|
line "catch different"
|
|
|
|
para "#MON using"
|
|
line "different RODS."
|
|
done
|
|
|
|
DontWantSuperRodText:
|
|
text "Huh? My own eyes"
|
|
line "deceived me?"
|
|
done
|
|
|
|
Route12SuperRodHouse_MapEvents:
|
|
db 0, 0 ; filler
|
|
|
|
db 2 ; warp events
|
|
warp_event 2, 7, ROUTE_12, 1
|
|
warp_event 3, 7, ROUTE_12, 1
|
|
|
|
db 0 ; coord events
|
|
|
|
db 0 ; bg events
|
|
|
|
db 1 ; object events
|
|
object_event 5, 3, SPRITE_FISHING_GURU, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_SCRIPT, 0, Route12SuperRodHouseFishingGuruScript, -1
|