mirror of https://github.com/pret/pokecrystal.git
167 lines
3.2 KiB
NASM
167 lines
3.2 KiB
NASM
object_const_def ; object_event constants
|
|
const CHARCOALKILN_BLACK_BELT
|
|
const CHARCOALKILN_YOUNGSTER
|
|
const CHARCOALKILN_MOLTRES
|
|
|
|
CharcoalKiln_MapScripts:
|
|
db 0 ; scene scripts
|
|
|
|
db 0 ; callbacks
|
|
|
|
CharcoalKilnBoss:
|
|
faceplayer
|
|
opentext
|
|
checkevent EVENT_GOT_HM01_CUT
|
|
iftrue .GotCut
|
|
checkevent EVENT_CLEARED_SLOWPOKE_WELL
|
|
iftrue .SavedSlowpoke
|
|
writetext CharcoalKilnBossText1
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
.SavedSlowpoke:
|
|
writetext CharcoalKilnBossText2
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
.GotCut:
|
|
writetext CharcoalKilnBossText3
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
CharcoalKilnApprentice:
|
|
faceplayer
|
|
opentext
|
|
checkevent EVENT_GOT_CHARCOAL_IN_CHARCOAL_KILN
|
|
iftrue .YoureTheCoolest
|
|
checkevent EVENT_GOT_HM01_CUT
|
|
iftrue .Thanks
|
|
writetext CharcoalKilnApprenticeText1
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
.Thanks:
|
|
writetext CharcoalKilnApprenticeText2
|
|
promptbutton
|
|
verbosegiveitem CHARCOAL
|
|
iffalse .Done
|
|
setevent EVENT_GOT_CHARCOAL_IN_CHARCOAL_KILN
|
|
closetext
|
|
end
|
|
|
|
.YoureTheCoolest:
|
|
writetext CharcoalKilnApprenticeText3
|
|
waitbutton
|
|
.Done:
|
|
closetext
|
|
end
|
|
|
|
CharcoalKilnFarfetchd:
|
|
faceplayer
|
|
opentext
|
|
writetext FarfetchdText
|
|
cry FARFETCH_D
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
CharcoalKilnBookshelf:
|
|
jumpstd MagazineBookshelfScript
|
|
|
|
CharcoalKilnRadio:
|
|
jumpstd Radio2Script
|
|
|
|
CharcoalKilnBossText1:
|
|
text "All the SLOWPOKE"
|
|
line "have disappeared"
|
|
cont "from the town."
|
|
|
|
para "The forest's pro-"
|
|
line "tector may be"
|
|
cont "angry with us…"
|
|
|
|
para "It may be a bad"
|
|
line "omen. We should"
|
|
cont "stay in."
|
|
done
|
|
|
|
CharcoalKilnBossText2:
|
|
text "The SLOWPOKE have"
|
|
line "returned…"
|
|
|
|
para "But my APPRENTICE"
|
|
line "hasn't come back"
|
|
cont "from ILEX FOREST."
|
|
|
|
para "Where in the world"
|
|
line "is that lazy guy?"
|
|
done
|
|
|
|
CharcoalKilnBossText3:
|
|
text "You chased off"
|
|
line "TEAM ROCKET and"
|
|
|
|
para "went to ILEX"
|
|
line "FOREST alone?"
|
|
|
|
para "That takes guts!"
|
|
line "I like that. Come"
|
|
cont "train with us."
|
|
done
|
|
|
|
CharcoalKilnApprenticeText1:
|
|
text "Where have all the"
|
|
line "SLOWPOKE gone?"
|
|
|
|
para "Are they out play-"
|
|
line "ing somewhere?"
|
|
done
|
|
|
|
CharcoalKilnApprenticeText2:
|
|
text "I'm sorry--I for-"
|
|
line "got to thank you."
|
|
|
|
para "This is CHARCOAL"
|
|
line "that I made."
|
|
|
|
para "Fire-type #MON"
|
|
line "would be happy to"
|
|
cont "hold that."
|
|
done
|
|
|
|
CharcoalKilnApprenticeText3:
|
|
text "The SLOWPOKE came"
|
|
line "back, and you even"
|
|
cont "found FARFETCH'D."
|
|
|
|
para "You're the cool-"
|
|
line "est, man!"
|
|
done
|
|
|
|
FarfetchdText:
|
|
text "FARFETCH'D: Kwaa!"
|
|
done
|
|
|
|
CharcoalKiln_MapEvents:
|
|
db 0, 0 ; filler
|
|
|
|
db 2 ; warp events
|
|
warp_event 2, 7, AZALEA_TOWN, 2
|
|
warp_event 3, 7, AZALEA_TOWN, 2
|
|
|
|
db 0 ; coord events
|
|
|
|
db 3 ; bg events
|
|
bg_event 0, 1, BGEVENT_READ, CharcoalKilnBookshelf
|
|
bg_event 1, 1, BGEVENT_READ, CharcoalKilnBookshelf
|
|
bg_event 7, 1, BGEVENT_READ, CharcoalKilnRadio
|
|
|
|
db 3 ; object events
|
|
object_event 2, 3, SPRITE_BLACK_BELT, SPRITEMOVEDATA_SPINRANDOM_SLOW, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, CharcoalKilnBoss, EVENT_CHARCOAL_KILN_BOSS
|
|
object_event 5, 3, SPRITE_YOUNGSTER, SPRITEMOVEDATA_WANDER, 1, 1, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, CharcoalKilnApprentice, EVENT_CHARCOAL_KILN_APPRENTICE
|
|
object_event 5, 6, SPRITE_MOLTRES, SPRITEMOVEDATA_POKEMON, 2, 2, -1, -1, PAL_NPC_BROWN, OBJECTTYPE_SCRIPT, 0, CharcoalKilnFarfetchd, EVENT_CHARCOAL_KILN_FARFETCH_D
|