pokecrystal/maps/PalletTown.asm

89 lines
1.7 KiB
NASM

const_value set 2
const PALLETTOWN_TEACHER
const PALLETTOWN_FISHER
PalletTown_MapScripts:
db 0 ; scene scripts
db 1 ; callbacks
callback MAPCALLBACK_NEWMAP, .FlyPoint
.FlyPoint:
setflag ENGINE_FLYPOINT_PALLET
return
PalletTownTeacherScript:
jumptextfaceplayer PalletTownTeacherText
PalletTownFisherScript:
jumptextfaceplayer PalletTownFisherText
PalletTownSign:
jumptext PalletTownSignText
RedsHouseSign:
jumptext RedsHouseSignText
OaksLabSign:
jumptext OaksLabSignText
BluesHouseSign:
jumptext BluesHouseSignText
PalletTownTeacherText:
text "I'm raising #-"
line "MON too."
para "They serve as my"
line "private guards."
done
PalletTownFisherText:
text "Technology is"
line "incredible!"
para "You can now trade"
line "#MON across"
cont "time like e-mail."
done
PalletTownSignText:
text "PALLET TOWN"
para "A Tranquil Setting"
line "of Peace & Purity"
done
RedsHouseSignText:
text "RED'S HOUSE"
done
OaksLabSignText:
text "OAK #MON"
line "RESEARCH LAB"
done
BluesHouseSignText:
text "BLUE'S HOUSE"
done
PalletTown_MapEvents:
db 0, 0 ; filler
db 3 ; warp events
warp_event 5, 5, 1, REDS_HOUSE_1F
warp_event 13, 5, 1, BLUES_HOUSE
warp_event 12, 11, 1, OAKS_LAB
db 0 ; coord events
db 4 ; bg events
bg_event 7, 9, BGEVENT_READ, PalletTownSign
bg_event 3, 5, BGEVENT_READ, RedsHouseSign
bg_event 13, 13, BGEVENT_READ, OaksLabSign
bg_event 11, 5, BGEVENT_READ, BluesHouseSign
db 2 ; object events
object_event 3, 8, SPRITE_TEACHER, SPRITEMOVEDATA_WANDER, 2, 2, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, PalletTownTeacherScript, -1
object_event 12, 14, SPRITE_FISHER, SPRITEMOVEDATA_WALK_LEFT_RIGHT, 2, 0, -1, -1, PAL_NPC_GREEN, OBJECTTYPE_SCRIPT, 0, PalletTownFisherScript, -1