pokecrystal/maps/PalletTown.asm

96 lines
1.7 KiB
NASM

const_value set 2
const PALLETTOWN_TEACHER
const PALLETTOWN_FISHER
PalletTown_MapScriptHeader:
.SceneScripts:
db 0
.MapCallbacks:
db 1
dbw 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_MapEventHeader:
; filler
db 0, 0
.Warps:
db 3
warp_def $5, $5, 1, REDS_HOUSE_1F
warp_def $5, $d, 1, BLUES_HOUSE
warp_def $b, $c, 1, OAKS_LAB
.CoordEvents:
db 0
.BGEvents:
db 4
bg_event 9, 7, BGEVENT_READ, PalletTownSign
bg_event 5, 3, BGEVENT_READ, RedsHouseSign
bg_event 13, 13, BGEVENT_READ, OaksLabSign
bg_event 5, 11, BGEVENT_READ, BluesHouseSign
.ObjectEvents:
db 2
object_event SPRITE_TEACHER, 8, 3, SPRITEMOVEDATA_WANDER, 2, 2, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, PalletTownTeacherScript, -1
object_event SPRITE_FISHER, 14, 12, SPRITEMOVEDATA_WALK_LEFT_RIGHT, 0, 2, -1, -1, PAL_NPC_GREEN, OBJECTTYPE_SCRIPT, 0, PalletTownFisherScript, -1