English Revision 1213

Plain Craft Launcher 2/Modules/Base/ModNet.vb

@@ -222,7 +222,7 @@ RequestFinished:
     ''' <param name="Url">网页的 Url。</param>
     Public Function NetGetCodeByDownload(Url As String, Optional Timeout As Integer = 45000, Optional IsJson As Boolean = False, Optional UseBrowserUserAgent As Boolean = False) As String
         Dim Temp As String = PathTemp & "Cache\Code\" & Url.GetHashCode() & "_" & GetUuid()
-        Dim NewTask As New LoaderDownload(GetLang("LangModTaskDownlaodCode", GetUuid() & "#"), New List(Of NetFile) From {New NetFile({Url}, Temp, New FileChecker With {.IsJson = IsJson}, UseBrowserUserAgent)})
+        Dim NewTask As New LoaderDownload(GetLang("LangModTaskDownloadCode", GetUuid() & "#"), New List(Of NetFile) From {New NetFile({Url}, Temp, New FileChecker With {.IsJson = IsJson}, UseBrowserUserAgent)})
         Try
             NewTask.WaitForExitTime(Timeout, TimeoutMessage:=GetLang("LangModExceptionTimeOut", Url))
             NetGetCodeByDownload = ReadFile(Temp)
@@ -237,9 +237,9 @@ RequestFinished:
     ''' <param name="Urls">网页的 Url 列表。</param>
     Public Function NetGetCodeByDownload(Urls As IEnumerable(Of String), Optional Timeout As Integer = 45000, Optional IsJson As Boolean = False, Optional UseBrowserUserAgent As Boolean = False) As String
         Dim Temp As String = PathTemp & "Cache\Code\" & Urls.First.GetHashCode() & "_" & GetUuid()
-        Dim NewTask As New LoaderDownload(GetLang("LangModTaskDownlaodCode", GetUuid() & "#"), New List(Of NetFile) From {New NetFile(Urls, Temp, New FileChecker With {.IsJson = IsJson}, UseBrowserUserAgent)})
+        Dim NewTask As New LoaderDownload(GetLang("LangModTaskDownloadCode", GetUuid() & "#"), New List(Of NetFile) From {New NetFile(Urls, Temp, New FileChecker With {.IsJson = IsJson}, UseBrowserUserAgent)})
         Try
-            NewTask.WaitForExitTime(Timeout, TimeoutMessage:=GetLang("LangModExceptionDownlaodCodeSource", Urls.First))
+            NewTask.WaitForExitTime(Timeout, TimeoutMessage:=GetLang("LangModExceptionDownloadCodeSource", Urls.First))
             NetGetCodeByDownload = ReadFile(Temp)
             File.Delete(Temp)
         Finally

Plain Craft Launcher 2/Modules/Minecraft/ModModpack.vb

@@ -16,7 +16,7 @@ Public Module ModModpack
                 ModpackInstall(File)
             Catch ex As CancelledException
             Catch ex As Exception
-                Log(ex, GetLang("LangModModpackExceptionManualInsatllFail"), LogLevel.Msgbox)
+                Log(ex, GetLang("LangModModpackExceptionManualInstallFail"), LogLevel.Msgbox)
             End Try
         End Sub)
     End Sub
@@ -735,7 +735,7 @@ Retry:
             WriteIni(PathMcFolder & "versions\" & VersionName & "\PCL\Setup.ini", "VersionArgumentIndie", 1)
         End Sub) With {.ProgressWeight = New FileInfo(FileAddress).Length / 1024 / 1024 / 6, .Block = False}) '每 6M 需要 1s
         '构造加载器
-        If Json("addons") Is Nothing Then Throw New Exception(GetLang("LangModModpackNoAddons"))
+        If Json("addons") Is Nothing Then Throw New Exception(GetLang("LangModModpackMCBBSNoGameInfoAddons"))
         Dim Addons As New Dictionary(Of String, String)
         For Each Entry In Json("addons")
             Addons.Add(Entry("id"), Entry("version"))
@@ -791,8 +791,8 @@ Retry:
         If TargetFolder.Contains("!") OrElse TargetFolder.Contains(";") Then Hint(GetLang("LangModModpackFolderNoExclamationOrSemicolon"), HintType.Critical) : Throw New CancelledException
         If Directory.GetFileSystemEntries(TargetFolder).Length > 0 Then Hint(GetLang("LangModModpackFolderShouldBeEmpty"), HintType.Critical) : Throw New CancelledException
         '解压
-        Dim Loader As New LoaderCombo(Of String)(GetLang("LangModModpackExtractArchive"), {
-            New LoaderTask(Of String, Integer)(GetLang("LangModModpackExtractArchive"),
+        Dim Loader As New LoaderCombo(Of String)(GetLang("LangModModpackTaskExtractArchive"), {
+            New LoaderTask(Of String, Integer)(GetLang("LangModModpackTaskExtractArchive"),
             Sub(Task As LoaderTask(Of String, Integer))
                 ExtractModpackFiles(TargetFolder, FileAddress, Task, 0.9)
                 Thread.Sleep(400) '避免文件争用
@@ -862,8 +862,8 @@ Retry:
         If TargetFolder.Contains("!") OrElse TargetFolder.Contains(";") Then Hint(GetLang("LangModModpackFolderNoExclamationOrSemicolon"), HintType.Critical) : Throw New CancelledException
         If Directory.GetFileSystemEntries(TargetFolder).Length > 0 Then Hint(GetLang("LangModModpackFolderShouldBeEmpty"), HintType.Critical) : Throw New CancelledException
         '解压
-        Dim Loader As New LoaderCombo(Of String)(GetLang("LangModModpackExtractArchive"), {
-            New LoaderTask(Of String, Integer)(GetLang("LangModModpackExtractArchive"),
+        Dim Loader As New LoaderCombo(Of String)(GetLang("LangModModpackTaskExtractArchive"), {
+            New LoaderTask(Of String, Integer)(GetLang("LangModModpackTaskExtractArchive"),
             Sub(Task As LoaderTask(Of String, Integer))
                 ExtractModpackFiles(TargetFolder, FileAddress, Task, 0.95)
                 '加入文件夹列表

Plain Craft Launcher 2/Modules/Modi18n.vb

@@ -123,7 +123,7 @@ Module Modi18n
             End If
         Next
 
-        Select Case CurrentCulture
+        Select Case CurrentCulture '部分需要特殊匹配的语言
             Case "en-GB", "en-NZ", "en-AU", "en-CA"
                 Return "en_GB"
             Case "zh-CN", "zh-SG", "zh-Hans"
@@ -134,7 +134,7 @@ Module Modi18n
                 Return "zh_TW"
         End Select
 
-        Return "en_US"
+        Return "en_US" '无匹配则返回 en_us
     End Function
 
     ''' <summary>
@@ -144,7 +144,7 @@ Module Modi18n
     ''' <returns>11 Million、2 万等这样的表示</returns>
     Public Function GetLocationNum(Num As Int32) As String
         Select Case Lang
-            Case "zh_CN", "zh_HK", "zh_TW", "lzh", "zh_MEME", "ja_JP", "ko_KR"
+            Case "ja_JP", "ko_KR", "lzh", "zh_CN", "zh_HK", "zh_MARS", "zh_MEME", "zh_TW"
                 Return If(Num > 1000000000000, Math.Round(Num / 1000000000000, 2) & " " & GetLang("LangModCompModDigit3"), '兆
                 If(Num > 100000000, Math.Round(Num / 100000000, 2) & " " & GetLang("LangModCompModDigit2"), '亿
                 If(Num > 100000, Math.Round(Num / 10000, 0) & " " & GetLang("LangModCompModDigit1"), Num.ToString("N0") & " "))) '万

Plain Craft Launcher 2/Pages/PageDownload/ModDownloadLib.vb

@@ -1777,7 +1777,7 @@ Retry:
         If IsNeoForge OrElse LoaderVersion.BeforeFirst(".") >= 20 Then
             Log($"[Download] 检测为{If(IsNeoForge, " Neo", "新版 ")}Forge：" & LoaderVersion)
             Dim Libs As List(Of McLibToken) = Nothing
-            Loaders.Add(New LoaderTask(Of String, List(Of NetFile))(GetLang("LangPageSpeedRightAnalyseModLoaderSupportLibrary", LoaderName),
+            Loaders.Add(New LoaderTask(Of String, List(Of NetFile))(GetLang("LangPageSpeedRightAnalyzeModLoaderSupportLibrary", LoaderName),
             Sub(Task As LoaderTask(Of String, List(Of NetFile)))
                 Task.Output = New List(Of NetFile)
                 Dim Installer As ZipArchive = Nothing

Plain Craft Launcher 2/Pages/PageSetup/PageSetupSystem.xaml.vb

@@ -159,7 +159,7 @@
                 Case Is <= 41
                     Return (v - 21) & " M/s"
                 Case Else
-                    Return GetLang("LangPageSetupSystemDownloadSpeedUnlimit")
+                    Return GetLang("LangPageSetupSystemDownloadSpeedUnlimited")
             End Select
         End Function
         SliderDebugAnim.GetHintText = Function(v) If(v > 29, GetLang("LangPageSetupSystemDebugAnimSpeedDisable"), (v / 10 + 0.1) & "x")

Plain Craft Launcher 2/Resources/Language/el_GR.xaml

@@ -393,7 +393,7 @@
     <s:String x:Key="LangPageSpeedRightInstallForgeMethodA">Εγκατάσταση Forge (Μέθοδος Α)</s:String>
     <s:String x:Key="LangPageSpeedRightInstallNeoForge">Εγκατάσταση NeoForge</s:String>
     <s:String x:Key="LangPageSpeedRightDownloadModLoaderMainFile">Λήψη {0} Κύριου Αρχείου</s:String>
-    <s:String x:Key="LangPageSpeedRightAnalyseModLoaderSupportLibrary">Ανάλυση {0} Βιβλιοθηκών</s:String>
+    <s:String x:Key="LangPageSpeedRightAnalyzeModLoaderSupportLibrary">Ανάλυση {0} Βιβλιοθηκών</s:String>
     <s:String x:Key="LangPageSpeedRightDownloadModLoaderSupportLibrary">Λήψη {0} Βιβλιοθηκών</s:String>
     <s:String x:Key="LangPageSpeedRightGetOptiFineDownloadAddress">Λήψη Διεύθυνσης OptiFine</s:String>
     <s:String x:Key="LangPageSpeedRightDownloadOptiFineMainFile">Λήψη Κύριου Αρχείου OptiFine</s:String>
@@ -995,7 +995,7 @@ Email για Αναφορά Παράνομης και Παράτυπης Συμ
     <s:String x:Key="LangPageSetupSystemSystemLaunchUpdateE">Λήψη της νέας έκδοσης αυτόματα (Μπορεί να απαιτείται το κλειδί ενημέρωσης για την ενημέρωση της έκδοσης στιγμιότυπου)</s:String>
     <s:String x:Key="LangPageSetupSystemLaunchResetSuccess">Οι ρυθμίσεις στη σελίδα «Εκκίνηση» έχουν προετοιμαστεί!</s:String>
     <s:String x:Key="LangPageSetupSystemLaunchResetFail">Απέτυχε η προετοιμασία των ρυθμίσεων στη σελίδα «Εκκίνηση».</s:String>
-    <s:String x:Key="LangPageSetupSystemDownloadSpeedUnlimit">Απεριόριστο</s:String>
+    <s:String x:Key="LangPageSetupSystemDownloadSpeedUnlimited">Απεριόριστο</s:String>
     <s:String x:Key="LangPageSetupSystemDebugAnimSpeedDisable">Απενεργοποιημένο</s:String>
     <s:String x:Key="LangPageSetupSystemDownloadSpeedDialogThreadTooMuchContent">Η ρύθμιση πολλών νημάτων θα προκαλέσει σημαντικές καθυστερήσεις κατά τη λήψη.
 Η απαίτηση λήψης μπορεί να είναι εξασφαλισμένη όταν έχει οριστεί σε 64. Τα νήματα πάνω από το 64 ΔΕΝ προτείνονται εκτός και αν γνωρίζετε τι ακριβώς κάνετε!</s:String>
@@ -1642,7 +1642,7 @@ URL: {0}</s:String>
     <s:String x:Key="LangModModpackTaskRenameInstanceJsonFileSideLoader">Μετονομασία Παρουσίας JSON (Πλευρικός Φορτωτής)</s:String>
     <s:String x:Key="LangModModpackTaskHMCLModpackInstall">Εγκατάσταση HMCL Modpack: </s:String>
     <s:String x:Key="LangModModpackTaskMMCModpackInstall">Εγκατάσταση MMC Modpack: </s:String>
-    <s:String x:Key="LangModModpackNoAddons">Δεν είναι δυνατή η εγκατάσταση καθώς το modpack δεν παρέχει τις πρόσθετες πληροφορίες έκδοσης παιχνιδιού!</s:String>
+    <s:String x:Key="LangModModpackMCBBSNoGameInfoAddons">Δεν είναι δυνατή η εγκατάσταση καθώς το modpack δεν παρέχει τις πρόσθετες πληροφορίες έκδοσης παιχνιδιού!</s:String>
     <s:String x:Key="LangModModpackHMCLNoGameInfo">该 HMCL 整合包未提供游戏版本信息，无法安装！</s:String>
     <s:String x:Key="LangModModpackMMCNoGameInfo">该 MMC 整合包未提供游戏版本信息，无法安装！</s:String>
     <s:String x:Key="LangModModpackMCBBSNoGameInfo">该 MCBBS 整合包未提供游戏版本信息，无法安装！</s:String>
@@ -1654,9 +1654,9 @@ URL: {0}</s:String>
     <s:String x:Key="LangModModpackSelectInstallFolder">Επιλέξτε προορισμό εγκατάστασης (πρέπει να είναι κενός φάκελος)</s:String>
     <s:String x:Key="LangModModpackFolderNoExclamationOrSemicolon">Οι διαδρομές του φακέλου Minecraft δεν μπορούν να περιέχουν θαυμαστικά (!) ή ερωτηματικό (;)!</s:String>
     <s:String x:Key="LangModModpackFolderShouldBeEmpty">Επιλέξτε έναν κενό φάκελο ως προορισμό εγκατάστασης!</s:String>
-    <s:String x:Key="LangModModpackExtractArchive">解压压缩包</s:String>
+    <s:String x:Key="LangModModpackTaskExtractArchive">解压压缩包</s:String>
     <s:String x:Key="LangModModpackAddedToGameList">Προστέθηκε στη λίστα φακέλων: {0}</s:String>
-    <s:String x:Key="LangModModpackExceptionManualInsatllFail">手动安装整合包失败</s:String>
+    <s:String x:Key="LangModModpackExceptionManualInstallFail">手动安装整合包失败</s:String>
     <s:String x:Key="LangModModpackExceptionOpenFileFail">打开整合包文件失败</s:String>
     <s:String x:Key="LangModModpackExceptionRarFormat">PCL 无法处理 rar 格式的压缩包，请在解压后重新压缩为 zip 格式再试</s:String>
     <s:String x:Key="LangModModpackExceptionReadFileFail">打开整合包文件失败，文件可能损坏或为不支持的压缩包格式</s:String>
@@ -1882,7 +1882,7 @@ URL: {0}</s:String>
 
 Εξετάστε τις ακόλουθες λύσεις:
  - Ενημερώστε το Forge στην έκδοση 36.2.26 ή νεότερη.
- - Χρησιμοποιήστε μια έκδοση Java χαμηλότερη από 1.8.0.320.</s:String>
+ - Χρησιμοποιήστε μια έκδοση Java χαμηλότερη από 1.8.0_320.</s:String>
     <s:String x:Key="LangModCrashCrashReasonReasonBH">Το παιχνίδι πιθανόν να διακοπεί λόγω τροποποιήσεων που έγιναν στην έκδοση Forge από άλλους εκτοξευτές, με αποτέλεσμα μη φυσιολογικά αρχεία εντός της παρουσίας.
 Εξετάστε το ενδεχόμενο να εγκαταστήσετε ξανά την παρουσία του Forge από την αρχή, αντί να βασίζεστε σε άλλους εκτοξευτές για να τροποποιήσετε την έκδοση Forge.</s:String>
     <s:String x:Key="LangModCrashCrashReasonReasonBI">* Στην πραγματικότητα, το παιχνίδι σας δεν έχει προβλήματα, αυτό το crash ενεργοποιείται από εσάς.
@@ -1975,8 +1975,8 @@ URL: {0}</s:String>
     <s:String x:Key="LangModExceptionFailedToGet">Αποτυχία Λήψης Αποτελεσμάτων ({0})</s:String>
     <s:String x:Key="LangModExceptionTimeOut">χρονικό όριο της σύνδεσης διακομιστή έληξε</s:String>
     <s:String x:Key="LangModExceptionRunInUI">Εκτελέστηκε μια αίτηση δικτύου στο νήμα περιβάλλοντος εργασίας χρήστη</s:String>
-    <s:String x:Key="LangModTaskDownlaodCode">Απόκτηση πηγαίου κώδικα {0}</s:String>
-    <s:String x:Key="LangModExceptionDownlaodCodeSource">Λήξη χρονικού ορίου σύνδεσης με διακομιστή (πρώτη πηγή λήψης: {0}）</s:String>
+    <s:String x:Key="LangModTaskDownloadCode">Απόκτηση πηγαίου κώδικα {0}</s:String>
+    <s:String x:Key="LangModExceptionDownloadCodeSource">Λήξη χρονικού ορίου σύνδεσης με διακομιστή (πρώτη πηγή λήψης: {0}）</s:String>
     <s:String x:Key="LangModExceptionDownloadFail">直接下载文件失败（{0}）</s:String>
     <s:String x:Key="LangModExceptionCreateDirectoryFail">预处理下载文件路径失败（{0}）</s:String>
     <s:String x:Key="LangModExceptionUnknown">未知错误</s:String>