Make GameMode Names & Desc's Translatable

2025-07-27 07:44:31 +02:00 · 2025-05-22 19:12:36 +02:00 · 2025-05-22 19:12:36 +02:00 · 667fab564f
commit 667fab564f
parent 2e49dbea07
9 changed files with 47 additions and 6 deletions
--- a/P3D/Content/Localization/Tokens_de.dat
+++ b/P3D/Content/Localization/Tokens_de.dat
@ -243,6 +243,8 @@ gamemode_menu_author,Entwickler
 gamemode_menu_contentpath,ContentPath
 gamemode_menu_create,Create
 gamemode_menu_back,Back
+gamemode_name_Kolben,Pokémon 3D
+gamemode_desc_Kolben,The normal GameMode.
 ---
 JoinServerScreen:
 join_server_screen_title,Trete einem Server bei:
--- a/P3D/Content/Localization/Tokens_en.dat
+++ b/P3D/Content/Localization/Tokens_en.dat
@ -244,6 +244,8 @@ gamemode_menu_author,Author
 gamemode_menu_contentpath,ContentPath
 gamemode_menu_create,Create
 gamemode_menu_back,Back
+gamemode_name_Kolben,Pokémon 3D
+gamemode_desc_Kolben,The normal GameMode.
 ---
 JoinServerScreen:
 join_server_screen_title,Join a server:
--- a/P3D/Content/Localization/Tokens_es.dat
+++ b/P3D/Content/Localization/Tokens_es.dat
@ -245,6 +245,8 @@ gamemode_menu_author,Autor
 gamemode_menu_contentpath,Ruta de contenido
 gamemode_menu_create,Crear
 gamemode_menu_back,Volver
+gamemode_name_Kolben,Pokémon 3D
+gamemode_desc_Kolben,The normal GameMode.
 ---
 JoinServerScreen:
 join_server_screen_title,Join a server:
--- a/P3D/Content/Localization/Tokens_fr.dat
+++ b/P3D/Content/Localization/Tokens_fr.dat
@ -242,6 +242,8 @@ gamemode_menu_author,Autheur
 gamemode_menu_contentpath,ContentPath
 gamemode_menu_create,Créer
 gamemode_menu_back,Retour
+gamemode_name_Kolben,Pokémon 3D
+gamemode_desc_Kolben,The normal GameMode.
 ---
 JoinServerScreen:
 join_server_screen_title,Serveurs:
--- a/P3D/Content/Localization/Tokens_nl.dat
+++ b/P3D/Content/Localization/Tokens_nl.dat
@ -232,6 +232,8 @@ gamemode_menu_author,Auteur
 gamemode_menu_contentpath,Inhoudspad
 gamemode_menu_create,Creëer
 gamemode_menu_back,Terug
+gamemode_name_Kolben,Pokémon 3D
+gamemode_desc_Kolben,De gebruikelijke SpelModus.
 ---
 JoinServerScreen:
 join_server_screen_title,Verbind met een server:
--- a/P3D/Content/Localization/Tokens_pl.dat
+++ b/P3D/Content/Localization/Tokens_pl.dat
@ -244,6 +244,8 @@ gamemode_menu_author,Autor
 gamemode_menu_contentpath,Ścieżka do treści
 gamemode_menu_create,Utwórz
 gamemode_menu_back,Wróć
+gamemode_name_Kolben,Pokémon 3D
+gamemode_desc_Kolben,The normal GameMode.
 ---
 JoinServerScreen:
 join_server_screen_title,Join a server:
--- a/P3D/Content/Localization/Tokens_ptbr.dat
+++ b/P3D/Content/Localization/Tokens_ptbr.dat
@ -242,6 +242,8 @@ gamemode_menu_author,Autor
 gamemode_menu_contentpath,Local do Conteúdo
 gamemode_menu_create,Criar
 gamemode_menu_back,Voltar
+gamemode_name_Kolben,Pokémon 3D
+gamemode_desc_Kolben,The normal GameMode.
 ---
 JoinServerScreen:
 join_server_screen_title,Entre em um Servidor:
--- a/P3D/Resources/GameModeManager.vb
+++ b/P3D/Resources/GameModeManager.vb
@ -629,7 +629,7 @@ Public Class GameMode
        Dim SkinNames As List(Of String) = {"Ethan", "Lyra", "Nate", "Rosa", "Hilbert", "Hilda"}.ToList()
        Dim SkinGenders As List(Of String) = {"Male", "Female", "Male", "Female", "Male", "Female"}.ToList()

-        Dim gameMode As New GameMode("Kolben", "The normal game mode.", GameController.GAMEVERSION, "Kolben Games", "\Content\Data\maps\", "\Content\Data\Scripts\", "\Content\Data\maps\poke\", "\Content\Pokemon\Data\", "\Content\", "\Content\Localization\", New List(Of GameRule), New List(Of GameRule), New List(Of GameRule),
+        Dim gameMode As New GameMode("Kolben", "The normal GameMode.", GameController.GAMEVERSION, "Kolben Games", "\Content\Data\maps\", "\Content\Data\Scripts\", "\Content\Data\maps\poke\", "\Content\Pokemon\Data\", "\Content\", "\Content\Localization\", New List(Of GameRule), New List(Of GameRule), New List(Of GameRule),
                                     "newgame\intro0.dat", New Vector3(1.0F, 0.1F, 3.0F), MathHelper.PiOver2, "Your Room", "", New Color(59, 123, 165), "0", "welcome", "1", SkinColors, SkinFiles, SkinNames, SkinGenders, 8)

        gameMode.StartScript = "startscript\main"
--- a/P3D/Screens/MainMenu/PressStartScreen.vb
+++ b/P3D/Screens/MainMenu/PressStartScreen.vb
@ -985,14 +985,26 @@ Public Class NewMainMenuScreen
                    For i = 0 To tmpProfile.PokemonTextures.Count - 1
                        SpriteBatch.Draw(tmpProfile.PokemonTextures(i), New Rectangle(displayRect.X + 30 + i * 70, displayRect.Y + 70, 64, 64), Color.White)
                    Next
+                    Dim GameModeNameString As String = GameModeManager.GetGameMode(tmpProfile.GameMode).Name
+                    If Localization.TokenExists("gamemode_name_" & GameModeManager.GetGameMode(tmpProfile.GameMode).DirectoryName) = True Then
+                        GameModeNameString = Localization.GetString("gamemode_name_" & GameModeManager.GetGameMode(tmpProfile.GameMode).DirectoryName)
+                    ElseIf Localization.TokenExists(("gamemode_name_" & GameModeManager.GetGameMode(tmpProfile.GameMode).DirectoryName).ToLower) = True Then
+                        GameModeNameString = Localization.GetString(("gamemode_name_" & GameModeManager.GetGameMode(tmpProfile.GameMode).DirectoryName).ToLower)
+                    End If
                    GetFontRenderer().DrawString(FontManager.InGameFont, Localization.GetString("global_player_name", "Player Name") & ": " & tmpProfile.Name & Environment.NewLine &
-                                                                            Localization.GetString("global_gamemode", "GameMode") & ": " & GameModeManager.GetGameMode(tmpProfile.GameMode).Name, New Vector2(displayRect.X + 30, displayRect.Y + 20), Color.White, 0F, Vector2.Zero, 1.0F, SpriteEffects.None, 0F)
+                                                                            Localization.GetString("global_gamemode", "GameMode") & ": " & Localization.GetString(GameModeNameString), New Vector2(displayRect.X + 30, displayRect.Y + 20), Color.White, 0F, Vector2.Zero, 1.0F, SpriteEffects.None, 0F)
                    GetFontRenderer().DrawString(FontManager.InGameFont, Localization.GetString("global_badges", "Badges") & ": " & tmpProfile.Badges.ToString() & Environment.NewLine &
                                                                            Localization.GetString("global_play_time", "Play Time") & ": " & tmpProfile.TimePlayed & Environment.NewLine &
                                                                            Localization.GetString("global_location", "Location") & ": " & Localization.GetString("Places_" & tmpProfile.Location, tmpProfile.Location), New Vector2(displayRect.X + 30, displayRect.Y + 150), Color.White, 0F, Vector2.Zero, 1.0F, SpriteEffects.None, 0F)
                Else
+                    Dim GameModeNameString As String = tmpProfile.GameMode
+                    If Localization.TokenExists("gamemode_name_" & tmpProfile.GameMode) = True Then
+                        GameModeNameString = Localization.GetString("gamemode_name_" & tmpProfile.GameMode)
+                    ElseIf Localization.TokenExists(("gamemode_name_" & tmpProfile.GameMode).ToLower) = True Then
+                        GameModeNameString = Localization.GetString(("gamemode_name_" & tmpProfile.GameMode).ToLower)
+                    End If
                    GetFontRenderer().DrawString(FontManager.InGameFont, Localization.GetString("global_player_name", "Player Name") & ": " & tmpProfile.Name & Environment.NewLine &
-                                                                            Localization.GetString("global_gamemode", "GameMode") & ": " & tmpProfile.GameMode, New Vector2(displayRect.X + 30, displayRect.Y + 20), Color.White, 0F, Vector2.Zero, 1.0F, SpriteEffects.None, 0F)
+                                                                            Localization.GetString("global_gamemode", "GameMode") & ": " & Localization.GetString(GameModeNameString), New Vector2(displayRect.X + 30, displayRect.Y + 20), Color.White, 0F, Vector2.Zero, 1.0F, SpriteEffects.None, 0F)

                    SpriteBatch.Draw(_menuTexture, New Rectangle(displayRect.X + 30, displayRect.Y + 70, 32, 32), New Rectangle(0, 32, 32, 32), Color.White)
                    Dim errorText As String
@ -1684,11 +1696,26 @@ Public Class GameModeSelectionScreen
        If tempGameModesDisplay = "" Then
            Dim GameMode As GameMode = GameModeManager.GetGameMode(_gameModes(_index).DirectoryName)

-            Dim dispName As String = GameMode.Name
+            Dim GameModeNameString As String = GameMode.Name
+            If Localization.TokenExists("gamemode_name_" & GameMode.DirectoryName) = True Then
+                GameModeNameString = Localization.GetString("gamemode_name_" & GameMode.DirectoryName)
+            ElseIf Localization.TokenExists(("gamemode_name_" & GameMode.DirectoryName).ToLower) = True Then
+                GameModeNameString = Localization.GetString(("gamemode_name_" & GameMode.DirectoryName).ToLower)
+            End If
+
+            Dim dispName As String = GameModeNameString
            If dispName = "Kolben" Then
                dispName = "Pokémon 3D"
            End If
-            Dim dispDescription As String = GameMode.Description.Replace("~", Environment.NewLine).Replace("*", Environment.NewLine)
+
+            Dim GameModeDescriptionString As String = GameMode.Description
+            If Localization.TokenExists("gamemode_desc_" & GameMode.DirectoryName) = True Then
+                GameModeDescriptionString = Localization.GetString("gamemode_desc_" & GameMode.DirectoryName)
+            ElseIf Localization.TokenExists(("gamemode_desc_" & GameMode.DirectoryName).ToLower) = True Then
+                GameModeDescriptionString = Localization.GetString(("gamemode_desc_" & GameMode.DirectoryName).ToLower)
+            End If
+
+            Dim dispDescription As String = GameModeDescriptionString.Replace("~", Environment.NewLine).Replace("*", Environment.NewLine)
            Dim dispVersion As String = GameMode.Version
            Dim dispAuthor As String = GameMode.Author