Add map objects from bank 4C.

1 files changed, 272 insertions, 0 deletions

diff --git a/maps/Route42.asm b/maps/Route42.asm
new file mode 100644
index 00000000..622286ce
--- /dev/null
+++ b/maps/Route42.asm
@@ -0,0 +1,272 @@
+	const_def 2 ; object constants
+	const ROUTE42_FISHER
+	const ROUTE42_POKEFAN_M
+	const ROUTE42_SUPER_NERD
+	const ROUTE42_FRUIT_TREE1
+	const ROUTE42_FRUIT_TREE2
+	const ROUTE42_FRUIT_TREE3
+	const ROUTE42_POKE_BALL1
+	const ROUTE42_POKE_BALL2
+	const ROUTE42_SUICUNE
+
+Route42_MapScripts:
+	db 0 ; scene scripts
+
+	db 0 ; callbacks
+
+TrainerFisherChris:
+	trainer FISHER, CHRIS1, EVENT_BEAT_FISHER_CHRIS, FisherChrisSeenText, FisherChrisBeatenText, 0, .Script
+
+.Script:
+	endifjustbattled
+	opentext
+	checkevent EVENT_CHRIS_READY_FOR_REMATCH
+	iftrue .WantsBattle
+	checkcellnum PHONE_FISHER_CHRIS
+	iftrue .NumberAccepted
+	checkevent EVENT_CHRIS_ASKED_FOR_PHONE_NUMBER
+	iftrue .AskedAlready
+	writetext FisherChrisAfterBattleText
+	buttonsound
+	setevent EVENT_CHRIS_ASKED_FOR_PHONE_NUMBER
+	scall .AskNumber1
+	jump .AskForNumber
+
+.AskedAlready:
+	scall .AskNumber2
+.AskForNumber:
+	askforphonenumber PHONE_FISHER_CHRIS
+	ifequal PHONE_CONTACTS_FULL, .PhoneFull
+	ifequal PHONE_CONTACT_REFUSED, .NumberDeclined
+	trainertotext FISHER, CHRIS1, MEM_BUFFER_0
+	scall .RegisteredNumber
+	jump .NumberAccepted
+
+.WantsBattle:
+	scall .Rematch
+	winlosstext FisherChrisBeatenText, 0
+	checkevent EVENT_BEAT_ELITE_FOUR
+	iftrue .LoadFight2
+	checkevent EVENT_CLEARED_ROCKET_HIDEOUT
+	iftrue .LoadFight1
+	loadtrainer FISHER, CHRIS1
+	startbattle
+	reloadmapafterbattle
+	clearevent EVENT_CHRIS_READY_FOR_REMATCH
+	end
+
+.LoadFight1:
+	loadtrainer FISHER, CHRIS2
+	startbattle
+	reloadmapafterbattle
+	clearevent EVENT_CHRIS_READY_FOR_REMATCH
+	end
+
+.LoadFight2:
+	loadtrainer FISHER, CHRIS3
+	startbattle
+	reloadmapafterbattle
+	clearevent EVENT_CHRIS_READY_FOR_REMATCH
+	end
+
+.AskNumber1:
+	jumpstd asknumber1m
+	end
+
+.AskNumber2:
+	jumpstd asknumber2m
+	end
+
+.RegisteredNumber:
+	jumpstd registerednumberm
+	end
+
+.NumberAccepted:
+	jumpstd numberacceptedm
+	end
+
+.NumberDeclined:
+	jumpstd numberdeclinedm
+	end
+
+.PhoneFull:
+	jumpstd phonefullm
+	end
+
+.Rematch:
+	jumpstd rematchm
+	end
+
+TrainerPokemaniacShane:
+	trainer POKEMANIAC, SHANE, EVENT_BEAT_POKEMANIAC_SHANE, PokemaniacShaneSeenText, PokemaniacShaneBeatenText, 0, .Script
+
+.Script:
+	endifjustbattled
+	opentext
+	writetext PokemaniacShaneAfterBattleText
+	waitbutton
+	closetext
+	end
+
+TrainerHikerBenjamin:
+	trainer HIKER, BENJAMIN, EVENT_BEAT_HIKER_BENJAMIN, HikerBenjaminSeenText, HikerBenjaminBeatenText, 0, .Script
+
+.Script:
+	endifjustbattled
+	opentext
+	writetext HikerBenjaminAfterBattleText
+	waitbutton
+	closetext
+	end
+
+Route42Sign1:
+	jumptext Route42Sign1Text
+
+MtMortarSign1:
+	jumptext MtMortarSign1Text
+
+MtMortarSign2:
+	jumptext MtMortarSign2Text
+
+Route42Sign2:
+	jumptext Route42Sign2Text
+
+Route42UltraBall:
+	itemball ULTRA_BALL
+
+Route42SuperPotion:
+	itemball SUPER_POTION
+
+Route42FruitTree1:
+	fruittree FRUITTREE_ROUTE_42_1
+
+Route42FruitTree2:
+	fruittree FRUITTREE_ROUTE_42_2
+
+Route42FruitTree3:
+	fruittree FRUITTREE_ROUTE_42_3
+
+Route42HiddenMaxPotion:
+	hiddenitem MAX_POTION, EVENT_ROUTE_42_HIDDEN_MAX_POTION
+
+FisherChrisSeenText:
+	text "Let me demonstrate"
+	line "the power of the"
+	cont "#MON I caught!"
+	done
+
+FisherChrisBeatenText:
+	text "What? That's not"
+	line "right."
+	done
+
+FisherChrisAfterBattleText:
+	text "I want to become"
+	line "the trainer CHAMP"
+
+	para "using the #MON"
+	line "I caught."
+
+	para "That's the best"
+	line "part of fishing!"
+	done
+
+HikerBenjaminSeenText:
+	text "Ah, it's good to"
+	line "be outside!"
+	cont "I feel so free!"
+	done
+
+HikerBenjaminBeatenText:
+	text "Gahahah!"
+	done
+
+HikerBenjaminAfterBattleText:
+	text "Losing feels in-"
+	line "significant if you"
+
+	para "look up at the big"
+	line "sky!"
+	done
+
+PokemaniacShaneSeenText:
+	text "HEY!"
+
+	para "This is my secret"
+	line "place! Get lost,"
+	cont "you outsider!"
+	done
+
+PokemaniacShaneBeatenText:
+	text "I should have used"
+	line "my MOON STONE…"
+	done
+
+PokemaniacShaneAfterBattleText:
+	text "You're working on"
+	line "a #DEX?"
+
+	para "Wow, you must know"
+	line "some pretty rare"
+	cont "#MON!"
+
+	para "May I please see"
+	line "it. Please?"
+	done
+
+Route42Sign1Text:
+	text "ROUTE 42"
+
+	para "ECRUTEAK CITY -"
+	line "MAHOGANY TOWN"
+	done
+
+MtMortarSign1Text:
+	text "MOUNT MORTAR"
+
+	para "WATERFALL CAVE"
+	line "Inside"
+	done
+
+MtMortarSign2Text:
+	text "MOUNT MORTAR"
+
+	para "WATERFALL CAVE"
+	line "Inside"
+	done
+
+Route42Sign2Text:
+	text "ROUTE 42"
+
+	para "ECRUTEAK CITY -"
+	line "MAHOGANY TOWN"
+	done
+
+Route42_MapEvents:
+	db 0, 0 ; filler
+
+	db 5 ; warp events
+	warp_event  0,  8, ROUTE_42_ECRUTEAK_GATE, 3
+	warp_event  0,  9, ROUTE_42_ECRUTEAK_GATE, 4
+	warp_event 10,  5, MOUNT_MORTAR_1F_OUTSIDE, 1
+	warp_event 28,  9, MOUNT_MORTAR_1F_OUTSIDE, 2
+	warp_event 46,  7, MOUNT_MORTAR_1F_OUTSIDE, 3
+
+	db 0 ; coord events
+
+	db 5 ; bg events
+	bg_event  4, 10, BGEVENT_READ, Route42Sign1
+	bg_event  7,  5, BGEVENT_READ, MtMortarSign1
+	bg_event 45,  9, BGEVENT_READ, MtMortarSign2
+	bg_event 54,  8, BGEVENT_READ, Route42Sign2
+	bg_event 16, 11, BGEVENT_ITEM, Route42HiddenMaxPotion
+
+	db 8 ; object events
+	object_event 40, 10, SPRITE_FISHER, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, PAL_NPC_GREEN, OBJECTTYPE_TRAINER, 1, TrainerFisherChris, -1
+	object_event 51,  9, SPRITE_POKEFAN_M, SPRITEMOVEDATA_SPINRANDOM_FAST, 0, 0, -1, -1, PAL_NPC_BROWN, OBJECTTYPE_TRAINER, 3, TrainerHikerBenjamin, -1
+	object_event 47,  8, SPRITE_SUPER_NERD, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_TRAINER, 3, TrainerPokemaniacShane, -1
+	object_event 27, 16, SPRITE_FRUIT_TREE, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, Route42FruitTree1, -1
+	object_event 28, 16, SPRITE_FRUIT_TREE, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, Route42FruitTree2, -1
+	object_event 29, 16, SPRITE_FRUIT_TREE, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, Route42FruitTree3, -1
+	object_event  6,  4, SPRITE_POKE_BALL, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_ITEMBALL, 0, Route42UltraBall, EVENT_ROUTE_42_ULTRA_BALL
+	object_event 33,  8, SPRITE_POKE_BALL, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_ITEMBALL, 0, Route42SuperPotion, EVENT_ROUTE_42_SUPER_POTION