diff --git a/data/event_scripts.s b/data/event_scripts.s
index aa112c8b91..dd84011d50 100644
--- a/data/event_scripts.s
+++ b/data/event_scripts.s
@@ -825,21 +825,30 @@ Common_EventScript_PlayerHandedOverTheItem::
 	.include "data/scripts/elite_four.inc"
 	.include "data/scripts/movement.inc"
 	.include "data/scripts/check_furniture.inc"
+
+.ifdef ENGLISH
 	.include "data/text/record_mix.inc"
 	.include "data/text/pc.inc"
 	.include "data/text/pkmn_center_nurse.inc"
 	.include "data/text/mart_clerk.inc"
 	.include "data/text/obtain_item.inc"
-.ifdef ENGLISH
 	.include "data/text/general.inc"
-.else
-.ifdef FRENCH
-	.include "data/text/general_fr.inc"
-.endif
-.endif
 	.include "data/text/pc_transfer.inc"
 	.include "data/text/questionnaire.inc"
 	.include "data/text/abnormal_weather.inc"
+.else
+.ifdef FRENCH
+	.include "data/text/fr/record_mix.inc"
+	.include "data/text/fr/pc.inc"
+	.include "data/text/fr/pkmn_center_nurse.inc"
+	.include "data/text/fr/mart_clerk.inc"
+	.include "data/text/fr/obtain_item.inc"
+	.include "data/text/fr/general.inc"
+	.include "data/text/fr/pc_transfer.inc"
+	.include "data/text/fr/questionnaire.inc"
+	.include "data/text/fr/abnormal_weather.inc"
+.endif
+.endif
 
 EventScript_SelectWithoutRegisteredItem::
 	msgbox gText_SelectWithoutRegisteredItem, MSGBOX_SIGN
@@ -918,6 +927,7 @@ Common_EventScript_LegendaryFlewAway::
 	.include "data/scripts/repel.inc"
 	.include "data/scripts/safari_zone.inc"
 	.include "data/scripts/roulette.inc"
+.ifdef ENGLISH
 	.include "data/text/pokedex_rating.inc"
 	.include "data/text/lottery_corner.inc"
 	.include "data/text/event_ticket_1.inc"
@@ -925,6 +935,17 @@ Common_EventScript_LegendaryFlewAway::
 	.include "data/text/berries.inc"
 	.include "data/text/shoal_cave.inc"
 	.include "data/text/check_furniture.inc"
+.else
+.ifdef FRENCH
+	.include "data/text/fr/pokedex_rating.inc"
+	.include "data/text/fr/lottery_corner.inc"
+	.include "data/text/fr/event_ticket_1.inc"
+	.include "data/text/fr/braille.inc"
+	.include "data/text/fr/berries.inc"
+	.include "data/text/fr/shoal_cave.inc"
+	.include "data/text/fr/check_furniture.inc"
+.endif
+.endif
 	.include "data/scripts/cave_hole.inc"
 	.include "data/scripts/lilycove_lady.inc"
 	.include "data/text/match_call.inc"
diff --git a/data/text/contest_strings.inc b/data/text/contest_strings.inc
index 948c19922d..771799d27c 100644
--- a/data/text/contest_strings.inc
+++ b/data/text/contest_strings.inc
@@ -263,11 +263,11 @@ gText_MonAppealedWithMove::
 
 gText_MonWasWatchingOthers::
 	.string "{STR_VAR_1} was watching\n"
-	.string "the others.{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}$"
+	.string "the others.{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}$"
 
 gText_AllOutOfAppealTime::
 	.string "We're all out of\n"
-	.string "Appeal Time!{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}$"
+	.string "Appeal Time!{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}$"
 
 @ Unused appeal result texts
 
@@ -603,121 +603,121 @@ gText_ScrambledUpOrderForNextTurn::
 
 gText_JudgeLookedAtMonExpectantly::
 	.string "The JUDGE looked at\n"
-	.string "{STR_VAR_1} expectantly.{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}$"
+	.string "{STR_VAR_1} expectantly.{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}$"
 
 gText_AppealComboWentOverWell::
 	.string "The appeal combo went\n"
-	.string "over well.{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}$"
+	.string "over well.{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}$"
 
 gText_AppealComboWentOverVeryWell::
 	.string "The appeal combo went\n"
-	.string "over very well.{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}$"
+	.string "over very well.{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}$"
 
 gText_AppealComboWentOverExcellently::
 	.string "The appeal combo went\n"
-	.string "over excellently.{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}$"
+	.string "over excellently.{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}$"
 
 gText_MonManagedToAvertGaze::
 	.string "{STR_VAR_1} managed to\n"
-	.string "avert its gaze.{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}$"
+	.string "avert its gaze.{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}$"
 
 gText_MonManagedToAvoidSeeingIt::
 	.string "{STR_VAR_1} managed to\n"
-	.string "avoid seeing it.{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}$"
+	.string "avoid seeing it.{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}$"
 
 gText_MonIsntFazedByThatSortOfThing::
 	.string "{STR_VAR_1} isn't fazed\n"
-	.string "by that sort of thing.{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}$"
+	.string "by that sort of thing.{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}$"
 
 gText_MonBecameALittleDistracted::
 	.string "{STR_VAR_1} became a\n"
-	.string "little distracted.{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}$"
+	.string "little distracted.{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}$"
 
 gText_TriedToStartleOtherPokemon::
 	.string "It tried to startle the\n"
-	.string "other POKéMON.{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}$"
+	.string "other POKéMON.{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}$"
 
 gText_MonLookedDownOutOfDistraction::
 	.string "{STR_VAR_1} looked down\n"
-	.string "out of distraction.{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}$"
+	.string "out of distraction.{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}$"
 
 gText_MonTurnedBackOutOfDistraction::
 	.string "{STR_VAR_1} turned back\n"
-	.string "out of distraction.{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}$"
+	.string "out of distraction.{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}$"
 
 gText_MonCouldntHelpUtteringCry::
 	.string "{STR_VAR_1} couldn't help\n"
-	.string "uttering a cry.{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}$"
+	.string "uttering a cry.{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}$"
 
 gText_MonCouldntHelpLeapingUp::
 	.string "{STR_VAR_1} couldn't help\n"
-	.string "leaping up.{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}$"
+	.string "leaping up.{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}$"
 
 gText_MonTrippedOutOfDistraction::
 	.string "{STR_VAR_1} tripped over\n"
-	.string "out of distraction.{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}$"
+	.string "out of distraction.{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}$"
 
 gText_MonWasTooNervousToMove::
 	.string "{STR_VAR_1} was too\n"
-	.string "nervous to move.{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}$"
+	.string "nervous to move.{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}$"
 
 gText_ButItMessedUp2::
-	.string "But it messed up.{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}$"
+	.string "But it messed up.{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}$"
 
 gText_ButItFailedToMakeTargetNervous::
 	.string "But it failed to make\n"
-	.string "the target nervous.{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}$"
+	.string "the target nervous.{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}$"
 
 gText_ButItFailedToMakeAnyoneNervous::
 	.string "But it failed to make\n"
-	.string "anyone nervous.{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}$"
+	.string "anyone nervous.{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}$"
 
 gText_ButItWasIgnored::
-	.string "But it was ignored…{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}$"
+	.string "But it was ignored…{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}$"
 
 gText_CouldntImproveItsCondition::
 	.string "But it couldn't improve\n"
-	.string "its condition…{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}$"
+	.string "its condition…{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}$"
 
 gText_BadConditionResultedInWeakAppeal::
 	.string "Its bad condition\n"
-	.string "resulted in a weak appeal.{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}$"
+	.string "resulted in a weak appeal.{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}$"
 
 gText_MonWasUnaffected::
 	.string "{STR_VAR_1} was\n"
-	.string "unaffected.{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}$"
+	.string "unaffected.{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}$"
 
 gText_RepeatedAppeal::
 	.string "{STR_VAR_1} disappointed\n"
-	.string "by repeating an appeal.{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}$"
+	.string "by repeating an appeal.{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}$"
 
 gText_MonsXWentOverGreat::
 	.string "{STR_VAR_1}'s {STR_VAR_3}\n"
-	.string "went over great.{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}$"
+	.string "went over great.{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}$"
 
 gText_MonsXDidntGoOverWell::
 	.string "{STR_VAR_1}'s {STR_VAR_3}\n"
-	.string "didn't go over well here…{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}$"
+	.string "didn't go over well here…{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}$"
 
 gText_MonsXGotTheCrowdGoing::
 	.string "{STR_VAR_1}'s {STR_VAR_3}\n"
-	.string "got the crowd going.{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}$"
+	.string "got the crowd going.{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}$"
 
 gText_MonCantAppealNextTurn::
 	.string "{STR_VAR_1} can't appeal\n"
-	.string "next turn…{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}$"
+	.string "next turn…{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}$"
 
 gText_AttractedCrowdsAttention::
 	.string "It attracted the crowd's\n"
-	.string "attention.{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}$"
+	.string "attention.{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}$"
 
 gText_CrowdContinuesToWatchMon::
 	.string "The crowd continues to\n"
-	.string "watch {STR_VAR_3}.{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}$"
+	.string "watch {STR_VAR_3}.{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}$"
 
 gText_MonsMoveIsIgnored::
 	.string "{STR_VAR_1}'s\n"
-	.string "{STR_VAR_2} is ignored.{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}$"
+	.string "{STR_VAR_2} is ignored.{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}$"
 
 gText_Contest_Shyness::
 	.string "shyness$"
diff --git a/data/text/fr/abnormal_weather.inc b/data/text/fr/abnormal_weather.inc
new file mode 100644
index 0000000000..bad932dedf
--- /dev/null
+++ b/data/text/fr/abnormal_weather.inc
@@ -0,0 +1,5 @@
+gText_AbnormalWeatherEnded_Rain::
+    .string "La pluie torrentielle s’est arrêtée…$"
+
+gText_AbnormalWeatherEnded_Sun::
+    .string "Le soleil brille moins fort…$"
diff --git a/data/text/fr/berries.inc b/data/text/fr/berries.inc
new file mode 100644
index 0000000000..1c04550486
--- /dev/null
+++ b/data/text/fr/berries.inc
@@ -0,0 +1,244 @@
+PetalburgCity_Gym_Text_GiveEnigmaBerry:
+	.string "PAPA: Bonjour, {PLAYER}!\p"
+	.string "Je viens de recevoir une BAIE très rare.\n"
+	.string "J’aimerais te la donner.$"
+
+Route104_Text_PlantBerriesInSoilTakeThis:
+	.string "Si tu vois des BAIES qui ont poussé\n"
+	.string "sur une terre meuble et fertile,\l"
+	.string "tu peux les prendre.\p"
+	.string "Mais tu dois semer une autre BAIE à cet\n"
+	.string "endroit. C’est la moindre des choses.\p"
+	.string "Tiens, je vais partager ça avec toi.$"
+
+Route104_Text_TrainersOftenMakeMonHoldBerries:
+	.string "A te voir, tu dois être DRESSEUR,\n"
+	.string "n’est-ce pas?\p"
+	.string "Les DRESSEURS font souvent tenir\n"
+	.string "des BAIES à leurs POKéMON.\p"
+	.string "A toi de voir si tu préfères faire\n"
+	.string "pousser des BAIES ou les utiliser!$"
+
+Route111_Text_WateredPlantsEveryDayTakeBerry:
+	.string "J’ai arrosé les plantes chaque jour.\n"
+	.string "Elles ont donné beaucoup de fleurs.\p"
+	.string "Et elles m’ont aussi procuré de\n"
+	.string "nombreuses BAIES.\p"
+	.string "Vas-y!\n"
+	.string "Prends!$"
+
+Route111_Text_GoingToTryToMakeDifferentColorBerries:
+	.string "Je vais tout faire pour essayer\n"
+	.string "d’obtenir des {POKEBLOCK}S de différentes\l"
+	.string "couleurs!\p"
+	.string "J’espère que tu vas tout faire aussi!$"
+
+Route111_Text_WhatColorBerriesToLookForToday:
+	.string "Je vais chercher des BAIES de quelle\n"
+	.string "couleur aujourd’hui?$"
+
+Route114_Text_LoveUsingBerryCrushShareBerry:
+	.string "J’adore utiliser le BROYEUR DE BAIES,\n"
+	.string "alors je ramasse plein de BAIES!\p"
+	.string "Je suis d’accord pour t’en donner\n"
+	.string "une si tu veux!$"
+
+Route114_Text_TryBerryCrushWithFriends:
+	.string "Tu devrais essayer le BROYEUR DE\n"
+	.string "BAIES avec tes amis.$"
+
+Route114_Text_FunToThinkAboutBerries:
+	.string "Quelles sortes de BAIES vais-je\n"
+	.string "planter? Et faut-il les utiliser ou\l"
+	.string "les conserver?\p"
+	.string "Se préoccuper de petites choses de ce\n"
+	.string "genre a aussi son charme.$"
+
+Route120_Text_BerriesExpressionOfLoveIsntIt:
+	.string "Les BAIES poussent en profitant de\n"
+	.string "la lumière du soleil.\p"
+	.string "Nous les aidons à pousser en les\n"
+	.string "arrosant régulièrement.\p"
+	.string "C’est une marque d’attention,\n"
+	.string "n’est-ce pas?$"
+
+Route120_Text_YesYouUnderstand:
+	.string "Oui, oui.\n"
+	.string "Tu vois ce que je veux dire.\p"
+	.string "Tu devrais prendre ça.$"
+
+Route120_Text_MakeYourOwnImpressions:
+	.string "Oh… Mais je suppose qu’il est important\n"
+	.string "que tu te fasses ta propre opinion…\p"
+	.string "Tu n’as qu’à prendre ça.$"
+
+Route120_Text_BerryIsRareRaiseItWithCare:
+	.string "Cette BAIE me semble rare. J’espère\n"
+	.string "que tu vas en prendre bien soin.$"
+
+Route120_Text_IllGetMoreBerriesFromBerryMaster:
+	.string "Je vais aller chercher d’autres BAIES\n"
+	.string "chez le MAITRE DES BAIES.$"
+
+LilycoveCity_Text_BerrySuitsYou:
+	.string "Quand on y regarde de près…\p"
+	.string "les costumes me conviennent\n"
+	.string "parfaitement.\p"
+	.string "Et toi, une BAIE, ça te convient…\p"
+	.string "Et pourquoi donc?$"
+
+LilycoveCity_Text_BecauseYoureTrainer:
+	.string "Si on veut trouver une explication…\p"
+	.string "c’est parce que tu es DRESSEUR!$"
+
+LilycoveCity_Text_PokeblocksSuitPokemon:
+	.string "Quand on y regarde de près…\p"
+	.string "tout comme la simplicité me va, les\n"
+	.string "{POKEBLOCK}S conviennent très bien aux\l"
+	.string "POKéMON.$"
+
+Route123_BerryMastersHouse_Text_YoureDeservingOfBerry:
+	.string "Tu peux m’appeler le MAITRE DES BAIES.\p"
+	.string "Je rêve de recouvrir le monde de fleurs\n"
+	.string "magnifiques, alors je fais pousser des\l"
+	.string "BAIES et j’en donne à tout le monde.\p"
+	.string "Je te donne celle qui te revient!$"
+
+Route123_BerryMastersHouse_Text_WhyBeStingyTakeAnother:
+	.string "Pourquoi être radin?\n"
+	.string "Prends-en une autre!$"
+
+Route123_BerryMastersHouse_Text_VisitPrettyPetalFlowerShop:
+	.string "N’oublie pas d’aller chez le FLEURISTE\n"
+	.string "JOLIE FLEUR, près de MEROUVILLE.\p"
+	.string "Que les fleurs recouvrent la planète!$"
+
+Route123_BerryMastersHouse_Text_DoneForToday:
+	.string "J’ai fini pour aujourd’hui.\n"
+	.string "Repasse un autre jour.\p"
+	.string "Que les fleurs recouvrent la planète!$"
+
+Route123_BerryMastersHouse_Text_HeardAGoodSayingLately:
+	.string "Pour faire pousser des BAIES, mon mari,\n"
+	.string "c’est le meilleur.\p"
+	.string "Je suis fière de lui, vraiment.\p"
+	.string "Au fait, mon p’tit, t’aurais pas entendu\n"
+	.string "une belle expression récemment?$"
+
+Route123_BerryMastersHouse_Text_InspirationalTakeThis:
+	.string "Ah! Quelle expression remarquable!\n"
+	.string "Ça, c’est de l’inspiration!\p"
+	.string "Je veux que tu prennes ça.$"
+
+Route123_BerryMastersHouse_Text_GoodSayingTakeThis:
+	.string "Oh! Quelle belle expression!\n"
+	.string "Tu es remarquable.\p"
+	.string "J’aimerais que tu prennes ça.$"
+
+Route123_BerryMastersHouse_Text_JoyNeverGoesOutOfMyLife:
+	.string "Nos quatre petits-enfants devraient\n"
+	.string "être encore meilleurs que mon mari.\p"
+	.string "J’ai toujours eu une vie heureuse!$"
+
+Route123_BerryMastersHouse_Text_Ah:
+	.string "Ah…$"
+
+Route104_PrettyPetalFlowerShop_Text_ThisIsPrettyPetalFlowerShop:
+	.string "Bonjour!\p"
+	.string "Voici le FLEURISTE JOLIE FLEUR.\n"
+	.string "Vive les fleurs, plantons-en partout!$"
+
+Route104_PrettyPetalFlowerShop_Text_LearnAboutBerries:
+	.string "{PLAYER}{KUN}, voulez-vous en savoir plus\n"
+	.string "sur les BAIES?$"
+
+Route104_PrettyPetalFlowerShop_Text_IntroLearnAboutBerries:
+	.string "Comment vous appelez-vous?\p"
+	.string "{PLAYER}{KUN}.\n"
+	.string "Quel joli nom!\p"
+	.string "{PLAYER}{KUN}, voulez-vous en savoir plus\n"
+	.string "sur les BAIES?$"
+
+Route104_PrettyPetalFlowerShop_Text_BerriesExplanation:
+	.string "Les BAIES proviennent d’arbres\n"
+	.string "poussant sur un sol meuble et fertile.\p"
+	.string "Quand on cueille une BAIE, il faut\n"
+	.string "en replanter une au même endroit.\p"
+	.string "La BAIE plantée poussera rapidement\n"
+	.string "pour devenir une plante, fleurir, et\l"
+	.string "donner à son tour des BAIES.\p"
+	.string "J’aimerais que le monde entier soit\n"
+	.string "recouvert de fleurs magnifiques.\l"
+	.string "C’est mon rêve le plus cher.\p"
+	.string "Vous pouvez m’aider, {PLAYER}{KUN}, en\n"
+	.string "plantant des BAIES un peu partout.$"
+
+Route104_PrettyPetalFlowerShop_Text_FlowersBringHappiness:
+	.string "Les fleurs illuminent la vie des gens,\n"
+	.string "n’est-ce pas?$"
+
+Route104_PrettyPetalFlowerShop_Text_YouCanHaveThis:
+	.string "Bonjour!\p"
+	.string "Pour que les fleurs soient belles,\n"
+	.string "il faut bien s’en occuper.\p"
+	.string "Vous allez aimer soigner vos fleurs, j’en\n"
+	.string "suis sûre. Tenez, c’est pour vous.$"
+
+Route104_PrettyPetalFlowerShop_Text_WailmerPailExplanation:
+	.string "Pour faire pousser les plantes\n"
+	.string "à BAIES, il faut les arroser avec\l"
+	.string "le SEAU WAILMER.\p"
+	.string "Ah, autre chose.\p"
+	.string "Si on ne cueille pas de BAIES pendant\n"
+	.string "un petit moment, elles tombent par\l"
+	.string "terre. Mais d’autres repoussent vite.\p"
+	.string "C’est étrange, non? Comme si elles\n"
+	.string "avaient le désir de vivre.$"
+
+Route104_PrettyPetalFlowerShop_Text_ImGrowingFlowers:
+	.string "J’essaie d’imiter mes grandes sœurs.\n"
+	.string "Alors je fais aussi pousser des fleurs!\p"
+	.string "Tiens! C’est pour toi!$"
+
+Route104_PrettyPetalFlowerShop_Text_MachineMixesBerries:
+	.string "Les BAIES, tu peux les planter ou les\n"
+	.string "donner à porter à des POKéMON.\p"
+	.string "Maintenant, il existe aussi une machine\n"
+	.string "qui sert à mixer les BAIES pour faire\l"
+	.string "des bonbons pour POKéMON.\p"
+	.string "Je veux des bonbons aussi.$"
+
+SootopolisCity_Text_NameIsKiriHaveOneOfThese:
+	.string "Salut, comment tu t’appelles?\p"
+	.string "… … …  … … … … … …\n"
+	.string "C’est un beau nom!\p"
+	.string "Moi c’est JOY.\p"
+	.string "Mon papa et ma maman m’ont appelée\n"
+	.string "comme ça pour que je sois tout le temps\l"
+	.string "joyeuse.\p"
+	.string "C’est ce qu’ils voulaient.\n"
+	.string "Tiens, prends-en une.$"
+
+SootopolisCity_Text_GiveYouThisBerryToo:
+	.string "Je vais aussi te donner cette BAIE,\n"
+	.string "la baie préférée de JOY!$"
+
+SootopolisCity_Text_WhatKindOfWishInYourName:
+	.string "Et toi, je me demande pourquoi\n"
+	.string "tu t’appelles comme ça.$"
+
+SootopolisCity_Text_LikeSeasonBornIn:
+	.string "Printemps, été, automne et hiver.\p"
+	.string "En naissant au printemps, on aime le\n"
+	.string "printemps? Et en naissant en été, on\l"
+	.string "aime l’été?$"
+
+SootopolisCity_Text_ThenILoveAutumn:
+	.string "JOY est née en automne,\n"
+	.string "alors j’adore l’automne!\p"
+	.string "Et toi, quelle est ta saison préférée?$"
+
+SootopolisCity_Text_OhDoesntMatter:
+	.string "Oh…\n"
+	.string "C’est pas grave…\p"
+	.string "J’aimerais savoir tellement de choses…$"
diff --git a/data/text/fr/braille.inc b/data/text/fr/braille.inc
new file mode 100644
index 0000000000..65251edad7
--- /dev/null
+++ b/data/text/fr/braille.inc
@@ -0,0 +1,123 @@
+@ NOTE: The brailleformat macro in this file is leftover from RS.
+@       The numbers are simply skipped over. If you'd like to omit
+@       this macro you must also stop it from skipping over this
+@       section by editing ScrCmd_braillemessage.
+
+@ For some reason, French version ends sentences with an apostrophe and not a period.
+@ It's also possible that the braille gfx are different and that's the reason for this.
+
+Underwater_SealedChamber_Braille_GoUpHere::
+	brailleformat 4, 6, 26, 13, 7, 9
+	.braille "RENDS-TOI\n"
+	.braille "DANS LES\n"
+	.braille "PROFONDEURS'$"
+
+SealedChamber_OuterRoom_Braille_ABC:
+	brailleformat 7, 6, 21, 13, 10, 9
+	.braille "ABCD$"
+
+SealedChamber_OuterRoom_Braille_GHI:
+	brailleformat 7, 6, 21, 13, 10, 9
+	.braille "IJKL$"
+
+SealedChamber_OuterRoom_Braille_MNO:
+	brailleformat 7, 6, 21, 13, 10, 9
+	.braille "QRST$"
+
+SealedChamber_OuterRoom_Braille_TUV:
+	brailleformat 7, 6, 21, 13, 10, 9
+	.braille "YZ$"
+
+SealedChamber_OuterRoom_Braille_DEF:
+	brailleformat 7, 6, 21, 13, 10, 9
+	.braille "EFGH$"
+
+SealedChamber_OuterRoom_Braille_JKL:
+	brailleformat 7, 6, 21, 13, 10, 9
+	.braille "MNOP$"
+
+SealedChamber_OuterRoom_Braille_PQRS:
+	brailleformat 7, 6, 21, 13, 10, 9
+	.braille "UVWX$"
+
+SealedChamber_OuterRoom_Braille_Period:
+	brailleformat 9, 6, 19, 13, 12, 9
+	.braille "'$"
+
+SealedChamber_OuterRoom_Braille_WXYZ:
+	brailleformat 7, 6, 21, 13, 10, 9
+	.braille "-$"
+
+SealedChamber_OuterRoom_Braille_Comma:
+	brailleformat 9, 6, 19, 13, 12, 9
+	.braille ",$"
+
+SealedChamber_OuterRoom_Braille_DigHere:
+	brailleformat 7, 4, 23, 15, 10, 7
+	.braille "RETOURNE\n"
+	.braille "LA TERRE'$"
+
+SealedChamber_InnerRoom_Braille_FirstWailordLastRelicanth:
+	brailleformat 0, 0, 29, 19, 3, 3
+	.braille "COMMENCE PAR\n"
+	.braille "WAILORD\n"
+	.braille "ET FINIS AVEC\n"
+	.braille "RELICANTH'$"
+
+SealedChamber_InnerRoom_Braille_InThisCaveWeHaveLived:
+	brailleformat 2, 0, 26, 19, 5, 3
+	.braille "DANS CETTE\n"
+	.braille "CAVERNE VIVAIT\n"
+	.braille "AUTREFOIS\n"
+	.braille "NOTRE PEUPLE'$"
+
+SealedChamber_InnerRoom_Braille_WeOweAllToThePokemon:
+	brailleformat 7, 2, 23, 17, 10, 5
+	.braille "NOUS DEVONS\n"
+	.braille "TOUT AUX\n"
+	.braille "POKEMON'$"
+
+SealedChamber_InnerRoom_Braille_ButWeSealedThePokemonAway:
+	brailleformat 3, 0, 25, 19, 6, 3
+	.braille "MAIS NOUS LES\n"
+	.braille "AVONS RETENUS\n"
+	.braille "LOIN DE NOUS'$"
+
+SealedChamber_InnerRoom_Braille_WeFearedIt:
+	brailleformat 5, 6, 25, 13, 8, 9
+	.braille "JADIS, NOUS\n"
+	.braille "CRAIGNIONS LES\n"
+	.braille "POKEMON'$"
+
+SealedChamber_InnerRoom_Braille_ThoseWithCourageHope:
+	brailleformat 6, 0, 24, 19, 9, 3
+	.braille "DEMONTRE TON\n"
+	.braille "COURAGE'$"
+
+SealedChamber_InnerRoom_Braille_OpenDoorEternalPokemonWaits:
+	brailleformat 3, 2, 27, 17, 6, 5
+	.braille "OUVRE LA PORTE\n"
+	.braille "ET LIBERE UN\n"
+	.braille "POKEMON\n"
+	.braille "ETERNEL'$"
+
+DesertRuins_Braille_UseRockSmash:
+	brailleformat 1, 0, 27, 19, 4, 3
+	.braille "GAUCHE,\n"
+	.braille "GAUCHE, BAS,\n"
+	.braille "BAS ET UTILISE\n"
+	.braille "ECLATE-ROC'$"
+
+IslandCave_Braille_RunLapAroundWall:
+	brailleformat 5, 0, 25, 19, 8, 3
+	.braille "RESTE PRES\n"
+	.braille "DU MUR'\n"
+	.braille "TOURNE AUTOUR\n"
+	.braille "UNE FOIS'$"
+
+AncientTomb_Braille_ShineInTheMiddle:
+	brailleformat 3, 0, 25, 19, 6, 3
+	.braille "HERITEZ DE\n"
+	.braille "NOTRE VOLONTE,\n"
+	.braille "EN BRILLANT AU\n"
+	.braille "MILIEU'$"
diff --git a/data/text/fr/check_furniture.inc b/data/text/fr/check_furniture.inc
new file mode 100644
index 0000000000..e1b3e46b6c
--- /dev/null
+++ b/data/text/fr/check_furniture.inc
@@ -0,0 +1,27 @@
+Text_PictureBookShelf:
+	.string "Ce sont des albums de POKéMON.$"
+
+Text_BookShelf:
+	.string "Il y a toutes sortes de livres.$"
+
+Text_PokemonCenterBookShelf:
+	.string "Des magazines POKéMON!\n"
+	.string "NOS AMIS LES POKéMON…\p"
+	.string "MANUEL POKéMON…\n"
+	.string "GRAINE DE POKéMON…$"
+
+Text_Vase:
+	.string "Ce vase semble avoir de la valeur!\p"
+	.string "En regardant à l’intérieur, on\n"
+	.string "s’aperçoit qu’il est vide.$"
+
+Text_EmptyTrashCan:
+	.string "C’est vide.$"
+
+Text_ShopShelf:
+	.string "Les étagères regorgent de toutes\n"
+	.string "sortes de produits POKéMON.$"
+
+Text_Blueprint:
+	.string "Voilà un curieux plan!\n"
+	.string "Ça a l’air compliqué.$"
diff --git a/data/text/fr/event_ticket_1.inc b/data/text/fr/event_ticket_1.inc
new file mode 100644
index 0000000000..008b025bf1
--- /dev/null
+++ b/data/text/fr/event_ticket_1.inc
@@ -0,0 +1,41 @@
+EventTicket_Text_ShowOldSeaMap:
+	.string "Le ferry allant à POIVRESSEL est…\p"
+	.string "Pardon? Est-ce que nous pouvons aller\n"
+	.string "à cet endroit indiqué sur la carte?\p"
+	.string "Je connais quelqu’un qui pourra t’aider.\n"
+	.string "Un instant.$"
+
+EventTicket_Text_ThatPass:
+	.string "Le ferry allant à POIVRESSEL est…\p"
+	.string "Oh?\n"
+	.string "Ce PASSE…$"
+
+EventTicket_Text_ShowEonTicket:
+	.string "Hé, mon p’tit, c’est toi qui as apporté\n"
+	.string "ce drôle de PASSE?\p"
+	.string "J’vais t’dire, tu te diriges vers une\n"
+	.string "île minuscule beaucoup plus au sud.\p"
+	.string "Impossible de dire ce qui t’attend\n"
+	.string "là-bas, mon p’tit.\p"
+	.string "Ça me donne la chair de poule!\p"
+	.string "Tout le monde à bord!$"
+
+EventTicket_Text_SouthernIslandSailBack:
+	.string "Dis, mon p’tit, y a absolument rien à voir\n"
+	.string "sur cette île perdue.\p"
+	.string "On retourne à NENUCRIQUE?$"
+
+EventTicket_Text_SailHome:
+	.string "C’est d’accord, mon p’tit!\n"
+	.string "On est partis!$"
+
+EventTicket_Text_AsYouLike:
+	.string "D’accord, mon p’tit, comme tu veux.$"
+
+SouthernIsland_Interior_Text_Sign:
+	.string "“Les rêves ne sont qu’une autre\n"
+	.string "réalité. Ne jamais l’oublier…”$"
+
+SouthernIsland_Exterior_Text_Sign:
+	.string "“Ceux dont les souvenirs s’estompent\n"
+	.string "cherchent à les graver dans leur cœur.”$"
diff --git a/data/text/general_fr.inc b/data/text/fr/general.inc
similarity index 100%
rename from data/text/general_fr.inc
rename to data/text/fr/general.inc
diff --git a/data/text/fr/lottery_corner.inc b/data/text/fr/lottery_corner.inc
new file mode 100644
index 0000000000..89cde77f99
--- /dev/null
+++ b/data/text/fr/lottery_corner.inc
@@ -0,0 +1,78 @@
+LilycoveCity_DepartmentStore_1F_Text_LotteryCornerDrawTicket:
+	.string "Vous êtes à la LOTERIE POKéMON.\p"
+	.string "Tous les clients du CENTRE COMMERCIAL\n"
+	.string "peuvent retirer un BILLET DE LOTERIE\l"
+	.string "POKéMON.\p"
+	.string "Si le numéro sur le BILLET DE LOTERIE\n"
+	.string "correspond au numéro ID d’un de vos\l"
+	.string "POKéMON, vous recevrez un beau cadeau.\p"
+	.string "Voulez-vous retirer un BILLET DE\n"
+	.string "LOTERIE POKéMON?$"
+
+LilycoveCity_DepartmentStore_1F_Text_ComeBackTomorrow:
+	.string "Revenez demain.$"
+
+LilycoveCity_DepartmentStore_1F_Text_PleaseVisitAgain:
+	.string "A bientôt.$"
+
+LilycoveCity_DepartmentStore_1F_Text_PleasePickTicket:
+	.string "Veuillez prendre un BILLET DE LOTERIE.\n"
+	.string "…{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}…{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}…{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}$"
+
+LilycoveCity_DepartmentStore_1F_Text_TicketNumberIsXPleaseWait:
+	.string "Le numéro du BILLET DE LOTERIE est\n"
+	.string "{STR_VAR_1}.\p"
+	.string "Je vais voir si ce numéro correspond\n"
+	.string "à l’un des numéros ID de vos POKéMON.\p"
+	.string "Veuillez patienter.$"
+
+LilycoveCity_DepartmentStore_1F_Text_TicketMatchesPartyMon:
+	.string "Félicitations!\p"
+	.string "Le numéro ID de {STR_VAR_1}, qui est\n"
+	.string "dans votre équipe, correspond à celui\l"
+	.string "du BILLET DE LOTERIE!$"
+
+LilycoveCity_DepartmentStore_1F_Text_TicketMatchesPCMon:
+	.string "Félicitations!\p"
+	.string "Le numéro ID de {STR_VAR_1}, qui est\n"
+	.string "stocké sur le PC, correspond à\l"
+	.string "celui du BILLET DE LOTERIE!$"
+
+LilycoveCity_DepartmentStore_1F_Text_NoNumbersMatched:
+	.string "Quel dommage!\n"
+	.string "Aucun des numéros ne correspond.$"
+
+LilycoveCity_DepartmentStore_1F_Text_TwoDigitsMatched:
+	.string "Deux chiffres correspondent, vous\n"
+	.string "remportez le troisième prix!\p"
+	.string "Vous avez gagné {STR_VAR_1}!$"
+
+LilycoveCity_DepartmentStore_1F_Text_ThreeDigitsMatched:
+	.string "Trois chiffres correspondent, vous\n"
+	.string "remportez le deuxième prix!\p"
+	.string "Vous avez gagné {STR_VAR_1}!$"
+
+LilycoveCity_DepartmentStore_1F_Text_FourDigitsMatched:
+	.string "Quatre chiffres correspondent, vous\n"
+	.string "remportez le premier prix!\p"
+	.string "Vous avez gagné {STR_VAR_1}!$"
+
+LilycoveCity_DepartmentStore_1F_Text_AllFiveDigitsMatched:
+	.string "Magnifique, tous les chiffres\n"
+	.string "correspondent!\p"
+	.string "Vous avez gagné le super prix!\n"
+	.string "Vous avez gagné {STR_VAR_1}!$"
+
+LilycoveCity_DepartmentStore_1F_Text_NoRoomForThis:
+	.string "Oh?\n"
+	.string "On dirait que vous n’avez plus de place.\p"
+	.string "Faites de la place dans votre SAC et\n"
+	.string "revenez me voir.$"
+
+LilycoveCity_DepartmentStore_1F_Text_PrizeWeveBeenHolding:
+	.string "{PLAYER}?\n"
+	.string "Oui, je vous attendais.\p"
+	.string "Nous vous avons gardé votre prix.$"
+
+LilycoveCity_DepartmentStore_1F_Text_PleaseVisitAgain2:
+	.string "A bientôt.$"
diff --git a/data/text/fr/mart_clerk.inc b/data/text/fr/mart_clerk.inc
new file mode 100644
index 0000000000..7da35190b3
--- /dev/null
+++ b/data/text/fr/mart_clerk.inc
@@ -0,0 +1,10 @@
+gText_HowMayIServeYou::
+    .string "Bienvenue!\p"
+    .string "En quoi puis-je vous aider?$"
+
+gText_PleaseComeAgain::
+    .string "A la prochaine!$"
+
+gText_PlayerWhatCanIDoForYou::
+    .string "Bienvenue {PLAYER}{KUN}!\p"
+    .string "Que puis-je faire pour vous?$"
diff --git a/data/text/fr/obtain_item.inc b/data/text/fr/obtain_item.inc
new file mode 100644
index 0000000000..9c99923b8d
--- /dev/null
+++ b/data/text/fr/obtain_item.inc
@@ -0,0 +1,30 @@
+gText_ObtainedTheItem::
+    .string "Obtenu: {STR_VAR_2}!$"
+
+gText_TheBagIsFull::
+    .string "Le SAC est plein…$"
+
+gText_PutItemInPocket::
+    .string "{PLAYER} met {STR_VAR_2} dans\n"
+    .string "POCHE {STR_VAR_3}.$"
+
+gText_PlayerFoundOneItem::
+    .string "{PLAYER} trouve {STR_VAR_2}!$"
+
+gText_TooBadBagIsFull::
+    .string "Dommage!\n"
+    .string "Le SAC est plein.$"
+
+gText_PlayerPutItemInBag::
+    .string "{PLAYER} met {STR_VAR_2} dans\n"
+    .string "le SAC.$"
+
+gText_ObtainedTheDecor::
+    .string "Obtenu: {STR_VAR_2}!$"
+
+gText_NoRoomLeftForAnother::
+    .string "Dommage! Il n’y a plus assez de place\n"
+    .string "pour {STR_VAR_2}…$"
+
+gText_TheDecorWasTransferredToThePC::
+    .string "Transfert de {STR_VAR_2} sur le PC.$"
diff --git a/data/text/fr/pc.inc b/data/text/fr/pc.inc
new file mode 100644
index 0000000000..b20d68f96c
--- /dev/null
+++ b/data/text/fr/pc.inc
@@ -0,0 +1,17 @@
+Text_BootUpPC:
+    .string "{PLAYER} allume le PC.$"
+
+gText_WhichPCShouldBeAccessed::
+    .string "Accéder à quel PC?$"
+
+gText_AccessedSomeonesPC::
+    .string "PC de ??? connecté.$"
+
+gText_StorageSystemOpened::
+    .string "Gestion de Stocks de POKéMON en ligne.$"
+
+gText_AccessedPlayersPC::
+    .string "PC personnel connecté.$"
+
+gText_AccessedLanettesPC::
+    .string "PC d’ANNETTE connecté.$"
diff --git a/data/text/fr/pc_transfer.inc b/data/text/fr/pc_transfer.inc
new file mode 100644
index 0000000000..1e10a69ca7
--- /dev/null
+++ b/data/text/fr/pc_transfer.inc
@@ -0,0 +1,33 @@
+gText_PkmnTransferredSomeonesPC::
+    .string "{STR_VAR_2} a été transféré sur le\n"
+    .string "PC de ???.\p"
+    .string "Il a été placé dans la BOITE\n"
+    .string "appelée “{STR_VAR_1}”.$"
+
+gText_PkmnTransferredLanettesPC::
+    .string "{STR_VAR_2} a été transféré sur le\n"
+    .string "PC d’ANNETTE.\p"
+    .string "Il a été placé dans la BOITE\n"
+    .string "appelée “{STR_VAR_1}”.$"
+
+gText_PkmnTransferredSomeonesPCBoxFull::
+    .string "La BOITE {STR_VAR_3} sur le PC\n"
+    .string "de ??? est pleine.\p"
+    .string "{STR_VAR_2} a été placé dans la\n"
+    .string "BOITE appelée “{STR_VAR_1}”.$"
+
+gText_PkmnTransferredLanettesPCBoxFull::
+    .string "La BOITE “{STR_VAR_3}” sur le PC\n"
+    .string "d’ANNETTE est pleine.\p"
+    .string "{STR_VAR_2} a été placé dans la\n"
+    .string "BOITE appelée “{STR_VAR_1}”.$"
+
+gText_NoMoreRoomForPokemon::
+    .string "Il n’y a plus de place pour\n"
+    .string "les POKéMON.\p"
+    .string "Les BOITES sont pleines et\n"
+    .string "ne peuvent plus rien recevoir.$"
+
+gText_NicknameThisPokemon::
+    .string "Voulez-vous donner un surnom\n"
+    .string "à {STR_VAR_1}?$"
diff --git a/data/text/fr/pkmn_center_nurse.inc b/data/text/fr/pkmn_center_nurse.inc
new file mode 100644
index 0000000000..f547377ee8
--- /dev/null
+++ b/data/text/fr/pkmn_center_nurse.inc
@@ -0,0 +1,47 @@
+gText_WouldYouLikeToRestYourPkmn::
+    .string "Bonjour! Bienvenue au CENTRE\n"
+    .string "POKéMON.\p"
+    .string "Nous pouvons soigner vos POKéMON.\p"
+    .string "Voulez-vous les soigner?$"
+
+gText_IllTakeYourPkmn::
+    .string "OK, je prends vos POKéMON un instant.$"
+
+gText_RestoredPkmnToFullHealth::
+    .string "Merci d’avoir attendu.\p"
+    .string "Vos POKéMON sont en super\n"
+    .string "forme.$"
+
+gText_WeHopeToSeeYouAgain::
+    .string "A une prochaine fois peut-être!$"
+
+gText_WelcomeCutShort::
+    .string "Bonjour! Bienvenue au CENTRE\n"
+    .string "POKéMON.\p"
+    .string "Nous pouvons soigner vos POKéMON.\p"
+    .string "Voulez-vous les…$"
+
+gText_NoticesGoldCard::
+    .string "Ce… Cette carte…\n"
+    .string "Serait-ce la CARTE OR?!\p"
+    .string "Oh, ce jaune or est si brillant!\n"
+    .string "Les quatre étoiles étincellent presque!\p"
+    .string "J’ai déjà vu des DRESSEURS avec\n"
+    .string "des CARTES ARGENT, mais…\p"
+    .string "Vous êtes le premier DRESSEUR que je\n"
+    .string "vois avec une CARTE OR!\p"
+    .string "Accordez-moi l’honneur de soigner\n"
+    .string "vos POKéMON un instant!$"
+
+gText_YouWantTheUsual::
+    .string "Contente de vous voir, {PLAYER}!\n"
+    .string "On fait comme d’habitude?$"
+
+gText_IllTakeYourPkmn2::
+    .string "OK, je prends vos POKéMON un instant.$"
+
+gText_ThankYouForWaiting::
+    .string "Merci d’avoir attendu.$"
+
+gText_WeHopeToSeeYouAgain2::
+    .string "Encore merci et à bientôt!$"
diff --git a/data/text/fr/pokedex_rating.inc b/data/text/fr/pokedex_rating.inc
new file mode 100644
index 0000000000..0e9a7d7615
--- /dev/null
+++ b/data/text/fr/pokedex_rating.inc
@@ -0,0 +1,115 @@
+gBirchDexRatingText_AreYouCurious::
+	.string "PROF. SEKO: Ah, {PLAYER}{KUN}!\p"
+	.string "Tu veux que je te donne mon avis\n"
+	.string "sur ton POKéDEX?$"
+
+gBirchDexRatingText_Cancel::
+	.string "Hum? Oh, tu n’as pas attrapé assez\n"
+	.string "de POKéMON pour que ça en vaille\l"
+	.string "la peine.$"
+
+gBirchDexRatingText_SoYouveSeenAndCaught::
+	.string "Hum…\p"
+	.string "Tu as rencontré {STR_VAR_1} POKéMON\n"
+	.string "et tu en as attrapé {STR_VAR_2}…$"
+
+gBirchDexRatingText_LessThan10::
+	.string "Tu devrais aller plus souvent dans\n"
+	.string "les herbes et mieux chercher\l"
+	.string "les POKéMON.$"
+
+gBirchDexRatingText_LessThan20::
+	.string "Je suppose que tu as bien\n"
+	.string "compris ça. Mais désormais,\l"
+	.string "ça va devenir plus dur.$"
+
+gBirchDexRatingText_LessThan30::
+	.string "Certains POKéMON n’apparaissent\n"
+	.string "que dans des zones précises.\l"
+	.string "Sois tenace!$"
+
+gBirchDexRatingText_LessThan40::
+	.string "Bon, il pourrait être un peu plus\n"
+	.string "rempli, mais il ressemble déjà plus\l"
+	.string "à un POKéDEX.$"
+
+gBirchDexRatingText_LessThan50::
+	.string "Hé, il commence à être plutôt\n"
+	.string "pas mal. Continue sur ta lancée!$"
+
+gBirchDexRatingText_LessThan60::
+	.string "Est-ce que tu utilises des CANNES?\n"
+	.string "Il y a beaucoup de POKéMON\l"
+	.string "dans la mer.$"
+
+gBirchDexRatingText_LessThan70::
+	.string "Plutôt que juste attraper des\n"
+	.string "POKéMON, pourquoi ne pas aussi\l"
+	.string "les faire évoluer?$"
+
+gBirchDexRatingText_LessThan80::
+	.string "Ce POKéDEX va être formidable.\n"
+	.string "J’en ai bien l’impression.$"
+
+gBirchDexRatingText_LessThan90::
+	.string "Tu as collecté tout ça…\n"
+	.string "Tu as un talent remarquable!$"
+
+gBirchDexRatingText_LessThan100::
+	.string "As-tu visité le PARC SAFARI?\p"
+	.string "J’ai entendu dire que certains\n"
+	.string "POKéMON ne s’attrapent que là-bas.$"
+
+gBirchDexRatingText_LessThan110::
+	.string "Tu as atteint la barre des 100.\n"
+	.string "C’est un POKéDEX impressionnant!$"
+
+gBirchDexRatingText_LessThan120::
+	.string "En utilisant ECLATE-ROC, tu peux\n"
+	.string "trouver des POKéMON.$"
+
+gBirchDexRatingText_LessThan130::
+	.string "Tu devrais faire des échanges pour\n"
+	.string "te procurer d’autres POKéMON.$"
+
+gBirchDexRatingText_LessThan140::
+	.string "Certains POKéMON évoluent quand\n"
+	.string "ils aiment vraiment leur DRESSEUR.$"
+
+gBirchDexRatingText_LessThan150::
+	.string "Je ne savais pas qu’il y avait\n"
+	.string "autant d’espèces de POKéMON\l"
+	.string "à HOENN.$"
+
+gBirchDexRatingText_LessThan160::
+	.string "Il arrive que certains POKéMON\n"
+	.string "sortent en grand nombre, telle une\l"
+	.string "horde sauvage.\p"
+	.string "Ne rate pas ce genre d’occasion!$"
+
+gBirchDexRatingText_LessThan170::
+	.string "On a une bonne représentation des\n"
+	.string "POKéMON de la région de HOENN\l"
+	.string "en regardant ton POKéDEX.$"
+
+gBirchDexRatingText_LessThan180::
+	.string "Je pourrais déjà te donner le titre\n"
+	.string "de PROFESSEUR POKéMON!$"
+
+gBirchDexRatingText_LessThan190::
+	.string "Avec un POKéDEX aussi bien rempli,\n"
+	.string "tu passes en professionnel!$"
+
+gBirchDexRatingText_LessThan200::
+	.string "Tu es à deux doigts de compléter\n"
+	.string "ce POKéDEX. Je le vois!$"
+
+gBirchDexRatingText_DexCompleted::
+	.string "Félicitations!\n"
+	.string "Ton POKéDEX est complet!$"
+
+gBirchDexRatingText_OnANationwideBasis::
+	.string "Hum…\n"
+	.string "Sur l’ensemble du territoire…\p"
+	.string "Tu as rencontré {STR_VAR_1} POKéMON\n"
+	.string "et tu as attrapé {STR_VAR_2} POKéMON…$"
diff --git a/data/text/fr/questionnaire.inc b/data/text/fr/questionnaire.inc
new file mode 100644
index 0000000000..29df7bbc81
--- /dev/null
+++ b/data/text/fr/questionnaire.inc
@@ -0,0 +1,43 @@
+Questionnaire_Text_FillOut::
+    .string "Il y a un questionnaire…\n"
+    .string "Voulez-vous y répondre?$"
+
+Questionnaire_Text_ThankYou::
+    .string "Merci d’avoir pris le temps de\n"
+    .string "répondre à notre questionnaire.\p"
+    .string "Vos réponses nous permettront\n"
+    .string "de mieux vous servir.$"
+
+Questionnaire_Text_YouKnowThoseWordsGift::
+    .string "Oh, bonjour!\n"
+    .string "Vous connaissez ces mots?\p"
+    .string "Donc vous devez aussi\n"
+    .string "connaître le CADEAU MYST.\p"
+    .string "A partir de maintenant, vous allez\n"
+    .string "recevoir des CADEAUX MYST.!$"
+
+Questionnaire_Text_YouCanAccessMysteryGift::
+    .string "Après avoir sauvegardé, vous\n"
+    .string "aurez accès aux CADEAUX MYST.!$"
+
+Questionnaire_Text_YouKnowThoseWordsEvent::
+    .string "Oh, bonjour!\n"
+    .string "Vous connaissez ces mots?\p"
+    .string "Donc vous devez aussi\n"
+    .string "connaître les EVENEMENTS MYSTERE.$"
+
+Questionnaire_Text_YouCanAccessMysteryEvent::
+    .string "Après avoir sauvegardé, vous\n"
+    .string "aurez accès aux EVENEMENTS MYSTERE.$"
+
+MysteryGift_Text_TheresATicketForYou::
+    .string "Merci d’utiliser le système\n"
+    .string "EVENEMENTS MYSTERE.\p"
+    .string "Vous devez être {PLAYER}.\n"
+    .string "Il y a un ticket pour vous.$"
+
+MysteryGift_Text_TryUsingItAtLilycovePort::
+    .string "Il peut être utilisé au port de\n"
+    .string "NENUCRIQUE.\p"
+    .string "Essayez-le pour voir de quoi \n"
+    .string "il s’agit.$"
diff --git a/data/text/fr/record_mix.inc b/data/text/fr/record_mix.inc
new file mode 100644
index 0000000000..640b0278bb
--- /dev/null
+++ b/data/text/fr/record_mix.inc
@@ -0,0 +1,6 @@
+Text_WouldYouLikeToMixRecords:
+    .string "Voulez-vous échanger vos données\n"
+    .string "avec d’autres DRESSEURS?$"
+
+Text_WeHopeToSeeYouAgain:
+    .string "A une prochaine fois peut-être!$"
diff --git a/data/text/fr/shoal_cave.inc b/data/text/fr/shoal_cave.inc
new file mode 100644
index 0000000000..fe4783f156
--- /dev/null
+++ b/data/text/fr/shoal_cave.inc
@@ -0,0 +1,52 @@
+ShoalCave_LowTideEntranceRoom_Text_AreYouPlanningOnGoingInThere:
+	.string "Tu as prévu d’aller loin?\p"
+	.string "Et si tu m’apportais des SELS TREFONDS\n"
+	.string "et des CO. TREFONDS?\p"
+	.string "Je peux te préparer quelque chose\n"
+	.string "de bon si tu m’apportes ce qu’il faut.$"
+
+ShoalCave_LowTideEntranceRoom_Text_BringMe4ShoalSaltAndShells:
+	.string "Si tu m’apportais quatre SELS TREFONDS\n"
+	.string "et quatre CO. TREFONDS, je pourrais te\l"
+	.string "faire un GRELOT COQUE.\p"
+	.string "Tu peux te procurer ces ingrédients\n"
+	.string "tous les jours.$"
+
+ShoalCave_LowTideEntranceRoom_Text_WouldYouLikeShellBell:
+	.string "Oh, hé! Des SELS TREFONDS et des \n"
+	.string "CO. TREFONDS! Et suffisamment!\p"
+	.string "Tu veux que je les utilise\n"
+	.string "pour faire un GRELOT COQUE?$"
+
+ShoalCave_LowTideEntranceRoom_Text_MakeShellBellRightAway:
+	.string "Bon, d’accord! Je te fais un\n"
+	.string "GRELOT COQUE sur-le-champ.\p"
+	.string "… … … … … … … …\n"
+	.string "… … … … … … … …\p"
+	.string "Voilà! C’est prêt!$"
+
+ShoalCave_LowTideEntranceRoom_Text_ExplainShellBell:
+	.string "Gardes-en pour un POKéMON.\n"
+	.string "Il va adorer ça, c’est sûr!\p"
+	.string "Quoi, le carillon du GRELOT COQUE…\n"
+	.string "Sublime!\p"
+	.string "Tu peux avoir ses ingrédients tous les\n"
+	.string "jours. Alors je peux t’en faire d’autres.$"
+
+ShoalCave_LowTideEntranceRoom_Text_WantedToMakeShellBell:
+	.string "Oh… Dans ce cas…\n"
+	.string "Je voulais faire un GRELOT COQUE…$"
+
+ShoalCave_LowTideEntranceRoom_Text_NoSpaceInYourBag:
+	.string "Tu n’as pas assez de place dans ton SAC\n"
+	.string "pour recevoir ça.\p"
+	.string "Tu devrais faire de la place et\n"
+	.string "revenir pour avoir un GRELOT COQUE.$"
+
+ShoalCave_Text_WasShoalSaltNowNothing:
+	.string "Il y avait du SEL TREFONDS ici.\n"
+	.string "Mais il n’y a plus rien.$"
+
+ShoalCave_Text_WasShoallShellNowNothing:
+	.string "Il y avait un CO. TREFONDS ici.\n"
+	.string "Mais il n’y a plus rien.$"
diff --git a/data/text/lottery_corner.inc b/data/text/lottery_corner.inc
index 44571ef562..e86cdff59c 100644
--- a/data/text/lottery_corner.inc
+++ b/data/text/lottery_corner.inc
@@ -16,7 +16,7 @@ LilycoveCity_DepartmentStore_1F_Text_PleaseVisitAgain:
 
 LilycoveCity_DepartmentStore_1F_Text_PleasePickTicket:
 	.string "Please pick a LOTO TICKET.\n"
-	.string "…{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}…{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}…{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}{PAUSE 0x0F}$"
+	.string "…{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}…{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}…{PAUSE 15}{PAUSE 15}{PAUSE 15}{PAUSE 15}$"
 
 LilycoveCity_DepartmentStore_1F_Text_TicketNumberIsXPleaseWait:
 	.string "The LOTO TICKET number is {STR_VAR_1}.\p"