KrissHouse → PlayersHouse

maps/PlayersNeighborsHouse.asm

@@ -0,0 +1,122 @@
+const_value set 2
+	const PLAYERSNEIGHBORSHOUSE_COOLTRAINER_F
+	const PLAYERSNEIGHBORSHOUSE_POKEFAN_F
+
+PlayersNeighborsHouse_MapScripts:
+.SceneScripts:
+	db 0
+
+.MapCallbacks:
+	db 0
+
+PlayersNeighborsDaughter:
+	jumptextfaceplayer PlayersNeighborsDaughterText
+
+PlayersNeighbor:
+	jumptextfaceplayer PlayersNeighborText
+
+PlayersNeighborsHouseBookshelf:
+	jumpstd magazinebookshelf
+
+PlayersNeighborsHouseRadio:
+	checkevent EVENT_GOT_A_POKEMON_FROM_ELM
+	iftrue .NormalRadio
+	checkevent EVENT_LISTENED_TO_INITIAL_RADIO
+	iftrue .AbbreviatedRadio
+	playmusic MUSIC_POKEMON_TALK
+	opentext
+	writetext PlayerNeighborRadioText1
+	pause 45
+	writetext PlayerNeighborRadioText2
+	pause 45
+	writetext PlayerNeighborRadioText3
+	pause 45
+	musicfadeout MUSIC_NEW_BARK_TOWN, 16
+	writetext PlayerNeighborRadioText4
+	pause 45
+	closetext
+	setevent EVENT_LISTENED_TO_INITIAL_RADIO
+	end
+.NormalRadio:
+	jumpstd radio1
+.AbbreviatedRadio:
+	opentext
+	writetext PlayerNeighborRadioText4
+	pause 45
+	closetext
+	end
+
+PlayersNeighborsDaughterText:
+	text "PIKACHU is an"
+	line "evolved #MON."
+
+	para "I was amazed by"
+	line "PROF.ELM's find-"
+	cont "ings."
+
+	para "He's so famous for"
+	line "his research on"
+	cont "#MON evolution."
+
+	para "…sigh…"
+
+	para "I wish I could be"
+	line "a researcher like"
+	cont "him…"
+	done
+
+PlayersNeighborText:
+	text "My daughter is"
+	line "adamant about"
+
+	para "becoming PROF."
+	line "ELM's assistant."
+
+	para "She really loves"
+	line "#MON!"
+
+	para "But then, so do I!"
+	done
+
+PlayerNeighborRadioText1:
+	text "PROF.OAK'S #MON"
+	line "TALK! Please tune"
+	cont "in next time!"
+	done
+
+PlayerNeighborRadioText2:
+	text "#MON CHANNEL!"
+	done
+
+PlayerNeighborRadioText3:
+	text "This is DJ MARY,"
+	line "your co-host!"
+	done
+
+PlayerNeighborRadioText4:
+	text "#MON!"
+	line "#MON CHANNEL…"
+	done
+
+PlayersNeighborsHouse_MapEvents:
+	; filler
+	db 0, 0
+
+.Warps:
+	db 2
+	warp_def 2, 7, 3, NEW_BARK_TOWN
+	warp_def 3, 7, 3, NEW_BARK_TOWN
+
+.CoordEvents:
+	db 0
+
+.BGEvents:
+	db 3
+	bg_event 0, 1, BGEVENT_READ, PlayersNeighborsHouseBookshelf
+	bg_event 1, 1, BGEVENT_READ, PlayersNeighborsHouseBookshelf
+	bg_event 7, 1, BGEVENT_READ, PlayersNeighborsHouseRadio
+
+.ObjectEvents:
+	db 2
+	object_event 2, 3, SPRITE_COOLTRAINER_F, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_SCRIPT, 0, PlayersNeighborsDaughter, -1
+	object_event 5, 3, SPRITE_POKEFAN_F, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_SCRIPT, 0, PlayersNeighbor, EVENT_PLAYERS_NEIGHBORS_HOUSE_NEIGHBOR