Merge pull request #33 from entrpntr/phone

Disassemble phone scripts and text (bank $41)

17 files changed, 2142 insertions, 133 deletions

diff --git a/constants/event_flags.asm b/constants/event_flags.asm
index 58127c6a..bb1476b1 100644
--- a/constants/event_flags.asm
+++ b/constants/event_flags.asm
@@ -669,7 +669,7 @@
 	const EVENT_DEREK_ASKED_FOR_PHONE_NUMBER
 	const EVENT_DEREK_READY_FOR_REMATCH
 	const EVENT_CHRIS_ASKED_FOR_PHONE_NUMBER
-	const EVENT_CHRIS_READY_FOR_REMATCH
+	const EVENT_CHRIS_READY_FOR_REMATCH ; 290
 	const EVENT_BRENT_ASKED_FOR_PHONE_NUMBER
 	const EVENT_BRENT_READY_FOR_REMATCH
 	const EVENT_TIFFANY_ASKED_FOR_PHONE_NUMBER
diff --git a/data/phone/text/bike_shop.asm b/data/phone/text/bike_shop.asm
new file mode 100644
index 00000000..ec2ce893
--- /dev/null
+++ b/data/phone/text/bike_shop.asm
@@ -0,0 +1,19 @@
+BikeShopPhoneCallerText:
+	text "Hi, <PLAYER>!"
+	line "Our BICYCLE sales"
+
+	para "have gone through"
+	line "the roof!"
+
+	para "We owe it all to"
+	line "your advertising"
+
+	para "by riding around"
+	line "on our BICYCLE."
+
+	para "As our way of say-"
+	line "ing thanks, please"
+
+	para "keep that BICYCLE."
+	line "Thanks again!"
+	done
diff --git a/data/phone/text/bill.asm b/data/phone/text/bill.asm
new file mode 100644
index 00000000..24f4840d
--- /dev/null
+++ b/data/phone/text/bill.asm
@@ -0,0 +1,101 @@
+BillPhoneMornGreetingText:
+	text "Good morning!"
+
+	para "This is the #-"
+	line "MON STORAGE SYSTEM"
+
+	para "ADMINISTRATION"
+	line "SERVICE."
+	done
+
+BillPhoneDayGreetingText:
+	text "Good day!"
+
+	para "This is the #-"
+	line "MON STORAGE SYSTEM"
+
+	para "ADMINISTRATION"
+	line "SERVICE."
+	done
+
+BillPhoneNiteGreetingText:
+	text "Good evening!"
+
+	para "This is the #-"
+	line "MON STORAGE SYSTEM"
+
+	para "ADMINISTRATION"
+	line "SERVICE."
+	done
+
+BillPhoneGenericText:
+	text "Who's calling?"
+
+	para "<PLAYER>, is it?"
+	line "Hang on a sec…"
+
+	para "<……>"
+	line "<……>"
+	done
+
+BillPhoneNotFullText:
+	text "Thanks for"
+	line "waiting!"
+
+	para "<PLAYER>, your BOX"
+	line "has room for @"
+	text_ram wStringBuffer3
+	text_start
+	cont "more #MON."
+
+	para "Get out there and"
+	line "fill it up!"
+	done
+
+BillPhoneNearlyFullText:
+	text "Thanks for"
+	line "waiting!"
+
+	para "<PLAYER>, your BOX"
+	line "has room for only"
+	cont "@"
+	text_ram wStringBuffer3
+	text " more #MON."
+
+	para "Maybe you should"
+	line "switch your BOX."
+	done
+
+BillPhoneFullText:
+	text "Thanks for"
+	line "waiting!"
+
+	para "<PLAYER>, your BOX"
+	line "is full!"
+
+	para "You'll have to"
+	line "switch BOXES if"
+
+	para "you want to catch"
+	line "more #MON."
+	done
+
+BillPhoneNewlyFullText:
+	text "Hi, <PLAYER>?"
+	line "It's me, BILL!"
+
+	para "Thanks for using"
+	line "my STORAGE SYSTEM."
+
+	para "That last #MON"
+	line "you sent filled"
+	cont "your BOX up."
+
+	para "You'll have to"
+	line "switch BOXES if"
+
+	para "you want to catch"
+	line "more #MON."
+
+	para "Bye now!"
+	done
diff --git a/data/phone/text/elm.asm b/data/phone/text/elm.asm
new file mode 100644
index 00000000..a1450ca2
--- /dev/null
+++ b/data/phone/text/elm.asm
@@ -0,0 +1,212 @@
+ElmPhoneHealYourMonText:
+	text "Hello, <PLAYER>?"
+
+	para "Try not to overdo"
+	line "it."
+
+	para "Be sure to heal"
+	line "your #MON if"
+	cont "they are hurt."
+	done
+
+ElmPhoneSawMrPokemonText:
+	text "Hello, <PLAYER>?"
+
+	para "Did you meet MR."
+	line "#MON? Great!"
+	cont "Come back safely!"
+	done
+
+ElmPhonePokemonStolenText:
+	text "<PLAYER>? I'm very"
+	line "upset now."
+
+	para "We had a #MON"
+	line "stolen from here."
+
+	para "How could anyone"
+	line "do that?"
+	done
+
+ElmPhoneCheckingTheEggText:
+	text "Hello, <PLAYER>?"
+
+	para "We're checking the"
+	line "EGG now. It does"
+
+	para "appear to be a"
+	line "#MON EGG."
+	done
+
+ElmPhoneAssistantText:
+	text "Hello, <PLAYER>?"
+
+	para "Did you see my"
+	line "assistant? He's at"
+
+	para "the #MON CENTER"
+	line "in VIOLET CITY."
+	done
+
+ElmPhoneHowIsTheEggText:
+	text "Hello, <PLAYER>?"
+
+	para "How's the EGG? Has"
+	line "anything changed?"
+
+	para "If anything hap-"
+	line "pens, please call."
+	done
+
+ElmPhoneEggHatchedText:
+	text "Hello, <PLAYER>?"
+	line "How is the EGG?"
+
+	para "What? It hatched?"
+	line "Wow! What kind of"
+	cont "#MON is it?"
+
+	para "Please come show"
+	line "me now!"
+	done
+
+ElmPhoneDiscoveredHatchTimeText:
+	text "Hello, <PLAYER>?"
+
+	para "I just made a new"
+	line "discovery."
+
+	para "The time it takes"
+	line "for an EGG to"
+
+	para "hatch depends on"
+	line "the #MON."
+	done
+
+ElmPhoneInvestigatingEggMovesText:
+	text "Hello, <PLAYER>?"
+
+	para "It's still a"
+	line "mystery what kinds"
+
+	para "of moves hatched"
+	line "#MON have."
+
+	para "We're investigat-"
+	line "ing that now."
+	done
+
+ElmPhoneDiscoveredPokerusText:
+	text "Hello, <PLAYER>?"
+
+	para "I discovered an"
+	line "odd thing."
+
+	para "Apparently there's"
+	line "something called"
+
+	para "#RUS that in-"
+	line "fects #MON."
+
+	para "Yes, it's like a"
+	line "virus, so it's"
+	cont "called #RUS."
+
+	para "It multiplies fast"
+	line "and infects other"
+
+	para "#MON too. But"
+	line "that's all."
+
+	para "It doesn't seem to"
+	line "do anything, and"
+
+	para "it goes away over"
+	line "time."
+
+	para "I guess it's"
+	line "nothing to worry"
+	cont "about. Bye!"
+	done
+
+ElmPhoneDisasterText:
+	text "H-hello? <PLAYER>?"
+	line "It's a disaster!"
+
+	para "Uh, um, it's just"
+	line "terrible!"
+
+	para "What should I do?"
+	line "It… Oh, no…"
+
+	para "Please get back"
+	line "here now!"
+	done
+
+ElmPhoneEggAssistantText:
+	text "Hello, <PLAYER>? We"
+	line "discovered some-"
+
+	para "thing about the"
+	line "EGG!"
+
+	para "My assistant is at"
+	line "the #MON CENTER"
+
+	para "in VIOLET CITY. "
+	line "Could you talk to"
+	cont "him?"
+	done
+
+ElmPhoneRadioTowerRocketTakeoverText:
+	text "<PLAYER>, how are"
+	line "things going?"
+
+	para "I called because"
+	line "something weird is"
+
+	para "happening with the"
+	line "radio broadcasts."
+
+	para "They were talking"
+	line "about TEAM ROCKET."
+
+	para "<PLAYER>, do you"
+	line "know anything"
+	cont "about it?"
+
+	para "Maybe TEAM ROCKET"
+	line "has returned. No,"
+
+	para "that just can't"
+	line "be true."
+
+	para "Sorry to bug you."
+	line "Take care!"
+	done
+
+ElmPhoneGiftText:
+	text "Hello, <PLAYER>?"
+
+	para "I have something"
+	line "here for you."
+
+	para "Could you swing by"
+	line "my LAB?"
+
+	para "See you later!"
+	done
+
+; unused
+ElmPhoneGotAholdOfSomethingNeatText:
+	text "Hello, <PLAYER>?"
+	line "How's it going?"
+
+	para "I got ahold of"
+	line "something neat."
+
+	para "Swing by my LAB"
+	line "and pick it up!"
+
+	para "See you later!"
+	done
diff --git a/data/phone/text/landmarks.asm b/data/phone/text/landmarks.asm
new file mode 100644
index 00000000..175f6111
--- /dev/null
+++ b/data/phone/text/landmarks.asm
@@ -0,0 +1,67 @@
+PhoneNationalParkText:
+	db "NATIONAL PARK@"
+
+PhoneLighthouseText:
+	db "LIGHTHOUSE@"
+
+; unreferenced
+PhoneUndergroundText:
+	db "UNDERGROUND@"
+
+PhoneDarkCaveText:
+	db "DARK CAVE@"
+
+PhoneMtMortarText:
+	db "MT.MORTAR@"
+
+PhoneRoute26Text:
+	db "ROUTE 26@"
+
+PhoneRoute27Text:
+	db "ROUTE 27@"
+
+PhoneRoute30Text:
+	db "ROUTE 30@"
+
+PhoneRoute31Text:
+	db "ROUTE 31@"
+
+PhoneRoute32Text:
+	db "ROUTE 32@"
+
+PhoneRoute33Text:
+	db "ROUTE 33@"
+
+PhoneRoute34Text:
+	db "ROUTE 34@"
+
+PhoneRoute35Text:
+	db "ROUTE 35@"
+
+PhoneRoute36Text:
+	db "ROUTE 36@"
+
+; unreferenced
+PhoneRoute37Text:
+	db "ROUTE 37@"
+
+PhoneRoute38Text:
+	db "ROUTE 38@"
+
+PhoneRoute39Text:
+	db "ROUTE 39@"
+
+PhoneRoute42Text:
+	db "ROUTE 42@"
+
+PhoneRoute43Text:
+	db "ROUTE 43@"
+
+PhoneRoute44Text:
+	db "ROUTE 44@"
+
+PhoneRoute45Text:
+	db "ROUTE 45@"
+
+PhoneRoute46Text:
+	db "ROUTE 46@"
diff --git a/data/phone/text/mom.asm b/data/phone/text/mom.asm
new file mode 100644
index 00000000..75e8dfbb
--- /dev/null
+++ b/data/phone/text/mom.asm
@@ -0,0 +1,165 @@
+MomPhoneGreetingText:
+	text "Hello?"
+
+	para "Oh, hi, <PLAYER>!"
+	line "Working hard?"
+	done
+
+MomPhoneLandmarkText:
+	text "Oh, so you're in"
+	line "@"
+	text_ram wStringBuffer3
+	text "…"
+
+	para "Isn't that where"
+	line "@"
+	text_ram wStringBuffer4
+	text_start
+	para "is? Did you go"
+	line "take a look?"
+	done
+
+MomPhoneGenericAreaText:
+	text "Really, you're in"
+	line "@"
+	text_ram wStringBuffer3
+	text "?"
+
+	para "I've never gone"
+	line "there. That's kind"
+	cont "of neat, <PLAYER>."
+	done
+
+MomPhoneNewBarkText:
+	text "What? You're in"
+	line "@"
+	text_ram wStringBuffer3
+	text "?"
+
+	para "Come see your MOM"
+	line "sometime!"
+	done
+
+MomPhoneCherrygroveText:
+	text "You're visiting"
+	line "@"
+	text_ram wStringBuffer3
+	text "?"
+
+	para "How about coming"
+	line "home for a bit?"
+	done
+
+MomOtherAreaText:
+	text "Wow, you're in"
+	line "@"
+	text_ram wStringBuffer3
+	text "?"
+
+	para "Good luck on your"
+	line "#MON quest!"
+	done
+
+MomDeterminedText:
+	text "That sounds really"
+	line "tough."
+
+	para "But, <PLAYER>, I"
+	line "know you're really"
+
+	para "determined. You'll"
+	line "be OK, right?"
+	done
+
+MomCheckBalanceText:
+	text "By the way, you've"
+	line "saved up ¥@"
+	text_ram wStringBuffer3
+	text "."
+
+	para "Do you want to"
+	line "keep on saving?"
+	done
+
+MomImportantToSaveText:
+	text "It's important to"
+	line "save your money."
+	done
+
+MomYoureNotSavingText:
+	text "Oh, <PLAYER>,"
+	line "you're not saving"
+
+	para "any money. Would"
+	line "you like to save?"
+	done
+
+MomYouveSavedText:
+	text "By the way, you've"
+	line "saved up ¥@"
+	text_ram wStringBuffer3
+	text "."
+
+	para "Want to start"
+	line "saving again?"
+	done
+
+MomOKIllSaveText:
+	text "OK. I'll save your"
+	line "money."
+	done
+
+MomPhoneStopSavingMoneyText:
+	text "OK. I'll stop"
+	line "saving your money."
+	done
+
+MomPhoneHangUpText:
+	text "<PLAYER>, keep it"
+	line "up! I'm rooting"
+	cont "for you, baby!"
+	done
+
+MomPhoneNoPokemonText:
+	text "Hello?"
+
+	para "Oh, hi, <PLAYER>!"
+	line "Wasn't PROF.ELM"
+	cont "waiting for you?"
+	done
+
+MomPhoneNoPokedexText:
+	text "Hello?"
+
+	para "Oh, hi, <PLAYER>!"
+	line "You're on a big"
+
+	para "mission for PROF."
+	line "ELM? Be good!"
+	done
+
+MomPhoneNoGymQuestText:
+	text "Hello?"
+
+	para "Hi, <PLAYER>! If"
+	line "you're done with"
+
+	para "your errand come"
+	line "on home, dear."
+	done
+
+MomPhoneLectureText:
+	text "Hello?"
+
+	para "…… <PLAYER>?"
+	line "I heard from PROF."
+
+	para "ELM that you went"
+	line "on a long trip."
+
+	para "I wish you would"
+	line "have told me…"
+
+	para "What about money?"
+	line "Should I save it?"
+	done
diff --git a/data/phone/text/trainers.asm b/data/phone/text/trainers.asm
new file mode 100644
index 00000000..2a15811c
--- /dev/null
+++ b/data/phone/text/trainers.asm
@@ -0,0 +1,355 @@
+PhoneMaleAnswerMornText:
+	text "Hello. This is"
+	line "@"
+	text_ram wStringBuffer3
+	text "…"
+
+	para "Good morning,"
+	line "<PLAYER>!"
+	done
+
+PhoneMaleAnswerDayText:
+	text "Hello. This is"
+	line "@"
+	text_ram wStringBuffer3
+	text "…"
+
+	para "How's it going,"
+	line "<PLAYER>?"
+	done
+
+PhoneMaleAnswerNiteText:
+	text "Hello. This is"
+	line "@"
+	text_ram wStringBuffer3
+	text "…"
+
+	para "Good evening,"
+	line "<PLAYER>!"
+	done
+
+PhoneFemaleAnswerMornText:
+	text "Hi. This is"
+	line "@"
+	text_ram wStringBuffer3
+	text "."
+
+	para "Hi, <PLAYER>!"
+	line "Good morning."
+	done
+
+PhoneFemaleAnswerDayText:
+	text "Hi. This is"
+	line "@"
+	text_ram wStringBuffer3
+	text "."
+
+	para "Hi, <PLAYER>!"
+	line "How are you?"
+	done
+
+PhoneFemaleAnswerNiteText:
+	text "Hi. This is"
+	line "@"
+	text_ram wStringBuffer3
+	text "."
+
+	para "Hi, <PLAYER>!"
+	line "Good evening."
+	done
+
+PhoneMaleGreetMornText:
+	text "<PLAYER>, good"
+	line "morning!"
+
+	para "It's me, @"
+	text_ram wStringBuffer3
+	text "."
+	line "How are you doing?"
+	done
+
+PhoneMaleGreetDayText:
+	text "<PLAYER>, howdy!"
+
+	para "It's me, @"
+	text_ram wStringBuffer3
+	text "."
+	line "Isn't it nice out?"
+	done
+
+PhoneMaleGreetNiteText:
+	text "<PLAYER>, good"
+	line "evening!"
+
+	para "It's me, @"
+	text_ram wStringBuffer3
+	text "."
+	line "Got a minute?"
+	done
+
+PhoneFemaleGreetMornText:
+	text "Good morning,"
+	line "<PLAYER>."
+
+	para "This is @"
+	text_ram wStringBuffer3
+	text "."
+	line "Did I wake you?"
+	done
+
+PhoneFemaleGreetDayText:
+	text "Hello, <PLAYER>."
+
+	para "This is @"
+	text_ram wStringBuffer3
+	text "."
+	line "How are things?"
+	done
+
+PhoneFemaleGreetNiteText:
+	text "Good evening,"
+	line "<PLAYER>."
+
+	para "This is @"
+	text_ram wStringBuffer3
+	text "."
+	line "Were you awake?"
+	done
+
+PhoneMaleReallyEnergeticText:
+	text "How are your"
+	line "#MON doing?"
+
+	para "My @"
+	text_ram wStringBuffer4
+	text "'s"
+	line "really energetic."
+	cont "It's a handful!"
+	done
+
+PhoneFemaleTopShapeText:
+	text "How are your"
+	line "#MON doing?"
+
+	para "I always keep my"
+	line "@"
+	text_ram wStringBuffer4
+	text " in top"
+
+	para "shape by going to"
+	line "#MON CENTERS."
+	done
+
+PhoneMaleLookingAwesomeText:
+	text "My @"
+	text_ram wStringBuffer4
+	text "'s"
+	line "looking awesome."
+
+	para "I wish I could"
+	line "show you."
+	done
+
+PhoneFemaleDressedUpText:
+	text "I dressed up my"
+	line "@"
+	text_ram wStringBuffer4
+	text "."
+
+	para "It looks even"
+	line "cuter than before."
+	done
+
+PhoneMaleManagedToBeatText:
+	text "Oh, yeah, I man-"
+	line "aged to beat a"
+	cont "tough @"
+	text_ram wStringBuffer4
+	text "."
+
+	para "I need to make my"
+	line "party stronger."
+	done
+
+PhoneFemaleTypeAdvantageText:
+	text "You have to hear"
+	line "this! I battled"
+
+	para "@"
+	text_ram wStringBuffer4
+	text " the"
+	line "other day."
+
+	para "It was easy! I had"
+	line "a type advantage."
+	done
+
+PhoneMaleAlmostCaughtText:
+	text "Hey, listen!"
+	line "I almost caught"
+
+	para "@"
+	text_ram wStringBuffer4
+	text " the"
+	line "other day."
+
+	para "Oh, it was soooo"
+	line "close too!"
+	done
+
+PhoneFemaleMissedCatchingText:
+	text "Guess what happen-"
+	line "ed the other day."
+
+	para "I missed catching"
+	line "@"
+	text_ram wStringBuffer4
+	text " again."
+
+	para "Maybe I'm not very"
+	line "good at this…"
+	done
+
+PhoneMaleWantsToBattleText:
+	text "Want to battle?"
+	line "It's not going to"
+
+	para "be a repeat of the"
+	line "last time we met."
+
+	para "I'll be around"
+	line "@"
+	text_ram wStringBuffer5
+	text "."
+	done
+
+PhoneFemaleWantsToBattleText:
+	text "Do you want to"
+	line "battle? I'm going"
+	cont "to win this time!"
+
+	para "I'll be waiting"
+	line "for you around"
+
+	para "@"
+	text_ram wStringBuffer5
+	text "."
+	line "Look for me, OK?"
+	done
+
+PhoneWrongNumberKazText:
+	text "Hello? This is"
+	line "@"
+	text_ram wStringBuffer3
+	text "…"
+
+	para "Uh-oh… You're not"
+	line "KAZ! Sorry, wrong"
+	cont "number."
+	done
+
+PhoneWrongNumberAudreyText:
+	text "Hello, this is"
+	line "@"
+	text_ram wStringBuffer3
+	text ". How are"
+	cont "you doing, AUDREY?"
+
+	para "Huh? <PLAYER>?"
+	line "Oops! My mistake!"
+	done
+
+PhoneSeeYouLaterText:
+	text "See you later!"
+	done
+
+PhoneByeByeText:
+	text "Bye-bye!"
+	done
+
+PhoneSwarmGrassText:
+	text "You have to see"
+	line "this! It's wild!"
+
+	para "A whole bunch of"
+	line "@"
+	text_ram wStringBuffer4
+	text " have"
+
+	para "shown up around"
+	line "@"
+	text_ram wStringBuffer5
+	text "!"
+	done
+
+PhoneSwarmFishText:
+	text "It's amazing!"
+
+	para "On @"
+	text_ram wStringBuffer5
+	text ","
+	line "@"
+	text_ram wStringBuffer4
+	text " are"
+
+	para "biting like there"
+	line "is no tomorrow."
+
+	para "<PLAYER>, bring"
+	line "your ROD, buddy!"
+	done
+
+PhoneSwarmCaveText:
+	text "A friend just told"
+	line "me this."
+
+	para "He saw a lot of"
+	line "@"
+	text_ram wStringBuffer4
+	text " in"
+	cont "@"
+	text_ram wStringBuffer5
+	text "."
+
+	para "<PLAYER>, you ought"
+	line "to go look."
+	done
+
+PhoneBugCatchingContestText:
+	text "They're holding"
+	line "the Bug-Catching"
+
+	para "Contest today at"
+	line "the PARK."
+
+	para "<PLAYER>, are you"
+	line "going to go?"
+	done
+
+IrwinRocketTakeoverRumorText:
+	text "<PLAYER>, did you"
+	line "know?"
+
+	para "I hear GOLDENROD's"
+	line "RADIO TOWER was"
+
+	para "taken over by TEAM"
+	line "ROCKET."
+
+	para "But what exactly"
+	line "is TEAM ROCKET?"
+	done
+
+GinaRocketTakeoverRumorText:
+	text "<PLAYER>, did you"
+	line "hear the news?"
+
+	para "TEAM ROCKET has"
+	line "taken over the"
+
+	para "RADIO TOWER in"
+	line "GOLDENROD CITY."
+
+	para "I wonder if the"
+	line "workers are OK…"
+	done
diff --git a/data/phone/text/unused.asm b/data/phone/text/unused.asm
new file mode 100644
index 00000000..cd1cf723
--- /dev/null
+++ b/data/phone/text/unused.asm
@@ -0,0 +1,3 @@
+UnusedPhoneText:
+	text "Good morning."
+	done
diff --git a/engine/phone/scripts/bike_shop.asm b/engine/phone/scripts/bike_shop.asm
new file mode 100644
index 00000000..bb10af68
--- /dev/null
+++ b/engine/phone/scripts/bike_shop.asm
@@ -0,0 +1,5 @@
+BikeShopPhoneCallerScript:
+	writetext BikeShopPhoneCallerText
+	clearflag ENGINE_BIKE_SHOP_CALL_ENABLED
+	specialphonecall SPECIALCALL_NONE
+	end
diff --git a/engine/phone/scripts/bill.asm b/engine/phone/scripts/bill.asm
new file mode 100644
index 00000000..7bb2e4d6
--- /dev/null
+++ b/engine/phone/scripts/bill.asm
@@ -0,0 +1,41 @@
+BillPhoneCalleeScript:
+	checktime DAY
+	iftrue .daygreet
+	checktime NITE
+	iftrue .nitegreet
+	writetext BillPhoneMornGreetingText
+	promptbutton
+	sjump .main
+
+.daygreet
+	writetext BillPhoneDayGreetingText
+	promptbutton
+	sjump .main
+
+.nitegreet
+	writetext BillPhoneNiteGreetingText
+	promptbutton
+	sjump .main
+
+.main
+	writetext BillPhoneGenericText
+	promptbutton
+	readvar VAR_BOXSPACE
+	getnum STRING_BUFFER_3
+	ifequal 0, .full
+	ifless PARTY_LENGTH, .nearlyfull
+	writetext BillPhoneNotFullText
+	end
+
+.nearlyfull
+	writetext BillPhoneNearlyFullText
+	end
+
+.full
+	writetext BillPhoneFullText
+	end
+
+BillPhoneCallerScript:
+	writetext BillPhoneNewlyFullText
+	waitbutton
+	end
diff --git a/engine/phone/scripts/elm.asm b/engine/phone/scripts/elm.asm
new file mode 100644
index 00000000..b93bdc22
--- /dev/null
+++ b/engine/phone/scripts/elm.asm
@@ -0,0 +1,101 @@
+ElmPhoneCalleeScript:
+	readvar VAR_SPECIALPHONECALL
+	ifequal SPECIALCALL_POKERUS, .pokerus
+	checkevent EVENT_SHOWED_TOGEPI_TO_ELM
+	iftrue .discovery
+	checkevent EVENT_GOT_TOGEPI_EGG_FROM_ELMS_AIDE
+	iffalse .next
+	checkevent EVENT_TOGEPI_HATCHED
+	iftrue .egghatched
+.next
+	checkevent EVENT_GOT_TOGEPI_EGG_FROM_ELMS_AIDE
+	iftrue .eggunhatched
+	checkevent EVENT_ELMS_AIDE_IN_LAB
+	iftrue .assistant
+	checkevent EVENT_GAVE_MYSTERY_EGG_TO_ELM
+	iftrue .checkingegg
+	checkevent EVENT_ELM_CALLED_ABOUT_STOLEN_POKEMON
+	iftrue .stolen
+	checkevent EVENT_GOT_MYSTERY_EGG_FROM_MR_POKEMON
+	iftrue .sawmrpokemon
+	writetext ElmPhoneHealYourMonText
+	end
+
+.sawmrpokemon
+	writetext ElmPhoneSawMrPokemonText
+	end
+
+.stolen
+	writetext ElmPhonePokemonStolenText
+	end
+
+.checkingegg
+	writetext ElmPhoneCheckingTheEggText
+	end
+
+.assistant
+	writetext ElmPhoneAssistantText
+	end
+
+.eggunhatched
+	writetext ElmPhoneHowIsTheEggText
+	end
+
+.egghatched
+	writetext ElmPhoneEggHatchedText
+	setevent EVENT_TOLD_ELM_ABOUT_TOGEPI_OVER_THE_PHONE
+	end
+
+.discovery
+	random 2
+	ifequal 0, .nextdiscovery
+	writetext ElmPhoneDiscoveredHatchTimeText
+	end
+
+.nextdiscovery
+	writetext ElmPhoneInvestigatingEggMovesText
+	end
+
+.pokerus
+	writetext ElmPhoneDiscoveredPokerusText
+	specialphonecall SPECIALCALL_NONE
+	end
+
+ElmPhoneCallerScript:
+	readvar VAR_SPECIALPHONECALL
+	ifequal SPECIALCALL_ROBBED, .disaster
+	ifequal SPECIALCALL_ASSISTANT, .assistant
+	ifequal SPECIALCALL_WEIRDBROADCAST, .rocket
+	ifequal SPECIALCALL_SSTICKET, .gift
+	ifequal SPECIALCALL_MASTERBALL, .gift
+	writetext ElmPhoneDiscoveredPokerusText
+	specialphonecall SPECIALCALL_NONE
+	end
+
+.disaster
+	writetext ElmPhoneDisasterText
+	specialphonecall SPECIALCALL_NONE
+	setevent EVENT_ELM_CALLED_ABOUT_STOLEN_POKEMON
+	end
+
+.assistant
+	writetext ElmPhoneEggAssistantText
+	specialphonecall SPECIALCALL_NONE
+	clearevent EVENT_ELMS_AIDE_IN_VIOLET_POKEMON_CENTER
+	setevent EVENT_ELMS_AIDE_IN_LAB
+	end
+
+.rocket
+	writetext ElmPhoneRadioTowerRocketTakeoverText
+	specialphonecall SPECIALCALL_NONE
+	end
+
+.gift
+	writetext ElmPhoneGiftText
+	specialphonecall SPECIALCALL_NONE
+	end
+
+.unused
+	writetext ElmPhoneGotAholdOfSomethingNeatText
+	specialphonecall SPECIALCALL_NONE
+	end
diff --git a/engine/phone/scripts/generic.asm b/engine/phone/scripts/generic.asm
new file mode 100644
index 00000000..4587c739
--- /dev/null
+++ b/engine/phone/scripts/generic.asm
@@ -0,0 +1,227 @@
+PhoneScript_Random2:
+	random 2
+	end
+
+PhoneScript_Random4:
+	random 4
+	end
+
+PhoneScript_AnswerPhone_Male:
+	checktime DAY
+	iftrue .day
+	checktime NITE
+	iftrue .nite
+	writetext PhoneMaleAnswerMornText
+	promptbutton
+	end
+.day
+	writetext PhoneMaleAnswerDayText
+	promptbutton
+	end
+.nite
+	writetext PhoneMaleAnswerNiteText
+	promptbutton
+	end
+
+PhoneScript_AnswerPhone_Female:
+	checktime DAY
+	iftrue .day
+	checktime NITE
+	iftrue .nite
+	writetext PhoneFemaleAnswerMornText
+	promptbutton
+	end
+.day
+	writetext PhoneFemaleAnswerDayText
+	promptbutton
+	end
+.nite
+	writetext PhoneFemaleAnswerNiteText
+	promptbutton
+	end
+
+PhoneScript_GreetPhone_Male:
+	checktime DAY
+	iftrue .day
+	checktime NITE
+	iftrue .nite
+	writetext PhoneMaleGreetMornText
+	promptbutton
+	end
+.day
+	writetext PhoneMaleGreetDayText
+	promptbutton
+	end
+.nite
+	writetext PhoneMaleGreetNiteText
+	promptbutton
+	end
+
+PhoneScript_GreetPhone_Female:
+	checktime DAY
+	iftrue .day
+	checktime NITE
+	iftrue .nite
+	writetext PhoneFemaleGreetMornText
+	promptbutton
+	end
+.day
+	writetext PhoneFemaleGreetDayText
+	promptbutton
+	end
+.nite
+	writetext PhoneFemaleGreetNiteText
+	promptbutton
+	end
+
+; Huey
+Phone_GenericCall_Male_SkipMon:
+	special RandomPhoneMon
+	scall PhoneScript_Random2
+	ifequal 0, Phone_LookingAwesome_Male_SkipMon
+	writetext PhoneMaleReallyEnergeticText
+	promptbutton
+	sjump PhoneScript_SeeYouLater
+
+; unused
+Phone_GenericCall_Female_SkipMon:
+	special RandomPhoneMon
+	scall PhoneScript_Random2
+	ifequal 0, Phone_DressedUp_Female_SkipMon
+	writetext PhoneFemaleTopShapeText
+	promptbutton
+	sjump PhoneScript_ByeBye
+
+; Huey
+Phone_LookingAwesome_Male_SkipMon:
+	writetext PhoneMaleLookingAwesomeText
+	promptbutton
+	sjump PhoneScript_ByeBye
+
+; unused
+Phone_DressedUp_Female_SkipMon:
+	writetext PhoneFemaleDressedUpText
+	promptbutton
+	sjump PhoneScript_ByeBye
+
+Phone_GenericCall_Male:
+	special RandomPhoneMon
+	scall PhoneScript_Random2
+	ifequal 0, Phone_LookingAwesome_Male
+	writetext PhoneMaleReallyEnergeticText
+	promptbutton
+	sjump Phone_FoundAMon_Male
+
+Phone_GenericCall_Female:
+	special RandomPhoneMon
+	scall PhoneScript_Random2
+	ifequal 0, Phone_DressedUp_Female
+	writetext PhoneFemaleTopShapeText
+	promptbutton
+	sjump Phone_FoundAMon_Female
+
+Phone_LookingAwesome_Male:
+	writetext PhoneMaleLookingAwesomeText
+	promptbutton
+	sjump Phone_FoundAMon_Male
+
+Phone_DressedUp_Female:
+	writetext PhoneFemaleDressedUpText
+	promptbutton
+	sjump Phone_FoundAMon_Female
+
+Phone_FoundAMon_Male:
+	special RandomPhoneWildMon
+	scall PhoneScript_Random2
+	ifequal 0, PhoneScript_AlmostCaught_Male
+	writetext PhoneMaleManagedToBeatText
+	promptbutton
+	sjump PhoneScript_SeeYouLater
+
+Phone_FoundAMon_Female:
+	special RandomPhoneWildMon
+	scall PhoneScript_Random2
+	ifequal 0, PhoneScript_MissedCatching_Female
+	writetext PhoneFemaleTypeAdvantageText
+	promptbutton
+	sjump PhoneScript_ByeBye
+
+PhoneScript_AlmostCaught_Male:
+	writetext PhoneMaleAlmostCaughtText
+	promptbutton
+	sjump PhoneScript_SeeYouLater
+
+PhoneScript_MissedCatching_Female:
+	writetext PhoneFemaleMissedCatchingText
+	promptbutton
+	sjump PhoneScript_ByeBye
+
+PhoneScript_WantsToBattle_Male:
+	writetext PhoneMaleWantsToBattleText
+	promptbutton
+	sjump PhoneScript_SeeYouLater
+
+PhoneScript_WantsToBattle_Female:
+	writetext PhoneFemaleWantsToBattleText
+	promptbutton
+	sjump PhoneScript_ByeBye
+
+Phone_WrongNumber_JoseBrent:
+	writetext PhoneWrongNumberKazText
+	end
+
+Phone_WrongNumber_Tiffany:
+	writetext PhoneWrongNumberAudreyText
+	end
+
+PhoneScript_SeeYouLater:
+	writetext PhoneSeeYouLaterText
+	end
+
+PhoneScript_ByeBye:
+	writetext PhoneByeByeText
+	end
+
+PhoneScript_SwarmGrass:
+	writetext PhoneSwarmGrassText
+	promptbutton
+	sjump PhoneScript_SeeYouLater
+
+PhoneScript_SwarmFish:
+	writetext PhoneSwarmFishText
+	promptbutton
+	sjump PhoneScript_SeeYouLater
+
+PhoneScript_SwarmCave:
+	writetext PhoneSwarmCaveText
+	promptbutton
+	sjump PhoneScript_SeeYouLater
+
+PhoneScript_BugCatchingContest:
+	writetext PhoneBugCatchingContestText
+	promptbutton
+	sjump PhoneScript_SeeYouLater
+
+IrwinRocketRumorScript:
+	writetext IrwinRocketTakeoverRumorText
+	promptbutton
+	sjump PhoneScript_SeeYouLater
+
+GinaRocketRumorScript:
+	writetext GinaRocketTakeoverRumorText
+	promptbutton
+	sjump PhoneScript_ByeBye
+
+Phone_CheckIfUnseenRare_Male:
+	scall PhoneScriptRareWildMon
+	iffalse PhoneScript_SeeYouLater
+	sjump Phone_GenericCall_Male
+
+Phone_CheckIfUnseenRare_Female:
+	scall PhoneScriptRareWildMon
+	iffalse PhoneScript_ByeBye
+	sjump Phone_GenericCall_Female
+
+PhoneScriptRareWildMon:
+	special RandomUnseenWildMon
+	end
diff --git a/engine/phone/scripts/mom.asm b/engine/phone/scripts/mom.asm
new file mode 100644
index 00000000..ec0e5113
--- /dev/null
+++ b/engine/phone/scripts/mom.asm
@@ -0,0 +1,150 @@
+MomPhoneCalleeScript:
+	checkevent EVENT_TALKED_TO_MOM_AFTER_MYSTERY_EGG_QUEST
+	iftrue .script_10401f
+	checkevent EVENT_DUDE_TALKED_TO_YOU
+	iftrue MomPhoneLectureScript
+	checkevent EVENT_GAVE_MYSTERY_EGG_TO_ELM
+	iftrue MomPhoneNoGymQuestScript
+	checkevent EVENT_GOT_A_POKEMON_FROM_ELM
+	iftrue MomPhoneNoPokedexScript
+	sjump MomPhoneNoPokemonScript
+
+.script_10401f
+	checkevent EVENT_TEMPORARY_UNTIL_MAP_RELOAD_8
+	iftrue MomPhoneHangUpScript
+	writetext MomPhoneGreetingText
+	promptbutton
+	getcurlandmarkname STRING_BUFFER_3
+	readvar VAR_ROOFPALETTE
+	ifequal 1, MomPhonePalette1
+	ifequal 2, MomPhonePalette2
+	sjump MomPhoneOther
+
+MomPhoneLandmark:
+	writetext MomPhoneLandmarkText
+	promptbutton
+	sjump MomSavingMoney
+
+MomPhonePalette1:
+	readvar VAR_MAPGROUP
+	ifequal GROUP_NEW_BARK_TOWN, .newbark
+	ifequal GROUP_CHERRYGROVE_CITY, .cherrygrove
+	ifequal GROUP_VIOLET_CITY, .violet
+	ifequal GROUP_AZALEA_TOWN, .azalea
+	ifequal GROUP_GOLDENROD_CITY, .goldenrod
+	writetext MomPhoneGenericAreaText
+	promptbutton
+	sjump MomSavingMoney
+
+.newbark
+	writetext MomPhoneNewBarkText
+	promptbutton
+	sjump MomSavingMoney
+
+.cherrygrove
+	writetext MomPhoneCherrygroveText
+	promptbutton
+	sjump MomSavingMoney
+
+.violet
+	getstring STRING_BUFFER_4, .text_sprout_tower
+	sjump MomPhoneLandmark
+.text_sprout_tower
+	db "SPROUT TOWER@"
+
+.azalea
+	getstring STRING_BUFFER_4, .text_slowpoke_well
+	sjump MomPhoneLandmark
+.text_slowpoke_well
+	db "SLOWPOKE WELL@"
+
+.goldenrod
+	getstring STRING_BUFFER_4, .text_radio_tower
+	sjump MomPhoneLandmark
+.text_radio_tower
+	db "RADIO TOWER@"
+
+MomPhonePalette2:
+	writetext MomOtherAreaText
+	promptbutton
+	sjump MomSavingMoney
+
+MomPhoneOther:
+	writetext MomDeterminedText
+	promptbutton
+	sjump MomSavingMoney
+
+MomSavingMoney:
+	checkflag ENGINE_MOM_SAVING_MONEY
+	iffalse .NotSaving
+	checkmoney MOMS_MONEY, 0
+	ifequal HAVE_MORE, .SavingHasMoney
+	sjump .SavingNoMoney
+
+.NotSaving:
+	checkmoney MOMS_MONEY, 0
+	ifequal HAVE_MORE, .HasMoney
+	sjump .NoMoney
+
+.SavingHasMoney:
+	getmoney STRING_BUFFER_3, MOMS_MONEY
+	writetext MomCheckBalanceText
+	yesorno
+	iftrue MomPhoneSaveMoneyScript
+	sjump MomPhoneStopSavingMoneyScript
+
+.SavingNoMoney:
+	writetext MomImportantToSaveText
+	yesorno
+	iftrue MomPhoneSaveMoneyScript
+	sjump MomPhoneStopSavingMoneyScript
+
+.NoMoney:
+	writetext MomYoureNotSavingText
+	yesorno
+	iftrue MomPhoneSaveMoneyScript
+	sjump MomPhoneStopSavingMoneyScript
+
+.HasMoney:
+	getmoney STRING_BUFFER_3, MOMS_MONEY
+	writetext MomYouveSavedText
+	yesorno
+	iftrue MomPhoneSaveMoneyScript
+	sjump MomPhoneStopSavingMoneyScript
+
+MomPhoneSaveMoneyScript:
+	setflag ENGINE_MOM_SAVING_MONEY
+	writetext MomOKIllSaveText
+	promptbutton
+	sjump MomPhoneHangUpScript
+
+MomPhoneStopSavingMoneyScript:
+	clearflag ENGINE_MOM_SAVING_MONEY
+	writetext MomPhoneStopSavingMoneyText
+	promptbutton
+	sjump MomPhoneHangUpScript
+
+MomPhoneHangUpScript:
+	writetext MomPhoneHangUpText
+	end
+
+MomPhoneNoPokemonScript:
+	writetext MomPhoneNoPokemonText
+	end
+
+MomPhoneNoPokedexScript:
+	writetext MomPhoneNoPokedexText
+	end
+
+MomPhoneNoGymQuestScript:
+	writetext MomPhoneNoGymQuestText
+	end
+
+MomPhoneLectureScript:
+	setevent EVENT_TALKED_TO_MOM_AFTER_MYSTERY_EGG_QUEST
+	setflag ENGINE_MOM_ACTIVE
+	specialphonecall SPECIALCALL_NONE
+	writetext MomPhoneLectureText
+	yesorno
+	iftrue MomPhoneSaveMoneyScript
+	sjump MomPhoneStopSavingMoneyScript
diff --git a/engine/phone/scripts/trainers.asm b/engine/phone/scripts/trainers.asm
new file mode 100644
index 00000000..8c22df62
--- /dev/null
+++ b/engine/phone/scripts/trainers.asm
@@ -0,0 +1,677 @@
+JackPhoneCalleeScript:
+	gettrainername STRING_BUFFER_3, SCHOOLBOY, JACK1
+	scall PhoneScript_AnswerPhone_Male
+	sjump Phone_GenericCall_Male
+
+JackPhoneCallerScript:
+	gettrainername STRING_BUFFER_3, SCHOOLBOY, JACK1
+	scall PhoneScript_GreetPhone_Male
+	scall PhoneScript_Random2
+	ifequal 0, .WantsBattle
+	scall PhoneScript_Random2
+	ifequal 0, Phone_CheckIfUnseenRare_Male
+	sjump Phone_GenericCall_Male
+
+.WantsBattle:
+	getstring STRING_BUFFER_5, PhoneNationalParkText
+	setevent EVENT_JACK_READY_FOR_REMATCH
+	sjump PhoneScript_WantsToBattle_Male
+
+BeverlyPhoneCalleeScript:
+	gettrainername STRING_BUFFER_3, POKEFANF, BEVERLY1
+	scall PhoneScript_AnswerPhone_Female
+	sjump Phone_GenericCall_Female
+
+BeverlyPhoneCallerScript:
+	gettrainername STRING_BUFFER_3, POKEFANF, BEVERLY1
+	scall PhoneScript_GreetPhone_Female
+	scall PhoneScript_Random2
+	ifequal 0, .WantsBattle
+	scall PhoneScript_Random2
+	ifequal 0, Phone_CheckIfUnseenRare_Female
+	sjump Phone_GenericCall_Female
+
+.WantsBattle:
+	getstring STRING_BUFFER_5, PhoneNationalParkText
+	setevent EVENT_BEVERLY_READY_FOR_REMATCH
+	sjump PhoneScript_WantsToBattle_Female
+
+HueyPhoneCalleeScript:
+	gettrainername STRING_BUFFER_3, SAILOR, HUEY1
+	scall PhoneScript_AnswerPhone_Male
+	sjump Phone_GenericCall_Male_SkipMon
+
+HueyPhoneCallerScript:
+	gettrainername STRING_BUFFER_3, SAILOR, HUEY1
+	scall PhoneScript_GreetPhone_Male
+	scall PhoneScript_Random2
+	ifequal 0, .WantsBattle
+	sjump Phone_GenericCall_Male_SkipMon
+
+.WantsBattle:
+	getstring STRING_BUFFER_5, PhoneLighthouseText
+	setevent EVENT_HUEY_READY_FOR_REMATCH
+	sjump PhoneScript_WantsToBattle_Male
+
+GavenPhoneCalleeScript:
+	gettrainername STRING_BUFFER_3, COOLTRAINERM, GAVEN3
+	scall PhoneScript_AnswerPhone_Male
+	sjump Phone_GenericCall_Male
+
+GavenPhoneCallerScript:
+	gettrainername STRING_BUFFER_3, COOLTRAINERM, GAVEN3
+	scall PhoneScript_GreetPhone_Male
+	scall PhoneScript_Random2
+	ifequal 0, .WantsBattle
+	scall PhoneScript_Random2
+	ifequal 0, Phone_CheckIfUnseenRare_Male
+	sjump Phone_GenericCall_Male
+
+.WantsBattle:
+	getstring STRING_BUFFER_5, PhoneRoute26Text
+	setevent EVENT_GAVEN_READY_FOR_REMATCH
+	sjump PhoneScript_WantsToBattle_Male
+
+BethPhoneCalleeScript:
+	gettrainername STRING_BUFFER_3, COOLTRAINERF, BETH1
+	scall PhoneScript_AnswerPhone_Female
+	sjump Phone_GenericCall_Female
+
+BethPhoneCallerScript:
+	gettrainername STRING_BUFFER_3, COOLTRAINERF, BETH1
+	scall PhoneScript_GreetPhone_Female
+	scall PhoneScript_Random2
+	ifequal 0, .WantsBattle
+	scall PhoneScript_Random2
+	ifequal 0, Phone_CheckIfUnseenRare_Female
+	sjump Phone_GenericCall_Female
+
+.WantsBattle:
+	getstring STRING_BUFFER_5, PhoneRoute26Text
+	setevent EVENT_BETH_READY_FOR_REMATCH
+	sjump PhoneScript_WantsToBattle_Female
+
+JosePhoneCalleeScript:
+	gettrainername STRING_BUFFER_3, BIRD_KEEPER, JOSE2
+	scall PhoneScript_AnswerPhone_Male
+	sjump Phone_GenericCall_Male
+
+JosePhoneCallerScript:
+	gettrainername STRING_BUFFER_3, BIRD_KEEPER, JOSE2
+	scall PhoneScript_Random4
+	ifequal 0, Phone_WrongNumber_JoseBrent
+	scall PhoneScript_GreetPhone_Male
+	scall PhoneScript_Random2
+	ifequal 0, .WantsBattle
+	scall PhoneScript_Random2
+	ifequal 0, Phone_CheckIfUnseenRare_Male
+	sjump Phone_GenericCall_Male
+
+.WantsBattle:
+	getstring STRING_BUFFER_5, PhoneRoute27Text
+	setevent EVENT_JOSE_READY_FOR_REMATCH
+	sjump PhoneScript_WantsToBattle_Male
+
+ReenaPhoneCalleeScript:
+	gettrainername STRING_BUFFER_3, COOLTRAINERF, REENA1
+	scall PhoneScript_AnswerPhone_Female
+	sjump Phone_GenericCall_Female
+
+ReenaPhoneCallerScript:
+	gettrainername STRING_BUFFER_3, COOLTRAINERF, REENA1
+	scall PhoneScript_GreetPhone_Female
+	scall PhoneScript_Random2
+	ifequal 0, .WantsBattle
+	scall PhoneScript_Random2
+	ifequal 0, Phone_CheckIfUnseenRare_Female
+	sjump Phone_GenericCall_Female
+
+.WantsBattle:
+	getstring STRING_BUFFER_5, PhoneRoute27Text
+	setevent EVENT_REENA_READY_FOR_REMATCH
+	sjump PhoneScript_WantsToBattle_Female
+
+JoeyPhoneCalleeScript:
+	gettrainername STRING_BUFFER_3, YOUNGSTER, JOEY1
+	scall PhoneScript_AnswerPhone_Male
+	sjump Phone_GenericCall_Male
+
+JoeyPhoneCallerScript:
+	gettrainername STRING_BUFFER_3, YOUNGSTER, JOEY1
+	scall PhoneScript_GreetPhone_Male
+	checkflag ENGINE_FLYPOINT_GOLDENROD
+	iffalse .NoBattle
+	scall PhoneScript_Random2
+	ifequal 0, .WantsBattle
+
+.NoBattle:
+	scall PhoneScript_Random2
+	ifequal 0, Phone_CheckIfUnseenRare_Male
+	sjump Phone_GenericCall_Male
+
+.WantsBattle:
+	getstring STRING_BUFFER_5, PhoneRoute30Text
+	setevent EVENT_JOEY_READY_FOR_REMATCH
+	sjump PhoneScript_WantsToBattle_Male
+
+WadePhoneCalleeScript:
+	gettrainername STRING_BUFFER_3, BUG_CATCHER, WADE1
+	scall PhoneScript_AnswerPhone_Male
+	scall PhoneScript_Random2
+	ifequal 0, .Generic
+	checkflag ENGINE_DAILY_BUG_CONTEST
+	iftrue .Generic
+	readvar VAR_WEEKDAY
+	ifequal TUESDAY, PhoneScript_BugCatchingContest
+	ifequal THURSDAY, PhoneScript_BugCatchingContest
+	ifequal SATURDAY, PhoneScript_BugCatchingContest
+
+.Generic:
+	sjump Phone_GenericCall_Male
+
+WadePhoneCallerScript:
+	gettrainername STRING_BUFFER_3, BUG_CATCHER, WADE1
+	scall PhoneScript_GreetPhone_Male
+	scall PhoneScript_Random2
+	ifequal 0, .NoContest
+	checkflag ENGINE_DAILY_BUG_CONTEST
+	iftrue .NoContest
+	readvar VAR_WEEKDAY
+	ifequal TUESDAY, PhoneScript_BugCatchingContest
+	ifequal THURSDAY, PhoneScript_BugCatchingContest
+	ifequal SATURDAY, PhoneScript_BugCatchingContest
+
+.NoContest:
+	checkflag ENGINE_FLYPOINT_GOLDENROD
+	iffalse .NoBattle
+	scall PhoneScript_Random2
+	ifequal 0, .WantsBattle
+
+.NoBattle:
+	scall PhoneScript_Random2
+	ifequal 0, Phone_CheckIfUnseenRare_Male
+	sjump Phone_GenericCall_Male
+
+.WantsBattle:
+	getstring STRING_BUFFER_5, PhoneRoute31Text
+	setevent EVENT_WADE_READY_FOR_REMATCH
+	sjump PhoneScript_WantsToBattle_Male
+
+RalphPhoneCalleeScript:
+	gettrainername STRING_BUFFER_3, FISHER, RALPH1
+	scall PhoneScript_AnswerPhone_Male
+	sjump Phone_GenericCall_Male
+
+RalphPhoneCallerScript:
+	gettrainername STRING_BUFFER_3, FISHER, RALPH1
+	scall PhoneScript_GreetPhone_Male
+	checkflag ENGINE_FLYPOINT_GOLDENROD
+	iffalse .NoBattle
+	scall PhoneScript_Random2
+	ifequal 0, .WantsBattle
+
+.NoBattle:
+	scall PhoneScript_Random2
+	ifequal 0, .QwilfishSwarm
+	scall PhoneScript_Random2
+	ifequal 0, Phone_CheckIfUnseenRare_Male
+	sjump Phone_GenericCall_Male
+
+.WantsBattle:
+	getstring STRING_BUFFER_5, PhoneRoute32Text
+	setevent EVENT_RALPH_READY_FOR_REMATCH
+	sjump PhoneScript_WantsToBattle_Male
+
+.QwilfishSwarm:
+	checkflag ENGINE_SWARM
+	iftrue Phone_GenericCall_Male
+	getmonname STRING_BUFFER_4, QWILFISH
+	getstring STRING_BUFFER_5, PhoneRoute32Text
+	setval FISHSWARM_QWILFISH
+	special ActivateFishingSwarm
+	sjump PhoneScript_SwarmFish
+
+LizPhoneCalleeScript:
+	gettrainername STRING_BUFFER_3, PICNICKER, LIZ1
+	scall PhoneScript_AnswerPhone_Female
+	sjump Phone_GenericCall_Female
+
+LizPhoneCallerScript:
+	gettrainername STRING_BUFFER_3, PICNICKER, LIZ1
+	scall PhoneScript_GreetPhone_Female
+	checkflag ENGINE_FLYPOINT_GOLDENROD
+	iffalse .NoBattle
+	scall PhoneScript_Random2
+	ifequal 0, .WantsBattle
+
+.NoBattle:
+	scall PhoneScript_Random2
+	ifequal 0, Phone_CheckIfUnseenRare_Female
+	sjump Phone_GenericCall_Female
+
+.WantsBattle:
+	getstring STRING_BUFFER_5, PhoneRoute32Text
+	setevent EVENT_LIZ_READY_FOR_REMATCH
+	sjump PhoneScript_WantsToBattle_Female
+
+AnthonyPhoneCalleeScript:
+	gettrainername STRING_BUFFER_3, HIKER, ANTHONY2
+	scall PhoneScript_AnswerPhone_Male
+	sjump Phone_GenericCall_Male
+
+AnthonyPhoneCallerScript:
+	gettrainername STRING_BUFFER_3, HIKER, ANTHONY2
+	scall PhoneScript_GreetPhone_Male
+	checkflag ENGINE_FLYPOINT_GOLDENROD
+	iffalse .NoBattle
+	scall PhoneScript_Random2
+	ifequal 0, .WantsBattle
+
+.NoBattle:
+	scall PhoneScript_Random2
+	ifequal 0, .DunsparceSwarm
+	scall PhoneScript_Random2
+	ifequal 0, Phone_CheckIfUnseenRare_Male
+	sjump Phone_GenericCall_Male
+
+.WantsBattle:
+	getstring STRING_BUFFER_5, PhoneRoute33Text
+	setevent EVENT_ANTHONY_READY_FOR_REMATCH
+	sjump PhoneScript_WantsToBattle_Male
+
+.DunsparceSwarm:
+	checkflag ENGINE_SWARM
+	iftrue Phone_GenericCall_Male
+	getmonname STRING_BUFFER_4, DUNSPARCE
+	getstring STRING_BUFFER_5, PhoneDarkCaveText
+	swarm DARK_CAVE_VIOLET_ENTRANCE
+	sjump PhoneScript_SwarmCave
+
+ToddPhoneCalleeScript:
+	gettrainername STRING_BUFFER_3, CAMPER, TODD1
+	scall PhoneScript_AnswerPhone_Male
+	sjump Phone_GenericCall_Male
+
+ToddPhoneCallerScript:
+	gettrainername STRING_BUFFER_3, CAMPER, TODD1
+	scall PhoneScript_GreetPhone_Male
+	checkflag ENGINE_FLYPOINT_GOLDENROD
+	iffalse .NoBattle
+	scall PhoneScript_Random2
+	ifequal 0, .WantsBattle
+
+.NoBattle:
+	scall PhoneScript_Random2
+	ifequal 0, Phone_CheckIfUnseenRare_Male
+	sjump Phone_GenericCall_Male
+
+.WantsBattle:
+	getstring STRING_BUFFER_5, PhoneRoute34Text
+	setevent EVENT_TODD_READY_FOR_REMATCH
+	sjump PhoneScript_WantsToBattle_Male
+
+GinaPhoneCalleeScript:
+	gettrainername STRING_BUFFER_3, PICNICKER, GINA1
+	scall PhoneScript_AnswerPhone_Female
+	checkflag ENGINE_ROCKETS_IN_RADIO_TOWER
+	iftrue GinaRocketRumorScript
+	sjump Phone_GenericCall_Female
+
+GinaPhoneCallerScript:
+	gettrainername STRING_BUFFER_3, PICNICKER, GINA1
+	scall PhoneScript_GreetPhone_Female
+	checkflag ENGINE_ROCKETS_IN_RADIO_TOWER
+	iftrue GinaRocketRumorScript
+	checkflag ENGINE_FLYPOINT_GOLDENROD
+	iffalse .NoBattle
+	scall PhoneScript_Random2
+	ifequal 0, .WantsBattle
+
+.NoBattle:
+	scall PhoneScript_Random2
+	ifequal 0, Phone_CheckIfUnseenRare_Female
+	sjump Phone_GenericCall_Female
+
+.WantsBattle:
+	getstring STRING_BUFFER_5, PhoneRoute34Text
+	setevent EVENT_GINA_READY_FOR_REMATCH
+	sjump PhoneScript_WantsToBattle_Female
+
+IrwinPhoneCalleeScript:
+	gettrainername STRING_BUFFER_3, JUGGLER, IRWIN1
+	scall PhoneScript_AnswerPhone_Male
+	checkflag ENGINE_ROCKETS_IN_RADIO_TOWER
+	iftrue IrwinRocketRumorScript
+	sjump Phone_GenericCall_Male
+
+IrwinPhoneCallerScript:
+	gettrainername STRING_BUFFER_3, JUGGLER, IRWIN1
+	scall PhoneScript_GreetPhone_Male
+	checkflag ENGINE_ROCKETS_IN_RADIO_TOWER
+	iftrue IrwinRocketRumorScript
+	scall PhoneScript_Random2
+	ifequal 0, .WantsBattle
+	scall PhoneScript_Random2
+	ifequal 0, Phone_CheckIfUnseenRare_Male
+	sjump Phone_GenericCall_Male
+
+.WantsBattle:
+	getstring STRING_BUFFER_5, PhoneRoute35Text
+	setevent EVENT_IRWIN_READY_FOR_REMATCH
+	sjump PhoneScript_WantsToBattle_Male
+
+ArniePhoneCalleeScript:
+	gettrainername STRING_BUFFER_3, BUG_CATCHER, ARNIE1
+	scall PhoneScript_AnswerPhone_Male
+	sjump Phone_GenericCall_Male
+
+ArniePhoneCallerScript:
+	gettrainername STRING_BUFFER_3, BUG_CATCHER, ARNIE1
+	scall PhoneScript_GreetPhone_Male
+	scall PhoneScript_Random2
+	ifequal 0, .WantsBattle
+	scall PhoneScript_Random2
+	ifequal 0, .YanmaSwarm
+	scall PhoneScript_Random2
+	ifequal 0, Phone_CheckIfUnseenRare_Male
+	sjump Phone_GenericCall_Male
+
+.WantsBattle:
+	getstring STRING_BUFFER_5, PhoneRoute35Text
+	setevent EVENT_ARNIE_READY_FOR_REMATCH
+	sjump PhoneScript_WantsToBattle_Male
+
+.YanmaSwarm:
+	checkflag ENGINE_SWARM
+	iftrue Phone_GenericCall_Male
+	getmonname STRING_BUFFER_4, YANMA
+	getstring STRING_BUFFER_5, PhoneRoute35Text
+	swarm ROUTE_35
+	sjump PhoneScript_SwarmGrass
+
+AlanPhoneCalleeScript:
+	gettrainername STRING_BUFFER_3, SCHOOLBOY, ALAN1
+	scall PhoneScript_AnswerPhone_Male
+	sjump Phone_GenericCall_Male
+
+AlanPhoneCallerScript:
+	gettrainername STRING_BUFFER_3, SCHOOLBOY, ALAN1
+	scall PhoneScript_GreetPhone_Male
+	scall PhoneScript_Random2
+	ifequal 0, .WantsBattle
+	scall PhoneScript_Random2
+	ifequal 0, Phone_CheckIfUnseenRare_Male
+	sjump Phone_GenericCall_Male
+
+.WantsBattle:
+	getstring STRING_BUFFER_5, PhoneRoute36Text
+	setevent EVENT_ALAN_READY_FOR_REMATCH
+	sjump PhoneScript_WantsToBattle_Male
+
+DanaPhoneCalleeScript:
+	gettrainername STRING_BUFFER_3, LASS, DANA1
+	scall PhoneScript_AnswerPhone_Female
+	sjump Phone_GenericCall_Female
+
+DanaPhoneCallerScript:
+	gettrainername STRING_BUFFER_3, LASS, DANA1
+	scall PhoneScript_GreetPhone_Female
+	scall PhoneScript_Random2
+	ifequal 0, .WantsBattle
+	scall PhoneScript_Random2
+	ifequal 0, Phone_CheckIfUnseenRare_Female
+	sjump Phone_GenericCall_Female
+
+.WantsBattle:
+	getstring STRING_BUFFER_5, PhoneRoute38Text
+	setevent EVENT_DANA_READY_FOR_REMATCH
+	sjump PhoneScript_WantsToBattle_Female
+
+ChadPhoneCalleeScript:
+	gettrainername STRING_BUFFER_3, SCHOOLBOY, CHAD1
+	scall PhoneScript_AnswerPhone_Male
+	sjump Phone_GenericCall_Male
+
+ChadPhoneCallerScript:
+	gettrainername STRING_BUFFER_3, SCHOOLBOY, CHAD1
+	scall PhoneScript_GreetPhone_Male
+	scall PhoneScript_Random2
+	ifequal 0, .SnubbullSwarm
+	scall PhoneScript_Random2
+	ifequal 0, .WantsBattle
+	scall PhoneScript_Random2
+	ifequal 0, Phone_CheckIfUnseenRare_Male
+	sjump Phone_GenericCall_Male
+
+.SnubbullSwarm:
+	checkflag ENGINE_SWARM
+	iftrue Phone_GenericCall_Male
+	getmonname STRING_BUFFER_4, SNUBBULL
+	getstring STRING_BUFFER_5, PhoneRoute38Text
+	swarm ROUTE_38
+	sjump PhoneScript_SwarmGrass
+
+.WantsBattle:
+	getstring STRING_BUFFER_5, PhoneRoute38Text
+	setevent EVENT_CHAD_READY_FOR_REMATCH
+	sjump PhoneScript_WantsToBattle_Male
+
+DerekPhoneCalleeScript:
+	gettrainername STRING_BUFFER_3, POKEFANM, DEREK1
+	scall PhoneScript_AnswerPhone_Male
+	scall PhoneScript_Random2
+	ifequal 0, .Generic
+	checkflag ENGINE_DAILY_BUG_CONTEST
+	iftrue .Generic
+	readvar VAR_WEEKDAY
+	ifequal TUESDAY, PhoneScript_BugCatchingContest
+	ifequal THURSDAY, PhoneScript_BugCatchingContest
+	ifequal SATURDAY, PhoneScript_BugCatchingContest
+
+.Generic:
+	sjump Phone_GenericCall_Male
+
+DerekPhoneCallerScript:
+	gettrainername STRING_BUFFER_3, POKEFANM, DEREK1
+	scall PhoneScript_GreetPhone_Male
+	scall PhoneScript_Random2
+	ifequal 0, .NoContest
+	checkflag ENGINE_DAILY_BUG_CONTEST
+	iftrue .NoContest
+	readvar VAR_WEEKDAY
+	ifequal TUESDAY, PhoneScript_BugCatchingContest
+	ifequal THURSDAY, PhoneScript_BugCatchingContest
+	ifequal SATURDAY, PhoneScript_BugCatchingContest
+
+.NoContest:
+	scall PhoneScript_Random2
+	ifequal 0, .WantsBattle
+	scall PhoneScript_Random2
+	ifequal 0, Phone_CheckIfUnseenRare_Male
+	sjump Phone_GenericCall_Male
+
+.WantsBattle:
+	getstring STRING_BUFFER_5, PhoneRoute39Text
+	setevent EVENT_DEREK_READY_FOR_REMATCH
+	sjump PhoneScript_WantsToBattle_Male
+
+ChrisPhoneCalleeScript:
+	gettrainername STRING_BUFFER_3, FISHER, CHRIS1
+	scall PhoneScript_AnswerPhone_Male
+	sjump Phone_GenericCall_Male
+
+ChrisPhoneCallerScript:
+	gettrainername STRING_BUFFER_3, FISHER, CHRIS1
+	scall PhoneScript_GreetPhone_Male
+	scall PhoneScript_Random2
+	ifequal 0, .WantsBattle
+	scall PhoneScript_Random2
+	ifequal 0, Phone_CheckIfUnseenRare_Male
+	sjump Phone_GenericCall_Male
+
+.WantsBattle:
+	getstring STRING_BUFFER_5, PhoneRoute42Text
+	setevent EVENT_CHRIS_READY_FOR_REMATCH
+	sjump PhoneScript_WantsToBattle_Male
+
+BrentPhoneCalleeScript:
+	gettrainername STRING_BUFFER_3, POKEMANIAC, BRENT1
+	scall PhoneScript_AnswerPhone_Male
+	sjump Phone_GenericCall_Male
+
+BrentPhoneCallerScript:
+	gettrainername STRING_BUFFER_3, POKEMANIAC, BRENT1
+	scall PhoneScript_Random4
+	ifequal 0, Phone_WrongNumber_JoseBrent
+	scall PhoneScript_GreetPhone_Male
+	scall PhoneScript_Random2
+	ifequal 0, .WantsBattle
+	scall PhoneScript_Random2
+	ifequal 0, Phone_CheckIfUnseenRare_Male
+	sjump Phone_GenericCall_Male
+
+.WantsBattle:
+	getstring STRING_BUFFER_5, PhoneRoute43Text
+	setevent EVENT_BRENT_READY_FOR_REMATCH
+	sjump PhoneScript_WantsToBattle_Male
+
+TiffanyPhoneCalleeScript:
+	gettrainername STRING_BUFFER_3, PICNICKER, TIFFANY3
+	scall PhoneScript_AnswerPhone_Female
+	sjump Phone_GenericCall_Female
+
+TiffanyPhoneCallerScript:
+	gettrainername STRING_BUFFER_3, PICNICKER, TIFFANY3
+	scall PhoneScript_Random4
+	ifequal 0, Phone_WrongNumber_Tiffany
+	scall PhoneScript_GreetPhone_Female
+	scall PhoneScript_Random2
+	ifequal 0, .WantsBattle
+	scall PhoneScript_Random2
+	ifequal 0, Phone_CheckIfUnseenRare_Female
+	sjump Phone_GenericCall_Female
+
+.WantsBattle:
+	getstring STRING_BUFFER_5, PhoneRoute43Text
+	setevent EVENT_TIFFANY_READY_FOR_REMATCH
+	sjump PhoneScript_WantsToBattle_Female
+
+VancePhoneCalleeScript:
+	gettrainername STRING_BUFFER_3, BIRD_KEEPER, VANCE1
+	scall PhoneScript_AnswerPhone_Male
+	sjump Phone_GenericCall_Male
+
+VancePhoneCallerScript:
+	gettrainername STRING_BUFFER_3, BIRD_KEEPER, VANCE1
+	scall PhoneScript_GreetPhone_Male
+	scall PhoneScript_Random2
+	ifequal 0, .WantsBattle
+	scall PhoneScript_Random2
+	ifequal 0, Phone_CheckIfUnseenRare_Male
+	sjump Phone_GenericCall_Male
+
+.WantsBattle:
+	getstring STRING_BUFFER_5, PhoneRoute44Text
+	setevent EVENT_VANCE_READY_FOR_REMATCH
+	sjump PhoneScript_WantsToBattle_Male
+
+WiltonPhoneCalleeScript:
+	gettrainername STRING_BUFFER_3, FISHER, WILTON1
+	scall PhoneScript_AnswerPhone_Male
+	sjump Phone_GenericCall_Male
+
+WiltonPhoneCallerScript:
+	gettrainername STRING_BUFFER_3, FISHER, WILTON1
+	scall PhoneScript_GreetPhone_Male
+	scall PhoneScript_Random2
+	ifequal 0, .RemoraidSwarm
+	scall PhoneScript_Random2
+	ifequal 0, .WantsBattle
+	scall PhoneScript_Random2
+	ifequal 0, Phone_CheckIfUnseenRare_Male
+	sjump Phone_GenericCall_Male
+
+.RemoraidSwarm:
+	checkflag ENGINE_SWARM
+	iftrue Phone_GenericCall_Male
+	getmonname STRING_BUFFER_4, REMORAID
+	getstring STRING_BUFFER_5, PhoneRoute44Text
+	setval FISHSWARM_REMORAID
+	special ActivateFishingSwarm
+	sjump PhoneScript_SwarmFish
+
+.WantsBattle:
+	getstring STRING_BUFFER_5, PhoneRoute44Text
+	setevent EVENT_WILTON_READY_FOR_REMATCH
+	sjump PhoneScript_WantsToBattle_Male
+
+KenjiPhoneCalleeScript:
+	gettrainername STRING_BUFFER_3, BLACKBELT_T, KENJI3
+	scall PhoneScript_AnswerPhone_Male
+	sjump Phone_GenericCall_Male
+
+KenjiPhoneCallerScript:
+	gettrainername STRING_BUFFER_3, BLACKBELT_T, KENJI3
+	scall PhoneScript_GreetPhone_Male
+	scall PhoneScript_Random2
+	ifequal 0, .WantsBattle
+	scall PhoneScript_Random2
+	ifequal 0, Phone_CheckIfUnseenRare_Male
+	sjump Phone_GenericCall_Male
+
+.WantsBattle:
+	getstring STRING_BUFFER_5, PhoneRoute45Text
+	setevent EVENT_KENJI_READY_FOR_REMATCH
+	sjump PhoneScript_WantsToBattle_Male
+
+ParryPhoneCalleeScript:
+	gettrainername STRING_BUFFER_3, HIKER, PARRY1
+	scall PhoneScript_AnswerPhone_Male
+	sjump Phone_GenericCall_Male
+
+ParryPhoneCallerScript:
+	gettrainername STRING_BUFFER_3, HIKER, PARRY1
+	scall PhoneScript_GreetPhone_Male
+	scall PhoneScript_Random2
+	ifequal 0, .MarillSwarm
+	scall PhoneScript_Random2
+	ifequal 0, .WantsBattle
+	scall PhoneScript_Random2
+	ifequal 0, Phone_CheckIfUnseenRare_Male
+	sjump Phone_GenericCall_Male
+
+.MarillSwarm:
+	checkflag ENGINE_SWARM
+	iftrue Phone_GenericCall_Male
+	getmonname STRING_BUFFER_4, MARILL
+	getstring STRING_BUFFER_5, PhoneMtMortarText
+	swarm MOUNT_MORTAR_1F_OUTSIDE
+	sjump PhoneScript_SwarmCave
+
+.WantsBattle:
+	getstring STRING_BUFFER_5, PhoneRoute45Text
+	setevent EVENT_PARRY_READY_FOR_REMATCH
+	sjump PhoneScript_WantsToBattle_Male
+
+ErinPhoneCalleeScript:
+	gettrainername STRING_BUFFER_3, PICNICKER, ERIN1
+	scall PhoneScript_AnswerPhone_Female
+	sjump Phone_GenericCall_Female
+
+ErinPhoneCallerScript:
+	gettrainername STRING_BUFFER_3, PICNICKER, ERIN1
+	scall PhoneScript_GreetPhone_Female
+	scall PhoneScript_Random2
+	ifequal 0, .WantsBattle
+	scall PhoneScript_Random2
+	ifequal 0, Phone_CheckIfUnseenRare_Female
+	sjump Phone_GenericCall_Female
+
+.WantsBattle:
+	getstring STRING_BUFFER_5, PhoneRoute46Text
+	setevent EVENT_ERIN_READY_FOR_REMATCH
+	sjump PhoneScript_WantsToBattle_Female
+
+INCLUDE "engine/phone/scripts/generic.asm"
+
+INCLUDE "data/phone/text/landmarks.asm"
diff --git a/engine/phone/scripts/unused.asm b/engine/phone/scripts/unused.asm
new file mode 100644
index 00000000..08d67f60
--- /dev/null
+++ b/engine/phone/scripts/unused.asm
@@ -0,0 +1,3 @@
+UnusedPhoneScript:
+	writetext UnusedPhoneText
+	end
diff --git a/layout.link b/layout.link
index 1512a858..a527bdb5 100644
--- a/layout.link
+++ b/layout.link
@@ -156,7 +156,7 @@ ROMX $3f
 ROMX $40
 	"Standard Scripts"
 ROMX $41
-	"bank41"
+	"Phone Scripts"
 ROMX $42
 	"Map Scripts 1"
 ROMX $43
diff --git a/main.asm b/main.asm
index 9a8b6b98..3fda5410 100644
--- a/main.asm
+++ b/main.asm
@@ -883,137 +883,20 @@ INCLUDE "data/text/std_text.asm"
 INCLUDE "data/text/battle.asm"
 
 
-SECTION "bank41", ROMX
-
-; Phone scripts and text
-UnusedPhoneScript::
-	dr $104000, $104004
-MomPhoneCalleeScript::
-	dr $104004, $104124
-MomPhoneLectureScript::
-	dr $104124, $104137
-BillPhoneCalleeScript::
-	dr $104137, $104172
-BillPhoneCallerScript::
-	dr $104172, $104177
-ElmPhoneCalleeScript::
-	dr $104177, $1041e1
-ElmPhoneCallerScript::
-	dr $1041e1, $10422a
-JackPhoneCalleeScript::
-	dr $10422a, $104234
-JackPhoneCallerScript::
-	dr $104234, $104256
-BeverlyPhoneCalleeScript::
-	dr $104256, $104260
-BeverlyPhoneCallerScript::
-	dr $104260, $104282
-HueyPhoneCalleeScript::
-	dr $104282, $10428c
-HueyPhoneCallerScript::
-	dr $10428c, $1042a7
-GavenPhoneCalleeScript::
-	dr $1042a7, $1042b1
-GavenPhoneCallerScript::
-	dr $1042b1, $1042d3
-BethPhoneCalleeScript::
-	dr $1042d3, $1042dd
-BethPhoneCallerScript::
-	dr $1042dd, $1042ff
-JosePhoneCalleeScript::
-	dr $1042ff, $104309
-JosePhoneCallerScript::
-	dr $104309, $104332
-ReenaPhoneCalleeScript::
-	dr $104332, $10433c
-ReenaPhoneCallerScript::
-	dr $10433c, $10435e
-JoeyPhoneCalleeScript::
-	dr $10435e, $104368
-JoeyPhoneCallerScript::
-	dr $104368, $104390
-WadePhoneCalleeScript::
-	dr $104390, $1043b5
-WadePhoneCallerScript::
-	dr $1043b5, $1043f8
-RalphPhoneCalleeScript::
-	dr $1043f8, $104402
-RalphPhoneCallerScript::
-	dr $104402, $104446
-LizPhoneCalleeScript::
-	dr $104446, $104450
-LizPhoneCallerScript::
-	dr $104450, $104478
-AnthonyPhoneCalleeScript::
-	dr $104478, $104482
-AnthonyPhoneCallerScript::
-	dr $104482, $1044c4
-ToddPhoneCalleeScript::
-	dr $1044c4, $1044ce
-ToddPhoneCallerScript::
-	dr $1044ce, $1044f6
-GinaPhoneCalleeScript::
-	dr $1044f6, $104506
-GinaPhoneCallerScript::
-	dr $104506, $104534
-IrwinPhoneCalleeScript::
-	dr $104534, $104544
-IrwinPhoneCallerScript::
-	dr $104544, $10456c
-ArniePhoneCalleeScript::
-	dr $10456c, $104576
-ArniePhoneCallerScript::
-	dr $104576, $1045b2
-AlanPhoneCalleeScript::
-	dr $1045b2, $1045bc
-AlanPhoneCallerScript::
-	dr $1045bc, $1045de
-DanaPhoneCalleeScript::
-	dr $1045de, $1045e8
-DanaPhoneCallerScript::
-	dr $1045e8, $10460a
-ChadPhoneCalleeScript::
-	dr $10460a, $104614
-ChadPhoneCallerScript::
-	dr $104614, $104650
-DerekPhoneCalleeScript::
-	dr $104650, $104675
-DerekPhoneCallerScript::
-	dr $104675, $1046b2
-ChrisPhoneCalleeScript::
-	dr $1046b2, $1046bc
-ChrisPhoneCallerScript::
-	dr $1046bc, $1046de
-BrentPhoneCalleeScript::
-	dr $1046de, $1046e8
-BrentPhoneCallerScript::
-	dr $1046e8, $104711
-TiffanyPhoneCalleeScript::
-	dr $104711, $10471b
-TiffanyPhoneCallerScript::
-	dr $10471b, $104744
-VancePhoneCalleeScript::
-	dr $104744, $10474e
-VancePhoneCallerScript::
-	dr $10474e, $104770
-WiltonPhoneCalleeScript::
-	dr $104770, $10477a
-WiltonPhoneCallerScript::
-	dr $10477a, $1047b8
-KenjiPhoneCalleeScript::
-	dr $1047b8, $1047c2
-KenjiPhoneCallerScript::
-	dr $1047c2, $1047e4
-ParryPhoneCalleeScript::
-	dr $1047e4, $1047ee
-ParryPhoneCallerScript::
-	dr $1047ee, $10482a
-ErinPhoneCalleeScript::
-	dr $10482a, $104834
-ErinPhoneCallerScript::
-	dr $104834, $104a80
-BikeShopPhoneCallerScript::
-	dr $104a80, $10614d
+SECTION "Phone Scripts", ROMX
+
+INCLUDE "engine/phone/scripts/unused.asm"
+INCLUDE "engine/phone/scripts/mom.asm"
+INCLUDE "engine/phone/scripts/bill.asm"
+INCLUDE "engine/phone/scripts/elm.asm"
+INCLUDE "engine/phone/scripts/trainers.asm"
+INCLUDE "engine/phone/scripts/bike_shop.asm"
+INCLUDE "data/phone/text/unused.asm"
+INCLUDE "data/phone/text/mom.asm"
+INCLUDE "data/phone/text/bill.asm"
+INCLUDE "data/phone/text/elm.asm"
+INCLUDE "data/phone/text/trainers.asm"
+INCLUDE "data/phone/text/bike_shop.asm"
 
 
 SECTION "Names", ROMX