fix CR old leading zeros #469
fix CR Beta tag issue with arabic #468
This commit is contained in:
hama3254 2022-04-27 22:22:15 +02:00
parent f5767575d0
commit d12deb57e6
8 changed files with 21 additions and 15 deletions

Binary file not shown.

View File

@ -1212,6 +1212,7 @@ Public Class Main
End If End If
End If End If
If Episode_Prefix = "[default episode prefix]" Then If Episode_Prefix = "[default episode prefix]" Then
CR_Anime_Folge = CR_Anime_Folge.Replace(CR_Anime_Folge_int, AddLeadingZeros(CR_Anime_Folge_int))
Else Else
CR_Anime_Folge = Episode_Prefix + AddLeadingZeros(CR_Anime_Folge_int) CR_Anime_Folge = Episode_Prefix + AddLeadingZeros(CR_Anime_Folge_int)
End If End If
@ -1249,7 +1250,7 @@ Public Class Main
Else Else
CR_Anime_Staffel_int = "0" + CR_Anime_Staffel_int CR_Anime_Staffel_int = "0" + CR_Anime_Staffel_int
End If End If
KodiString = KodiString + CR_Anime_Staffel_int + " E" + CR_Anime_Folge_int KodiString = KodiString + CR_Anime_Staffel_int + " E" + AddLeadingZeros(CR_Anime_Folge_int)
KodiString = KodiString + "] " KodiString = KodiString + "] "
CR_FilenName = KodiString + CR_FilenName CR_FilenName = KodiString + CR_FilenName
End If End If
@ -1856,11 +1857,11 @@ Public Class Main
Else Else
CR_Anime_Staffel_int = "0" + CR_Anime_Staffel_int CR_Anime_Staffel_int = "0" + CR_Anime_Staffel_int
End If End If
Dim CR_episode_nr As String = CR_episode_int 'Dim CR_episode_nr As String = CR_episode_int
If CR_episode_nr.Length = 1 Then 'If CR_episode_nr.Length = 1 Then
CR_episode_nr = "0" + CR_episode_nr ' CR_episode_nr = "0" + CR_episode_nr
End If 'End If
KodiString = KodiString + CR_Anime_Staffel_int + " E" + CR_episode_nr KodiString = KodiString + CR_Anime_Staffel_int + " E" + AddLeadingZeros(CR_episode_int) ' CR_episode_nr
KodiString = KodiString + "] " KodiString = KodiString + "] "
CR_FilenName = KodiString + CR_FilenName CR_FilenName = KodiString + CR_FilenName
End If End If
@ -2212,6 +2213,8 @@ Public Class Main
Return "fr-FR" Return "fr-FR"
ElseIf CC = "arME" Then ElseIf CC = "arME" Then
Return "ar-ME" Return "ar-ME"
ElseIf CC = "ar-SA" Then
Return "ar-SA"
ElseIf CC = "ruRU" Then ElseIf CC = "ruRU" Then
Return "ru-RU" Return "ru-RU"
ElseIf CC = "itIT" Then ElseIf CC = "itIT" Then
@ -2375,13 +2378,15 @@ Public Class Main
Else Else
CR_Anime_Staffel_int = "0" + CR_Anime_Staffel_int CR_Anime_Staffel_int = "0" + CR_Anime_Staffel_int
End If End If
Dim CR_episode_nr As String = CR_episode_int
If CR_episode_nr.Length = 1 Then 'Dim CR_episode_nr As String = CR_episode_int
CR_episode_nr = "0" + CR_episode_nr 'If CR_episode_nr.Length = 1 Then
ElseIf CR_episode_nr.Length = 0 Then ' CR_episode_nr = "0" + CR_episode_nr
Throw New System.Exception("no episode") 'ElseIf CR_episode_nr.Length = 0 Then
End If ' Throw New System.Exception("no episode")
KodiString = KodiString + CR_Anime_Staffel_int + " E" + CR_episode_nr 'End If
KodiString = KodiString + CR_Anime_Staffel_int + " E" + AddLeadingZeros(CR_episode_int)
KodiString = KodiString + "] " KodiString = KodiString + "] "
CR_FilenName = KodiString + CR_FilenName CR_FilenName = KodiString + CR_FilenName
End If End If

View File

@ -32,6 +32,6 @@ Imports System.Runtime.InteropServices
' übernehmen, indem Sie "*" eingeben: ' übernehmen, indem Sie "*" eingeben:
' <Assembly: AssemblyVersion("1.0.*")> ' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("3.8.5.0")> <Assembly: AssemblyVersion("3.8.6.0")>
<Assembly: AssemblyFileVersion("3.8.5.0")> <Assembly: AssemblyFileVersion("3.8.6.0")>
<Assembly: NeutralResourcesLanguage("en")> <Assembly: NeutralResourcesLanguage("en")>

View File

@ -740,6 +740,7 @@ Public Class Einstellungen
End If End If
If CBarME.Checked = True Then If CBarME.Checked = True Then
Main.SoftSubs.Add("arME") Main.SoftSubs.Add("arME")
Main.SoftSubs.Add("ar-SA")
End If End If
If CBruRU.Checked = True Then If CBruRU.Checked = True Then
Main.SoftSubs.Add("ruRU") Main.SoftSubs.Add("ruRU")