pokecrystal/maps/DarkCaveBlackthornEntrance.asm

84 lines
1.9 KiB
NASM

const_value set 2
const DARKCAVEBLACKTHORNENTRANCE_PHARMACIST
const DARKCAVEBLACKTHORNENTRANCE_POKE_BALL1
const DARKCAVEBLACKTHORNENTRANCE_POKE_BALL2
DarkCaveBlackthornEntrance_MapScripts:
.SceneScripts:
db 0
.MapCallbacks:
db 0
DarkCaveBlackthornEntrancePharmacistScript:
faceplayer
opentext
checkevent EVENT_GOT_BLACKGLASSES_IN_DARK_CAVE
iftrue .GotBlackglasses
writetext DarkCaveBlackthornEntrancePharmacistText1
buttonsound
verbosegiveitem BLACKGLASSES
iffalse .PackFull
setevent EVENT_GOT_BLACKGLASSES_IN_DARK_CAVE
.GotBlackglasses:
writetext DarkCaveBlackthornEntrancePharmacistText2
waitbutton
.PackFull:
closetext
end
DarkCaveBlackthornEntranceRevive:
itemball REVIVE
DarkCaveBlackthornEntranceTMSnore:
itemball TM_SNORE
DarkCaveBlackthornEntrancePharmacistText1:
text "Whoa! You startled"
line "me there!"
para "I had my BLACK-"
line "GLASSES on, so I"
para "didn't notice you"
line "at all."
para "What am I doing"
line "here?"
para "Hey, don't you"
line "worry about it."
para "I'll give you a"
line "pair of BLACK-"
cont "GLASSES, so forget"
cont "you saw me, OK?"
done
DarkCaveBlackthornEntrancePharmacistText2:
text "BLACKGLASSES ups"
line "the power of dark-"
cont "type moves."
done
DarkCaveBlackthornEntrance_MapEvents:
; filler
db 0, 0
.Warps:
db 2
warp_def 23, 3, 1, ROUTE_45
warp_def 3, 25, 2, DARK_CAVE_VIOLET_ENTRANCE
.CoordEvents:
db 0
.BGEvents:
db 0
.ObjectEvents:
db 3
object_event 7, 3, SPRITE_PHARMACIST, SPRITEMOVEDATA_SPINRANDOM_SLOW, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, DarkCaveBlackthornEntrancePharmacistScript, -1
object_event 21, 24, SPRITE_POKE_BALL, SPRITEMOVEDATA_ITEM_TREE, 0, 0, -1, -1, 0, OBJECTTYPE_ITEMBALL, 0, DarkCaveBlackthornEntranceRevive, EVENT_DARK_CAVE_BLACKTHORN_ENTRANCE_REVIVE
object_event 7, 22, SPRITE_POKE_BALL, SPRITEMOVEDATA_ITEM_TREE, 0, 0, -1, -1, 0, OBJECTTYPE_ITEMBALL, 0, DarkCaveBlackthornEntranceTMSnore, EVENT_DARK_CAVE_BLACKTHORN_ENTRANCE_TM_SNORE