mirror of
https://github.com/hama3254/Crunchyroll-Downloader-v3.0.git
synced 2024-06-02 14:18:45 +02:00
Compare commits
39 Commits
Author | SHA1 | Date | |
---|---|---|---|
|
1bf1e7d89e | ||
|
1b8098057a | ||
|
2c7d26fe51 | ||
|
28d971b359 | ||
|
e4345a9aab | ||
|
476ee62251 | ||
|
c39c79dbef | ||
|
397c06215a | ||
|
ca18ed8dbb | ||
|
ad4d8690cc | ||
|
5c5925ba35 | ||
|
c9e85c5f30 | ||
|
536c0b3dfd | ||
|
b94628dfc3 | ||
|
afd5f06a17 | ||
|
3d0467ed8a | ||
|
a8aeceb617 | ||
|
9be37f3904 | ||
|
1887c6ad49 | ||
|
e818618f53 | ||
|
8f3b4f4108 | ||
|
31aa603e74 | ||
|
8a36bf5e6a | ||
|
eb5e89b148 | ||
|
8035f45e0b | ||
|
ea3a90ad84 | ||
|
57613b2251 | ||
|
04e9730ad1 | ||
|
04bb552ec6 | ||
|
53f79d351f | ||
|
638555f781 | ||
|
a7b5c312fd | ||
|
ea63b56ba6 | ||
|
08bec55b38 | ||
|
4ee9664b3a | ||
|
c66a8d21f7 | ||
|
d2797b4b2e | ||
|
e2444a26b4 | ||
|
cb9957daf9 |
13
.editorconfig
Normal file
13
.editorconfig
Normal file
|
@ -0,0 +1,13 @@
|
|||
[*.vb]
|
||||
|
||||
# IDE0059: Unnötige Zuweisung eines Werts.
|
||||
dotnet_diagnostic.IDE0059.severity = none
|
||||
|
||||
# IDE0054: Verbundzuweisung verwenden
|
||||
dotnet_diagnostic.IDE0054.severity = none
|
||||
|
||||
# IDE0017: Initialisierung von Objekten vereinfachen
|
||||
dotnet_diagnostic.IDE0017.severity = none
|
||||
|
||||
# IDE0140: Objekterstellung kann vereinfacht werden
|
||||
dotnet_diagnostic.IDE0140.severity = none
|
Binary file not shown.
|
@ -1,10 +1,15 @@
|
|||
|
||||
Microsoft Visual Studio Solution File, Format Version 12.00
|
||||
# Visual Studio 15
|
||||
VisualStudioVersion = 15.0.27703.2035
|
||||
# Visual Studio Version 17
|
||||
VisualStudioVersion = 17.6.33815.320
|
||||
MinimumVisualStudioVersion = 10.0.40219.1
|
||||
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "Crunchyroll Downloader", "Crunchyroll Downloader\Crunchyroll Downloader.vbproj", "{9B604819-2DB7-4BE1-BA43-43BABEBB5EC3}"
|
||||
EndProject
|
||||
Project("{2150E333-8FDC-42A3-9474-1A3956D46DE8}") = "Solution Items", "Solution Items", "{BDF9FC54-2F89-41D3-A506-81319A019CDE}"
|
||||
ProjectSection(SolutionItems) = preProject
|
||||
.editorconfig = .editorconfig
|
||||
EndProjectSection
|
||||
EndProject
|
||||
Global
|
||||
GlobalSection(SolutionConfigurationPlatforms) = preSolution
|
||||
Debug|x64 = Debug|x64
|
||||
|
|
575
Crunchyroll Downloader/Anime_Add.Designer.vb
generated
575
Crunchyroll Downloader/Anime_Add.Designer.vb
generated
|
@ -23,279 +23,33 @@ Partial Class Anime_Add
|
|||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()>
|
||||
Private Sub InitializeComponent()
|
||||
Me.components = New System.ComponentModel.Container()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Anime_Add))
|
||||
Me.groupBox1 = New System.Windows.Forms.GroupBox()
|
||||
Me.DownloadScope = New MetroFramework.Controls.MetroComboBox()
|
||||
Me.StatusLabel = New MetroFramework.Controls.MetroLabel()
|
||||
Me.ComboBox2 = New MetroFramework.Controls.MetroComboBox()
|
||||
Me.TextBox4 = New MetroFramework.Controls.MetroTextBox()
|
||||
Me.textBox1 = New MetroFramework.Controls.MetroTextBox()
|
||||
Me.TextBox2 = New MetroFramework.Controls.MetroTextBox()
|
||||
Me.groupBox2 = New System.Windows.Forms.GroupBox()
|
||||
Me.bt_Cancel_mass = New System.Windows.Forms.Button()
|
||||
Me.comboBox4 = New MetroFramework.Controls.MetroComboBox()
|
||||
Me.ComboBox1 = New MetroFramework.Controls.MetroComboBox()
|
||||
Me.comboBox3 = New MetroFramework.Controls.MetroComboBox()
|
||||
Me.Add_Display = New MetroFramework.Controls.MetroLabel()
|
||||
Me.Btn_min = New System.Windows.Forms.PictureBox()
|
||||
Me.Btn_Close = New System.Windows.Forms.PictureBox()
|
||||
Me.btn_dl = New System.Windows.Forms.Button()
|
||||
Me.BackgroundWorker1 = New System.ComponentModel.BackgroundWorker()
|
||||
Me.groupBox1.SuspendLayout()
|
||||
Me.groupBox2.SuspendLayout()
|
||||
Me.Add_Display = New MetroFramework.Controls.MetroLabel()
|
||||
Me.CB_EP0 = New MetroFramework.Controls.MetroComboBox()
|
||||
Me.CB_Season = New MetroFramework.Controls.MetroComboBox()
|
||||
Me.CB_EP1 = New MetroFramework.Controls.MetroComboBox()
|
||||
Me.bt_Cancel_mass = New System.Windows.Forms.Button()
|
||||
Me.groupBox2 = New System.Windows.Forms.GroupBox()
|
||||
Me.CB_Dub = New MetroFramework.Controls.MetroComboBox()
|
||||
Me.TextBox2 = New MetroFramework.Controls.MetroTextBox()
|
||||
Me.textBox1 = New MetroFramework.Controls.MetroTextBox()
|
||||
Me.TextBox4 = New MetroFramework.Controls.MetroTextBox()
|
||||
Me.ComboBox2 = New MetroFramework.Controls.MetroComboBox()
|
||||
Me.StatusLabel = New MetroFramework.Controls.MetroLabel()
|
||||
Me.DownloadScope = New MetroFramework.Controls.MetroComboBox()
|
||||
Me.groupBox1 = New System.Windows.Forms.GroupBox()
|
||||
Me.TT_Dub = New System.Windows.Forms.ToolTip(Me.components)
|
||||
CType(Me.Btn_min, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.Btn_Close, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.groupBox2.SuspendLayout()
|
||||
Me.groupBox1.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'groupBox1
|
||||
'
|
||||
Me.groupBox1.BackColor = System.Drawing.Color.Transparent
|
||||
Me.groupBox1.Controls.Add(Me.DownloadScope)
|
||||
Me.groupBox1.Controls.Add(Me.StatusLabel)
|
||||
Me.groupBox1.Controls.Add(Me.ComboBox2)
|
||||
Me.groupBox1.Controls.Add(Me.TextBox4)
|
||||
Me.groupBox1.Controls.Add(Me.textBox1)
|
||||
Me.groupBox1.Controls.Add(Me.TextBox2)
|
||||
Me.groupBox1.Location = New System.Drawing.Point(15, 70)
|
||||
Me.groupBox1.Name = "groupBox1"
|
||||
Me.groupBox1.Size = New System.Drawing.Size(720, 280)
|
||||
Me.groupBox1.TabIndex = 33
|
||||
Me.groupBox1.TabStop = False
|
||||
'
|
||||
'DownloadScope
|
||||
'
|
||||
Me.DownloadScope.BackColor = System.Drawing.Color.White
|
||||
Me.DownloadScope.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.DownloadScope.ForeColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.DownloadScope.FormattingEnabled = True
|
||||
Me.DownloadScope.ItemHeight = 23
|
||||
Me.DownloadScope.Items.AddRange(New Object() {"[Default]", "[Merge Audio with existing files]", "[Subtitles only]", "[Audio only (AAC)]"})
|
||||
Me.DownloadScope.Location = New System.Drawing.Point(18, 190)
|
||||
Me.DownloadScope.Name = "DownloadScope"
|
||||
Me.DownloadScope.Size = New System.Drawing.Size(693, 29)
|
||||
Me.DownloadScope.TabIndex = 39
|
||||
Me.DownloadScope.UseSelectable = True
|
||||
'
|
||||
'StatusLabel
|
||||
'
|
||||
Me.StatusLabel.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
|
||||
Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.StatusLabel.BackColor = System.Drawing.Color.Transparent
|
||||
Me.StatusLabel.FontSize = MetroFramework.MetroLabelSize.Tall
|
||||
Me.StatusLabel.FontWeight = MetroFramework.MetroLabelWeight.Regular
|
||||
Me.StatusLabel.ForeColor = System.Drawing.SystemColors.InactiveCaptionText
|
||||
Me.StatusLabel.Location = New System.Drawing.Point(18, 228)
|
||||
Me.StatusLabel.Name = "StatusLabel"
|
||||
Me.StatusLabel.Size = New System.Drawing.Size(693, 46)
|
||||
Me.StatusLabel.TabIndex = 38
|
||||
Me.StatusLabel.Text = "Status: idle"
|
||||
Me.StatusLabel.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'ComboBox2
|
||||
'
|
||||
Me.ComboBox2.BackColor = System.Drawing.Color.White
|
||||
Me.ComboBox2.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.ComboBox2.ForeColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.ComboBox2.FormattingEnabled = True
|
||||
Me.ComboBox2.ItemHeight = 23
|
||||
Me.ComboBox2.Location = New System.Drawing.Point(18, 148)
|
||||
Me.ComboBox2.Name = "ComboBox2"
|
||||
Me.ComboBox2.Size = New System.Drawing.Size(693, 29)
|
||||
Me.ComboBox2.Sorted = True
|
||||
Me.ComboBox2.TabIndex = 37
|
||||
Me.ComboBox2.UseSelectable = True
|
||||
'
|
||||
'TextBox4
|
||||
'
|
||||
Me.TextBox4.BackColor = System.Drawing.Color.White
|
||||
Me.TextBox4.Cursor = System.Windows.Forms.Cursors.Hand
|
||||
'
|
||||
'
|
||||
'
|
||||
Me.TextBox4.CustomButton.Image = Nothing
|
||||
Me.TextBox4.CustomButton.Location = New System.Drawing.Point(665, 1)
|
||||
Me.TextBox4.CustomButton.Name = ""
|
||||
Me.TextBox4.CustomButton.Size = New System.Drawing.Size(27, 27)
|
||||
Me.TextBox4.CustomButton.Style = MetroFramework.MetroColorStyle.Blue
|
||||
Me.TextBox4.CustomButton.TabIndex = 1
|
||||
Me.TextBox4.CustomButton.Theme = MetroFramework.MetroThemeStyle.Light
|
||||
Me.TextBox4.CustomButton.UseSelectable = True
|
||||
Me.TextBox4.CustomButton.Visible = False
|
||||
Me.TextBox4.FontSize = MetroFramework.MetroTextBoxSize.Medium
|
||||
Me.TextBox4.ForeColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.TextBox4.Lines = New String() {"Main Directory"}
|
||||
Me.TextBox4.Location = New System.Drawing.Point(18, 106)
|
||||
Me.TextBox4.MaxLength = 32767
|
||||
Me.TextBox4.Name = "TextBox4"
|
||||
Me.TextBox4.PasswordChar = Global.Microsoft.VisualBasic.ChrW(0)
|
||||
Me.TextBox4.ReadOnly = True
|
||||
Me.TextBox4.ScrollBars = System.Windows.Forms.ScrollBars.None
|
||||
Me.TextBox4.SelectedText = ""
|
||||
Me.TextBox4.SelectionLength = 0
|
||||
Me.TextBox4.SelectionStart = 0
|
||||
Me.TextBox4.ShortcutsEnabled = True
|
||||
Me.TextBox4.Size = New System.Drawing.Size(693, 29)
|
||||
Me.TextBox4.TabIndex = 36
|
||||
Me.TextBox4.TabStop = False
|
||||
Me.TextBox4.Text = "Main Directory"
|
||||
Me.TextBox4.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
|
||||
Me.TextBox4.UseSelectable = True
|
||||
Me.TextBox4.WaterMarkColor = System.Drawing.Color.FromArgb(CType(CType(109, Byte), Integer), CType(CType(109, Byte), Integer), CType(CType(109, Byte), Integer))
|
||||
Me.TextBox4.WaterMarkFont = New System.Drawing.Font("Segoe UI", 12.0!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Pixel)
|
||||
'
|
||||
'textBox1
|
||||
'
|
||||
Me.textBox1.BackColor = System.Drawing.Color.White
|
||||
Me.textBox1.Cursor = System.Windows.Forms.Cursors.Hand
|
||||
'
|
||||
'
|
||||
'
|
||||
Me.textBox1.CustomButton.Image = Nothing
|
||||
Me.textBox1.CustomButton.Location = New System.Drawing.Point(665, 1)
|
||||
Me.textBox1.CustomButton.Name = ""
|
||||
Me.textBox1.CustomButton.Size = New System.Drawing.Size(27, 27)
|
||||
Me.textBox1.CustomButton.Style = MetroFramework.MetroColorStyle.Blue
|
||||
Me.textBox1.CustomButton.TabIndex = 1
|
||||
Me.textBox1.CustomButton.Theme = MetroFramework.MetroThemeStyle.Light
|
||||
Me.textBox1.CustomButton.UseSelectable = True
|
||||
Me.textBox1.CustomButton.Visible = False
|
||||
Me.textBox1.FontSize = MetroFramework.MetroTextBoxSize.Medium
|
||||
Me.textBox1.ForeColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.textBox1.Lines = New String() {"URL"}
|
||||
Me.textBox1.Location = New System.Drawing.Point(18, 22)
|
||||
Me.textBox1.MaxLength = 32767
|
||||
Me.textBox1.Name = "textBox1"
|
||||
Me.textBox1.PasswordChar = Global.Microsoft.VisualBasic.ChrW(0)
|
||||
Me.textBox1.ScrollBars = System.Windows.Forms.ScrollBars.None
|
||||
Me.textBox1.SelectedText = ""
|
||||
Me.textBox1.SelectionLength = 0
|
||||
Me.textBox1.SelectionStart = 0
|
||||
Me.textBox1.ShortcutsEnabled = True
|
||||
Me.textBox1.Size = New System.Drawing.Size(693, 29)
|
||||
Me.textBox1.TabIndex = 4
|
||||
Me.textBox1.TabStop = False
|
||||
Me.textBox1.Text = "URL"
|
||||
Me.textBox1.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
|
||||
Me.textBox1.UseSelectable = True
|
||||
Me.textBox1.WaterMarkColor = System.Drawing.Color.FromArgb(CType(CType(109, Byte), Integer), CType(CType(109, Byte), Integer), CType(CType(109, Byte), Integer))
|
||||
Me.textBox1.WaterMarkFont = New System.Drawing.Font("Segoe UI", 12.0!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Pixel)
|
||||
'
|
||||
'TextBox2
|
||||
'
|
||||
Me.TextBox2.BackColor = System.Drawing.Color.White
|
||||
Me.TextBox2.Cursor = System.Windows.Forms.Cursors.Hand
|
||||
'
|
||||
'
|
||||
'
|
||||
Me.TextBox2.CustomButton.Image = Nothing
|
||||
Me.TextBox2.CustomButton.Location = New System.Drawing.Point(665, 1)
|
||||
Me.TextBox2.CustomButton.Name = ""
|
||||
Me.TextBox2.CustomButton.Size = New System.Drawing.Size(27, 27)
|
||||
Me.TextBox2.CustomButton.Style = MetroFramework.MetroColorStyle.Blue
|
||||
Me.TextBox2.CustomButton.TabIndex = 1
|
||||
Me.TextBox2.CustomButton.Theme = MetroFramework.MetroThemeStyle.Light
|
||||
Me.TextBox2.CustomButton.UseSelectable = True
|
||||
Me.TextBox2.CustomButton.Visible = False
|
||||
Me.TextBox2.FontSize = MetroFramework.MetroTextBoxSize.Medium
|
||||
Me.TextBox2.ForeColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.TextBox2.Lines = New String() {"Use Custom Name"}
|
||||
Me.TextBox2.Location = New System.Drawing.Point(18, 64)
|
||||
Me.TextBox2.MaxLength = 32767
|
||||
Me.TextBox2.Name = "TextBox2"
|
||||
Me.TextBox2.PasswordChar = Global.Microsoft.VisualBasic.ChrW(0)
|
||||
Me.TextBox2.ScrollBars = System.Windows.Forms.ScrollBars.None
|
||||
Me.TextBox2.SelectedText = ""
|
||||
Me.TextBox2.SelectionLength = 0
|
||||
Me.TextBox2.SelectionStart = 0
|
||||
Me.TextBox2.ShortcutsEnabled = True
|
||||
Me.TextBox2.Size = New System.Drawing.Size(693, 29)
|
||||
Me.TextBox2.TabIndex = 5
|
||||
Me.TextBox2.TabStop = False
|
||||
Me.TextBox2.Text = "Use Custom Name"
|
||||
Me.TextBox2.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
|
||||
Me.TextBox2.UseSelectable = True
|
||||
Me.TextBox2.WaterMarkColor = System.Drawing.Color.FromArgb(CType(CType(109, Byte), Integer), CType(CType(109, Byte), Integer), CType(CType(109, Byte), Integer))
|
||||
Me.TextBox2.WaterMarkFont = New System.Drawing.Font("Segoe UI", 12.0!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Pixel)
|
||||
'
|
||||
'groupBox2
|
||||
'
|
||||
Me.groupBox2.BackColor = System.Drawing.Color.Transparent
|
||||
Me.groupBox2.Controls.Add(Me.bt_Cancel_mass)
|
||||
Me.groupBox2.Controls.Add(Me.comboBox4)
|
||||
Me.groupBox2.Controls.Add(Me.ComboBox1)
|
||||
Me.groupBox2.Controls.Add(Me.comboBox3)
|
||||
Me.groupBox2.Controls.Add(Me.Add_Display)
|
||||
Me.groupBox2.Location = New System.Drawing.Point(15, 70)
|
||||
Me.groupBox2.Name = "groupBox2"
|
||||
Me.groupBox2.Size = New System.Drawing.Size(720, 280)
|
||||
Me.groupBox2.TabIndex = 44
|
||||
Me.groupBox2.TabStop = False
|
||||
Me.groupBox2.Visible = False
|
||||
'
|
||||
'bt_Cancel_mass
|
||||
'
|
||||
Me.bt_Cancel_mass.BackgroundImage = Global.Crunchyroll_Downloader.My.Resources.Resources.add_mass_cancel
|
||||
Me.bt_Cancel_mass.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch
|
||||
Me.bt_Cancel_mass.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.bt_Cancel_mass.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.bt_Cancel_mass.ForeColor = System.Drawing.SystemColors.Control
|
||||
Me.bt_Cancel_mass.Location = New System.Drawing.Point(159, 231)
|
||||
Me.bt_Cancel_mass.Name = "bt_Cancel_mass"
|
||||
Me.bt_Cancel_mass.Size = New System.Drawing.Size(403, 36)
|
||||
Me.bt_Cancel_mass.TabIndex = 37
|
||||
Me.bt_Cancel_mass.Text = "Cancel"
|
||||
Me.bt_Cancel_mass.UseVisualStyleBackColor = True
|
||||
'
|
||||
'comboBox4
|
||||
'
|
||||
Me.comboBox4.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.comboBox4.FormattingEnabled = True
|
||||
Me.comboBox4.ItemHeight = 23
|
||||
Me.comboBox4.Location = New System.Drawing.Point(13, 154)
|
||||
Me.comboBox4.Name = "comboBox4"
|
||||
Me.comboBox4.Size = New System.Drawing.Size(693, 29)
|
||||
Me.comboBox4.TabIndex = 2
|
||||
Me.comboBox4.UseSelectable = True
|
||||
'
|
||||
'ComboBox1
|
||||
'
|
||||
Me.ComboBox1.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.ComboBox1.FormattingEnabled = True
|
||||
Me.ComboBox1.ItemHeight = 23
|
||||
Me.ComboBox1.Location = New System.Drawing.Point(13, 50)
|
||||
Me.ComboBox1.Name = "ComboBox1"
|
||||
Me.ComboBox1.Size = New System.Drawing.Size(693, 29)
|
||||
Me.ComboBox1.TabIndex = 1
|
||||
Me.ComboBox1.UseSelectable = True
|
||||
'
|
||||
'comboBox3
|
||||
'
|
||||
Me.comboBox3.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.comboBox3.FormattingEnabled = True
|
||||
Me.comboBox3.ItemHeight = 23
|
||||
Me.comboBox3.Location = New System.Drawing.Point(13, 102)
|
||||
Me.comboBox3.Name = "comboBox3"
|
||||
Me.comboBox3.Size = New System.Drawing.Size(693, 29)
|
||||
Me.comboBox3.TabIndex = 1
|
||||
Me.comboBox3.UseSelectable = True
|
||||
'
|
||||
'Add_Display
|
||||
'
|
||||
Me.Add_Display.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
|
||||
Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.Add_Display.BackColor = System.Drawing.Color.Transparent
|
||||
Me.Add_Display.FontSize = MetroFramework.MetroLabelSize.Tall
|
||||
Me.Add_Display.FontWeight = MetroFramework.MetroLabelWeight.Regular
|
||||
Me.Add_Display.ForeColor = System.Drawing.Color.Black
|
||||
Me.Add_Display.Location = New System.Drawing.Point(20, 228)
|
||||
Me.Add_Display.Name = "Add_Display"
|
||||
Me.Add_Display.Size = New System.Drawing.Size(691, 42)
|
||||
Me.Add_Display.TabIndex = 36
|
||||
Me.Add_Display.Text = "..."
|
||||
Me.Add_Display.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Btn_min
|
||||
'
|
||||
Me.Btn_min.BackColor = System.Drawing.Color.Transparent
|
||||
|
@ -340,6 +94,267 @@ Partial Class Anime_Add
|
|||
Me.btn_dl.Text = "Download"
|
||||
Me.btn_dl.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Add_Display
|
||||
'
|
||||
Me.Add_Display.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
|
||||
Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.Add_Display.BackColor = System.Drawing.Color.Transparent
|
||||
Me.Add_Display.FontSize = MetroFramework.MetroLabelSize.Tall
|
||||
Me.Add_Display.FontWeight = MetroFramework.MetroLabelWeight.Regular
|
||||
Me.Add_Display.ForeColor = System.Drawing.Color.Black
|
||||
Me.Add_Display.Location = New System.Drawing.Point(20, 228)
|
||||
Me.Add_Display.Name = "Add_Display"
|
||||
Me.Add_Display.Size = New System.Drawing.Size(691, 52)
|
||||
Me.Add_Display.TabIndex = 36
|
||||
Me.Add_Display.Text = "..."
|
||||
Me.Add_Display.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'CB_EP0
|
||||
'
|
||||
Me.CB_EP0.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.CB_EP0.FormattingEnabled = True
|
||||
Me.CB_EP0.ItemHeight = 23
|
||||
Me.CB_EP0.Location = New System.Drawing.Point(13, 135)
|
||||
Me.CB_EP0.Name = "CB_EP0"
|
||||
Me.CB_EP0.Size = New System.Drawing.Size(693, 29)
|
||||
Me.CB_EP0.TabIndex = 1
|
||||
Me.CB_EP0.UseSelectable = True
|
||||
'
|
||||
'CB_Season
|
||||
'
|
||||
Me.CB_Season.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.CB_Season.FormattingEnabled = True
|
||||
Me.CB_Season.ItemHeight = 23
|
||||
Me.CB_Season.Location = New System.Drawing.Point(13, 86)
|
||||
Me.CB_Season.Name = "CB_Season"
|
||||
Me.CB_Season.Size = New System.Drawing.Size(693, 29)
|
||||
Me.CB_Season.TabIndex = 1
|
||||
Me.CB_Season.UseSelectable = True
|
||||
'
|
||||
'CB_EP1
|
||||
'
|
||||
Me.CB_EP1.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.CB_EP1.FormattingEnabled = True
|
||||
Me.CB_EP1.ItemHeight = 23
|
||||
Me.CB_EP1.Location = New System.Drawing.Point(13, 184)
|
||||
Me.CB_EP1.Name = "CB_EP1"
|
||||
Me.CB_EP1.Size = New System.Drawing.Size(693, 29)
|
||||
Me.CB_EP1.TabIndex = 2
|
||||
Me.CB_EP1.UseSelectable = True
|
||||
'
|
||||
'bt_Cancel_mass
|
||||
'
|
||||
Me.bt_Cancel_mass.BackgroundImage = Global.Crunchyroll_Downloader.My.Resources.Resources.add_mass_cancel
|
||||
Me.bt_Cancel_mass.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch
|
||||
Me.bt_Cancel_mass.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.bt_Cancel_mass.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.bt_Cancel_mass.ForeColor = System.Drawing.SystemColors.Control
|
||||
Me.bt_Cancel_mass.Location = New System.Drawing.Point(159, 231)
|
||||
Me.bt_Cancel_mass.Name = "bt_Cancel_mass"
|
||||
Me.bt_Cancel_mass.Size = New System.Drawing.Size(403, 36)
|
||||
Me.bt_Cancel_mass.TabIndex = 37
|
||||
Me.bt_Cancel_mass.Text = "Cancel"
|
||||
Me.bt_Cancel_mass.UseVisualStyleBackColor = True
|
||||
'
|
||||
'groupBox2
|
||||
'
|
||||
Me.groupBox2.BackColor = System.Drawing.Color.Transparent
|
||||
Me.groupBox2.Controls.Add(Me.CB_Dub)
|
||||
Me.groupBox2.Controls.Add(Me.bt_Cancel_mass)
|
||||
Me.groupBox2.Controls.Add(Me.CB_EP1)
|
||||
Me.groupBox2.Controls.Add(Me.CB_Season)
|
||||
Me.groupBox2.Controls.Add(Me.CB_EP0)
|
||||
Me.groupBox2.Controls.Add(Me.Add_Display)
|
||||
Me.groupBox2.Location = New System.Drawing.Point(15, 60)
|
||||
Me.groupBox2.Name = "groupBox2"
|
||||
Me.groupBox2.Size = New System.Drawing.Size(720, 290)
|
||||
Me.groupBox2.TabIndex = 44
|
||||
Me.groupBox2.TabStop = False
|
||||
Me.groupBox2.Visible = False
|
||||
'
|
||||
'CB_Dub
|
||||
'
|
||||
Me.CB_Dub.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.CB_Dub.FormattingEnabled = True
|
||||
Me.CB_Dub.ItemHeight = 23
|
||||
Me.CB_Dub.Location = New System.Drawing.Point(13, 37)
|
||||
Me.CB_Dub.Name = "CB_Dub"
|
||||
Me.CB_Dub.Size = New System.Drawing.Size(693, 29)
|
||||
Me.CB_Dub.TabIndex = 38
|
||||
Me.CB_Dub.UseSelectable = True
|
||||
'
|
||||
'TextBox2
|
||||
'
|
||||
Me.TextBox2.BackColor = System.Drawing.Color.White
|
||||
Me.TextBox2.Cursor = System.Windows.Forms.Cursors.Hand
|
||||
'
|
||||
'
|
||||
'
|
||||
Me.TextBox2.CustomButton.Image = Nothing
|
||||
Me.TextBox2.CustomButton.Location = New System.Drawing.Point(665, 1)
|
||||
Me.TextBox2.CustomButton.Name = ""
|
||||
Me.TextBox2.CustomButton.Size = New System.Drawing.Size(27, 27)
|
||||
Me.TextBox2.CustomButton.Style = MetroFramework.MetroColorStyle.Blue
|
||||
Me.TextBox2.CustomButton.TabIndex = 1
|
||||
Me.TextBox2.CustomButton.Theme = MetroFramework.MetroThemeStyle.Light
|
||||
Me.TextBox2.CustomButton.UseSelectable = True
|
||||
Me.TextBox2.CustomButton.Visible = False
|
||||
Me.TextBox2.FontSize = MetroFramework.MetroTextBoxSize.Medium
|
||||
Me.TextBox2.ForeColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.TextBox2.Lines = New String() {"Use Custom Name"}
|
||||
Me.TextBox2.Location = New System.Drawing.Point(18, 78)
|
||||
Me.TextBox2.MaxLength = 32767
|
||||
Me.TextBox2.Name = "TextBox2"
|
||||
Me.TextBox2.PasswordChar = Global.Microsoft.VisualBasic.ChrW(0)
|
||||
Me.TextBox2.ScrollBars = System.Windows.Forms.ScrollBars.None
|
||||
Me.TextBox2.SelectedText = ""
|
||||
Me.TextBox2.SelectionLength = 0
|
||||
Me.TextBox2.SelectionStart = 0
|
||||
Me.TextBox2.ShortcutsEnabled = True
|
||||
Me.TextBox2.Size = New System.Drawing.Size(693, 29)
|
||||
Me.TextBox2.TabIndex = 5
|
||||
Me.TextBox2.TabStop = False
|
||||
Me.TextBox2.Text = "Use Custom Name"
|
||||
Me.TextBox2.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
|
||||
Me.TextBox2.UseSelectable = True
|
||||
Me.TextBox2.WaterMarkColor = System.Drawing.Color.FromArgb(CType(CType(109, Byte), Integer), CType(CType(109, Byte), Integer), CType(CType(109, Byte), Integer))
|
||||
Me.TextBox2.WaterMarkFont = New System.Drawing.Font("Segoe UI", 12.0!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Pixel)
|
||||
'
|
||||
'textBox1
|
||||
'
|
||||
Me.textBox1.BackColor = System.Drawing.Color.White
|
||||
Me.textBox1.Cursor = System.Windows.Forms.Cursors.Hand
|
||||
'
|
||||
'
|
||||
'
|
||||
Me.textBox1.CustomButton.Image = Nothing
|
||||
Me.textBox1.CustomButton.Location = New System.Drawing.Point(665, 1)
|
||||
Me.textBox1.CustomButton.Name = ""
|
||||
Me.textBox1.CustomButton.Size = New System.Drawing.Size(27, 27)
|
||||
Me.textBox1.CustomButton.Style = MetroFramework.MetroColorStyle.Blue
|
||||
Me.textBox1.CustomButton.TabIndex = 1
|
||||
Me.textBox1.CustomButton.Theme = MetroFramework.MetroThemeStyle.Light
|
||||
Me.textBox1.CustomButton.UseSelectable = True
|
||||
Me.textBox1.CustomButton.Visible = False
|
||||
Me.textBox1.FontSize = MetroFramework.MetroTextBoxSize.Medium
|
||||
Me.textBox1.ForeColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.textBox1.Lines = New String() {"URL"}
|
||||
Me.textBox1.Location = New System.Drawing.Point(18, 36)
|
||||
Me.textBox1.MaxLength = 32767
|
||||
Me.textBox1.Name = "textBox1"
|
||||
Me.textBox1.PasswordChar = Global.Microsoft.VisualBasic.ChrW(0)
|
||||
Me.textBox1.ScrollBars = System.Windows.Forms.ScrollBars.None
|
||||
Me.textBox1.SelectedText = ""
|
||||
Me.textBox1.SelectionLength = 0
|
||||
Me.textBox1.SelectionStart = 0
|
||||
Me.textBox1.ShortcutsEnabled = True
|
||||
Me.textBox1.Size = New System.Drawing.Size(693, 29)
|
||||
Me.textBox1.TabIndex = 4
|
||||
Me.textBox1.TabStop = False
|
||||
Me.textBox1.Text = "URL"
|
||||
Me.textBox1.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
|
||||
Me.textBox1.UseSelectable = True
|
||||
Me.textBox1.WaterMarkColor = System.Drawing.Color.FromArgb(CType(CType(109, Byte), Integer), CType(CType(109, Byte), Integer), CType(CType(109, Byte), Integer))
|
||||
Me.textBox1.WaterMarkFont = New System.Drawing.Font("Segoe UI", 12.0!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Pixel)
|
||||
'
|
||||
'TextBox4
|
||||
'
|
||||
Me.TextBox4.BackColor = System.Drawing.Color.White
|
||||
Me.TextBox4.Cursor = System.Windows.Forms.Cursors.Hand
|
||||
'
|
||||
'
|
||||
'
|
||||
Me.TextBox4.CustomButton.Image = Nothing
|
||||
Me.TextBox4.CustomButton.Location = New System.Drawing.Point(665, 1)
|
||||
Me.TextBox4.CustomButton.Name = ""
|
||||
Me.TextBox4.CustomButton.Size = New System.Drawing.Size(27, 27)
|
||||
Me.TextBox4.CustomButton.Style = MetroFramework.MetroColorStyle.Blue
|
||||
Me.TextBox4.CustomButton.TabIndex = 1
|
||||
Me.TextBox4.CustomButton.Theme = MetroFramework.MetroThemeStyle.Light
|
||||
Me.TextBox4.CustomButton.UseSelectable = True
|
||||
Me.TextBox4.CustomButton.Visible = False
|
||||
Me.TextBox4.FontSize = MetroFramework.MetroTextBoxSize.Medium
|
||||
Me.TextBox4.ForeColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.TextBox4.Lines = New String() {"Main Directory"}
|
||||
Me.TextBox4.Location = New System.Drawing.Point(18, 120)
|
||||
Me.TextBox4.MaxLength = 32767
|
||||
Me.TextBox4.Name = "TextBox4"
|
||||
Me.TextBox4.PasswordChar = Global.Microsoft.VisualBasic.ChrW(0)
|
||||
Me.TextBox4.ReadOnly = True
|
||||
Me.TextBox4.ScrollBars = System.Windows.Forms.ScrollBars.None
|
||||
Me.TextBox4.SelectedText = ""
|
||||
Me.TextBox4.SelectionLength = 0
|
||||
Me.TextBox4.SelectionStart = 0
|
||||
Me.TextBox4.ShortcutsEnabled = True
|
||||
Me.TextBox4.Size = New System.Drawing.Size(693, 29)
|
||||
Me.TextBox4.TabIndex = 36
|
||||
Me.TextBox4.TabStop = False
|
||||
Me.TextBox4.Text = "Main Directory"
|
||||
Me.TextBox4.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
|
||||
Me.TextBox4.UseSelectable = True
|
||||
Me.TextBox4.WaterMarkColor = System.Drawing.Color.FromArgb(CType(CType(109, Byte), Integer), CType(CType(109, Byte), Integer), CType(CType(109, Byte), Integer))
|
||||
Me.TextBox4.WaterMarkFont = New System.Drawing.Font("Segoe UI", 12.0!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Pixel)
|
||||
'
|
||||
'ComboBox2
|
||||
'
|
||||
Me.ComboBox2.BackColor = System.Drawing.Color.White
|
||||
Me.ComboBox2.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.ComboBox2.ForeColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.ComboBox2.FormattingEnabled = True
|
||||
Me.ComboBox2.ItemHeight = 23
|
||||
Me.ComboBox2.Location = New System.Drawing.Point(18, 162)
|
||||
Me.ComboBox2.Name = "ComboBox2"
|
||||
Me.ComboBox2.Size = New System.Drawing.Size(693, 29)
|
||||
Me.ComboBox2.Sorted = True
|
||||
Me.ComboBox2.TabIndex = 37
|
||||
Me.ComboBox2.UseSelectable = True
|
||||
'
|
||||
'StatusLabel
|
||||
'
|
||||
Me.StatusLabel.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
|
||||
Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.StatusLabel.BackColor = System.Drawing.Color.Transparent
|
||||
Me.StatusLabel.FontSize = MetroFramework.MetroLabelSize.Tall
|
||||
Me.StatusLabel.FontWeight = MetroFramework.MetroLabelWeight.Regular
|
||||
Me.StatusLabel.ForeColor = System.Drawing.SystemColors.InactiveCaptionText
|
||||
Me.StatusLabel.Location = New System.Drawing.Point(18, 235)
|
||||
Me.StatusLabel.Name = "StatusLabel"
|
||||
Me.StatusLabel.Size = New System.Drawing.Size(693, 45)
|
||||
Me.StatusLabel.TabIndex = 38
|
||||
Me.StatusLabel.Text = "Status: idle"
|
||||
Me.StatusLabel.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'DownloadScope
|
||||
'
|
||||
Me.DownloadScope.BackColor = System.Drawing.Color.White
|
||||
Me.DownloadScope.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.DownloadScope.ForeColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.DownloadScope.FormattingEnabled = True
|
||||
Me.DownloadScope.ItemHeight = 23
|
||||
Me.DownloadScope.Items.AddRange(New Object() {"[Default]", "[Merge Audio with existing files]", "[Subtitles only]", "[Audio only (AAC)]"})
|
||||
Me.DownloadScope.Location = New System.Drawing.Point(18, 204)
|
||||
Me.DownloadScope.Name = "DownloadScope"
|
||||
Me.DownloadScope.Size = New System.Drawing.Size(693, 29)
|
||||
Me.DownloadScope.TabIndex = 39
|
||||
Me.DownloadScope.UseSelectable = True
|
||||
'
|
||||
'groupBox1
|
||||
'
|
||||
Me.groupBox1.BackColor = System.Drawing.Color.Transparent
|
||||
Me.groupBox1.Controls.Add(Me.DownloadScope)
|
||||
Me.groupBox1.Controls.Add(Me.StatusLabel)
|
||||
Me.groupBox1.Controls.Add(Me.ComboBox2)
|
||||
Me.groupBox1.Controls.Add(Me.TextBox4)
|
||||
Me.groupBox1.Controls.Add(Me.textBox1)
|
||||
Me.groupBox1.Controls.Add(Me.TextBox2)
|
||||
Me.groupBox1.Location = New System.Drawing.Point(15, 60)
|
||||
Me.groupBox1.Name = "groupBox1"
|
||||
Me.groupBox1.Size = New System.Drawing.Size(720, 290)
|
||||
Me.groupBox1.TabIndex = 33
|
||||
Me.groupBox1.TabStop = False
|
||||
'
|
||||
'Anime_Add
|
||||
'
|
||||
Me.ApplyImageInvert = True
|
||||
|
@ -349,36 +364,38 @@ Partial Class Anime_Add
|
|||
Me.Controls.Add(Me.btn_dl)
|
||||
Me.Controls.Add(Me.Btn_min)
|
||||
Me.Controls.Add(Me.Btn_Close)
|
||||
Me.Controls.Add(Me.groupBox1)
|
||||
Me.Controls.Add(Me.groupBox2)
|
||||
Me.Controls.Add(Me.groupBox1)
|
||||
Me.Font = New System.Drawing.Font("Arial", 24.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Name = "Anime_Add"
|
||||
Me.Padding = New System.Windows.Forms.Padding(10, 60, 20, 20)
|
||||
Me.Text = "Add Video"
|
||||
Me.TextAlign = MetroFramework.Forms.MetroFormTextAlign.Center
|
||||
Me.groupBox1.ResumeLayout(False)
|
||||
Me.groupBox2.ResumeLayout(False)
|
||||
CType(Me.Btn_min, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.Btn_Close, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.groupBox2.ResumeLayout(False)
|
||||
Me.groupBox1.ResumeLayout(False)
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
Public WithEvents groupBox2 As GroupBox
|
||||
Public WithEvents groupBox1 As GroupBox
|
||||
Public WithEvents StatusLabel As MetroFramework.Controls.MetroLabel
|
||||
Public WithEvents Add_Display As MetroFramework.Controls.MetroLabel
|
||||
Friend WithEvents MetroTextBox1 As MetroFramework.Controls.MetroTextBox
|
||||
Public WithEvents textBox1 As MetroFramework.Controls.MetroTextBox
|
||||
Public WithEvents TextBox4 As MetroFramework.Controls.MetroTextBox
|
||||
Public WithEvents TextBox2 As MetroFramework.Controls.MetroTextBox
|
||||
Public WithEvents ComboBox2 As MetroFramework.Controls.MetroComboBox
|
||||
Public WithEvents comboBox4 As MetroFramework.Controls.MetroComboBox
|
||||
Public WithEvents ComboBox1 As MetroFramework.Controls.MetroComboBox
|
||||
Public WithEvents comboBox3 As MetroFramework.Controls.MetroComboBox
|
||||
Private WithEvents Btn_min As PictureBox
|
||||
Private WithEvents Btn_Close As PictureBox
|
||||
Public WithEvents DownloadScope As MetroFramework.Controls.MetroComboBox
|
||||
Friend WithEvents btn_dl As Button
|
||||
Friend WithEvents BackgroundWorker1 As System.ComponentModel.BackgroundWorker
|
||||
Public WithEvents Add_Display As MetroFramework.Controls.MetroLabel
|
||||
Public WithEvents CB_EP0 As MetroFramework.Controls.MetroComboBox
|
||||
Public WithEvents CB_Season As MetroFramework.Controls.MetroComboBox
|
||||
Public WithEvents CB_EP1 As MetroFramework.Controls.MetroComboBox
|
||||
Friend WithEvents bt_Cancel_mass As Button
|
||||
Public WithEvents groupBox2 As GroupBox
|
||||
Public WithEvents TextBox2 As MetroFramework.Controls.MetroTextBox
|
||||
Public WithEvents textBox1 As MetroFramework.Controls.MetroTextBox
|
||||
Public WithEvents TextBox4 As MetroFramework.Controls.MetroTextBox
|
||||
Public WithEvents ComboBox2 As MetroFramework.Controls.MetroComboBox
|
||||
Public WithEvents StatusLabel As MetroFramework.Controls.MetroLabel
|
||||
Public WithEvents DownloadScope As MetroFramework.Controls.MetroComboBox
|
||||
Public WithEvents groupBox1 As GroupBox
|
||||
Public WithEvents CB_Dub As MetroFramework.Controls.MetroComboBox
|
||||
Public WithEvents TT_Dub As ToolTip
|
||||
End Class
|
||||
|
|
|
@ -128,4 +128,7 @@
|
|||
<metadata name="BackgroundWorker1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>24, 23</value>
|
||||
</metadata>
|
||||
<metadata name="TT_Dub.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>187, 23</value>
|
||||
</metadata>
|
||||
</root>
|
|
@ -13,6 +13,7 @@ Imports System.Windows.Forms.VisualStyles.VisualStyleElement.Status
|
|||
Imports Newtonsoft.Json.Linq
|
||||
Imports System.Timers
|
||||
Imports System.Security.Policy
|
||||
Imports Crunchyroll_Downloader.CRD_Classes
|
||||
|
||||
Public Class Anime_Add
|
||||
Public Mass_DL_Cancel As Boolean = False
|
||||
|
@ -43,6 +44,20 @@ Public Class Anime_Add
|
|||
|
||||
Private Sub Anime_Add_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||
|
||||
If My.Settings.HiddenQueue = True Then
|
||||
Queue.Show()
|
||||
End If
|
||||
|
||||
If Main.Mail = Nothing And My.Settings.Mail = "na" Then
|
||||
'Dim Login As Form = LoginForm
|
||||
'Login.StartPosition = 0
|
||||
'Login.Location = New Point(CInt(Main.Location.X + Main.Width / 2 - Me.Width / 2), CInt(Main.Location.Y + Main.Height / 2 - Me.Height / 2))
|
||||
LoginForm.ShowDialog()
|
||||
ElseIf Main.Mail = Nothing Then
|
||||
Main.Mail = My.Settings.Mail
|
||||
Main.PW = My.Settings.PW
|
||||
End If
|
||||
|
||||
DownloadScope.SelectedIndex = Main.DownloadScope
|
||||
|
||||
Manager.Owner = Me
|
||||
|
@ -153,6 +168,8 @@ Public Class Anime_Add
|
|||
End Try
|
||||
|
||||
'Timer3.Enabled = True
|
||||
btn_dl.Cursor = Cursors.Default
|
||||
btn_dl.BackgroundImage = My.Resources.main_button_download_default
|
||||
|
||||
End Sub
|
||||
|
||||
|
@ -176,8 +193,27 @@ Public Class Anime_Add
|
|||
If CBool(InStr(textBox1.Text, ":\")) Then
|
||||
|
||||
Main.ProcessLocal(textBox1.Text)
|
||||
ElseIf CBool(InStr(textBox1.Text, ".m3u8")) Then
|
||||
|
||||
ElseIf CBool(InStr(textBox1.Text, "crunchyroll.com")) Or CBool(InStr(textBox1.Text, "funimation.com")) Then
|
||||
' Main.ProcessLocal(textBox1.Text)
|
||||
Dim NameKomplett As String = TextBox2.Text
|
||||
If NameKomplett = Nothing Or NameKomplett = "Use Custom Name" Then
|
||||
NameKomplett = GeräteID2().Replace("CRD-Temp-File", "misc_download-#")
|
||||
End If
|
||||
Dim Namep1 As String = "Other"
|
||||
Dim Namep2 As String = NameKomplett
|
||||
Dim Reso As String = "NaN"
|
||||
Dim HardSub As String = "maybe?"
|
||||
Dim ThumbnialURL As String = "no"
|
||||
Dim URL_DL As String = "-i " + Chr(34) + textBox1.Text + Chr(34) + " " + Main.ffmpeg_command
|
||||
Dim Pfad_DL As String = Path.Combine(Main.Pfad, Namep2)
|
||||
Dim Service As String = "other"
|
||||
|
||||
'MsgBox(URL_DL)
|
||||
|
||||
Main.ItemConstructor(NameKomplett, Namep1, Namep2, Reso, HardSub, ThumbnialURL, URL_DL, Chr(34) + Pfad_DL + Chr(34), Service)
|
||||
|
||||
ElseIf CBool(InStr(textBox1.Text, "crunchyroll.com")) Then
|
||||
|
||||
|
||||
'If StatusLabel.Text = "Status: waiting for episode selection" Then
|
||||
|
@ -192,12 +228,19 @@ Public Class Anime_Add
|
|||
' ' pictureBox4.Enabled = True
|
||||
'Else
|
||||
If Main.RunningQueue = True Then
|
||||
If CBool(InStr(textBox1.Text, "series/")) Then
|
||||
If CBool(InStr(textBox1.Text, "series/")) And My.Settings.HiddenQueue = False Then
|
||||
Debug.WriteLine("Queue_Block_series")
|
||||
'textBox1.Text = "URL"
|
||||
StatusLabel.Text = "Status: Series add blocked, queue is running!"
|
||||
Pause(5)
|
||||
StatusLabel.Text = "Status: Idle"
|
||||
ElseIf CBool(InStr(textBox1.Text, "series/")) And My.Settings.HiddenQueue = True Then
|
||||
Debug.WriteLine("Queue_adding_series")
|
||||
'textBox1.Text = "URL"
|
||||
StatusLabel.Text = "Status: Series added to queue."
|
||||
'Pause(5)
|
||||
'StatusLabel.Text = "Status: Idle"
|
||||
Main.LoadBrowser(textBox1.Text)
|
||||
Else
|
||||
Debug.WriteLine("Queue_Block")
|
||||
Main.ListBoxList.Add(textBox1.Text)
|
||||
|
@ -217,41 +260,6 @@ Public Class Anime_Add
|
|||
|
||||
Else
|
||||
|
||||
If CBool(InStr(textBox1.Text, "funimation.com")) Then
|
||||
|
||||
Main.WebbrowserURL = textBox1.Text
|
||||
|
||||
If CBool(InStr(textBox1.Text, "funimation.com/v/")) Then
|
||||
Dim Episode0() As String = textBox1.Text.Split(New String() {"?"}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
Dim Episode() As String = Episode0(0).Split(New String() {"/"}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
Dim v1JsonUrl As String = "https://d33et77evd9bgg.cloudfront.net/data/v1/episodes/" + Episode(Episode.Length - 1) + ".json"
|
||||
'MsgBox(v1JsonUrl)
|
||||
Dim v1Json As String = Nothing
|
||||
Try
|
||||
Using client As New WebClient()
|
||||
client.Encoding = System.Text.Encoding.UTF8
|
||||
client.Headers.Add(My.Settings.User_Agend.Replace(Chr(34), ""))
|
||||
v1Json = client.DownloadString(v1JsonUrl)
|
||||
End Using
|
||||
Main.WebbrowserURL = textBox1.Text
|
||||
Main.GetFunimationNewJS_VideoProxy(Nothing, v1Json)
|
||||
Exit Sub
|
||||
Catch ex As Exception
|
||||
Debug.WriteLine("error- getting v1Json data for the bypass")
|
||||
Debug.WriteLine(ex.ToString)
|
||||
End Try
|
||||
ElseIf CBool(InStr(textBox1.Text, "funimation.com/shows/")) Then
|
||||
Main.LoadingUrl = textBox1.Text
|
||||
Main.LoadedUrls.Clear()
|
||||
Main.b = False
|
||||
Debug.WriteLine("loading funimation show url: " + Date.Now.ToString)
|
||||
StatusLabel.Text = "Status: loading funimation...."
|
||||
'Main.LoadBrowser()
|
||||
Browser.WebView2.CoreWebView2.Navigate(textBox1.Text)
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
If Main.Grapp_RDY = True Then
|
||||
|
||||
|
@ -289,20 +297,8 @@ Public Class Anime_Add
|
|||
btn_dl.Text = "Download"
|
||||
btn_dl.BackgroundImage = My.Resources.main_button_download_default
|
||||
StatusLabel.Text = "Status: idle"
|
||||
ElseIf CBool(InStr(Main.WebbrowserURL, "funimation.com")) = True Then
|
||||
|
||||
|
||||
|
||||
'btn_dl.BackgroundImage = My.Resources.add_mass_running_cancel
|
||||
btn_dl.Text = "Cancel"
|
||||
Mass_DL_Cancel = True
|
||||
bt_Cancel_mass.Enabled = False
|
||||
bt_Cancel_mass.Visible = False
|
||||
Main.DownloadFunimationJS_Seasons()
|
||||
comboBox4.Enabled = False
|
||||
comboBox3.Enabled = False
|
||||
ComboBox1.Enabled = False
|
||||
|
||||
ElseIf CBool(InStr(Main.WebbrowserURL, "crunchyroll.com")) = True Then
|
||||
|
||||
StatusLabel.Text = "Status: idle"
|
||||
|
@ -313,9 +309,9 @@ Public Class Anime_Add
|
|||
bt_Cancel_mass.Visible = False
|
||||
|
||||
Main.DownloadBetaSeasons()
|
||||
comboBox4.Enabled = False
|
||||
comboBox3.Enabled = False
|
||||
ComboBox1.Enabled = False
|
||||
CB_EP1.Enabled = False
|
||||
CB_EP0.Enabled = False
|
||||
CB_Season.Enabled = False
|
||||
|
||||
|
||||
End If
|
||||
|
@ -326,47 +322,6 @@ Public Class Anime_Add
|
|||
btn_dl.Enabled = True
|
||||
End Sub
|
||||
|
||||
Public Sub ProcessFunimationJS(ByVal InputURL As String)
|
||||
|
||||
|
||||
Dim FunUri As String = Nothing
|
||||
If CBool(InStr(InputURL, "?")) Then
|
||||
Dim ClearUri As String() = InputURL.Split(New String() {"?"}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
FunUri = ClearUri(0)
|
||||
Else
|
||||
FunUri = InputURL
|
||||
End If
|
||||
Dim ShowPath As String = Nothing
|
||||
Dim EpisodePath As String = Nothing
|
||||
Dim ShowPath1 As String() = FunUri.Split(New String() {"/shows/"}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
'If CBool(InStr(ShowPath1(1), "/") Then
|
||||
Dim ShowPath2 As String() = ShowPath1(1).Split(New String() {"/"}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
|
||||
If ShowPath2.Count > 1 Then
|
||||
|
||||
ShowPath = ShowPath2(0).Replace("/", "")
|
||||
EpisodePath = ShowPath2(1).Replace("/", "")
|
||||
Else
|
||||
ShowPath = ShowPath1(1).Replace("/", "")
|
||||
End If
|
||||
Main.FunimationShowPath = ShowPath + "/"
|
||||
Debug.WriteLine(ShowPath)
|
||||
Debug.WriteLine(Main.FunimationAPIRegion)
|
||||
If EpisodePath = Nothing Then 'overview site
|
||||
Main.GetFunimationJS_Seasons("https://title-api.prd.funimationsvc.com/v2/shows/" + ShowPath + Main.FunimationAPIRegion)
|
||||
|
||||
Else 'single episode
|
||||
|
||||
|
||||
End If
|
||||
|
||||
Dim FunimationCC As String() = ShowPath1(0).Split(New String() {"funimation.com"}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
If FunimationCC.Count > 1 Then
|
||||
Main.FunimationRegion = FunimationCC(1).Replace("/", "")
|
||||
End If
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
|
||||
Private Sub Btn_dl_MouseEnter(sender As Object, e As EventArgs) Handles btn_dl.MouseEnter
|
||||
|
@ -440,6 +395,12 @@ Public Class Anime_Add
|
|||
|
||||
Dim audio_locale_filter As String = Nothing
|
||||
|
||||
For i As Integer = 0 To Main.LangValueEnum.Count - 1
|
||||
If Main.LangValueEnum.Item(i).DisplayText = CB_Dub.Text Then
|
||||
audio_locale_filter = Main.LangValueEnum.Item(i).CR_Value
|
||||
End If
|
||||
Next
|
||||
|
||||
Dim EpisodeJObject As JObject = JObject.Parse(EpisodeJson)
|
||||
Dim EpisodeData As List(Of JToken) = EpisodeJObject.Children().ToList
|
||||
|
||||
|
@ -461,46 +422,69 @@ Public Class Anime_Add
|
|||
Dim episode_id As String = Entry.GetValue("id").ToString
|
||||
Dim slug_title As String = Entry.GetValue("slug_title").ToString
|
||||
|
||||
comboBox3.Items.Add("Episode " + episode_number)
|
||||
comboBox4.Items.Add("Episode " + episode_number)
|
||||
Main.CR_MassEpisodes.Add(New CR_Seasons(episode_id, slug_title, Main.CR_MassSeasons.Item(ComboBox1.SelectedIndex).Auth))
|
||||
CB_EP0.Items.Add("Episode " + episode_number)
|
||||
CB_EP1.Items.Add("Episode " + episode_number)
|
||||
Main.CR_MassEpisodes.Add(New CR_Seasons(episode_id, slug_title, Main.CR_MassSeasons.Item(CB_Season.SelectedIndex).Auth, ""))
|
||||
|
||||
Next
|
||||
End Select
|
||||
Next
|
||||
|
||||
If comboBox3.Items.Count > 0 Then
|
||||
comboBox3.SelectedIndex = 0
|
||||
comboBox4.SelectedIndex = comboBox4.Items.Count - 1
|
||||
If CB_EP0.Items.Count > 0 Then
|
||||
CB_EP0.SelectedIndex = 0
|
||||
CB_EP1.SelectedIndex = CB_EP1.Items.Count - 1
|
||||
End If
|
||||
|
||||
comboBox3.Enabled = True
|
||||
comboBox4.Enabled = True
|
||||
CB_EP0.Enabled = True
|
||||
CB_EP1.Enabled = True
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged
|
||||
Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles CB_Season.SelectedIndexChanged
|
||||
If CBool(InStr(Main.WebbrowserURL, "crunchyroll.com")) = True Then
|
||||
comboBox3.Items.Clear()
|
||||
comboBox4.Items.Clear()
|
||||
comboBox3.Enabled = False
|
||||
comboBox4.Enabled = False
|
||||
comboBox3.Text = Nothing
|
||||
comboBox4.Text = Nothing
|
||||
CB_EP0.Items.Clear()
|
||||
CB_EP1.Items.Clear()
|
||||
CB_EP0.Enabled = False
|
||||
CB_EP1.Enabled = False
|
||||
CB_EP0.Text = Nothing
|
||||
CB_EP1.Text = Nothing
|
||||
|
||||
Dim JsonUrl As String = "https://www.crunchyroll.com/content/v2/cms/seasons/" + Main.CR_MassSeasons.Item(ComboBox1.SelectedIndex).guid + "/episodes?preferred_audio_language=" + Main.DubSprache.CR_Value + "&locale=" + Main.locale
|
||||
|
||||
Dim Loc_CR_Cookies = " -H " + Chr(34) + Main.CR_Cookies.Replace(Chr(34), "").Replace(" -H ", "") + Chr(34)
|
||||
'get guid
|
||||
|
||||
Dim guid As String = Nothing
|
||||
|
||||
For i As Integer = 0 To Main.CR_MassSeasons.Count - 1
|
||||
If "Season " + Main.CR_MassSeasons.Item(i).Season = CB_Season.Text And Main.ConvertSubValue(Main.CR_MassSeasons.Item(i).audio_locale, ConvertSubsEnum.DisplayText) = CB_Dub.Text Then
|
||||
guid = Main.CR_MassSeasons.Item(i).guid
|
||||
'MsgBox(guid + vbNewLine + Main.CR_MassSeasons.Item(i).audio_locale)
|
||||
End If
|
||||
Next
|
||||
|
||||
If guid = Nothing Then
|
||||
MsgBox("Requested guid not found", MsgBoxStyle.Critical)
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
' Dim JsonUrl As String = "https://www.crunchyroll.com/content/v2/cms/seasons/" + Main.CR_MassSeasons.Item(CB_Season.SelectedIndex).guid + "/episodes?preferred_audio_language=" + Main.DubSprache.CR_Value + "&locale=" + Main.locale
|
||||
|
||||
' Changed from https://www.crunchyroll.com/content/v2/cms/seasons/ to https://beta-api.crunchyroll.com/content/v2/cms/seasons/ to avoid cloudflare triggering
|
||||
Dim JsonUrl As String = "https://beta-api.crunchyroll.com/content/v2/cms/seasons/" + guid + "/episodes?preferred_audio_language=" + Main.DubSprache.CR_Value + "&locale=" + Main.locale
|
||||
|
||||
|
||||
Dim Loc_CR_Cookies = "" 'No more cookies " -H " + Chr(34) + Main.CR_Cookies.Replace(Chr(34), "").Replace(" -H ", "") + Chr(34)
|
||||
|
||||
|
||||
Dim EpisodeJson As String = Nothing 'CurlAuth(JsonUrl, Loc_CR_Cookies, Main.CR_MassSeasons.Item(ComboBox1.SelectedIndex).Auth) '
|
||||
|
||||
Debug.WriteLine("TEST")
|
||||
|
||||
Try
|
||||
|
||||
EpisodeJson = CurlAuthNew(JsonUrl, Loc_CR_Cookies, Main.CR_MassSeasons.Item(ComboBox1.SelectedIndex).Auth) '
|
||||
EpisodeJson = CurlAuthNew(JsonUrl, Loc_CR_Cookies, Main.CR_MassSeasons.Item(CB_Season.SelectedIndex).Auth) '
|
||||
|
||||
Catch ex As Exception
|
||||
Debug.WriteLine("TEST Failed" + ex.ToString)
|
||||
If CBool(InStr(ex.ToString, "Error - Getting")) Then
|
||||
MsgBox("Error invalid CR respone")
|
||||
Exit Sub
|
||||
|
@ -511,88 +495,17 @@ Public Class Anime_Add
|
|||
End Try
|
||||
|
||||
'My.Computer.Clipboard.SetText(EpisodeJson)
|
||||
'Debug.WriteLine("EpisodeJson: " + EpisodeJson)
|
||||
|
||||
FillCREpisodes(EpisodeJson)
|
||||
|
||||
|
||||
ElseIf Main.WebbrowserURL = "https://funimation.com/js" Then
|
||||
comboBox3.Items.Clear()
|
||||
comboBox4.Items.Clear()
|
||||
comboBox3.Text = Nothing
|
||||
comboBox4.Text = Nothing
|
||||
Dim ContentID As String = Nothing
|
||||
|
||||
For i As Integer = 0 To Main.FunimtaionSeasonList.Count - 1
|
||||
If ComboBox1.Text = Main.FunimtaionSeasonList.Item(i).Title Then
|
||||
ContentID = Main.FunimtaionSeasonList.Item(i).ID
|
||||
Exit For
|
||||
End If
|
||||
Next
|
||||
|
||||
If ContentID = Nothing Then
|
||||
MsgBox("error during season selection")
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
Dim BaseUrl() As String = Main.FunimationSeasonAPIUrl.Split(New String() {"/shows/"}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
|
||||
|
||||
|
||||
Dim EpisodeJsonURL As String = BaseUrl(0) + "/seasons/" + ContentID + ".json"
|
||||
Dim EpisodeJson As String = Nothing
|
||||
Debug.WriteLine(EpisodeJsonURL)
|
||||
|
||||
Try
|
||||
Using client As New WebClient()
|
||||
client.Encoding = System.Text.Encoding.UTF8
|
||||
client.Headers.Add(My.Settings.User_Agend.Replace(Chr(34), ""))
|
||||
EpisodeJson = client.DownloadString(EpisodeJsonURL)
|
||||
End Using
|
||||
Catch ex As Exception
|
||||
Debug.WriteLine("error- getting EpisodeJson data")
|
||||
Debug.WriteLine(ex.ToString)
|
||||
Main.FunimationJsonBrowser = "EpisodeJson"
|
||||
Main.LoadBrowser(EpisodeJsonURL)
|
||||
Exit Sub
|
||||
End Try
|
||||
|
||||
FillFunimationEpisodes(EpisodeJson)
|
||||
|
||||
|
||||
If comboBox3.Items.Count > 0 Then
|
||||
comboBox3.SelectedIndex = 0
|
||||
comboBox4.SelectedIndex = comboBox4.Items.Count - 1
|
||||
End If
|
||||
|
||||
|
||||
|
||||
End If
|
||||
End Sub
|
||||
|
||||
|
||||
Public Sub FillFunimationEpisodes(ByVal EpisodeJson As String)
|
||||
|
||||
Main.FunimationEpisodeJSON = EpisodeJson
|
||||
comboBox3.Enabled = True
|
||||
comboBox4.Enabled = True
|
||||
|
||||
Dim EpisodeSplit() As String = EpisodeJson.Split(New String() {Chr(34) + "episodeNumber" + Chr(34) + ":" + Chr(34)}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
'EpisodeJson.Split(New String() {Chr(34) + "episodeNumber" + Chr(34) + ": " + Chr(34)}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
Debug.WriteLine(EpisodeSplit.Count.ToString)
|
||||
For i As Integer = 1 To EpisodeSplit.Count - 1
|
||||
Dim EpisodeSplit2() As String = EpisodeSplit(i).Split(New String() {Chr(34)}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
comboBox3.Items.Add("Episode " + EpisodeSplit2(0))
|
||||
comboBox4.Items.Add("Episode " + EpisodeSplit2(0))
|
||||
Next
|
||||
Main.WebbrowserURL = "https://funimation.com/js"
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
Private Sub TextBox2_Click(sender As Object, e As EventArgs) Handles TextBox2.Click
|
||||
If TextBox2.Text = "Use Custom Name" Then
|
||||
TextBox2.Text = Nothing
|
||||
|
@ -676,6 +589,7 @@ Public Class Anime_Add
|
|||
End Sub
|
||||
|
||||
Private Sub SubTitlesOnlyCB_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DownloadScope.SelectedIndexChanged
|
||||
|
||||
Main.DownloadScope = DownloadScope.SelectedIndex
|
||||
My.Settings.DownloadScope = Main.DownloadScope
|
||||
My.Settings.Save()
|
||||
|
@ -690,6 +604,35 @@ Public Class Anime_Add
|
|||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub CB_Dub_SelectedIndexChanged(sender As Object, e As EventArgs) Handles CB_Dub.SelectedIndexChanged
|
||||
'MsgBox(CB_Dub.Text)
|
||||
'MsgBox(Main.DubSprache.DisplayText)
|
||||
|
||||
If My.Settings.OverrideDub = True And CBool(InStr(CB_Dub.Text, Main.DubSprache.DisplayText)) = False Then
|
||||
MessageBox.Show("The Duboveride might change the Dub to: " + Main.DubSprache.DisplayText, "Settings - Override enabled", MessageBoxButtons.OK)
|
||||
End If
|
||||
|
||||
'clear everything below the dub
|
||||
CB_Season.Items.Clear()
|
||||
CB_EP0.Items.Clear()
|
||||
CB_EP1.Items.Clear()
|
||||
|
||||
'also remove display text
|
||||
CB_Season.Text = Nothing
|
||||
CB_EP0.Text = Nothing
|
||||
CB_EP1.Text = Nothing
|
||||
|
||||
For i As Integer = 0 To Main.CR_MassSeasons.Count - 1
|
||||
If Main.ConvertSubValue(Main.CR_MassSeasons.Item(i).audio_locale, ConvertSubsEnum.DisplayText) = CB_Dub.Text Then
|
||||
CB_Season.Items.Add("Season " + Main.CR_MassSeasons.Item(i).Season)
|
||||
End If
|
||||
Next
|
||||
|
||||
|
||||
|
||||
CB_Season.Enabled = True
|
||||
End Sub
|
||||
|
||||
|
||||
End Class
|
||||
|
||||
|
|
|
@ -27,33 +27,18 @@
|
|||
<setting name="Pfad" serializeAs="String">
|
||||
<value />
|
||||
</setting>
|
||||
<setting name="Fun_Sub" serializeAs="String">
|
||||
<value>None</value>
|
||||
</setting>
|
||||
<setting name="ffmpeg_command" serializeAs="String">
|
||||
<value> -c copy -c:a copy -bsf:a aac_adtstoasc</value>
|
||||
</setting>
|
||||
<setting name="AddedSubs" serializeAs="String">
|
||||
<value>None</value>
|
||||
</setting>
|
||||
<setting name="FunimationDub" serializeAs="String">
|
||||
<value>Disabled</value>
|
||||
</setting>
|
||||
<setting name="FunimationHardsub" serializeAs="String">
|
||||
<value>Disabled</value>
|
||||
</setting>
|
||||
<setting name="DefaultSubFunimation" serializeAs="String">
|
||||
<value>Disabled</value>
|
||||
</setting>
|
||||
<setting name="SubFolder_Value" serializeAs="String">
|
||||
<value>[ ignore subfolder ]</value>
|
||||
</setting>
|
||||
<setting name="TempFolder" serializeAs="String">
|
||||
<value />
|
||||
</setting>
|
||||
<setting name="Startseite" serializeAs="String">
|
||||
<value>https://www.crunchyroll.com/</value>
|
||||
</setting>
|
||||
<setting name="Prefix_S" serializeAs="String">
|
||||
<value>[default season prefix]</value>
|
||||
</setting>
|
||||
|
@ -75,12 +60,6 @@
|
|||
<setting name="Dark_Mode" serializeAs="String">
|
||||
<value>False</value>
|
||||
</setting>
|
||||
<setting name="Funimation_srt" serializeAs="String">
|
||||
<value>False</value>
|
||||
</setting>
|
||||
<setting name="Funimation_vtt" serializeAs="String">
|
||||
<value>False</value>
|
||||
</setting>
|
||||
<setting name="QueueMode" serializeAs="String">
|
||||
<value>False</value>
|
||||
</setting>
|
||||
|
@ -120,9 +99,6 @@
|
|||
<setting name="LeadingZero" serializeAs="String">
|
||||
<value>0</value>
|
||||
</setting>
|
||||
<setting name="Funimation_Bitrate" serializeAs="String">
|
||||
<value>0</value>
|
||||
</setting>
|
||||
<setting name="ServerPort" serializeAs="String">
|
||||
<value>0</value>
|
||||
</setting>
|
||||
|
@ -150,9 +126,6 @@
|
|||
<setting name="SaveThumbnail" serializeAs="String">
|
||||
<value>False</value>
|
||||
</setting>
|
||||
<setting name="SaveMode" serializeAs="String">
|
||||
<value>False</value>
|
||||
</setting>
|
||||
<setting name="DownloadScope" serializeAs="String">
|
||||
<value>0</value>
|
||||
</setting>
|
||||
|
@ -177,6 +150,21 @@
|
|||
<setting name="FixCRStream" serializeAs="String">
|
||||
<value>True</value>
|
||||
</setting>
|
||||
<setting name="Mail" serializeAs="String">
|
||||
<value>na</value>
|
||||
</setting>
|
||||
<setting name="PW" serializeAs="String">
|
||||
<value>na</value>
|
||||
</setting>
|
||||
<setting name="HiddenQueue" serializeAs="String">
|
||||
<value>False</value>
|
||||
</setting>
|
||||
<setting name="UpdateLog" serializeAs="String">
|
||||
<value>0</value>
|
||||
</setting>
|
||||
<setting name="UpdateMode" serializeAs="String">
|
||||
<value>0</value>
|
||||
</setting>
|
||||
</Crunchyroll_Downloader.My.MySettings>
|
||||
</userSettings>
|
||||
</configuration>
|
||||
|
|
112
Crunchyroll Downloader/Browser.Designer.vb
generated
112
Crunchyroll Downloader/Browser.Designer.vb
generated
|
@ -1,112 +0,0 @@
|
|||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
|
||||
Partial Class Browser
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
||||
<System.Diagnostics.DebuggerNonUserCode()>
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Wird vom Windows Form-Designer benötigt.
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
|
||||
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()>
|
||||
Private Sub InitializeComponent()
|
||||
Me.components = New System.ComponentModel.Container()
|
||||
Me.TextBox1 = New System.Windows.Forms.TextBox()
|
||||
Me.Button1 = New System.Windows.Forms.Button()
|
||||
Me.Panel1 = New System.Windows.Forms.Panel()
|
||||
Me.WebView2 = New Microsoft.Web.WebView2.WinForms.WebView2()
|
||||
Me.Timer1 = New System.Windows.Forms.Timer(Me.components)
|
||||
Me.Timer2 = New System.Windows.Forms.Timer(Me.components)
|
||||
Me.Panel1.SuspendLayout()
|
||||
CType(Me.WebView2, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'TextBox1
|
||||
'
|
||||
Me.TextBox1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.TextBox1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.TextBox1.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.TextBox1.Location = New System.Drawing.Point(114, 1)
|
||||
Me.TextBox1.Name = "TextBox1"
|
||||
Me.TextBox1.Size = New System.Drawing.Size(1153, 26)
|
||||
Me.TextBox1.TabIndex = 1
|
||||
'
|
||||
'Button1
|
||||
'
|
||||
Me.Button1.Location = New System.Drawing.Point(12, 1)
|
||||
Me.Button1.Name = "Button1"
|
||||
Me.Button1.Size = New System.Drawing.Size(96, 26)
|
||||
Me.Button1.TabIndex = 2
|
||||
Me.Button1.Text = "Copy URL"
|
||||
Me.Button1.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Panel1
|
||||
'
|
||||
Me.Panel1.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
|
||||
Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.Panel1.Controls.Add(Me.WebView2)
|
||||
Me.Panel1.Location = New System.Drawing.Point(0, 30)
|
||||
Me.Panel1.Name = "Panel1"
|
||||
Me.Panel1.Size = New System.Drawing.Size(1280, 720)
|
||||
Me.Panel1.TabIndex = 4
|
||||
'
|
||||
'WebView2
|
||||
'
|
||||
Me.WebView2.AllowExternalDrop = True
|
||||
Me.WebView2.CreationProperties = Nothing
|
||||
Me.WebView2.DefaultBackgroundColor = System.Drawing.Color.White
|
||||
Me.WebView2.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.WebView2.Location = New System.Drawing.Point(0, 0)
|
||||
Me.WebView2.Name = "WebView2"
|
||||
Me.WebView2.Size = New System.Drawing.Size(1280, 720)
|
||||
Me.WebView2.TabIndex = 0
|
||||
Me.WebView2.ZoomFactor = 1.0R
|
||||
'
|
||||
'Timer1
|
||||
'
|
||||
Me.Timer1.Interval = 60000
|
||||
'
|
||||
'Timer2
|
||||
'
|
||||
Me.Timer2.Interval = 15000
|
||||
'
|
||||
'Browser
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(1279, 750)
|
||||
Me.Controls.Add(Me.Panel1)
|
||||
Me.Controls.Add(Me.Button1)
|
||||
Me.Controls.Add(Me.TextBox1)
|
||||
Me.MinimumSize = New System.Drawing.Size(480, 480)
|
||||
Me.Name = "Browser"
|
||||
Me.ShowIcon = False
|
||||
Me.Text = "Browser"
|
||||
Me.Panel1.ResumeLayout(False)
|
||||
CType(Me.WebView2, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
|
||||
Friend WithEvents TextBox1 As TextBox
|
||||
Friend WithEvents Button1 As Button
|
||||
Friend WithEvents Panel1 As Panel
|
||||
Friend WithEvents Timer1 As Timer
|
||||
Friend WithEvents Timer2 As Timer
|
||||
Public WithEvents WebView2 As Microsoft.Web.WebView2.WinForms.WebView2
|
||||
End Class
|
|
@ -1,340 +0,0 @@
|
|||
Option Strict On
|
||||
|
||||
Imports System.IO
|
||||
Imports System.ComponentModel
|
||||
Imports System.Threading
|
||||
Imports System.Net
|
||||
Imports System.Net.WebUtility
|
||||
Imports System.IO.Compression
|
||||
Imports System.Text
|
||||
Imports System.Security.Policy
|
||||
Imports Microsoft.Web.WebView2.Core
|
||||
Imports MetroFramework.Drawing
|
||||
Imports Newtonsoft.Json.Linq
|
||||
|
||||
Public Class Browser
|
||||
|
||||
|
||||
|
||||
|
||||
Private Sub WebView2_CoreWebView2InitializationCompleted(sender As Object, e As CoreWebView2InitializationCompletedEventArgs) Handles WebView2.CoreWebView2InitializationCompleted
|
||||
Try
|
||||
WebView2.CoreWebView2.AddWebResourceRequestedFilter("https://www.crunchyroll.com/*", CoreWebView2WebResourceContext.All)
|
||||
WebView2.CoreWebView2.AddWebResourceRequestedFilter("https://www.funimation.com/*", CoreWebView2WebResourceContext.All)
|
||||
' WebView2.CoreWebView2.AddWebResourceRequestedFilter("*", CoreWebView2WebResourceContext.All)
|
||||
|
||||
'WebView2.CoreWebView2.AddWebResourceRequestedFilter("*", CoreWebView2WebResourceContext.All)
|
||||
AddHandler WebView2.CoreWebView2.WebResourceResponseReceived, AddressOf ObserveResponse
|
||||
AddHandler WebView2.CoreWebView2.WebResourceRequested, AddressOf ObserveHttp
|
||||
'WebView2.CoreWebView2.Settings.UserAgent = My.Settings.User_Agend.Replace(Chr(34), "").Replace("User-Agent: ", "")
|
||||
'
|
||||
'WebView2.CoreWebView2.Settings.UserAgent = "Mozilla/5.0 (Windows NT 10.0; Trident/7.0; rv:11.0) like Gecko"
|
||||
My.Settings.User_Agend = Chr(34) + "User-Agent: " + WebView2.CoreWebView2.Settings.UserAgent + Chr(34)
|
||||
'My.Settings.User_Agend = Chr(34) + "User-Agent: " + "Mozilla/5.0 (Windows NT 10.0; Win64; x64; rv:120.0) Gecko/20100101 Firefox/120.0" + Chr(34)
|
||||
|
||||
'MsgBox(My.Settings.User_Agend)
|
||||
|
||||
If WebView2.CoreWebView2.Source = "about:blank" Or WebView2.CoreWebView2.Source = Nothing Then
|
||||
'TextBox1.Text = Main.Startseite
|
||||
WebView2.CoreWebView2.Navigate(Main.Startseite)
|
||||
|
||||
|
||||
End If
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
Private Sub WebView2_SourceChanged(sender As Object, e As CoreWebView2SourceChangedEventArgs) Handles WebView2.SourceChanged
|
||||
Try
|
||||
TextBox1.Text = WebView2.CoreWebView2.Source
|
||||
|
||||
Catch ex As Exception
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
Private Sub WebView2_NavigationCompleted(sender As Object, e As CoreWebView2NavigationCompletedEventArgs) Handles WebView2.NavigationCompleted
|
||||
' Dim HTML As String = WebView2.CoreWebView2.
|
||||
'TextBox1.Text = WebView2.CoreWebView2.Source
|
||||
' Exit Sub
|
||||
|
||||
|
||||
If e.HttpStatusCode = 200 Then
|
||||
Dim DocumentTitle As String = WebView2.CoreWebView2.DocumentTitle
|
||||
|
||||
Debug.WriteLine("NavigationCompleted: " + Date.Now.ToString)
|
||||
Main.WebbrowserURL = WebView2.CoreWebView2.Source
|
||||
TextBox1.Text = Main.WebbrowserURL
|
||||
|
||||
Main.WebbrowserTitle = DocumentTitle
|
||||
Main.ProcessHTML("", Main.WebbrowserURL, DocumentTitle)
|
||||
|
||||
GetCookies(Main.WebbrowserURL)
|
||||
|
||||
Main.BowserWasOpen = True
|
||||
|
||||
If Application.OpenForms().OfType(Of Anime_Add).Any = True Then
|
||||
Anime_Add.btn_dl.Cursor = Cursors.Default
|
||||
Anime_Add.btn_dl.BackgroundImage = My.Resources.main_button_download_default
|
||||
End If
|
||||
|
||||
If Main.Startseite IsNot My.Settings.Startseite Then
|
||||
Main.LoadBrowser(Main.Startseite, 1)
|
||||
Main.Startseite = My.Settings.Startseite
|
||||
End If
|
||||
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Public Async Sub GetCookies(ByVal Uri As String)
|
||||
Try
|
||||
Main.CookieList = Await WebView2.CoreWebView2.CookieManager.GetCookiesAsync(Uri)
|
||||
Catch ex As Exception
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub Browser_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
|
||||
Main.waveOutSetVolume(0, 0)
|
||||
If Me.Width > My.Computer.Screen.Bounds.Width Then
|
||||
Me.Width = My.Computer.Screen.Bounds.Width
|
||||
Panel1.Width = Me.Size.Width - 15 ', Me.Size.Height - 69)
|
||||
Panel1.Location = New Point(0, 30)
|
||||
TextBox1.Width = My.Computer.Screen.Bounds.Width - 435
|
||||
|
||||
End If
|
||||
|
||||
If Me.Size.Height > My.Computer.Screen.Bounds.Height Then
|
||||
Me.Height = My.Computer.Screen.Bounds.Height
|
||||
Panel1.Height = Me.Size.Height - 69
|
||||
Panel1.Location = New Point(0, 30)
|
||||
End If
|
||||
|
||||
|
||||
Try
|
||||
Me.Icon = My.Resources.icon
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
If Main.UserBowser = False Then
|
||||
Me.Location = New Point(-10000, 10000)
|
||||
Timer1.Enabled = True
|
||||
End If
|
||||
WebView2.Source = New Uri(Main.Startseite)
|
||||
End Sub
|
||||
|
||||
Private Sub Browser_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
|
||||
Main.BowserWasOpen = False
|
||||
|
||||
'Main.UserBowser = False
|
||||
'Me.Location = New Point(-10000, -10000)
|
||||
'Main.LoadingUrl = ""
|
||||
'Debug.WriteLine("Collecting")
|
||||
'Dim Collector As New TaskCookieVisitor
|
||||
'Dim CM As ICookieManager = WebBrowser1.GetCookieManager
|
||||
'CM.VisitAllCookies(Collector)
|
||||
'Main.CookieList = Collector.Task.Result()
|
||||
'Debug.WriteLine("Collecting-end")
|
||||
''e.Cancel = True
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
|
||||
'MsgBox(Main.CR_etp_rt)
|
||||
'MsgBox(Main.CR_ajs_user_id)
|
||||
'MsgBox(Main.CheckCRLogin.ToString)
|
||||
|
||||
Try
|
||||
My.Computer.Clipboard.SetText(WebView2.CoreWebView2.Source)
|
||||
MsgBox("copied: " + Chr(34) + WebView2.CoreWebView2.Source + Chr(34))
|
||||
Catch ex As Exception
|
||||
End Try
|
||||
|
||||
'My.Computer.Clipboard.SetText(WebBrowser1.Document.Body.InnerHtml)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub TextBox1_KeyDown(sender As Object, e As KeyEventArgs) Handles TextBox1.KeyDown
|
||||
Try
|
||||
If e.KeyCode = Keys.Return Then
|
||||
e.SuppressKeyPress = True
|
||||
Debug.WriteLine("Start loading: " + Date.Now.ToString)
|
||||
WebView2.CoreWebView2.Navigate(TextBox1.Text)
|
||||
End If
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in URL", MsgBoxStyle.Critical)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
|
||||
Private Async Sub ObserveResponse(ByVal sender As Object, ByVal e As CoreWebView2WebResourceResponseReceivedEventArgs)
|
||||
|
||||
|
||||
If CBool(InStr(Main.LoadingUrl, "crunchyroll.com")) Then
|
||||
|
||||
|
||||
|
||||
If CBool(InStr(e.Request.Uri, "crunchyroll.com/")) And CBool(InStr(e.Request.Uri, "v1/token")) And Main.CR_v1Token = "Get" Then
|
||||
Debug.WriteLine("Crunchyroll-v1_token: " + e.Request.Uri)
|
||||
Dim Content As Stream = Await e.Response.GetContentAsync
|
||||
Dim ContentString As String = Nothing
|
||||
Dim reader As New StreamReader(Content)
|
||||
ContentString = reader.ReadToEnd
|
||||
|
||||
Dim Loc_CR_Cookies = " -H " + Chr(34) + Main.CR_Cookies + Chr(34)
|
||||
Dim Token() As String = ContentString.Split(New String() {Chr(34) + "access_token" + Chr(34) + ":" + Chr(34)}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
Dim Token2() As String = Token(1).Split(New String() {Chr(34) + "," + Chr(34)}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
|
||||
Dim Auth As String = "Bearer " + Token2(0)
|
||||
Dim Auth2 As String = " -H " + Chr(34) + "Authorization: " + Auth + Chr(34)
|
||||
Main.ProcessLoading(Main.LoadingUrl, Auth2, Loc_CR_Cookies, 0)
|
||||
Main.CR_v1Token = ""
|
||||
Exit Sub
|
||||
|
||||
|
||||
ElseIf CBool(InStr(e.Request.Uri, "crunchyroll.com/")) And CBool(InStr(e.Request.Uri, "seasons?preferred_audio_language=")) And CBool(InStr(Main.LoadingUrl, "/series/")) Then
|
||||
Debug.WriteLine("Crunchyroll-Season: " + e.Request.Uri)
|
||||
Main.LoadedUrls.Add(e.Request)
|
||||
|
||||
Exit Sub
|
||||
'ElseIf CBool(InStr(e.Request.Uri, "crunchyroll.com/")) And CBool(InStr(e.Request.Uri, "content/v2/cms/objects/")) Then
|
||||
' Debug.WriteLine("Crunchyroll-objects added to cache: " + e.Request.Uri)
|
||||
' Main.LoadedUrls.Add(e.Request)
|
||||
|
||||
' Exit Sub
|
||||
'ElseIf CBool(InStr(e.Request.Uri, "crunchyroll.com/")) And CBool(InStr(e.Request.Uri, "seasons?preferred_audio_language=")) And CBool(InStr(Main.LoadingUrl, "/series/")) Then
|
||||
' Debug.WriteLine("Crunchyroll-objects added to cache: " + e.Request.Uri)
|
||||
' Main.LoadedUrls.Add(e.Request)
|
||||
|
||||
' Exit Sub
|
||||
End If
|
||||
|
||||
|
||||
ElseIf CBool(InStr(Main.LoadingUrl, "funimation.com")) Then
|
||||
If CBool(InStr(e.Request.Uri, "?deviceType=web")) Then
|
||||
'Debug.WriteLine(e.Request.Uri)
|
||||
Dim parms As String() = e.Request.Uri.Split(New String() {"?deviceType="}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
Main.FunimationDeviceRegion = "?deviceType=" + parms(1)
|
||||
|
||||
End If
|
||||
If CBool(InStr(e.Request.Uri, "https://title-api.prd.funimationsvc.com")) Then
|
||||
Debug.WriteLine("Funimtaion: " + e.Request.Uri)
|
||||
If (Me.InvokeRequired) Then
|
||||
Me.Invoke(Sub() Main.LoadedUrls.Add(e.Request))
|
||||
Exit Sub
|
||||
Else
|
||||
Main.LoadedUrls.Add(e.Request)
|
||||
Exit Sub
|
||||
End If
|
||||
ElseIf CBool(InStr(e.Request.Uri, "/data/v2/shows/")) Then
|
||||
Debug.WriteLine("Funimtaion: " + e.Request.Uri)
|
||||
If (Me.InvokeRequired) Then
|
||||
Me.Invoke(Sub() Main.LoadedUrls.Add(e.Request))
|
||||
Exit Sub
|
||||
Else
|
||||
Main.LoadedUrls.Add(e.Request)
|
||||
Exit Sub
|
||||
End If
|
||||
ElseIf CBool(InStr(e.Request.Uri, "/data/v1/episodes/")) Then
|
||||
Debug.WriteLine("Funimtaion: " + e.Request.Uri)
|
||||
If (Me.InvokeRequired) Then
|
||||
Me.Invoke(Sub() Main.LoadedUrls.Add(e.Request))
|
||||
Exit Sub
|
||||
Else
|
||||
Main.LoadedUrls.Add(e.Request)
|
||||
Exit Sub
|
||||
End If
|
||||
End If
|
||||
|
||||
|
||||
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
Private Sub ObserveHttp(ByVal sender As Object, ByVal e As CoreWebView2WebResourceRequestedEventArgs) 'Handles RequestResource.GetUrl
|
||||
|
||||
|
||||
' Debug.WriteLine(e.Request.Uri)
|
||||
|
||||
If CBool(InStr(e.Request.Uri, "crunchyroll.com")) = True And Main.CrBetaBasic = Nothing Then
|
||||
Dim Headers As New List(Of KeyValuePair(Of String, String))
|
||||
Headers.AddRange(e.Request.Headers.ToList)
|
||||
For i As Integer = 0 To Headers.Count
|
||||
If CBool(InStr(Headers.Item(i).Value, "Basic")) Then
|
||||
Main.CrBetaBasic = Headers.Item(i).Value
|
||||
Debug.WriteLine("Auth-Basic: " + Main.CrBetaBasic)
|
||||
ElseIf CBool(InStr(Headers.Item(i).Value, "Bearer")) Then
|
||||
Main.CR_AuthToken = Headers.Item(i).Value
|
||||
Debug.WriteLine("Auth-Bearer: " + Main.CR_AuthToken)
|
||||
End If
|
||||
Next
|
||||
End If
|
||||
|
||||
'If CBool(InStr(e.Request.Uri, "crunchyroll.com/")) And CBool(InStr(e.Request.Uri, "streams?")) Then
|
||||
' Dim Headers As New List(Of KeyValuePair(Of String, String))
|
||||
' Headers.AddRange(e.Request.Headers.ToList)
|
||||
' For i As Integer = 0 To Headers.Count
|
||||
' If CBool(InStr(Headers.Item(i).Value, "Bearer")) Then
|
||||
' Main.CR_AuthToken = Headers.Item(i).Value
|
||||
' Debug.WriteLine("Auth-Bearer: " + Main.CR_AuthToken)
|
||||
' End If
|
||||
' Next
|
||||
'End If
|
||||
|
||||
'
|
||||
'
|
||||
'If CBool(InStr(e.Request.Uri, "9016.2bd48f1e07adf6596b2d.js")) = True Then '
|
||||
' Debug.WriteLine(e.Request.Uri)
|
||||
' 'MsgBox("Found!")
|
||||
' e.Response = WebView2.CoreWebView2.Environment.CreateWebResourceResponse(StringToStream(File.ReadAllText(Application.StartupPath + "\WebInterface\9016.2bd48f1e07adf6596b2d.js"), Encoding.UTF8), 200, "Not found", "content-type: application/javascript")
|
||||
|
||||
|
||||
'End If
|
||||
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Public Function StringToStream(input As String, enc As Encoding) As Stream
|
||||
Dim memoryStream = New MemoryStream()
|
||||
Dim streamWriter = New StreamWriter(memoryStream, enc)
|
||||
streamWriter.Write(input)
|
||||
streamWriter.Flush()
|
||||
memoryStream.Position = 0
|
||||
Return memoryStream
|
||||
End Function
|
||||
|
||||
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
|
||||
'If Main.UserBowser = False Then
|
||||
' WebView2.Reload()
|
||||
'Else
|
||||
' Timer1.Enabled = False
|
||||
'End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub Timer2_Tick(sender As Object, e As EventArgs) Handles Timer2.Tick
|
||||
Me.Close()
|
||||
End Sub
|
||||
|
||||
|
||||
End Class
|
||||
|
|
@ -6,6 +6,13 @@
|
|||
SubsOnly = 2
|
||||
AudioOnly = 3
|
||||
End Enum
|
||||
Public Enum UpdateScope
|
||||
Skip = 0
|
||||
Info = 1
|
||||
InfoPre = 2
|
||||
Auto = 3
|
||||
Pre = 4
|
||||
End Enum
|
||||
|
||||
Public Enum ConvertSubsEnum
|
||||
DisplayText = 0
|
||||
|
@ -15,56 +22,7 @@
|
|||
|
||||
End Class
|
||||
|
||||
#Region "funimation"
|
||||
|
||||
|
||||
Public Class FunimationOverview
|
||||
Public ID As String
|
||||
Public Title As String
|
||||
Public Slug As String
|
||||
Public Sub New(ByVal Slug As String, ByVal ID As String, ByVal Title As String)
|
||||
Me.ID = ID
|
||||
Me.Title = Title
|
||||
Me.Slug = Slug
|
||||
End Sub
|
||||
|
||||
Public Overrides Function ToString() As String
|
||||
Return String.Format("{0}, {1}, {2}", Me.Slug, Me.ID, Me.Title)
|
||||
End Function
|
||||
End Class
|
||||
|
||||
Public Class FunimationSubs
|
||||
Public LangugageCode As String
|
||||
Public Url As String
|
||||
Public Format As String
|
||||
Public Sub New(ByVal LangugageCode As String, ByVal Format As String, ByVal Url As String)
|
||||
Me.Url = Url
|
||||
Me.LangugageCode = LangugageCode
|
||||
Me.Format = Format
|
||||
End Sub
|
||||
|
||||
Public Overrides Function ToString() As String
|
||||
Return String.Format("{0}, {1}, {2}", Me.LangugageCode, Me.Format, Me.Url)
|
||||
End Function
|
||||
End Class
|
||||
|
||||
Public Class FunimationStream
|
||||
Public audioLanguage As String
|
||||
Public Url As String
|
||||
Public version As String
|
||||
Public Primary As Boolean
|
||||
Public Sub New(ByVal audioLanguage As String, ByVal version As String, ByVal Url As String, ByVal Primary As Boolean)
|
||||
Me.Primary = Primary
|
||||
Me.Url = Url
|
||||
Me.audioLanguage = audioLanguage
|
||||
Me.version = version
|
||||
End Sub
|
||||
|
||||
Public Overrides Function ToString() As String
|
||||
Return String.Format("{0}, {1}, {2}", Me.audioLanguage, Me.version, Me.Url)
|
||||
End Function
|
||||
End Class
|
||||
#End Region
|
||||
#Region "CR"
|
||||
Public Class CR_Beta_Stream
|
||||
'Public audioLanguage As String
|
||||
|
@ -84,6 +42,41 @@ Public Class CR_Beta_Stream
|
|||
|
||||
End Class
|
||||
|
||||
|
||||
Public Class CR_Tokens
|
||||
|
||||
Public access_token As String
|
||||
Public refresh_token As String
|
||||
Public expires_Unix As Integer
|
||||
|
||||
Public Sub New(ByVal access_token As String, ByVal refresh_token As String, ByVal expires_Unix As Integer)
|
||||
Me.access_token = access_token
|
||||
Me.refresh_token = refresh_token
|
||||
Me.expires_Unix = expires_Unix
|
||||
End Sub
|
||||
|
||||
Public Overrides Function ToString() As String
|
||||
Return String.Format("{0}, {1}, {2}", Me.access_token, Me.refresh_token, Me.expires_Unix.ToString)
|
||||
End Function
|
||||
|
||||
End Class
|
||||
|
||||
Public Class CR_MediaVersion
|
||||
|
||||
Public AudioLang As String
|
||||
Public guid As String
|
||||
|
||||
Public Sub New(ByVal AudioLang As String, ByVal guid As String)
|
||||
Me.AudioLang = AudioLang
|
||||
Me.guid = guid
|
||||
End Sub
|
||||
'Me.audioLanguage,
|
||||
Public Overrides Function ToString() As String
|
||||
Return String.Format("{0}, {1}", Me.AudioLang, Me.guid)
|
||||
End Function
|
||||
|
||||
End Class
|
||||
|
||||
Public Class CR_Subtiles
|
||||
Public Url As String
|
||||
Public SubLangValue As String
|
||||
|
@ -119,10 +112,12 @@ End Class
|
|||
|
||||
Public Class CR_Seasons
|
||||
|
||||
Public Season As String
|
||||
Public guid As String
|
||||
Public audio_locale As String
|
||||
Public Auth As String
|
||||
Public Sub New(ByVal guid As String, ByVal audio_locale As String, ByVal Auth As String)
|
||||
Public Sub New(ByVal guid As String, ByVal audio_locale As String, ByVal Auth As String, ByVal Season As String)
|
||||
Me.Season = Season
|
||||
Me.guid = guid
|
||||
Me.audio_locale = audio_locale
|
||||
Me.Auth = Auth
|
||||
|
@ -130,7 +125,7 @@ Public Class CR_Seasons
|
|||
End Sub
|
||||
|
||||
Public Overrides Function ToString() As String
|
||||
Return String.Format("{0}, {1}", Me.guid, Me.audio_locale)
|
||||
Return String.Format("{0}, {1}", Me.guid, Me.audio_locale, Me.Season)
|
||||
End Function
|
||||
End Class
|
||||
|
||||
|
|
|
@ -31,10 +31,15 @@ Public Class CRD_List_Item
|
|||
Dim TempFolder As String = Nothing
|
||||
Dim DownloadPfad As String = Nothing
|
||||
Dim ThumbnailSource As String = Nothing
|
||||
|
||||
Dim Failed As Boolean = False
|
||||
Dim FailedCount As Integer = 0
|
||||
|
||||
Dim FailedKey As Boolean = False
|
||||
|
||||
Dim HistoryDL_URL As String
|
||||
Dim HistoryDL_Pfad As String
|
||||
|
||||
Dim HistoryFilename As String
|
||||
Dim Retry As Boolean = False
|
||||
Dim HybridMode As Boolean = False
|
||||
|
@ -55,7 +60,7 @@ Public Class CRD_List_Item
|
|||
|
||||
Dim FailedSegments As New List(Of FailedSegemtsWithURL)
|
||||
Dim LogText As New List(Of String)
|
||||
Dim GlobalLogfile As String
|
||||
'Dim GlobalLogfile As String
|
||||
|
||||
Private Event UpdateUI(ByVal Percent As Integer, ByVal di As DirectoryInfo, ByVal Idle As Integer)
|
||||
|
||||
|
@ -85,6 +90,8 @@ Public Class CRD_List_Item
|
|||
|
||||
If Service = "FM" Then
|
||||
MetroStyleManager1.Style = MetroColorStyle.DarkPurple
|
||||
ElseIf Service = "other" Then
|
||||
MetroStyleManager1.Style = MetroColorStyle.Black
|
||||
Else
|
||||
MetroStyleManager1.Style = MetroColorStyle.Orange
|
||||
End If
|
||||
|
@ -299,6 +306,32 @@ Public Class CRD_List_Item
|
|||
StatusRunning = False
|
||||
bt_pause.BackgroundImage = My.Resources.main_pause_play
|
||||
|
||||
ElseIf Failed = True And FailedKey = True Then
|
||||
If Not Directory.Exists(Path.GetDirectoryName(HybridModePath)) Then
|
||||
' Nein! Jetzt erstellen...
|
||||
Try
|
||||
Directory.Delete(Path.GetDirectoryName(HybridModePath))
|
||||
Catch ex As Exception
|
||||
Debug.WriteLine("folder issue - delete")
|
||||
Exit Sub
|
||||
End Try
|
||||
End If
|
||||
Dim Evaluator = New Thread(Sub() DownloadHybrid(HistoryDL_URL, HistoryDL_Pfad, HistoryFilename))
|
||||
Evaluator.Start()
|
||||
HybridMode = True
|
||||
HybridRunning = True
|
||||
StatusRunning = True
|
||||
Failed = False
|
||||
|
||||
LastDate = Date.Now
|
||||
LastSize = 0
|
||||
LastDataRate1 = 0
|
||||
LastDataRate2 = 0
|
||||
LastDataRate3 = 0
|
||||
FailedSegments.Clear()
|
||||
LogText.Clear()
|
||||
ZeitGesamtInteger = 0
|
||||
|
||||
ElseIf Failed = True Then
|
||||
Dim Result As DialogResult = MessageBox.Show("The hybride mode has failed to download a fragment." + vbNewLine + "Press 'Retry' to retry the fragment or 'Ignore' to continue.", "Download Error", MessageBoxButtons.AbortRetryIgnore) '= DialogResult.Ignore Then
|
||||
|
||||
|
@ -443,8 +476,6 @@ Public Class CRD_List_Item
|
|||
#Region "Download + Update UI"
|
||||
|
||||
Public Sub StartDownload(ByVal DL_URL As String, ByVal DL_Pfad As String, ByVal Filename As String, ByVal DownloadHybridMode As Boolean, ByVal TempFolder As String)
|
||||
'MsgBox(DL_URL)
|
||||
|
||||
|
||||
|
||||
Me.StyleManager = MetroStyleManager1
|
||||
|
@ -454,24 +485,6 @@ Public Class CRD_List_Item
|
|||
HistoryDL_Pfad = DL_Pfad
|
||||
HistoryFilename = Filename
|
||||
|
||||
GlobalLogfile = DL_Pfad.Replace(".mkv", ".txt").Replace(Chr(34), "")
|
||||
|
||||
'Debug.WriteLine(GlobalLogfile)
|
||||
|
||||
'If (Me.InvokeRequired) Then
|
||||
' Me.Invoke(Sub()
|
||||
|
||||
|
||||
' 'MsgBox(True.ToString)
|
||||
' Label_percent.Text = "selected subtiles have been dowloaded"
|
||||
' Canceld = True
|
||||
' End Sub)
|
||||
'Else
|
||||
' ' MsgBox(False.ToString)
|
||||
' Label_percent.Text = "selected subtiles have been dowloaded"
|
||||
' Canceld = True
|
||||
'End If
|
||||
'Exit Sub
|
||||
|
||||
If CBool(InStr(DL_URL, "-i [Subtitles only]")) Then
|
||||
Me.Invoke(New Action(Function() As Object
|
||||
|
@ -485,12 +498,16 @@ Public Class CRD_List_Item
|
|||
Return Nothing
|
||||
End Function))
|
||||
ElseIf DownloadHybridMode = True Then
|
||||
|
||||
DL_URL = DL_URL.Replace("-protocol_whitelist file,http,https,tcp,tls,crypto,data", "") 'remove whitelist for hybrid mode
|
||||
HistoryDL_URL = DL_URL
|
||||
|
||||
Dim Evaluator = New Thread(Sub() DownloadHybrid(DL_URL, DL_Pfad, Filename))
|
||||
Evaluator.Start()
|
||||
HybridMode = True
|
||||
HybridRunning = True
|
||||
Else
|
||||
DownloadFFMPEG(DL_URL, DL_Pfad, Filename)
|
||||
DownloadFFMPEG(DL_URL, DL_Pfad, Filename) 'DownloadFFMPEG("-protocol_whitelist file,http,https,tcp,tls,crypto,data " + DL_URL, DL_Pfad, Filename)
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
@ -700,7 +717,7 @@ Public Class CRD_List_Item
|
|||
Dim Zeile2 As String = zeile.Replace("#EXT-X-BYTERANGE:", "")
|
||||
Dim Zeile3() As String = Zeile2.Split(New String() {"@"}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
|
||||
Dim CurrentSize As Integer = Integer.Parse(Zeile3(1))
|
||||
Dim CurrentSize As Long = Long.Parse(Zeile3(1))
|
||||
Dim NewBytes As Integer = Integer.Parse(Zeile3(0))
|
||||
Dim File As String = Folder + String.Format("{0:0000}", Count)
|
||||
Dim Evaluator = New Thread(Sub() Me.DownloadTSv4(DownloadFile, File, CurrentSize, NewBytes))
|
||||
|
@ -741,7 +758,7 @@ Public Class CRD_List_Item
|
|||
|
||||
End Function
|
||||
|
||||
Private Sub DownloadTSv4(ByVal DL_URL As String, ByVal DL_Pfad As String, ByVal CurrentSize As Integer, ByVal NewBytes As Integer)
|
||||
Private Sub DownloadTSv4(ByVal DL_URL As String, ByVal DL_Pfad As String, ByVal CurrentSize As Long, ByVal NewBytes As Integer)
|
||||
Dim retryCount As Integer = 3
|
||||
HybrideLog = HybrideLog + vbNewLine + Date.Now.ToString + ": " + DL_Pfad + " - " + DL_URL + " - " + CurrentSize.ToString
|
||||
While CBool(retryCount > 0)
|
||||
|
@ -960,54 +977,15 @@ Public Class CRD_List_Item
|
|||
KeyLine = KeyFileUri(0) + "URI=" + Chr(34) + KeyFileCache + Chr(34)
|
||||
End If
|
||||
|
||||
If KeepCacheFiles = True Then
|
||||
'Dim Bytes() As Byte = File.ReadAllBytes(Application.StartupPath + "\" + KeyFile)
|
||||
'File.WriteAllBytes(Folder + "\" + KeyFile, Bytes)
|
||||
Dim Evaluator2 = New Thread(Sub() Me.TS_DownloadAsync(KeyFileUri3, Folder + "\" + KeyFile))
|
||||
Evaluator2.Start()
|
||||
End If
|
||||
'If KeepCacheFiles = True Then
|
||||
' 'Dim Bytes() As Byte = File.ReadAllBytes(Application.StartupPath + "\" + KeyFile)
|
||||
' 'File.WriteAllBytes(Folder + "\" + KeyFile, Bytes)
|
||||
' Dim Evaluator2 = New Thread(Sub() Me.TS_DownloadAsync(KeyFileUri3, Folder + "\" + KeyFile))
|
||||
' Evaluator2.Start()
|
||||
'End If
|
||||
End If
|
||||
m3u8FileContent = m3u8FileContent + KeyLine + vbLf
|
||||
|
||||
ElseIf CBool(InStr(textLenght(i2), "#EXT-X-ENDLIST")) Then
|
||||
' ElseIf textLenght(i) = Then 'And my.Settings.FixCRStream = True Then
|
||||
|
||||
Try
|
||||
Dim StringCount As String = Count.ToString
|
||||
Dim StringCount_1 As String = (Count + 1).ToString
|
||||
|
||||
Debug.WriteLine("old: " + LastUrl)
|
||||
|
||||
Dim NewUrl As String = Nothing
|
||||
|
||||
Me.Invoke(New Action(Function() As Object
|
||||
NewUrl = LastUrl.Replace("-" + StringCount + "-", "-" + StringCount_1 + "-")
|
||||
Return Nothing
|
||||
End Function))
|
||||
|
||||
Debug.WriteLine("new: " + NewUrl)
|
||||
|
||||
Dim File As String = Folder + String.Format("{0:00000}", Count) + ".ts"
|
||||
Dim curi As String = GetFullUri(url, NewUrl)
|
||||
|
||||
WC_TS = New WebClient
|
||||
|
||||
WC_TS.DownloadFile(New Uri(curi), File)
|
||||
HybrideLog = HybrideLog + vbNewLine + Date.Now.ToString + ": " + File + " - " + curi
|
||||
m3u8FileContent = m3u8FileContent + "#EXTINF:4.048," + vbLf 'dummy line
|
||||
m3u8FileContent = m3u8FileContent + File + vbLf
|
||||
Dim FragmentsFinised = Count * 100 / FragmentsInt
|
||||
'Dim Update = New Thread(Sub() Me.TS_StatusAsync(CInt(FragmentsFinised), di, PauseTime))
|
||||
'Update.Start()
|
||||
RaiseEvent UpdateUI(CInt(FragmentsFinised), di, PauseTime)
|
||||
Count = Count + 1
|
||||
|
||||
|
||||
m3u8FileContent = m3u8FileContent + textLenght(i) + vbLf
|
||||
Catch ex As Exception
|
||||
HybrideLog = HybrideLog + vbNewLine + Date.Now.ToString + ": CR fix failed to access unlisted file #882"
|
||||
m3u8FileContent = m3u8FileContent + textLenght(i) + vbLf
|
||||
End Try
|
||||
Else
|
||||
m3u8FileContent = m3u8FileContent + textLenght(i) + vbLf
|
||||
End If
|
||||
|
@ -1071,7 +1049,16 @@ Public Class CRD_List_Item
|
|||
|
||||
Catch ex2 As Exception
|
||||
FailedCount = FailedCount + 1
|
||||
If Item_ErrorTolerance = 0 Then
|
||||
If CBool(InStr(DL_Pfad, ".key")) Then
|
||||
Failed = True
|
||||
FailedKey = True
|
||||
StatusRunning = False
|
||||
bt_pause.BackgroundImage = My.Resources.main_pause_play
|
||||
Me.Invoke(New Action(Function() As Object
|
||||
Label_percent.Text = "fatal! Failed to download 'encryption.key'"
|
||||
Return Nothing
|
||||
End Function))
|
||||
ElseIf Item_ErrorTolerance = 0 Then
|
||||
|
||||
ElseIf FailedCount >= Item_ErrorTolerance Then
|
||||
FailedSegments.Add(New FailedSegemtsWithURL(DL_Pfad, DL_URL))
|
||||
|
@ -1083,6 +1070,7 @@ Public Class CRD_List_Item
|
|||
Label_percent.Text = "Missing segment detected, retry or resume with the play button"
|
||||
Return Nothing
|
||||
End Function))
|
||||
|
||||
End If
|
||||
|
||||
|
||||
|
@ -1097,6 +1085,7 @@ Public Class CRD_List_Item
|
|||
#End Region
|
||||
|
||||
Public Function DownloadHybrid(ByVal DL_URL As String, ByVal DL_Pfad As String, ByVal Filename As String) As String
|
||||
'MsgBox(DL_URL)
|
||||
LogText.Add(Date.Now.ToString + " " + DL_URL)
|
||||
|
||||
Dim Folder As String = GeräteID()
|
||||
|
@ -1145,23 +1134,10 @@ Public Class CRD_List_Item
|
|||
Return Nothing
|
||||
End Function))
|
||||
|
||||
For i As Integer = 0 To InuputStreams.Count - 1
|
||||
For i As Integer = 1 To InuputStreams.Count - 1
|
||||
|
||||
Dim int As Integer = i
|
||||
|
||||
If CBool(InStr(InuputStreams(int), ":\")) Then
|
||||
Continue For
|
||||
End If
|
||||
|
||||
Dim InputURL As String() = InuputStreams(int).Split(New [Char]() {Chr(34)})
|
||||
Dim InputClient As New WebClient
|
||||
InputClient.Encoding = Encoding.UTF8
|
||||
|
||||
If Main.WebbrowserCookie = Nothing Then
|
||||
Else
|
||||
InputClient.Headers.Add(HttpRequestHeader.Cookie, Main.WebbrowserCookie)
|
||||
|
||||
End If
|
||||
Dim SubsFile As String = Pfad2 + GeräteID() + ".txt"
|
||||
|
||||
If File.Exists(SubsFile) Then
|
||||
|
@ -1169,33 +1145,53 @@ Public Class CRD_List_Item
|
|||
End If
|
||||
|
||||
Try
|
||||
Dim InputData As String = Nothing
|
||||
Try
|
||||
InputData = InputClient.DownloadString(InputURL(0))
|
||||
Catch ex As Exception
|
||||
InputClient.Headers.Add(HttpRequestHeader.AcceptEncoding, "*")
|
||||
InputData = DecompressString(InputClient.DownloadData(InputURL(0)))
|
||||
End Try
|
||||
|
||||
Dim InputData As String = Nothing
|
||||
Dim InputPath As String = Nothing
|
||||
If CBool(InStr(InuputStreams(int), ":\")) = True Then
|
||||
Dim InputFile As String() = InuputStreams(int).Split(New [Char]() {Chr(34)})
|
||||
InputPath = InputFile(0)
|
||||
InputData = My.Computer.FileSystem.ReadAllText(InputPath)
|
||||
|
||||
Else
|
||||
Dim InputURL As String() = InuputStreams(int).Split(New [Char]() {Chr(34)})
|
||||
InputPath = InputURL(0)
|
||||
Dim InputClient As New WebClient
|
||||
InputClient.Encoding = Encoding.UTF8
|
||||
|
||||
If Main.WebbrowserCookie = Nothing Then
|
||||
Else
|
||||
InputClient.Headers.Add(HttpRequestHeader.Cookie, Main.WebbrowserCookie)
|
||||
|
||||
End If
|
||||
|
||||
Try
|
||||
InputData = InputClient.DownloadString(InputURL(0))
|
||||
Catch ex As Exception
|
||||
InputClient.Headers.Add(HttpRequestHeader.AcceptEncoding, "*")
|
||||
InputData = DecompressString(InputClient.DownloadData(InputURL(0)))
|
||||
End Try
|
||||
|
||||
End If
|
||||
If InputData = Nothing Then
|
||||
Throw New System.Exception("No Input Data...")
|
||||
End If
|
||||
|
||||
If CBool(InStr(InputData, "RESOLUTION=")) = True And CBool(InStr(InputData, "#EXT-X-BYTERANGE:")) = False Then 'master m3u8 no fragments
|
||||
'If CBool(InStr(InputData, "RESOLUTION=")) = True And CBool(InStr(InputData, "#EXT-X-BYTERANGE:")) = False Then 'master m3u8 no fragments
|
||||
|
||||
Dim index_m3u8() As String = InputData.Split(New String() {vbLf}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
If TargetReso = 42 Then
|
||||
TargetReso = 1080
|
||||
End If
|
||||
For line As Integer = 0 To index_m3u8.Count - 1
|
||||
If CBool(InStr(index_m3u8(line), "x" + TargetReso.ToString)) = True Then
|
||||
' Dim index_m3u8() As String = InputData.Split(New String() {vbLf}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
' If TargetReso = 42 Then
|
||||
' TargetReso = 1080
|
||||
' End If
|
||||
' For line As Integer = 0 To index_m3u8.Count - 1
|
||||
' If CBool(InStr(index_m3u8(line), "x" + TargetReso.ToString)) = True Then
|
||||
|
||||
InputData = InputClient.DownloadString(GetFullUri(InputURL(0), index_m3u8(line + 1)))
|
||||
InputURL(0) = index_m3u8(line + 1)
|
||||
Exit For
|
||||
End If
|
||||
Next
|
||||
End If
|
||||
' InputData = InputClient.DownloadString(GetFullUri(InputURL(0), index_m3u8(line + 1)))
|
||||
' InputURL(0) = index_m3u8(line + 1)
|
||||
' Exit For
|
||||
' End If
|
||||
' Next
|
||||
'End If
|
||||
|
||||
If CBool(InStr(InputData, "#EXT-X-VERSION:3")) Or CBool(InStr(InputData, "#EXT-X-VERSION:5")) Then
|
||||
|
||||
|
@ -1203,13 +1199,23 @@ Public Class CRD_List_Item
|
|||
Pfad2 = Path.GetDirectoryName(DL_Pfad.Replace(Chr(34), "")) + "\" + NameP2.Replace(" ", "-") + "\"
|
||||
End If
|
||||
|
||||
ProcessV3(InputURL(0), InputData, Pfad2, DL_Pfad, DL_URL)
|
||||
ProcessV3(InputPath, InputData, Pfad2, DL_Pfad, DL_URL)
|
||||
|
||||
DL_URL = DL_URL.Replace("-i " + Chr(34) + InputURL(0), "-allowed_extensions ALL " + "-i " + Chr(34) + Pfad2 + "index.m3u8")
|
||||
If CBool(InStr(DL_URL, "-allowed_extensions ALL ")) = True Then
|
||||
DL_URL = DL_URL.Replace("-allowed_extensions ALL ", "")
|
||||
End If
|
||||
|
||||
DL_URL = DL_URL.Replace("-i " + Chr(34) + InputPath, "-allowed_extensions ALL " + "-i " + Chr(34) + Pfad2 + "index.m3u8")
|
||||
|
||||
ElseIf CBool(InStr(InputData, "#EXT-X-VERSION:4")) Then
|
||||
ProcessV4(InputURL(0), InputData, Pfad2 + "Stream-" + int.ToString + "\")
|
||||
DL_URL = DL_URL.Replace("-i " + Chr(34) + InputURL(0), "-allowed_extensions ALL " + "-i " + Chr(34) + Pfad2 + "Stream-" + int.ToString + "\index.m3u8")
|
||||
ProcessV4(InputPath, InputData, Pfad2 + "Stream-" + int.ToString + "\")
|
||||
|
||||
|
||||
If CBool(InStr(DL_URL, "-allowed_extensions ALL ")) = True Then
|
||||
DL_URL = DL_URL.Replace("-allowed_extensions ALL ", "")
|
||||
End If
|
||||
|
||||
DL_URL = DL_URL.Replace("-i " + Chr(34) + InputPath, "-allowed_extensions ALL " + "-i " + Chr(34) + Pfad2 + "Stream-" + int.ToString + "\index.m3u8")
|
||||
Else
|
||||
'write string to file
|
||||
If Not Directory.Exists(Path.GetDirectoryName(Pfad2)) Then
|
||||
|
@ -1242,11 +1248,11 @@ Public Class CRD_List_Item
|
|||
|
||||
|
||||
Using sink As New StreamWriter(SubsFile, False, utf8WithoutBom2)
|
||||
sink.WriteLine(InputData)
|
||||
End Using
|
||||
'replace url with local file
|
||||
DL_URL = DL_URL.Replace(InputURL(0), SubsFile)
|
||||
End If
|
||||
sink.WriteLine(InputData)
|
||||
End Using
|
||||
'replace url with local file
|
||||
DL_URL = DL_URL.Replace(InputPath, SubsFile)
|
||||
End If
|
||||
Catch ex As Exception
|
||||
Debug.WriteLine(ex.ToString)
|
||||
DL_URL = DL_URL_old
|
||||
|
@ -1324,13 +1330,14 @@ Public Class CRD_List_Item
|
|||
|
||||
Dim exepath As String = Application.StartupPath + "\ffmpeg.exe"
|
||||
Dim startinfo As New System.Diagnostics.ProcessStartInfo
|
||||
Dim cmd As String = "-user_agent " + My.Settings.User_Agend.Replace("User-Agent: ", "") + " -headers " + Chr(34) + "ACCEPT-ENCODING: *" + Chr(34) + " " + DLCommand + " " + DL_Pfad 'start ffmpeg with command strFFCMD string
|
||||
'Dim cmd As String = "-headers " + My.Settings.User_Agend + " -headers " + Chr(34) + "ACCEPT-ENCODING: *" + Chr(34) + " " + DLCommand + " " + DL_Pfad 'start ffmpeg with command strFFCMD string
|
||||
'Dim cmd As String = "-user_agent " + My.Settings.User_Agend.Replace("User-Agent: ", "") + " -headers " + Chr(34) + "ACCEPT-ENCODING: *" + Chr(34) + " " + DLCommand + " " + DL_Pfad 'start ffmpeg with command strFFCMD string
|
||||
|
||||
If CBool(InStr(DLCommand, ":\")) And CBool(InStr(DLCommand, "-i " + Chr(34) + "https://")) Then
|
||||
Dim Replacement As String = "-user_agent " + My.Settings.User_Agend.Replace("User-Agent: ", "") + " -headers " + Chr(34) + "ACCEPT-ENCODING: *" + Chr(34) + " -i " + Chr(34) + "https://"
|
||||
cmd = DLCommand.Replace("-i " + Chr(34) + "https://", Replacement) + " " + DL_Pfad
|
||||
End If
|
||||
Dim cmd As String = DLCommand + " " + DL_Pfad 'start ffmpeg with command strFFCMD string
|
||||
|
||||
'If CBool(InStr(DLCommand, ":\")) And CBool(InStr(DLCommand, "-i " + Chr(34) + "https://")) Then
|
||||
' Dim Replacement As String = "-user_agent " + My.Settings.User_Agend.Replace("User-Agent: ", "") + " -headers " + Chr(34) + "ACCEPT-ENCODING: *" + Chr(34) + " -i " + Chr(34) + "https://"
|
||||
' cmd = DLCommand.Replace("-i " + Chr(34) + "https://", Replacement) + " " + DL_Pfad
|
||||
'End If
|
||||
|
||||
LogText.Add(Date.Now.ToString + " " + cmd)
|
||||
If Debug2 = True Then
|
||||
|
|
22
Crunchyroll Downloader/CheckBoxComboBox.Designer.vb
generated
22
Crunchyroll Downloader/CheckBoxComboBox.Designer.vb
generated
|
@ -24,27 +24,47 @@ Partial Class CheckBoxComboBox
|
|||
Private Sub InitializeComponent()
|
||||
Me.components = New System.ComponentModel.Container()
|
||||
Me.Animation = New System.Windows.Forms.Timer(Me.components)
|
||||
Me.BGP = New MetroFramework.Controls.MetroPanel()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'Animation
|
||||
'
|
||||
Me.Animation.Interval = 10
|
||||
'
|
||||
'BGP
|
||||
'
|
||||
Me.BGP.AutoScroll = True
|
||||
Me.BGP.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.BGP.HorizontalScrollbar = True
|
||||
Me.BGP.HorizontalScrollbarBarColor = True
|
||||
Me.BGP.HorizontalScrollbarHighlightOnWheel = False
|
||||
Me.BGP.HorizontalScrollbarSize = 10
|
||||
Me.BGP.Location = New System.Drawing.Point(5, 5)
|
||||
Me.BGP.Name = "BGP"
|
||||
Me.BGP.Size = New System.Drawing.Size(310, 317)
|
||||
Me.BGP.TabIndex = 0
|
||||
Me.BGP.VerticalScrollbar = True
|
||||
Me.BGP.VerticalScrollbarBarColor = True
|
||||
Me.BGP.VerticalScrollbarHighlightOnWheel = False
|
||||
Me.BGP.VerticalScrollbarSize = 10
|
||||
'
|
||||
'CheckBoxComboBox
|
||||
'
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.None
|
||||
Me.BorderStyle = MetroFramework.Forms.MetroFormBorderStyle.FixedSingle
|
||||
Me.ClientSize = New System.Drawing.Size(320, 327)
|
||||
Me.ControlBox = False
|
||||
Me.Controls.Add(Me.BGP)
|
||||
Me.DisplayHeader = False
|
||||
Me.MaximizeBox = False
|
||||
Me.MinimizeBox = False
|
||||
Me.Name = "CheckBoxComboBox"
|
||||
Me.Padding = New System.Windows.Forms.Padding(10, 30, 10, 10)
|
||||
Me.Padding = New System.Windows.Forms.Padding(5, 5, 5, 5)
|
||||
Me.TextAlign = MetroFramework.Forms.MetroFormTextAlign.Center
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
|
||||
Friend WithEvents Animation As Timer
|
||||
Friend WithEvents BGP As MetroFramework.Controls.MetroPanel
|
||||
End Class
|
||||
|
|
|
@ -11,14 +11,15 @@ Public Class CheckBoxComboBox
|
|||
Dim Manager As New MetroStyleManager
|
||||
Dim Dubs As New List(Of MetroCheckBox)
|
||||
Dim Subs As New List(Of MetroCheckBox)
|
||||
Dim MyHeight As Integer = 330
|
||||
Dim MyHeight As Integer = 300
|
||||
Private Sub Reso_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||
Manager.Owner = Me
|
||||
Me.StyleManager = Manager
|
||||
BGP.StyleManager = Manager
|
||||
|
||||
Me.Height = 15
|
||||
Animation.Enabled = True
|
||||
|
||||
BGP.StyleManager.Style = MetroColorStyle.Orange
|
||||
Me.StyleManager.Style = MetroColorStyle.Orange
|
||||
|
||||
If Me.Text = "CR Dub selection" Then
|
||||
|
@ -46,7 +47,7 @@ Public Class CheckBoxComboBox
|
|||
Dubs.Add(Dub)
|
||||
Me.Controls.Add(Dub)
|
||||
Next
|
||||
MyHeight = (Main.LangValueEnum.Count - 1) * 30
|
||||
'MyHeight = (Main.LangValueEnum.Count - 1) * 30
|
||||
|
||||
ElseIf Me.Text = "CR Sub selection" Then
|
||||
|
||||
|
@ -57,11 +58,11 @@ Public Class CheckBoxComboBox
|
|||
SubT.Name = Main.LangValueEnum(i).CR_Value
|
||||
SubT.FontSize = MetroCheckBoxSize.SomethingInBetween
|
||||
SubT.TextAlign = ContentAlignment.MiddleCenter
|
||||
SubT.SetBounds(2, 30 * Subs.Count + 1, 316, 25)
|
||||
SubT.SetBounds(2, 30 * Subs.Count + 1, 295, 25)
|
||||
SubT.UseCustomBackColor = True
|
||||
SubT.UseCustomForeColor = True
|
||||
SubT.ForeColor = Color.Black
|
||||
|
||||
SubT.StyleManager = Manager
|
||||
AddHandler SubT.MouseEnter, AddressOf ItemMouseEnter
|
||||
AddHandler SubT.MouseLeave, AddressOf ItemMouseLeave
|
||||
AddHandler SubT.CheckedChanged, AddressOf ItemCheckedChanged
|
||||
|
@ -71,10 +72,10 @@ Public Class CheckBoxComboBox
|
|||
End If
|
||||
|
||||
Subs.Add(SubT)
|
||||
Me.Controls.Add(SubT)
|
||||
BGP.Controls.Add(SubT)
|
||||
Next
|
||||
|
||||
MyHeight = (Main.LangValueEnum.Count - 2) * 30
|
||||
'MyHeight = 300 '(Main.LangValueEnum.Count - 2) * 30
|
||||
End If
|
||||
|
||||
|
||||
|
@ -112,9 +113,9 @@ Public Class CheckBoxComboBox
|
|||
|
||||
Private Sub CheckBoxComboBox_LocationChanged(sender As Object, e As EventArgs) Handles Me.LocationChanged
|
||||
If Me.Text = "CR Dub selection" Then
|
||||
Me.Location = New Point(Einstellungen.Location.X + 116, Einstellungen.Location.Y + 204)
|
||||
Me.Location = New Point(Einstellungen.Location.X + 116, Einstellungen.Location.Y + 200)
|
||||
ElseIf Me.Text = "CR Sub selection" Then
|
||||
Me.Location = New Point(Einstellungen.Location.X + 116, Einstellungen.Location.Y + 344)
|
||||
Me.Location = New Point(Einstellungen.Location.X + 116, Einstellungen.Location.Y + 340)
|
||||
End If
|
||||
|
||||
|
||||
|
@ -166,5 +167,4 @@ Public Class CheckBoxComboBox
|
|||
End If
|
||||
End Sub
|
||||
|
||||
|
||||
End Class
|
|
@ -104,21 +104,13 @@
|
|||
<WarningsAsErrors>41999,42016,42017,42018,42019,42020,42021,42022,42032,42036</WarningsAsErrors>
|
||||
</PropertyGroup>
|
||||
<ItemGroup>
|
||||
<Reference Include="MetroFramework, Version=1.4.0.0, Culture=neutral, PublicKeyToken=5f91a84759bf584a, processorArchitecture=x86">
|
||||
<Reference Include="MetroFramework, Version=1.4.0.0, Culture=neutral, PublicKeyToken=5f91a84759bf584a, processorArchitecture=AMD64">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<HintPath>..\..\..\metroframework-modern-ui\MetroFramework\bin\x64\Debug\MetroFramework.dll</HintPath>
|
||||
<HintPath>Resources\CRD_metroframework_x64\MetroFramework.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="Microsoft.Web.WebView2.Core, Version=1.0.1418.22, Culture=neutral, PublicKeyToken=2a8ab48044d2601e, processorArchitecture=MSIL">
|
||||
<HintPath>..\packages\Microsoft.Web.WebView2.1.0.1418.22\lib\net45\Microsoft.Web.WebView2.Core.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="Microsoft.Web.WebView2.WinForms, Version=1.0.1418.22, Culture=neutral, PublicKeyToken=2a8ab48044d2601e, processorArchitecture=MSIL">
|
||||
<HintPath>..\packages\Microsoft.Web.WebView2.1.0.1418.22\lib\net45\Microsoft.Web.WebView2.WinForms.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="Microsoft.Web.WebView2.Wpf, Version=1.0.1418.22, Culture=neutral, PublicKeyToken=2a8ab48044d2601e, processorArchitecture=MSIL">
|
||||
<HintPath>..\packages\Microsoft.Web.WebView2.1.0.1418.22\lib\net45\Microsoft.Web.WebView2.Wpf.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="MyProvider">
|
||||
<HintPath>..\..\..\MyProvider\MyProvider\bin\x64\Debug\MyProvider.dll</HintPath>
|
||||
<Reference Include="MyProvider, Version=1.0.0.0, Culture=neutral, processorArchitecture=AMD64">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<HintPath>Resources\CRD_SettingsProvider_x64\MyProvider.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="Newtonsoft.Json, Version=13.0.0.0, Culture=neutral, PublicKeyToken=30ad4fe6b2a6aeed, processorArchitecture=MSIL">
|
||||
<HintPath>..\packages\Newtonsoft.Json.13.0.1\lib\net45\Newtonsoft.Json.dll</HintPath>
|
||||
|
@ -151,6 +143,18 @@
|
|||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<Compile Include="CRD-Classes.vb" />
|
||||
<Compile Include="Error_msg.Designer.vb">
|
||||
<DependentUpon>Error_msg.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="Error_msg.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="LoginForm.Designer.vb">
|
||||
<DependentUpon>LoginForm.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="LoginForm.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="ffmpeg_option.Designer.vb">
|
||||
<DependentUpon>ffmpeg_option.vb</DependentUpon>
|
||||
</Compile>
|
||||
|
@ -195,12 +199,6 @@
|
|||
<Compile Include="einstellungen.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="Browser.Designer.vb">
|
||||
<DependentUpon>Browser.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="Browser.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="ProcessSleep.vb" />
|
||||
<Compile Include="ErrorDialog.Designer.vb">
|
||||
<DependentUpon>ErrorDialog.vb</DependentUpon>
|
||||
|
@ -234,6 +232,13 @@
|
|||
<Compile Include="Subfolder.vb" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<EmbeddedResource Include="Error_msg.resx">
|
||||
<DependentUpon>Error_msg.vb</DependentUpon>
|
||||
<SubType>Designer</SubType>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="LoginForm.resx">
|
||||
<DependentUpon>LoginForm.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="ffmpeg_option.resx">
|
||||
<DependentUpon>ffmpeg_option.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
|
@ -252,9 +257,6 @@
|
|||
<EmbeddedResource Include="einstellungen.resx">
|
||||
<DependentUpon>einstellungen.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="Browser.resx">
|
||||
<DependentUpon>Browser.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="CRD_List_Item.resx">
|
||||
<DependentUpon>CRD_List_Item.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
|
@ -272,6 +274,9 @@
|
|||
</EmbeddedResource>
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="..\.editorconfig">
|
||||
<Link>.editorconfig</Link>
|
||||
</None>
|
||||
<None Include="bin\x86\Debug\Lib\chrome_100_percent.pak" />
|
||||
<None Include="bin\x86\Debug\Lib\chrome_200_percent.pak" />
|
||||
<None Include="bin\x86\Debug\Lib\icudtl.dat" />
|
||||
|
@ -379,6 +384,7 @@
|
|||
<Content Include="bin\x86\Debug\Lib\swiftshader\libEGL.dll" />
|
||||
<Content Include="bin\x86\Debug\Lib\swiftshader\libGLESv2.dll" />
|
||||
<Content Include="icon.ico" />
|
||||
<None Include="Resources\error_dis.png" />
|
||||
<None Include="Resources\BG.png" />
|
||||
<None Include="Resources\ffmpeg_OK_cL.png" />
|
||||
<None Include="Resources\ffmpeg_OK_cL_hover.png" />
|
||||
|
@ -430,11 +436,4 @@
|
|||
<WCFMetadata Include="Connected Services\" />
|
||||
</ItemGroup>
|
||||
<Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
|
||||
<Import Project="..\packages\Microsoft.Web.WebView2.1.0.1418.22\build\Microsoft.Web.WebView2.targets" Condition="Exists('..\packages\Microsoft.Web.WebView2.1.0.1418.22\build\Microsoft.Web.WebView2.targets')" />
|
||||
<Target Name="EnsureNuGetPackageBuildImports" BeforeTargets="PrepareForBuild">
|
||||
<PropertyGroup>
|
||||
<ErrorText>Dieses Projekt verweist auf mindestens ein NuGet-Paket, das auf diesem Computer fehlt. Verwenden Sie die Wiederherstellung von NuGet-Paketen, um die fehlenden Dateien herunterzuladen. Weitere Informationen finden Sie unter "http://go.microsoft.com/fwlink/?LinkID=322105". Die fehlende Datei ist "{0}".</ErrorText>
|
||||
</PropertyGroup>
|
||||
<Error Condition="!Exists('..\packages\Microsoft.Web.WebView2.1.0.1418.22\build\Microsoft.Web.WebView2.targets')" Text="$([System.String]::Format('$(ErrorText)', '..\packages\Microsoft.Web.WebView2.1.0.1418.22\build\Microsoft.Web.WebView2.targets'))" />
|
||||
</Target>
|
||||
</Project>
|
|
@ -40,22 +40,14 @@ Public Class ErrorDialog
|
|||
Debug.WriteLine(Main.ResoNotFoundString)
|
||||
Debug.WriteLine("ResoNotFoundString")
|
||||
|
||||
Dim lang_avalibe As String() = Main.ResoNotFoundString.Split(New String() {"hardsub_locale" + Chr(34) + ":" + Chr(34)}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
Dim lang_avalibe As String() = Main.ResoNotFoundString.Split(New String() {";"}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
|
||||
For i As Integer = 1 To lang_avalibe.Count - 1
|
||||
If CBool(InStr(lang_avalibe(i), "https://")) Then
|
||||
Else
|
||||
Continue For
|
||||
End If
|
||||
If lang_avalibe(i).Substring(0, 1) = Chr(34) Then
|
||||
ComboBox1.Items.Add("No Hardsubs")
|
||||
Continue For 'Chr(34) +
|
||||
End If
|
||||
'MsgBox(lang_avalibe(i))
|
||||
Dim langsplit As String() = lang_avalibe(i).Split(New String() {Chr(34) + ","}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
ComboBox1.Items.Add(Main.ConvertSubValue(langsplit(0), ConvertSubsEnum.DisplayText))
|
||||
For i As Integer = 0 To lang_avalibe.Count - 1
|
||||
ComboBox1.Items.Add(Main.ConvertSubValue(lang_avalibe(i), ConvertSubsEnum.DisplayText))
|
||||
Next
|
||||
|
||||
SurroundingSub()
|
||||
|
||||
ElseIf Main.DialogTaskString = "Resolution" Then
|
||||
StatusLabel.Text = Main.LabelResoNotFoundText
|
||||
Dim Reso_avaible1 As String() = Main.ResoNotFoundString.Split(New String() {"RESOLUTION="}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
|
@ -70,40 +62,21 @@ Public Class ErrorDialog
|
|||
End Try
|
||||
ElseIf Main.DialogTaskString = "AudioOnlyResolution" Then
|
||||
StatusLabel.Text = "" 'Main.LabelResoNotFoundText
|
||||
ComboBox1.Items.Add("x240,")
|
||||
ComboBox1.Items.Add("x360,")
|
||||
ComboBox1.Items.Add("x480,")
|
||||
ComboBox1.Items.Add("x720,")
|
||||
ComboBox1.Items.Add("x1080,")
|
||||
ElseIf Main.DialogTaskString = "Funimation_Resolution" Then
|
||||
StatusLabel.Text = Main.LabelResoNotFoundText
|
||||
'Try
|
||||
' My.Computer.FileSystem.WriteAllText(Application.StartupPath + "\Funimation-Resolution.log", Main.ResoNotFoundString, True)
|
||||
'Catch ex As Exception
|
||||
'End Try
|
||||
Dim ResoList As New List(Of String)
|
||||
Dim m3u8_split As String() = Main.ResoNotFoundString.Split(New String() {vbLf}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
For i As Integer = 0 To m3u8_split.Count - 1
|
||||
If CBool(InStr(m3u8_split(i), "RESOLUTION=")) Then
|
||||
ResoList.Add(m3u8_split(i))
|
||||
End If
|
||||
Next
|
||||
|
||||
Dim Reso_avaible1 As String() = Main.ResoNotFoundString.Split(New String() {"RESOLUTION="}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
For i As Integer = 0 To ResoList.Count - 1
|
||||
Dim Reso_avaible As String() = ResoList.Item(i).Split(New String() {"RESOLUTION="}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
If CBool(InStr(Reso_avaible(1), ",")) Then
|
||||
Dim Reso_avaible2 As String() = Reso_avaible(1).Split(New String() {","}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
ComboBox1.Items.Add(Reso_avaible2(0))
|
||||
Else
|
||||
ComboBox1.Items.Add(Reso_avaible(1))
|
||||
End If
|
||||
Next
|
||||
SurroundingSub()
|
||||
Try
|
||||
ComboBox1.SelectedIndex = 0
|
||||
Catch ex As Exception
|
||||
End Try
|
||||
|
||||
End If
|
||||
|
||||
'check for the first option and error if there are none
|
||||
If ComboBox1.Items.Count > 0 Then
|
||||
ComboBox1.SelectedIndex = 0
|
||||
Else
|
||||
MsgBox("Error, no available options found!", MsgBoxStyle.Information)
|
||||
End If
|
||||
|
||||
Delay.Enabled = True
|
||||
End Sub
|
||||
|
||||
|
@ -142,6 +115,7 @@ Public Class ErrorDialog
|
|||
Else
|
||||
If Main.DialogTaskString = "Language_CR_Beta" Then
|
||||
Main.ResoBackString = DisplayToHardSubValues(ComboBox1.SelectedItem.ToString)
|
||||
'MsgBox(Main.ResoBackString)
|
||||
Main.UserCloseDialog = False
|
||||
Me.Close()
|
||||
Else
|
||||
|
@ -153,35 +127,13 @@ Public Class ErrorDialog
|
|||
End Sub
|
||||
|
||||
Public Function DisplayToHardSubValues(ByVal HardSub As String) As String
|
||||
Try
|
||||
If HardSub = "Deutsch" Then
|
||||
Return "de-DE"
|
||||
ElseIf HardSub = "English" Then
|
||||
Return "en-US"
|
||||
ElseIf HardSub = "Português (Brasil)" Then
|
||||
Return "pt-BR"
|
||||
ElseIf HardSub = "Español (LA)" Then '"(LA)-Español"
|
||||
Return "es-LA"
|
||||
ElseIf HardSub = "Español" Then
|
||||
Return "es-419"
|
||||
ElseIf HardSub = "Français (France)" Then
|
||||
Return "fr-FR"
|
||||
ElseIf HardSub = "العربية (Arabic)" Then
|
||||
Return "ar-SA"
|
||||
ElseIf HardSub = "Русский (Russian)" Then
|
||||
Return "ru-RU"
|
||||
ElseIf HardSub = "Italiano (Italian)" Then
|
||||
Return "it-IT"
|
||||
ElseIf HardSub = "Español (España)" Then
|
||||
Return "es-ES"
|
||||
Else
|
||||
|
||||
Return Nothing
|
||||
For i As Integer = 0 To Main.LangValueEnum.Count - 1
|
||||
If Main.LangValueEnum.Item(i).DisplayText = HardSub Then ' does not find "No Hardsubs" but default is correct here anyway.
|
||||
Return Main.LangValueEnum.Item(i).CR_Value
|
||||
End If
|
||||
Next
|
||||
|
||||
Catch ex As Exception
|
||||
Return Nothing
|
||||
End Try
|
||||
Return "null" ' null as text because CR does so...
|
||||
|
||||
End Function
|
||||
|
||||
|
|
183
Crunchyroll Downloader/Error_msg.Designer.vb
generated
Normal file
183
Crunchyroll Downloader/Error_msg.Designer.vb
generated
Normal file
|
@ -0,0 +1,183 @@
|
|||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
|
||||
Partial Class Error_msg
|
||||
Inherits MetroFramework.Forms.MetroForm
|
||||
|
||||
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
||||
<System.Diagnostics.DebuggerNonUserCode()>
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Wird vom Windows Form-Designer benötigt.
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
|
||||
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()>
|
||||
Private Sub InitializeComponent()
|
||||
Me.components = New System.ComponentModel.Container()
|
||||
Me.GroupBox3 = New System.Windows.Forms.GroupBox()
|
||||
Me.btn_cl = New System.Windows.Forms.Button()
|
||||
Me.btn_ign = New System.Windows.Forms.Button()
|
||||
Me.btn_ok = New System.Windows.Forms.Button()
|
||||
Me.ErrorLabel = New MetroFramework.Controls.MetroLabel()
|
||||
Me.Delay = New System.Windows.Forms.Timer(Me.components)
|
||||
Me.Btn_Close = New System.Windows.Forms.Button()
|
||||
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
|
||||
Me.ErrorBox = New System.Windows.Forms.RichTextBox()
|
||||
Me.GroupBox3.SuspendLayout()
|
||||
Me.GroupBox1.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'GroupBox3
|
||||
'
|
||||
Me.GroupBox3.BackColor = System.Drawing.Color.Transparent
|
||||
Me.GroupBox3.Controls.Add(Me.btn_cl)
|
||||
Me.GroupBox3.Controls.Add(Me.btn_ign)
|
||||
Me.GroupBox3.Controls.Add(Me.btn_ok)
|
||||
Me.GroupBox3.Controls.Add(Me.ErrorLabel)
|
||||
Me.GroupBox3.Location = New System.Drawing.Point(13, 60)
|
||||
Me.GroupBox3.Name = "GroupBox3"
|
||||
Me.GroupBox3.Size = New System.Drawing.Size(613, 203)
|
||||
Me.GroupBox3.TabIndex = 38
|
||||
Me.GroupBox3.TabStop = False
|
||||
'
|
||||
'btn_cl
|
||||
'
|
||||
Me.btn_cl.BackgroundImage = Global.Crunchyroll_Downloader.My.Resources.Resources.ffmpeg_OK_cL
|
||||
Me.btn_cl.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch
|
||||
Me.btn_cl.DialogResult = System.Windows.Forms.DialogResult.Cancel
|
||||
Me.btn_cl.FlatAppearance.BorderSize = 0
|
||||
Me.btn_cl.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_cl.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.btn_cl.ForeColor = System.Drawing.SystemColors.Control
|
||||
Me.btn_cl.Location = New System.Drawing.Point(28, 121)
|
||||
Me.btn_cl.Name = "btn_cl"
|
||||
Me.btn_cl.Size = New System.Drawing.Size(150, 40)
|
||||
Me.btn_cl.TabIndex = 77
|
||||
Me.btn_cl.Text = "Details"
|
||||
Me.btn_cl.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_ign
|
||||
'
|
||||
Me.btn_ign.BackgroundImage = Global.Crunchyroll_Downloader.My.Resources.Resources.ffmpeg_OK_cL
|
||||
Me.btn_ign.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch
|
||||
Me.btn_ign.FlatAppearance.BorderSize = 0
|
||||
Me.btn_ign.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_ign.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.btn_ign.ForeColor = System.Drawing.SystemColors.Control
|
||||
Me.btn_ign.Location = New System.Drawing.Point(235, 121)
|
||||
Me.btn_ign.Name = "btn_ign"
|
||||
Me.btn_ign.Size = New System.Drawing.Size(150, 40)
|
||||
Me.btn_ign.TabIndex = 78
|
||||
Me.btn_ign.Text = "Ignore"
|
||||
Me.btn_ign.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_ok
|
||||
'
|
||||
Me.btn_ok.BackgroundImage = Global.Crunchyroll_Downloader.My.Resources.Resources.ffmpeg_OK_cL
|
||||
Me.btn_ok.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch
|
||||
Me.btn_ok.FlatAppearance.BorderSize = 0
|
||||
Me.btn_ok.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_ok.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.btn_ok.ForeColor = System.Drawing.SystemColors.Control
|
||||
Me.btn_ok.Location = New System.Drawing.Point(424, 121)
|
||||
Me.btn_ok.Name = "btn_ok"
|
||||
Me.btn_ok.Size = New System.Drawing.Size(150, 40)
|
||||
Me.btn_ok.TabIndex = 78
|
||||
Me.btn_ok.Text = "Ok"
|
||||
Me.btn_ok.UseVisualStyleBackColor = True
|
||||
'
|
||||
'ErrorLabel
|
||||
'
|
||||
Me.ErrorLabel.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
|
||||
Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.ErrorLabel.BackColor = System.Drawing.Color.Transparent
|
||||
Me.ErrorLabel.FontSize = MetroFramework.MetroLabelSize.Tall
|
||||
Me.ErrorLabel.FontWeight = MetroFramework.MetroLabelWeight.Bold
|
||||
Me.ErrorLabel.ForeColor = System.Drawing.Color.Black
|
||||
Me.ErrorLabel.Location = New System.Drawing.Point(6, 16)
|
||||
Me.ErrorLabel.Name = "ErrorLabel"
|
||||
Me.ErrorLabel.Size = New System.Drawing.Size(601, 53)
|
||||
Me.ErrorLabel.TabIndex = 34
|
||||
Me.ErrorLabel.Text = "Status: idle"
|
||||
Me.ErrorLabel.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Delay
|
||||
'
|
||||
Me.Delay.Interval = 2000
|
||||
'
|
||||
'Btn_Close
|
||||
'
|
||||
Me.Btn_Close.BackColor = System.Drawing.Color.Transparent
|
||||
Me.Btn_Close.BackgroundImageLayout = System.Windows.Forms.ImageLayout.None
|
||||
Me.Btn_Close.Cursor = System.Windows.Forms.Cursors.Hand
|
||||
Me.Btn_Close.FlatAppearance.BorderSize = 0
|
||||
Me.Btn_Close.FlatAppearance.MouseOverBackColor = System.Drawing.Color.Transparent
|
||||
Me.Btn_Close.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Btn_Close.ForeColor = System.Drawing.Color.Transparent
|
||||
Me.Btn_Close.Image = Global.Crunchyroll_Downloader.My.Resources.Resources.main_close
|
||||
Me.Btn_Close.ImeMode = System.Windows.Forms.ImeMode.NoControl
|
||||
Me.Btn_Close.Location = New System.Drawing.Point(581, 8)
|
||||
Me.Btn_Close.Name = "Btn_Close"
|
||||
Me.Btn_Close.Size = New System.Drawing.Size(35, 35)
|
||||
Me.Btn_Close.TabIndex = 39
|
||||
Me.Btn_Close.UseVisualStyleBackColor = False
|
||||
'
|
||||
'GroupBox1
|
||||
'
|
||||
Me.GroupBox1.BackColor = System.Drawing.Color.Transparent
|
||||
Me.GroupBox1.Controls.Add(Me.ErrorBox)
|
||||
Me.GroupBox1.Location = New System.Drawing.Point(13, 286)
|
||||
Me.GroupBox1.Name = "GroupBox1"
|
||||
Me.GroupBox1.Size = New System.Drawing.Size(613, 203)
|
||||
Me.GroupBox1.TabIndex = 79
|
||||
Me.GroupBox1.TabStop = False
|
||||
'
|
||||
'ErrorBox
|
||||
'
|
||||
Me.ErrorBox.BackColor = System.Drawing.SystemColors.ButtonHighlight
|
||||
Me.ErrorBox.BorderStyle = System.Windows.Forms.BorderStyle.None
|
||||
Me.ErrorBox.Location = New System.Drawing.Point(10, 19)
|
||||
Me.ErrorBox.Name = "ErrorBox"
|
||||
Me.ErrorBox.ReadOnly = True
|
||||
Me.ErrorBox.Size = New System.Drawing.Size(593, 170)
|
||||
Me.ErrorBox.TabIndex = 0
|
||||
Me.ErrorBox.Text = ""
|
||||
'
|
||||
'Error_msg
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(640, 275)
|
||||
Me.Controls.Add(Me.GroupBox1)
|
||||
Me.Controls.Add(Me.Btn_Close)
|
||||
Me.Controls.Add(Me.GroupBox3)
|
||||
Me.MaximizeBox = False
|
||||
Me.MinimizeBox = False
|
||||
Me.Name = "Error_msg"
|
||||
Me.Text = "CRD-Error"
|
||||
Me.TextAlign = MetroFramework.Forms.MetroFormTextAlign.Center
|
||||
Me.GroupBox3.ResumeLayout(False)
|
||||
Me.GroupBox1.ResumeLayout(False)
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
Private WithEvents GroupBox3 As GroupBox
|
||||
Public WithEvents ErrorLabel As MetroFramework.Controls.MetroLabel
|
||||
Friend WithEvents Delay As Timer
|
||||
Friend WithEvents Btn_Close As Button
|
||||
Friend WithEvents btn_cl As Button
|
||||
Friend WithEvents btn_ok As Button
|
||||
Private WithEvents GroupBox1 As GroupBox
|
||||
Friend WithEvents ErrorBox As RichTextBox
|
||||
Friend WithEvents btn_ign As Button
|
||||
End Class
|
|
@ -117,10 +117,7 @@
|
|||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<metadata name="Timer1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<metadata name="Delay.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>17, 17</value>
|
||||
</metadata>
|
||||
<metadata name="Timer2.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>106, 17</value>
|
||||
</metadata>
|
||||
</root>
|
98
Crunchyroll Downloader/Error_msg.vb
Normal file
98
Crunchyroll Downloader/Error_msg.vb
Normal file
|
@ -0,0 +1,98 @@
|
|||
Option Strict On
|
||||
Imports Crunchyroll_Downloader.CRD_Classes
|
||||
Imports MetroFramework
|
||||
Imports MetroFramework.Components
|
||||
|
||||
Public Class Error_msg
|
||||
|
||||
Dim Manager As MetroStyleManager = Main.Manager
|
||||
|
||||
Private Sub Btn_Close_MouseEnter(sender As Object, e As EventArgs) Handles Btn_Close.MouseEnter, Btn_Close.GotFocus
|
||||
If Manager.Theme = MetroThemeStyle.Dark Then
|
||||
Btn_Close.Image = My.Resources.main_close_dark_hover
|
||||
Else
|
||||
Btn_Close.Image = My.Resources.main_close_hover
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub Btn_Close_MouseLeave(sender As Object, e As EventArgs) Handles Btn_Close.MouseLeave, Btn_Close.LostFocus
|
||||
Btn_Close.Image = Main.CloseImg
|
||||
End Sub
|
||||
|
||||
Private Sub Btn_Close_Click(sender As Object, e As EventArgs) Handles Btn_Close.Click
|
||||
Me.Close()
|
||||
End Sub
|
||||
|
||||
Private Sub Error_msg_Resize(sender As Object, e As EventArgs) Handles Me.Resize
|
||||
Btn_Close.Location = New Point(Me.Width - 36, 1)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btn_cl_Click(sender As Object, e As EventArgs) Handles btn_cl.Click
|
||||
If Me.Height = 500 Then
|
||||
Me.Height = 275
|
||||
Else
|
||||
Me.Height = 500
|
||||
End If
|
||||
End Sub
|
||||
Private Sub Reso_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||
Me.TopMost = True
|
||||
Manager.Owner = Me
|
||||
Me.StyleManager = Manager
|
||||
|
||||
Btn_Close.Image = Main.CloseImg
|
||||
|
||||
Try
|
||||
Me.Icon = My.Resources.icon
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
Me.Location = New Point(CInt(Main.Location.X + Main.Width / 2 - Me.Width / 2), CInt(Main.Location.Y + Main.Height / 2 - Me.Height / 2))
|
||||
|
||||
End Sub
|
||||
|
||||
Public Sub ShowErrorDia(ByVal Details As String, ShortError As String, Optional ByVal IgnoreOption As Boolean = False)
|
||||
Me.Show()
|
||||
ErrorBox.Text = Details
|
||||
ErrorLabel.Text = ShortError
|
||||
If IgnoreOption = False Then
|
||||
btn_ign.BackgroundImage = My.Resources.error_dis
|
||||
btn_ign.Cursor = Cursors.No
|
||||
btn_ign.Enabled = False
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub btn_ok_Click(sender As Object, e As EventArgs) Handles btn_ok.Click
|
||||
Me.Close()
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub Btn_ok_MouseEnter(sender As Object, e As EventArgs) Handles btn_ok.MouseEnter
|
||||
btn_ok.BackgroundImage = My.Resources.ffmpeg_OK_cL_hover
|
||||
End Sub
|
||||
|
||||
Private Sub Btn_ok_MouseLeave(sender As Object, e As EventArgs) Handles btn_ok.MouseLeave
|
||||
btn_ok.BackgroundImage = My.Resources.ffmpeg_OK_cL
|
||||
End Sub
|
||||
|
||||
Private Sub Btn_cl_MouseEnter(sender As Object, e As EventArgs) Handles btn_cl.MouseEnter
|
||||
btn_cl.BackgroundImage = My.Resources.ffmpeg_OK_cL_hover
|
||||
End Sub
|
||||
|
||||
Private Sub Btn_cl_MouseLeave(sender As Object, e As EventArgs) Handles btn_cl.MouseLeave
|
||||
btn_cl.BackgroundImage = My.Resources.ffmpeg_OK_cL
|
||||
End Sub
|
||||
Private Sub Btn_ign_MouseEnter(sender As Object, e As EventArgs) Handles btn_ign.MouseEnter
|
||||
btn_ign.BackgroundImage = My.Resources.ffmpeg_OK_cL_hover
|
||||
End Sub
|
||||
|
||||
Private Sub Btn_ign_MouseLeave(sender As Object, e As EventArgs) Handles btn_ign.MouseLeave
|
||||
btn_ign.BackgroundImage = My.Resources.ffmpeg_OK_cL
|
||||
End Sub
|
||||
|
||||
Private Sub btn_ign_Click(sender As Object, e As EventArgs) Handles btn_ign.Click
|
||||
Main.IgnoreErrorDia = True
|
||||
Me.Close()
|
||||
End Sub
|
||||
End Class
|
|
@ -53,11 +53,11 @@ Module GetData
|
|||
|
||||
|
||||
If CBool(InStr(CurlError, "curl:")) Then
|
||||
Debug.WriteLine(CurlError)
|
||||
Debug.WriteLine("CurlError: " + CurlError)
|
||||
Throw New System.Exception("Error - Getting" + vbNewLine + CurlError)
|
||||
Return Nothing
|
||||
ElseIf CBool(InStr(CurlOutput, "curl:")) Then
|
||||
Debug.WriteLine(CurlOutput)
|
||||
Debug.WriteLine("CurlOutput: " + CurlOutput)
|
||||
Throw New System.Exception("Error - Getting" + vbNewLine + CurlError)
|
||||
Return Nothing
|
||||
Else
|
||||
|
@ -80,8 +80,8 @@ Module GetData
|
|||
Dim cmd As String = ""
|
||||
If Main.Curl_insecure = True Then
|
||||
cmd = "--insecure "
|
||||
End If
|
||||
cmd = cmd + "--no-alpn -fsSLm 15 -A " + My.Settings.User_Agend.Replace("User-Agent: ", "") + Cookies + Auth + Post + " " + Chr(34) + Url + Chr(34)
|
||||
End If '-fsSLm
|
||||
cmd = cmd + "--no-alpn -sSLm 15 -w " + Chr(34) + "\nHTTP Status: %{http_code}\n" + Chr(34) + " -A " + My.Settings.User_Agend.Replace("User-Agent: ", "") + Cookies + Auth + Post + " " + Chr(34) + Url + Chr(34)
|
||||
Dim Proc As New Process
|
||||
'Debug.WriteLine("CurlPost: " + cmd)
|
||||
Dim CurlOutput As String = Nothing
|
||||
|
@ -114,27 +114,26 @@ Module GetData
|
|||
|
||||
Loop Until Proc.HasExited Or Microsoft.VisualBasic.DateAndTime.Timer < finish
|
||||
|
||||
If CBool(InStr(CurlOutput, "curl:")) = True And CBool(InStr(CurlOutput, "400")) = True Then
|
||||
If CurlOutput = Nothing And CurlError = Nothing Then
|
||||
Throw New System.Exception("Error - Getting" + Sender + vbNewLine + CurlError)
|
||||
Return Nothing
|
||||
ElseIf CBool(InStr(CurlOutput, "HTTP Status: 4")) Then
|
||||
Return CurlOutput
|
||||
ElseIf CBool(InStr(CurlError, "curl:")) = True And CBool(InStr(CurlError, "400")) = True Then
|
||||
ElseIf CBool(InStr(CurlError, "HTTP Status: 4")) Then
|
||||
Return CurlError
|
||||
ElseIf CBool(InStr(CurlError, "curl:")) Then
|
||||
Debug.WriteLine(CurlError)
|
||||
Throw New System.Exception("Error - Getting" + vbNewLine + CurlError)
|
||||
Return Nothing
|
||||
|
||||
ElseIf CBool(InStr(CurlOutput, "curl:")) Then
|
||||
Debug.WriteLine(CurlOutput)
|
||||
Throw New System.Exception("Error - Getting" + vbNewLine + CurlError)
|
||||
Return Nothing
|
||||
ElseIf CurlError = Nothing Then
|
||||
Dim OutputBody() As String = CurlOutput.Split(New String() {"HTTP Status:"}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
Dim Output As String = OutputBody(0)
|
||||
Return Output
|
||||
Else
|
||||
Return CurlOutput
|
||||
Return CurlError
|
||||
End If
|
||||
|
||||
|
||||
End Function
|
||||
|
||||
|
||||
Public Function CurlAuthNew(ByVal Url As String, ByVal Cookies As String, ByVal Auth As String, Optional ByVal Test As Boolean = False) As String
|
||||
Public Function CurlAuthNew(ByVal Url As String, ByVal Cookies As String, ByVal Auth As String, Optional ByVal Test As Boolean = False, Optional ByVal UserAgent As String = Chr(34) + "Mozilla/5.0 (Windows NT 10.0; Win64; x64; rv:126.0) Gecko/20100101 Firefox/126.0" + Chr(34)) As String
|
||||
If Test = True Then
|
||||
Throw New System.Exception("Error - Getting" + vbNewLine + "Test")
|
||||
|
||||
|
@ -153,7 +152,78 @@ Module GetData
|
|||
If Main.Curl_insecure = True Then
|
||||
cmd = "--insecure "
|
||||
End If
|
||||
cmd = cmd + "--no-alpn -fsSLm 15 -A " + My.Settings.User_Agend.Replace("User-Agent: ", "") + Cookies + Auth + " " + Chr(34) + Url + Chr(34)
|
||||
cmd = cmd + "--no-alpn -sSLm 15 -w " + Chr(34) + "\nHTTP Status: %{http_code}\n" + Chr(34) + " -A " + UserAgent + Cookies + Auth + " " + Chr(34) + Url + Chr(34)
|
||||
Dim Proc As New Process
|
||||
'MsgBox(cmd)
|
||||
Dim CurlOutput As String = Nothing
|
||||
Dim CurlError As String = Nothing
|
||||
' all parameters required to run the process
|
||||
startinfo.FileName = exepath
|
||||
startinfo.Arguments = cmd
|
||||
startinfo.UseShellExecute = False
|
||||
startinfo.WindowStyle = ProcessWindowStyle.Normal
|
||||
startinfo.RedirectStandardError = True
|
||||
startinfo.RedirectStandardOutput = True
|
||||
startinfo.CreateNoWindow = True
|
||||
startinfo.StandardOutputEncoding = Encoding.UTF8
|
||||
startinfo.StandardErrorEncoding = Encoding.UTF8
|
||||
Proc.StartInfo = startinfo
|
||||
Proc.Start() ' start the process
|
||||
sr = Proc.StandardOutput 'standard error is used by ffmpeg
|
||||
sr2 = Proc.StandardError
|
||||
'sw = proc.StandardInput
|
||||
|
||||
Dim start, finish, pau As Double
|
||||
start = CSng(Microsoft.VisualBasic.DateAndTime.Timer)
|
||||
pau = 5
|
||||
finish = start + pau
|
||||
|
||||
Do
|
||||
CurlOutput = CurlOutput + sr.ReadToEnd
|
||||
CurlError = CurlError + sr2.ReadToEnd
|
||||
'ffmpegOutput2 = sr.ReadLine
|
||||
'Debug.WriteLine(CurlOutput)
|
||||
|
||||
Loop Until Proc.HasExited Or Microsoft.VisualBasic.DateAndTime.Timer < finish
|
||||
|
||||
|
||||
If CBool(InStr(CurlError, "HTTP Status: 420")) Then
|
||||
Return CurlError
|
||||
ElseIf CBool(InStr(CurlOutput, "HTTP Status: 420")) Then
|
||||
Return CurlOutput
|
||||
ElseIf CBool(InStr(CurlError, "HTTP Status: 4")) Then
|
||||
Debug.WriteLine(CurlError)
|
||||
Throw New System.Exception("Error - Getting" + vbNewLine + CurlError)
|
||||
Return Nothing
|
||||
ElseIf CBool(InStr(CurlOutput, "HTTP Status: 4")) Then
|
||||
Debug.WriteLine(CurlOutput)
|
||||
Throw New System.Exception("Error - Getting" + vbNewLine + CurlOutput)
|
||||
Return Nothing
|
||||
Else
|
||||
Dim OutputBody() As String = CurlOutput.Split(New String() {"HTTP Status:"}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
Dim Output As String = OutputBody(0)
|
||||
Return Output
|
||||
End If
|
||||
|
||||
End Function
|
||||
|
||||
Public Function CurlDeleteNew(ByVal Url As String, ByVal Auth As String, Optional ByVal UserAgent As String = Chr(34) + "Mozilla/5.0 (Windows NT 10.0; Win64; x64; rv:126.0) Gecko/20100101 Firefox/126.0" + Chr(34)) As String
|
||||
|
||||
|
||||
|
||||
Dim exepath As String = Path.Combine(Application.StartupPath, "lib", "curl.exe")
|
||||
|
||||
Dim startinfo As New System.Diagnostics.ProcessStartInfo
|
||||
Dim sr As StreamReader
|
||||
Dim sr2 As StreamReader
|
||||
|
||||
|
||||
|
||||
Dim cmd As String = ""
|
||||
If Main.Curl_insecure = True Then
|
||||
cmd = "--insecure "
|
||||
End If
|
||||
cmd = cmd + "--no-alpn -sSLm 15 -w " + Chr(34) + "\nHTTP Status: %{http_code}\n" + Chr(34) + " -A " + UserAgent + Auth + " -X DELETE " + Chr(34) + Url + Chr(34)
|
||||
Dim Proc As New Process
|
||||
'MsgBox(cmd)
|
||||
Dim CurlOutput As String = Nothing
|
||||
|
@ -189,24 +259,21 @@ Module GetData
|
|||
|
||||
|
||||
|
||||
If CBool(InStr(CurlError, "curl:")) Then
|
||||
If CBool(InStr(CurlError, "HTTP Status: 4")) Then
|
||||
Debug.WriteLine(CurlError)
|
||||
Throw New System.Exception("Error - Getting" + vbNewLine + CurlError)
|
||||
Return Nothing
|
||||
ElseIf CBool(InStr(CurlOutput, "curl:")) Then
|
||||
ElseIf CBool(InStr(CurlOutput, "HTTP Status: 4")) Then
|
||||
Debug.WriteLine(CurlOutput)
|
||||
Throw New System.Exception("Error - Getting" + vbNewLine + CurlError)
|
||||
Throw New System.Exception("Error - Getting" + vbNewLine + CurlOutput)
|
||||
Return Nothing
|
||||
Else
|
||||
Return CurlOutput
|
||||
End If
|
||||
|
||||
|
||||
End Function
|
||||
|
||||
|
||||
|
||||
|
||||
#End Region
|
||||
|
||||
|
||||
|
|
195
Crunchyroll Downloader/LoginForm.Designer.vb
generated
Normal file
195
Crunchyroll Downloader/LoginForm.Designer.vb
generated
Normal file
|
@ -0,0 +1,195 @@
|
|||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
|
||||
Partial Class LoginForm
|
||||
Inherits MetroFramework.Forms.MetroForm
|
||||
|
||||
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
||||
<System.Diagnostics.DebuggerNonUserCode()>
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Wird vom Windows Form-Designer benötigt.
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
|
||||
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()>
|
||||
Private Sub InitializeComponent()
|
||||
Me.components = New System.ComponentModel.Container()
|
||||
Me.GroupBox3 = New System.Windows.Forms.GroupBox()
|
||||
Me.Btn_Save = New System.Windows.Forms.Button()
|
||||
Me.Save = New MetroFramework.Controls.MetroCheckBox()
|
||||
Me.IssueLink = New MetroFramework.Controls.MetroLink()
|
||||
Me.PW = New MetroFramework.Controls.MetroTextBox()
|
||||
Me.Mail = New MetroFramework.Controls.MetroTextBox()
|
||||
Me.StatusLabel = New MetroFramework.Controls.MetroLabel()
|
||||
Me.Delay = New System.Windows.Forms.Timer(Me.components)
|
||||
Me.GroupBox3.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'GroupBox3
|
||||
'
|
||||
Me.GroupBox3.BackColor = System.Drawing.Color.Transparent
|
||||
Me.GroupBox3.Controls.Add(Me.Btn_Save)
|
||||
Me.GroupBox3.Controls.Add(Me.Save)
|
||||
Me.GroupBox3.Controls.Add(Me.IssueLink)
|
||||
Me.GroupBox3.Controls.Add(Me.PW)
|
||||
Me.GroupBox3.Controls.Add(Me.Mail)
|
||||
Me.GroupBox3.Controls.Add(Me.StatusLabel)
|
||||
Me.GroupBox3.Location = New System.Drawing.Point(13, 60)
|
||||
Me.GroupBox3.Name = "GroupBox3"
|
||||
Me.GroupBox3.Size = New System.Drawing.Size(480, 308)
|
||||
Me.GroupBox3.TabIndex = 38
|
||||
Me.GroupBox3.TabStop = False
|
||||
'
|
||||
'Btn_Save
|
||||
'
|
||||
Me.Btn_Save.BackColor = System.Drawing.Color.Transparent
|
||||
Me.Btn_Save.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
|
||||
Me.Btn_Save.Cursor = System.Windows.Forms.Cursors.Hand
|
||||
Me.Btn_Save.FlatAppearance.BorderSize = 0
|
||||
Me.Btn_Save.FlatAppearance.MouseOverBackColor = System.Drawing.Color.Transparent
|
||||
Me.Btn_Save.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Btn_Save.Image = Global.Crunchyroll_Downloader.My.Resources.Resources.DialogNotFound_Submit
|
||||
Me.Btn_Save.ImeMode = System.Windows.Forms.ImeMode.NoControl
|
||||
Me.Btn_Save.Location = New System.Drawing.Point(165, 246)
|
||||
Me.Btn_Save.Name = "Btn_Save"
|
||||
Me.Btn_Save.Size = New System.Drawing.Size(150, 40)
|
||||
Me.Btn_Save.TabIndex = 3
|
||||
Me.Btn_Save.UseVisualStyleBackColor = False
|
||||
'
|
||||
'Save
|
||||
'
|
||||
Me.Save.AutoSize = True
|
||||
Me.Save.FontSize = MetroFramework.MetroCheckBoxSize.Medium
|
||||
Me.Save.Location = New System.Drawing.Point(177, 203)
|
||||
Me.Save.Name = "Save"
|
||||
Me.Save.Size = New System.Drawing.Size(129, 19)
|
||||
Me.Save.TabIndex = 2
|
||||
Me.Save.Text = "Remember Login"
|
||||
Me.Save.UseSelectable = True
|
||||
'
|
||||
'IssueLink
|
||||
'
|
||||
Me.IssueLink.FontSize = MetroFramework.MetroLinkSize.Medium
|
||||
Me.IssueLink.Location = New System.Drawing.Point(166, 72)
|
||||
Me.IssueLink.Name = "IssueLink"
|
||||
Me.IssueLink.Size = New System.Drawing.Size(149, 23)
|
||||
Me.IssueLink.TabIndex = 41
|
||||
Me.IssueLink.Text = "See here: Github"
|
||||
Me.IssueLink.UseSelectable = True
|
||||
'
|
||||
'PW
|
||||
'
|
||||
'
|
||||
'
|
||||
'
|
||||
Me.PW.CustomButton.Image = Nothing
|
||||
Me.PW.CustomButton.Location = New System.Drawing.Point(138, 1)
|
||||
Me.PW.CustomButton.Name = ""
|
||||
Me.PW.CustomButton.Size = New System.Drawing.Size(21, 21)
|
||||
Me.PW.CustomButton.Style = MetroFramework.MetroColorStyle.Blue
|
||||
Me.PW.CustomButton.TabIndex = 1
|
||||
Me.PW.CustomButton.Theme = MetroFramework.MetroThemeStyle.Light
|
||||
Me.PW.CustomButton.UseSelectable = True
|
||||
Me.PW.CustomButton.Visible = False
|
||||
Me.PW.FontSize = MetroFramework.MetroTextBoxSize.Medium
|
||||
Me.PW.Lines = New String() {"Password"}
|
||||
Me.PW.Location = New System.Drawing.Point(165, 140)
|
||||
Me.PW.MaxLength = 32767
|
||||
Me.PW.Name = "PW"
|
||||
Me.PW.PasswordChar = Global.Microsoft.VisualBasic.ChrW(42)
|
||||
Me.PW.ScrollBars = System.Windows.Forms.ScrollBars.None
|
||||
Me.PW.SelectedText = ""
|
||||
Me.PW.SelectionLength = 0
|
||||
Me.PW.SelectionStart = 0
|
||||
Me.PW.ShortcutsEnabled = True
|
||||
Me.PW.Size = New System.Drawing.Size(160, 23)
|
||||
Me.PW.TabIndex = 1
|
||||
Me.PW.Text = "Password"
|
||||
Me.PW.UseSelectable = True
|
||||
Me.PW.WaterMarkColor = System.Drawing.Color.FromArgb(CType(CType(109, Byte), Integer), CType(CType(109, Byte), Integer), CType(CType(109, Byte), Integer))
|
||||
Me.PW.WaterMarkFont = New System.Drawing.Font("Segoe UI", 12.0!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Pixel)
|
||||
'
|
||||
'Mail
|
||||
'
|
||||
'
|
||||
'
|
||||
'
|
||||
Me.Mail.CustomButton.Image = Nothing
|
||||
Me.Mail.CustomButton.Location = New System.Drawing.Point(138, 1)
|
||||
Me.Mail.CustomButton.Name = ""
|
||||
Me.Mail.CustomButton.Size = New System.Drawing.Size(21, 21)
|
||||
Me.Mail.CustomButton.Style = MetroFramework.MetroColorStyle.Blue
|
||||
Me.Mail.CustomButton.TabIndex = 1
|
||||
Me.Mail.CustomButton.Theme = MetroFramework.MetroThemeStyle.Light
|
||||
Me.Mail.CustomButton.UseSelectable = True
|
||||
Me.Mail.CustomButton.Visible = False
|
||||
Me.Mail.FontSize = MetroFramework.MetroTextBoxSize.Medium
|
||||
Me.Mail.Lines = New String() {"E-Mail"}
|
||||
Me.Mail.Location = New System.Drawing.Point(165, 101)
|
||||
Me.Mail.MaxLength = 32767
|
||||
Me.Mail.Name = "Mail"
|
||||
Me.Mail.PasswordChar = Global.Microsoft.VisualBasic.ChrW(0)
|
||||
Me.Mail.ScrollBars = System.Windows.Forms.ScrollBars.None
|
||||
Me.Mail.SelectedText = ""
|
||||
Me.Mail.SelectionLength = 0
|
||||
Me.Mail.SelectionStart = 0
|
||||
Me.Mail.ShortcutsEnabled = True
|
||||
Me.Mail.Size = New System.Drawing.Size(160, 23)
|
||||
Me.Mail.TabIndex = 0
|
||||
Me.Mail.Text = "E-Mail"
|
||||
Me.Mail.UseSelectable = True
|
||||
Me.Mail.WaterMarkColor = System.Drawing.Color.FromArgb(CType(CType(109, Byte), Integer), CType(CType(109, Byte), Integer), CType(CType(109, Byte), Integer))
|
||||
Me.Mail.WaterMarkFont = New System.Drawing.Font("Segoe UI", 12.0!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Pixel)
|
||||
'
|
||||
'StatusLabel
|
||||
'
|
||||
Me.StatusLabel.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
|
||||
Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.StatusLabel.BackColor = System.Drawing.Color.Transparent
|
||||
Me.StatusLabel.FontSize = MetroFramework.MetroLabelSize.Tall
|
||||
Me.StatusLabel.FontWeight = MetroFramework.MetroLabelWeight.Regular
|
||||
Me.StatusLabel.ForeColor = System.Drawing.Color.Black
|
||||
Me.StatusLabel.Location = New System.Drawing.Point(6, 16)
|
||||
Me.StatusLabel.Name = "StatusLabel"
|
||||
Me.StatusLabel.Size = New System.Drawing.Size(468, 53)
|
||||
Me.StatusLabel.TabIndex = 34
|
||||
Me.StatusLabel.Text = "For the changed switch API i need the direct login now"
|
||||
Me.StatusLabel.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'Delay
|
||||
'
|
||||
Me.Delay.Interval = 2000
|
||||
'
|
||||
'LoginForm
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(507, 379)
|
||||
Me.Controls.Add(Me.GroupBox3)
|
||||
Me.Name = "LoginForm"
|
||||
Me.Text = "CRD-Login"
|
||||
Me.TextAlign = MetroFramework.Forms.MetroFormTextAlign.Center
|
||||
Me.GroupBox3.ResumeLayout(False)
|
||||
Me.GroupBox3.PerformLayout()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
Private WithEvents GroupBox3 As GroupBox
|
||||
Public WithEvents StatusLabel As MetroFramework.Controls.MetroLabel
|
||||
Friend WithEvents Delay As Timer
|
||||
Friend WithEvents PW As MetroFramework.Controls.MetroTextBox
|
||||
Friend WithEvents Mail As MetroFramework.Controls.MetroTextBox
|
||||
Friend WithEvents IssueLink As MetroFramework.Controls.MetroLink
|
||||
Friend WithEvents Save As MetroFramework.Controls.MetroCheckBox
|
||||
Friend WithEvents Btn_Save As Button
|
||||
End Class
|
123
Crunchyroll Downloader/LoginForm.resx
Normal file
123
Crunchyroll Downloader/LoginForm.resx
Normal file
|
@ -0,0 +1,123 @@
|
|||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<metadata name="Delay.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>17, 17</value>
|
||||
</metadata>
|
||||
</root>
|
78
Crunchyroll Downloader/LoginForm.vb
Normal file
78
Crunchyroll Downloader/LoginForm.vb
Normal file
|
@ -0,0 +1,78 @@
|
|||
Option Strict On
|
||||
Imports Crunchyroll_Downloader.CRD_Classes
|
||||
Imports MetroFramework.Components
|
||||
|
||||
Public Class LoginForm
|
||||
|
||||
Dim Manager As MetroStyleManager = Main.Manager
|
||||
|
||||
|
||||
Private Sub Reso_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||
'Me.TopMost = True
|
||||
Manager.Owner = Me
|
||||
Me.StyleManager = Manager
|
||||
|
||||
|
||||
Me.StartPosition = 0
|
||||
Try
|
||||
Me.Icon = My.Resources.icon
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
Me.Location = New Point(CInt(Main.Location.X + Main.Width / 2 - Me.Width / 2), CInt(Main.Location.Y + Main.Height / 2 - Me.Height / 2))
|
||||
'MsgBox(CInt(Main.Location.X + Main.Width / 2 - Me.Width / 2).ToString)
|
||||
|
||||
If My.Settings.Mail = "na" Then
|
||||
Else
|
||||
Mail.Text = My.Settings.Mail
|
||||
Save.Checked = True
|
||||
End If
|
||||
If My.Settings.PW = "na" Then
|
||||
Else
|
||||
PW.Text = My.Settings.PW
|
||||
'PW.UseSystemPasswordChar = False
|
||||
PW.PasswordChar = Nothing
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub Btn_Save_Click(sender As Object, e As EventArgs) Handles Btn_Save.Click
|
||||
If PW.Text = "Password" Or Mail.Text = "E-Mail" Then
|
||||
MsgBox("Invalid Input", MsgBoxStyle.Information)
|
||||
Exit Sub
|
||||
ElseIf Save.Checked = True Then
|
||||
My.Settings.Mail = Mail.Text
|
||||
My.Settings.PW = PW.Text
|
||||
End If
|
||||
Main.PW = PW.Text
|
||||
Main.Mail = Mail.Text
|
||||
Me.Close()
|
||||
End Sub
|
||||
|
||||
Private Sub Submit_MouseEnter(sender As Object, e As EventArgs) Handles Btn_Save.MouseEnter
|
||||
Btn_Save.Image = My.Resources.DialogNotFound_Submit_hover
|
||||
End Sub
|
||||
|
||||
Private Sub Submit_MouseLeave(sender As Object, e As EventArgs) Handles Btn_Save.MouseLeave
|
||||
Btn_Save.Image = My.Resources.DialogNotFound_Submit
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub MetroLink1_Click(sender As Object, e As EventArgs) Handles IssueLink.Click
|
||||
Process.Start("https://github.com/hama3254/Crunchyroll-Downloader-v3.0/issues/938#issuecomment-2067383212")
|
||||
End Sub
|
||||
|
||||
Private Sub PW_Click(sender As Object, e As EventArgs) Handles PW.Click
|
||||
If PW.Text = "Password" Then
|
||||
PW.Text = Nothing
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub Mail_Click(sender As Object, e As EventArgs) Handles Mail.Click
|
||||
If Mail.Text = "E-Mail" Then
|
||||
Mail.Text = Nothing
|
||||
End If
|
||||
End Sub
|
||||
|
||||
|
||||
End Class
|
65
Crunchyroll Downloader/Main.designer.vb
generated
65
Crunchyroll Downloader/Main.designer.vb
generated
|
@ -34,26 +34,25 @@ Partial Class Main
|
|||
Me.MetroStyleManager1 = New MetroFramework.Components.MetroStyleManager(Me.components)
|
||||
Me.Timer4 = New System.Windows.Forms.Timer(Me.components)
|
||||
Me.Btn_add = New System.Windows.Forms.Button()
|
||||
Me.Btn_Browser = New System.Windows.Forms.Button()
|
||||
Me.Btn_Settings = New System.Windows.Forms.Button()
|
||||
Me.Btn_min = New System.Windows.Forms.Button()
|
||||
Me.Btn_Close = New System.Windows.Forms.Button()
|
||||
Me.ContextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components)
|
||||
Me.QueueToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.SaveModeToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.SaveThumbnailAsImageToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.ToggleDebugModeToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.Funimation_Token = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.CheckCRBetaTokenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.Timer3OffToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.ThreadCount = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.CRCookieToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.UrlJsonsToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.DummyItemToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.Panel1 = New System.Windows.Forms.Panel()
|
||||
Me.ScanTimeout = New System.Windows.Forms.Timer(Me.components)
|
||||
Me.Btn_Queue = New System.Windows.Forms.Button()
|
||||
Me.AudioOnlyQualityToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.LoginFormToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.ErrorDiaTestToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.Panel1 = New System.Windows.Forms.Panel()
|
||||
Me.Btn_Queue = New System.Windows.Forms.Button()
|
||||
Me.BGW_Update = New System.ComponentModel.BackgroundWorker()
|
||||
CType(Me.PictureBox5, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.ConsoleBar, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.MetroStyleManager1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
|
@ -114,17 +113,6 @@ Partial Class Main
|
|||
Me.Btn_add.Name = "Btn_add"
|
||||
Me.Btn_add.UseVisualStyleBackColor = False
|
||||
'
|
||||
'Btn_Browser
|
||||
'
|
||||
Me.Btn_Browser.BackColor = System.Drawing.Color.Transparent
|
||||
resources.ApplyResources(Me.Btn_Browser, "Btn_Browser")
|
||||
Me.Btn_Browser.Cursor = System.Windows.Forms.Cursors.Hand
|
||||
Me.Btn_Browser.FlatAppearance.BorderSize = 0
|
||||
Me.Btn_Browser.FlatAppearance.MouseOverBackColor = System.Drawing.Color.Transparent
|
||||
Me.Btn_Browser.Image = Global.Crunchyroll_Downloader.My.Resources.Resources.main_browser
|
||||
Me.Btn_Browser.Name = "Btn_Browser"
|
||||
Me.Btn_Browser.UseVisualStyleBackColor = False
|
||||
'
|
||||
'Btn_Settings
|
||||
'
|
||||
Me.Btn_Settings.BackColor = System.Drawing.Color.Transparent
|
||||
|
@ -162,7 +150,7 @@ Partial Class Main
|
|||
'
|
||||
'ContextMenuStrip1
|
||||
'
|
||||
Me.ContextMenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.QueueToolStripMenuItem, Me.SaveModeToolStripMenuItem, Me.SaveThumbnailAsImageToolStripMenuItem, Me.ToggleDebugModeToolStripMenuItem, Me.Funimation_Token, Me.CheckCRBetaTokenToolStripMenuItem, Me.Timer3OffToolStripMenuItem, Me.ThreadCount, Me.CRCookieToolStripMenuItem, Me.UrlJsonsToolStripMenuItem, Me.DummyItemToolStripMenuItem, Me.AudioOnlyQualityToolStripMenuItem})
|
||||
Me.ContextMenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.QueueToolStripMenuItem, Me.SaveThumbnailAsImageToolStripMenuItem, Me.ToggleDebugModeToolStripMenuItem, Me.CheckCRBetaTokenToolStripMenuItem, Me.Timer3OffToolStripMenuItem, Me.ThreadCount, Me.CRCookieToolStripMenuItem, Me.UrlJsonsToolStripMenuItem, Me.DummyItemToolStripMenuItem, Me.AudioOnlyQualityToolStripMenuItem, Me.LoginFormToolStripMenuItem, Me.ErrorDiaTestToolStripMenuItem})
|
||||
Me.ContextMenuStrip1.Name = "ContextMenuStrip1"
|
||||
resources.ApplyResources(Me.ContextMenuStrip1, "ContextMenuStrip1")
|
||||
'
|
||||
|
@ -171,11 +159,6 @@ Partial Class Main
|
|||
Me.QueueToolStripMenuItem.Name = "QueueToolStripMenuItem"
|
||||
resources.ApplyResources(Me.QueueToolStripMenuItem, "QueueToolStripMenuItem")
|
||||
'
|
||||
'SaveModeToolStripMenuItem
|
||||
'
|
||||
Me.SaveModeToolStripMenuItem.Name = "SaveModeToolStripMenuItem"
|
||||
resources.ApplyResources(Me.SaveModeToolStripMenuItem, "SaveModeToolStripMenuItem")
|
||||
'
|
||||
'SaveThumbnailAsImageToolStripMenuItem
|
||||
'
|
||||
Me.SaveThumbnailAsImageToolStripMenuItem.Name = "SaveThumbnailAsImageToolStripMenuItem"
|
||||
|
@ -186,11 +169,6 @@ Partial Class Main
|
|||
Me.ToggleDebugModeToolStripMenuItem.Name = "ToggleDebugModeToolStripMenuItem"
|
||||
resources.ApplyResources(Me.ToggleDebugModeToolStripMenuItem, "ToggleDebugModeToolStripMenuItem")
|
||||
'
|
||||
'Funimation_Token
|
||||
'
|
||||
Me.Funimation_Token.Name = "Funimation_Token"
|
||||
resources.ApplyResources(Me.Funimation_Token, "Funimation_Token")
|
||||
'
|
||||
'CheckCRBetaTokenToolStripMenuItem
|
||||
'
|
||||
Me.CheckCRBetaTokenToolStripMenuItem.Name = "CheckCRBetaTokenToolStripMenuItem"
|
||||
|
@ -221,15 +199,26 @@ Partial Class Main
|
|||
Me.DummyItemToolStripMenuItem.Name = "DummyItemToolStripMenuItem"
|
||||
resources.ApplyResources(Me.DummyItemToolStripMenuItem, "DummyItemToolStripMenuItem")
|
||||
'
|
||||
'AudioOnlyQualityToolStripMenuItem
|
||||
'
|
||||
Me.AudioOnlyQualityToolStripMenuItem.Name = "AudioOnlyQualityToolStripMenuItem"
|
||||
resources.ApplyResources(Me.AudioOnlyQualityToolStripMenuItem, "AudioOnlyQualityToolStripMenuItem")
|
||||
'
|
||||
'LoginFormToolStripMenuItem
|
||||
'
|
||||
Me.LoginFormToolStripMenuItem.Name = "LoginFormToolStripMenuItem"
|
||||
resources.ApplyResources(Me.LoginFormToolStripMenuItem, "LoginFormToolStripMenuItem")
|
||||
'
|
||||
'ErrorDiaTestToolStripMenuItem
|
||||
'
|
||||
Me.ErrorDiaTestToolStripMenuItem.Name = "ErrorDiaTestToolStripMenuItem"
|
||||
resources.ApplyResources(Me.ErrorDiaTestToolStripMenuItem, "ErrorDiaTestToolStripMenuItem")
|
||||
'
|
||||
'Panel1
|
||||
'
|
||||
resources.ApplyResources(Me.Panel1, "Panel1")
|
||||
Me.Panel1.Name = "Panel1"
|
||||
'
|
||||
'ScanTimeout
|
||||
'
|
||||
Me.ScanTimeout.Interval = 1000
|
||||
'
|
||||
'Btn_Queue
|
||||
'
|
||||
Me.Btn_Queue.BackColor = System.Drawing.Color.Transparent
|
||||
|
@ -241,10 +230,8 @@ Partial Class Main
|
|||
Me.Btn_Queue.Name = "Btn_Queue"
|
||||
Me.Btn_Queue.UseVisualStyleBackColor = False
|
||||
'
|
||||
'AudioOnlyQualityToolStripMenuItem
|
||||
'BGW_Update
|
||||
'
|
||||
Me.AudioOnlyQualityToolStripMenuItem.Name = "AudioOnlyQualityToolStripMenuItem"
|
||||
resources.ApplyResources(Me.AudioOnlyQualityToolStripMenuItem, "AudioOnlyQualityToolStripMenuItem")
|
||||
'
|
||||
'Main
|
||||
'
|
||||
|
@ -257,7 +244,6 @@ Partial Class Main
|
|||
Me.Controls.Add(Me.Btn_Close)
|
||||
Me.Controls.Add(Me.Btn_min)
|
||||
Me.Controls.Add(Me.Btn_Settings)
|
||||
Me.Controls.Add(Me.Btn_Browser)
|
||||
Me.Controls.Add(Me.Btn_add)
|
||||
Me.Controls.Add(Me.TheTextBox)
|
||||
Me.Controls.Add(Me.ConsoleBar)
|
||||
|
@ -286,13 +272,11 @@ Partial Class Main
|
|||
Friend WithEvents MetroStyleManager1 As MetroFramework.Components.MetroStyleManager
|
||||
Friend WithEvents Timer4 As Timer
|
||||
Friend WithEvents Btn_add As Button
|
||||
Friend WithEvents Btn_Browser As Button
|
||||
Friend WithEvents Btn_Settings As Button
|
||||
Friend WithEvents Btn_min As Button
|
||||
Friend WithEvents Btn_Close As Button
|
||||
Friend WithEvents ContextMenuStrip1 As ContextMenuStrip
|
||||
Friend WithEvents ToggleDebugModeToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents Funimation_Token As ToolStripMenuItem
|
||||
Friend WithEvents CheckCRBetaTokenToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents Timer3OffToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents ThreadCount As ToolStripMenuItem
|
||||
|
@ -300,10 +284,11 @@ Partial Class Main
|
|||
Friend WithEvents UrlJsonsToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents DummyItemToolStripMenuItem As ToolStripMenuItem
|
||||
Public WithEvents Panel1 As Panel
|
||||
Friend WithEvents ScanTimeout As Timer
|
||||
Friend WithEvents QueueToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents Btn_Queue As Button
|
||||
Friend WithEvents SaveThumbnailAsImageToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents SaveModeToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents AudioOnlyQualityToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents LoginFormToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents ErrorDiaTestToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents BGW_Update As System.ComponentModel.BackgroundWorker
|
||||
End Class
|
||||
|
|
|
@ -148,7 +148,7 @@
|
|||
<value>$this</value>
|
||||
</data>
|
||||
<data name=">>PictureBox5.ZOrder" xml:space="preserve">
|
||||
<value>10</value>
|
||||
<value>9</value>
|
||||
</data>
|
||||
<metadata name="ToolTip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>383, 18</value>
|
||||
|
@ -187,7 +187,7 @@
|
|||
<value>$this</value>
|
||||
</data>
|
||||
<data name=">>TheTextBox.ZOrder" xml:space="preserve">
|
||||
<value>8</value>
|
||||
<value>7</value>
|
||||
</data>
|
||||
<data name="ConsoleBar.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
|
||||
<value>Stretch</value>
|
||||
|
@ -214,7 +214,7 @@
|
|||
<value>$this</value>
|
||||
</data>
|
||||
<data name=">>ConsoleBar.ZOrder" xml:space="preserve">
|
||||
<value>9</value>
|
||||
<value>8</value>
|
||||
</data>
|
||||
<metadata name="MetroStyleExtender1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>17, 17</value>
|
||||
|
@ -231,6 +231,24 @@
|
|||
<data name="$this.ClientSize" type="System.Drawing.Size, System.Drawing">
|
||||
<value>900, 630</value>
|
||||
</data>
|
||||
<data name="Btn_Queue.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
|
||||
<value>Zoom</value>
|
||||
</data>
|
||||
<data name="Btn_Queue.FlatStyle" type="System.Windows.Forms.FlatStyle, System.Windows.Forms">
|
||||
<value>Flat</value>
|
||||
</data>
|
||||
<data name="Btn_Queue.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="Btn_Queue.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>150, 18</value>
|
||||
</data>
|
||||
<data name="Btn_Queue.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>80, 35</value>
|
||||
</data>
|
||||
<data name="Btn_Queue.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>70</value>
|
||||
</data>
|
||||
<data name=">>Btn_Queue.Name" xml:space="preserve">
|
||||
<value>Btn_Queue</value>
|
||||
</data>
|
||||
|
@ -243,6 +261,21 @@
|
|||
<data name=">>Btn_Queue.ZOrder" xml:space="preserve">
|
||||
<value>1</value>
|
||||
</data>
|
||||
<data name="Panel1.AutoScroll" type="System.Boolean, mscorlib">
|
||||
<value>True</value>
|
||||
</data>
|
||||
<data name="Panel1.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>1, 71</value>
|
||||
</data>
|
||||
<data name="Panel1.MinimumSize" type="System.Drawing.Size, System.Drawing">
|
||||
<value>898, 403</value>
|
||||
</data>
|
||||
<data name="Panel1.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>898, 546</value>
|
||||
</data>
|
||||
<data name="Panel1.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<data name=">>Panel1.Name" xml:space="preserve">
|
||||
<value>Panel1</value>
|
||||
</data>
|
||||
|
@ -255,6 +288,24 @@
|
|||
<data name=">>Panel1.ZOrder" xml:space="preserve">
|
||||
<value>2</value>
|
||||
</data>
|
||||
<data name="Btn_Close.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
|
||||
<value>None</value>
|
||||
</data>
|
||||
<data name="Btn_Close.FlatStyle" type="System.Windows.Forms.FlatStyle, System.Windows.Forms">
|
||||
<value>Flat</value>
|
||||
</data>
|
||||
<data name="Btn_Close.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="Btn_Close.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>800, 1</value>
|
||||
</data>
|
||||
<data name="Btn_Close.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>35, 35</value>
|
||||
</data>
|
||||
<data name="Btn_Close.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>5</value>
|
||||
</data>
|
||||
<data name=">>Btn_Close.Name" xml:space="preserve">
|
||||
<value>Btn_Close</value>
|
||||
</data>
|
||||
|
@ -267,6 +318,24 @@
|
|||
<data name=">>Btn_Close.ZOrder" xml:space="preserve">
|
||||
<value>3</value>
|
||||
</data>
|
||||
<data name="Btn_min.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
|
||||
<value>None</value>
|
||||
</data>
|
||||
<data name="Btn_min.FlatStyle" type="System.Windows.Forms.FlatStyle, System.Windows.Forms">
|
||||
<value>Flat</value>
|
||||
</data>
|
||||
<data name="Btn_min.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="Btn_min.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>757, 1</value>
|
||||
</data>
|
||||
<data name="Btn_min.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>30, 30</value>
|
||||
</data>
|
||||
<data name="Btn_min.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>4</value>
|
||||
</data>
|
||||
<data name=">>Btn_min.Name" xml:space="preserve">
|
||||
<value>Btn_min</value>
|
||||
</data>
|
||||
|
@ -279,6 +348,24 @@
|
|||
<data name=">>Btn_min.ZOrder" xml:space="preserve">
|
||||
<value>4</value>
|
||||
</data>
|
||||
<data name="Btn_Settings.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
|
||||
<value>Zoom</value>
|
||||
</data>
|
||||
<data name="Btn_Settings.FlatStyle" type="System.Windows.Forms.FlatStyle, System.Windows.Forms">
|
||||
<value>Flat</value>
|
||||
</data>
|
||||
<data name="Btn_Settings.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="Btn_Settings.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>665, 18</value>
|
||||
</data>
|
||||
<data name="Btn_Settings.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>80, 35</value>
|
||||
</data>
|
||||
<data name="Btn_Settings.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>3</value>
|
||||
</data>
|
||||
<data name=">>Btn_Settings.Name" xml:space="preserve">
|
||||
<value>Btn_Settings</value>
|
||||
</data>
|
||||
|
@ -291,17 +378,23 @@
|
|||
<data name=">>Btn_Settings.ZOrder" xml:space="preserve">
|
||||
<value>5</value>
|
||||
</data>
|
||||
<data name=">>Btn_Browser.Name" xml:space="preserve">
|
||||
<value>Btn_Browser</value>
|
||||
<data name="Btn_add.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
|
||||
<value>Zoom</value>
|
||||
</data>
|
||||
<data name=">>Btn_Browser.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
<data name="Btn_add.FlatStyle" type="System.Windows.Forms.FlatStyle, System.Windows.Forms">
|
||||
<value>Flat</value>
|
||||
</data>
|
||||
<data name=">>Btn_Browser.Parent" xml:space="preserve">
|
||||
<value>$this</value>
|
||||
<data name="Btn_add.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name=">>Btn_Browser.ZOrder" xml:space="preserve">
|
||||
<value>6</value>
|
||||
<data name="Btn_add.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>20, 18</value>
|
||||
</data>
|
||||
<data name="Btn_add.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>80, 35</value>
|
||||
</data>
|
||||
<data name="Btn_add.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>1</value>
|
||||
</data>
|
||||
<data name=">>Btn_add.Name" xml:space="preserve">
|
||||
<value>Btn_add</value>
|
||||
|
@ -313,7 +406,7 @@
|
|||
<value>$this</value>
|
||||
</data>
|
||||
<data name=">>Btn_add.ZOrder" xml:space="preserve">
|
||||
<value>7</value>
|
||||
<value>6</value>
|
||||
</data>
|
||||
<data name="$this.Font" type="System.Drawing.Font, System.Drawing">
|
||||
<value>Microsoft Sans Serif, 8.25pt</value>
|
||||
|
@ -369,12 +462,6 @@
|
|||
<data name=">>QueueToolStripMenuItem.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.ToolStripMenuItem, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>SaveModeToolStripMenuItem.Name" xml:space="preserve">
|
||||
<value>SaveModeToolStripMenuItem</value>
|
||||
</data>
|
||||
<data name=">>SaveModeToolStripMenuItem.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.ToolStripMenuItem, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>SaveThumbnailAsImageToolStripMenuItem.Name" xml:space="preserve">
|
||||
<value>SaveThumbnailAsImageToolStripMenuItem</value>
|
||||
</data>
|
||||
|
@ -387,12 +474,6 @@
|
|||
<data name=">>ToggleDebugModeToolStripMenuItem.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.ToolStripMenuItem, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>Funimation_Token.Name" xml:space="preserve">
|
||||
<value>Funimation_Token</value>
|
||||
</data>
|
||||
<data name=">>Funimation_Token.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.ToolStripMenuItem, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>CheckCRBetaTokenToolStripMenuItem.Name" xml:space="preserve">
|
||||
<value>CheckCRBetaTokenToolStripMenuItem</value>
|
||||
</data>
|
||||
|
@ -429,18 +510,30 @@
|
|||
<data name=">>DummyItemToolStripMenuItem.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.ToolStripMenuItem, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>ScanTimeout.Name" xml:space="preserve">
|
||||
<value>ScanTimeout</value>
|
||||
</data>
|
||||
<data name=">>ScanTimeout.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.Timer, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>AudioOnlyQualityToolStripMenuItem.Name" xml:space="preserve">
|
||||
<value>AudioOnlyQualityToolStripMenuItem</value>
|
||||
</data>
|
||||
<data name=">>AudioOnlyQualityToolStripMenuItem.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.ToolStripMenuItem, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>LoginFormToolStripMenuItem.Name" xml:space="preserve">
|
||||
<value>LoginFormToolStripMenuItem</value>
|
||||
</data>
|
||||
<data name=">>LoginFormToolStripMenuItem.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.ToolStripMenuItem, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>ErrorDiaTestToolStripMenuItem.Name" xml:space="preserve">
|
||||
<value>ErrorDiaTestToolStripMenuItem</value>
|
||||
</data>
|
||||
<data name=">>ErrorDiaTestToolStripMenuItem.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.ToolStripMenuItem, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>BGW_Update.Name" xml:space="preserve">
|
||||
<value>BGW_Update</value>
|
||||
</data>
|
||||
<data name=">>BGW_Update.Type" xml:space="preserve">
|
||||
<value>System.ComponentModel.BackgroundWorker, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>$this.Name" xml:space="preserve">
|
||||
<value>Main</value>
|
||||
</data>
|
||||
|
@ -450,153 +543,6 @@
|
|||
<metadata name="Timer4.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>276, 52</value>
|
||||
</metadata>
|
||||
<data name="Btn_add.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
|
||||
<value>Zoom</value>
|
||||
</data>
|
||||
<data name="Btn_add.FlatStyle" type="System.Windows.Forms.FlatStyle, System.Windows.Forms">
|
||||
<value>Flat</value>
|
||||
</data>
|
||||
<data name="Btn_add.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="Btn_add.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>20, 18</value>
|
||||
</data>
|
||||
<data name="Btn_add.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>80, 35</value>
|
||||
</data>
|
||||
<data name="Btn_add.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>1</value>
|
||||
</data>
|
||||
<data name=">>Btn_add.Name" xml:space="preserve">
|
||||
<value>Btn_add</value>
|
||||
</data>
|
||||
<data name=">>Btn_add.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>Btn_add.Parent" xml:space="preserve">
|
||||
<value>$this</value>
|
||||
</data>
|
||||
<data name=">>Btn_add.ZOrder" xml:space="preserve">
|
||||
<value>7</value>
|
||||
</data>
|
||||
<data name="Btn_Browser.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
|
||||
<value>Zoom</value>
|
||||
</data>
|
||||
<data name="Btn_Browser.FlatStyle" type="System.Windows.Forms.FlatStyle, System.Windows.Forms">
|
||||
<value>Flat</value>
|
||||
</data>
|
||||
<data name="Btn_Browser.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>140, 18</value>
|
||||
</data>
|
||||
<data name="Btn_Browser.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>80, 35</value>
|
||||
</data>
|
||||
<data name="Btn_Browser.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>2</value>
|
||||
</data>
|
||||
<data name=">>Btn_Browser.Name" xml:space="preserve">
|
||||
<value>Btn_Browser</value>
|
||||
</data>
|
||||
<data name=">>Btn_Browser.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>Btn_Browser.Parent" xml:space="preserve">
|
||||
<value>$this</value>
|
||||
</data>
|
||||
<data name=">>Btn_Browser.ZOrder" xml:space="preserve">
|
||||
<value>6</value>
|
||||
</data>
|
||||
<data name="Btn_Settings.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
|
||||
<value>Zoom</value>
|
||||
</data>
|
||||
<data name="Btn_Settings.FlatStyle" type="System.Windows.Forms.FlatStyle, System.Windows.Forms">
|
||||
<value>Flat</value>
|
||||
</data>
|
||||
<data name="Btn_Settings.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="Btn_Settings.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>665, 18</value>
|
||||
</data>
|
||||
<data name="Btn_Settings.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>80, 35</value>
|
||||
</data>
|
||||
<data name="Btn_Settings.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>3</value>
|
||||
</data>
|
||||
<data name=">>Btn_Settings.Name" xml:space="preserve">
|
||||
<value>Btn_Settings</value>
|
||||
</data>
|
||||
<data name=">>Btn_Settings.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>Btn_Settings.Parent" xml:space="preserve">
|
||||
<value>$this</value>
|
||||
</data>
|
||||
<data name=">>Btn_Settings.ZOrder" xml:space="preserve">
|
||||
<value>5</value>
|
||||
</data>
|
||||
<data name="Btn_min.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
|
||||
<value>None</value>
|
||||
</data>
|
||||
<data name="Btn_min.FlatStyle" type="System.Windows.Forms.FlatStyle, System.Windows.Forms">
|
||||
<value>Flat</value>
|
||||
</data>
|
||||
<data name="Btn_min.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="Btn_min.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>757, 1</value>
|
||||
</data>
|
||||
<data name="Btn_min.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>30, 30</value>
|
||||
</data>
|
||||
<data name="Btn_min.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>4</value>
|
||||
</data>
|
||||
<data name=">>Btn_min.Name" xml:space="preserve">
|
||||
<value>Btn_min</value>
|
||||
</data>
|
||||
<data name=">>Btn_min.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>Btn_min.Parent" xml:space="preserve">
|
||||
<value>$this</value>
|
||||
</data>
|
||||
<data name=">>Btn_min.ZOrder" xml:space="preserve">
|
||||
<value>4</value>
|
||||
</data>
|
||||
<data name="Btn_Close.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
|
||||
<value>None</value>
|
||||
</data>
|
||||
<data name="Btn_Close.FlatStyle" type="System.Windows.Forms.FlatStyle, System.Windows.Forms">
|
||||
<value>Flat</value>
|
||||
</data>
|
||||
<data name="Btn_Close.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="Btn_Close.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>800, 1</value>
|
||||
</data>
|
||||
<data name="Btn_Close.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>35, 35</value>
|
||||
</data>
|
||||
<data name="Btn_Close.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>5</value>
|
||||
</data>
|
||||
<data name=">>Btn_Close.Name" xml:space="preserve">
|
||||
<value>Btn_Close</value>
|
||||
</data>
|
||||
<data name=">>Btn_Close.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>Btn_Close.Parent" xml:space="preserve">
|
||||
<value>$this</value>
|
||||
</data>
|
||||
<data name=">>Btn_Close.ZOrder" xml:space="preserve">
|
||||
<value>3</value>
|
||||
</data>
|
||||
<metadata name="ContextMenuStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>352, 49</value>
|
||||
</metadata>
|
||||
|
@ -606,12 +552,6 @@
|
|||
<data name="QueueToolStripMenuItem.Text" xml:space="preserve">
|
||||
<value>ffmpeg option</value>
|
||||
</data>
|
||||
<data name="SaveModeToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>233, 22</value>
|
||||
</data>
|
||||
<data name="SaveModeToolStripMenuItem.Text" xml:space="preserve">
|
||||
<value>*Save Mode*</value>
|
||||
</data>
|
||||
<data name="SaveThumbnailAsImageToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>233, 22</value>
|
||||
</data>
|
||||
|
@ -624,12 +564,6 @@
|
|||
<data name="ToggleDebugModeToolStripMenuItem.Text" xml:space="preserve">
|
||||
<value>Toggle Debug Mode</value>
|
||||
</data>
|
||||
<data name="Funimation_Token.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>233, 22</value>
|
||||
</data>
|
||||
<data name="Funimation_Token.Text" xml:space="preserve">
|
||||
<value>Check Funimation Token</value>
|
||||
</data>
|
||||
<data name="CheckCRBetaTokenToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>233, 22</value>
|
||||
</data>
|
||||
|
@ -672,8 +606,20 @@
|
|||
<data name="AudioOnlyQualityToolStripMenuItem.Text" xml:space="preserve">
|
||||
<value>audio only Quality</value>
|
||||
</data>
|
||||
<data name="LoginFormToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>233, 22</value>
|
||||
</data>
|
||||
<data name="LoginFormToolStripMenuItem.Text" xml:space="preserve">
|
||||
<value>Login Form</value>
|
||||
</data>
|
||||
<data name="ErrorDiaTestToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>233, 22</value>
|
||||
</data>
|
||||
<data name="ErrorDiaTestToolStripMenuItem.Text" xml:space="preserve">
|
||||
<value>ErrorDiaTest</value>
|
||||
</data>
|
||||
<data name="ContextMenuStrip1.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>234, 290</value>
|
||||
<value>234, 268</value>
|
||||
</data>
|
||||
<data name=">>ContextMenuStrip1.Name" xml:space="preserve">
|
||||
<value>ContextMenuStrip1</value>
|
||||
|
@ -681,64 +627,7 @@
|
|||
<data name=">>ContextMenuStrip1.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.ContextMenuStrip, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name="Panel1.AutoScroll" type="System.Boolean, mscorlib">
|
||||
<value>True</value>
|
||||
</data>
|
||||
<data name="Panel1.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>1, 71</value>
|
||||
</data>
|
||||
<data name="Panel1.MinimumSize" type="System.Drawing.Size, System.Drawing">
|
||||
<value>898, 403</value>
|
||||
</data>
|
||||
<data name="Panel1.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>898, 546</value>
|
||||
</data>
|
||||
<data name="Panel1.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<data name=">>Panel1.Name" xml:space="preserve">
|
||||
<value>Panel1</value>
|
||||
</data>
|
||||
<data name=">>Panel1.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.Panel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>Panel1.Parent" xml:space="preserve">
|
||||
<value>$this</value>
|
||||
</data>
|
||||
<data name=">>Panel1.ZOrder" xml:space="preserve">
|
||||
<value>2</value>
|
||||
</data>
|
||||
<metadata name="ScanTimeout.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>167, 10</value>
|
||||
<metadata name="BGW_Update.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>509, 49</value>
|
||||
</metadata>
|
||||
<data name="Btn_Queue.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
|
||||
<value>Zoom</value>
|
||||
</data>
|
||||
<data name="Btn_Queue.FlatStyle" type="System.Windows.Forms.FlatStyle, System.Windows.Forms">
|
||||
<value>Flat</value>
|
||||
</data>
|
||||
<data name="Btn_Queue.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="Btn_Queue.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>575, 18</value>
|
||||
</data>
|
||||
<data name="Btn_Queue.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>80, 35</value>
|
||||
</data>
|
||||
<data name="Btn_Queue.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>70</value>
|
||||
</data>
|
||||
<data name=">>Btn_Queue.Name" xml:space="preserve">
|
||||
<value>Btn_Queue</value>
|
||||
</data>
|
||||
<data name=">>Btn_Queue.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>Btn_Queue.Parent" xml:space="preserve">
|
||||
<value>$this</value>
|
||||
</data>
|
||||
<data name=">>Btn_Queue.ZOrder" xml:space="preserve">
|
||||
<value>1</value>
|
||||
</data>
|
||||
</root>
|
File diff suppressed because it is too large
Load Diff
|
@ -32,6 +32,6 @@ Imports System.Runtime.InteropServices
|
|||
' übernehmen, indem Sie "*" eingeben:
|
||||
' <Assembly: AssemblyVersion("1.0.*")>
|
||||
|
||||
<Assembly: AssemblyVersion("3.15.7.2")>
|
||||
<Assembly: AssemblyFileVersion("3.15.7.2")>
|
||||
<Assembly: AssemblyVersion("3.23.7")>
|
||||
<Assembly: AssemblyFileVersion("3.23.7")>
|
||||
<Assembly: NeutralResourcesLanguage("en")>
|
||||
|
|
263
Crunchyroll Downloader/My Project/Resources.Designer.vb
generated
263
Crunchyroll Downloader/My Project/Resources.Designer.vb
generated
|
@ -90,60 +90,6 @@ Namespace My.Resources
|
|||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Zeichenfolge, die {"sources":[{"file":" ähnelt.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property AoD_files() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("AoD_files", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Zeichenfolge, die <h1 itemprop="name"> ähnelt.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property AoD_HTML_Anime_Title() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("AoD_HTML_Anime_Title", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Zeichenfolge, die <h3 class="episodebox-title" title=" ähnelt.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property AoD_HTML_Episode_Title() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("AoD_HTML_Episode_Title", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Zeichenfolge, die "image":" ähnelt.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property AoD_Image() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("AoD_Image", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Zeichenfolge, die "mediaid": ähnelt.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property AoD_MediaID() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("AoD_MediaID", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Zeichenfolge, die "title":" ähnelt.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property AoD_Titel() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("AoD_Titel", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Zeichenfolge, die [Script Info]
|
||||
'''; Template for error handling in the Crunchyrol Downloader by hama3254 https://github.com/hama3254/Crunchyroll-Downloader-v3.0
|
||||
|
@ -187,78 +133,6 @@ Namespace My.Resources
|
|||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Zeichenfolge, die <img id="footer_country_flag" src="https://www.crunchyroll.com/i/country_flags/ ähnelt.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property CC_String() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("CC_String", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Zeichenfolge, die display_episode_number":" ähnelt.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property CR_Episode_Nr() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("CR_Episode_Nr", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Zeichenfolge, die <meta property="og:url" content=" ähnelt.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property CR_Head_Url_Split() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("CR_Head_Url_Split", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Zeichenfolge, die <h4 id="showmedia_about_name" class="strong">“ ähnelt.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property CR_MediaName() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("CR_MediaName", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Zeichenfolge, die ”</h4> ähnelt.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property CR_MediaName2() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("CR_MediaName2", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Zeichenfolge, die </span> ähnelt.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property CR_MovieBT() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("CR_MovieBT", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Zeichenfolge, die <span itemprop="name"> ähnelt.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property CR_MovieTop() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("CR_MovieTop", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Zeichenfolge, die seasonNumber":" ähnelt.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property CR_Season_Nr() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("CR_Season_Nr", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
|
@ -336,6 +210,16 @@ Namespace My.Resources
|
|||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property error_dis() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("error_dis", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Zeichenfolge, die ;FFMETADATA1
|
||||
'''
|
||||
|
@ -396,114 +280,6 @@ Namespace My.Resources
|
|||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Zeichenfolge, die src="/player/ ähnelt.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property Funimation_Player_ID() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("Funimation_Player_ID", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Zeichenfolge, die src="https://www.funimation.com/player/ ähnelt.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property Funimation_Player_ID_2() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("Funimation_Player_ID_2", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Zeichenfolge, die <a class="trackVideo ng-binding" href=" ähnelt.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property Funimation_Split_1() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("Funimation_Split_1", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Zeichenfolge, die "> ähnelt.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property Funimation_Split_2() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("Funimation_Split_2", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Zeichenfolge, die "src": ähnelt.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property Funimation_src_string() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("Funimation_src_string", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Zeichenfolge, die {"src": " ähnelt.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property Funimation_subs_src() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("Funimation_subs_src", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Zeichenfolge, die ", "kind": "subtitle", "type": "CC", "language": " ähnelt.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property Funimation_Subtitle_String() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("Funimation_Subtitle_String", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Zeichenfolge, die ", "kind": "subtitle", "type": "Full", "language": " ähnelt.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property Funimation_Subtitle_String2() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("Funimation_Subtitle_String2", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Zeichenfolge, die ", "kind": "subtitle", "type": "full", "language": " ähnelt.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property Funimation_Subtitle_String3() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("Funimation_Subtitle_String3", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Zeichenfolge, die <meta property="og:image" content=" ähnelt.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property Funimation_thumbnail() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("Funimation_thumbnail", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Zeichenfolge, die ","resolution":"adaptive" ähnelt.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property hls_endString() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("hls_endString", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Zeichenfolge, die "format":"adaptive_hls", ähnelt.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property hls_Value() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("hls_Value", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Zeichenfolge, die <script>
|
||||
'''
|
||||
|
@ -657,15 +433,6 @@ Namespace My.Resources
|
|||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Zeichenfolge, die "error":false,"code":"ok" ähnelt.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property LoginSuccess() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("LoginSuccess", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
|
@ -1037,15 +804,5 @@ Namespace My.Resources
|
|||
Return ResourceManager.GetString("thumbnailString", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Zeichenfolge, die US cookies can't be used as long you are logged in.
|
||||
'''I delete the curremt session with the unlock, if you want to be logged in with the US cookie you need to enter you data on the left. ähnelt.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property US_ToolTip() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("US_ToolTip", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
End Module
|
||||
End Namespace
|
||||
|
|
|
@ -130,27 +130,15 @@
|
|||
<data name="main_add" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\main-add.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="Funimation_Split_2" xml:space="preserve">
|
||||
<value>"></value>
|
||||
</data>
|
||||
<data name="main_background" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\main-background.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="Funimation_Split_1" xml:space="preserve">
|
||||
<value><a class="trackVideo ng-binding" href="</value>
|
||||
</data>
|
||||
<data name="add_mass_cancel" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\add_mass_cancel.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="about_icon" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\about_icon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="AoD_Titel" xml:space="preserve">
|
||||
<value>"title":"</value>
|
||||
</data>
|
||||
<data name="Funimation_Subtitle_String2" xml:space="preserve">
|
||||
<value>", "kind": "subtitle", "type": "Full", "language": "</value>
|
||||
</data>
|
||||
<data name="htmlTitlel" xml:space="preserve">
|
||||
<value><a class="main_titel">Placeholder</a>
|
||||
<img alt="image error" src="balken.png" class="class-balken"></value>
|
||||
|
@ -166,9 +154,6 @@
|
|||
<address>Server at Crunchyroll Downloader Port 8080</address>
|
||||
</body></html></value>
|
||||
</data>
|
||||
<data name="Funimation_Player_ID" xml:space="preserve">
|
||||
<value>src="/player/</value>
|
||||
</data>
|
||||
<data name="Post_error_Top" xml:space="preserve">
|
||||
<value><html>
|
||||
<head>
|
||||
|
@ -219,15 +204,6 @@
|
|||
<data name="main_pause_play" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\main-pause-play.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="LoginSuccess" xml:space="preserve">
|
||||
<value>"error":false,"code":"ok"</value>
|
||||
</data>
|
||||
<data name="AoD_Image" xml:space="preserve">
|
||||
<value>"image":"</value>
|
||||
</data>
|
||||
<data name="Funimation_Subtitle_String" xml:space="preserve">
|
||||
<value>", "kind": "subtitle", "type": "CC", "language": "</value>
|
||||
</data>
|
||||
<data name="htmlEnd" xml:space="preserve">
|
||||
<value><script>
|
||||
|
||||
|
@ -250,13 +226,6 @@ setInterval(function loadXMLDoc() {
|
|||
</div>
|
||||
</body>
|
||||
</html></value>
|
||||
</data>
|
||||
<data name="Funimation_src_string" xml:space="preserve">
|
||||
<value>"src":</value>
|
||||
</data>
|
||||
<data name="US_ToolTip" xml:space="preserve">
|
||||
<value>US cookies can't be used as long you are logged in.
|
||||
I delete the curremt session with the unlock, if you want to be logged in with the US cookie you need to enter you data on the left.</value>
|
||||
</data>
|
||||
<data name="ass_template" xml:space="preserve">
|
||||
<value>[Script Info]
|
||||
|
@ -281,12 +250,6 @@ Style: Default,Arial,20,&H00FFFFFF,&H0000FFFF,&H00000000,&H00000
|
|||
Format: Layer, Start, End, Style, Name, MarginL, MarginR, MarginV, Effect, Text
|
||||
Dialogue: 0,0:00:00.00,0:00:00.00,Default,,0000,0000,0000,,some ideas on how templated karaoke could work in auto4/lua</value>
|
||||
</data>
|
||||
<data name="hls_endString" xml:space="preserve">
|
||||
<value>","resolution":"adaptive"</value>
|
||||
</data>
|
||||
<data name="hls_Value" xml:space="preserve">
|
||||
<value>"format":"adaptive_hls",</value>
|
||||
</data>
|
||||
<data name="main_settings" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\main-settings.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
|
@ -341,9 +304,6 @@ Dialogue: 0,0:00:00.00,0:00:00.00,Default,,0000,0000,0000,,some ideas on how tem
|
|||
<data name="main_button_download_hovert" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\main_button_download_hovert.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="CC_String" xml:space="preserve">
|
||||
<value><img id="footer_country_flag" src="https://www.crunchyroll.com/i/country_flags/</value>
|
||||
</data>
|
||||
<data name="balken_console" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\balken_console.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
|
@ -394,9 +354,6 @@ Dialogue: 0,0:00:00.00,0:00:00.00,Default,,0000,0000,0000,,some ideas on how tem
|
|||
<data name="crdSettings_Button_SafeExit" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\crdSettings_Button_SafeExit.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="Funimation_thumbnail" xml:space="preserve">
|
||||
<value><meta property="og:image" content="</value>
|
||||
</data>
|
||||
<data name="main_pause_play_hover" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\main-pause-play-hover.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
|
@ -411,12 +368,6 @@ Dialogue: 0,0:00:00.00,0:00:00.00,Default,,0000,0000,0000,,some ideas on how tem
|
|||
<data name="icon" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\icon.ico;System.Drawing.Icon, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="AoD_files" xml:space="preserve">
|
||||
<value>{"sources":[{"file":"</value>
|
||||
</data>
|
||||
<data name="CR_Head_Url_Split" xml:space="preserve">
|
||||
<value><meta property="og:url" content="</value>
|
||||
</data>
|
||||
<data name="htmlTop" xml:space="preserve">
|
||||
<value><!DOCTYPE html>
|
||||
<head>
|
||||
|
@ -460,21 +411,6 @@ Dialogue: 0,0:00:00.00,0:00:00.00,Default,,0000,0000,0000,,some ideas on how tem
|
|||
<data name="main_setting_invert" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\main-setting_invert.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="Funimation_subs_src" xml:space="preserve">
|
||||
<value>{"src": "</value>
|
||||
</data>
|
||||
<data name="AoD_HTML_Anime_Title" xml:space="preserve">
|
||||
<value><h1 itemprop="name"></value>
|
||||
</data>
|
||||
<data name="AoD_HTML_Episode_Title" xml:space="preserve">
|
||||
<value><h3 class="episodebox-title" title="</value>
|
||||
</data>
|
||||
<data name="CR_MediaName" xml:space="preserve">
|
||||
<value><h4 id="showmedia_about_name" class="strong">“</value>
|
||||
</data>
|
||||
<data name="CR_MediaName2" xml:space="preserve">
|
||||
<value>”</h4></value>
|
||||
</data>
|
||||
<data name="main_add_invert_dark" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\main-add_invert_dark.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
|
@ -493,21 +429,6 @@ Dialogue: 0,0:00:00.00,0:00:00.00,Default,,0000,0000,0000,,some ideas on how tem
|
|||
<data name="main_mini_red" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\main-mini_red.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="CR_Episode_Nr" xml:space="preserve">
|
||||
<value>display_episode_number":"</value>
|
||||
</data>
|
||||
<data name="CR_Season_Nr" xml:space="preserve">
|
||||
<value>seasonNumber":"</value>
|
||||
</data>
|
||||
<data name="Funimation_Subtitle_String3" xml:space="preserve">
|
||||
<value>", "kind": "subtitle", "type": "full", "language": "</value>
|
||||
</data>
|
||||
<data name="Funimation_Player_ID_2" xml:space="preserve">
|
||||
<value>src="https://www.funimation.com/player/</value>
|
||||
</data>
|
||||
<data name="AoD_MediaID" xml:space="preserve">
|
||||
<value>"mediaid":</value>
|
||||
</data>
|
||||
<data name="main_close_dark" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\main-close_dark.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
|
@ -520,12 +441,6 @@ Dialogue: 0,0:00:00.00,0:00:00.00,Default,,0000,0000,0000,,some ideas on how tem
|
|||
<data name="main_mini_dark_hover" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\main-mini_dark_hover.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="CR_MovieBT" xml:space="preserve">
|
||||
<value></span></value>
|
||||
</data>
|
||||
<data name="CR_MovieTop" xml:space="preserve">
|
||||
<value><span itemprop="name"></value>
|
||||
</data>
|
||||
<data name="main_button_download_deactivate" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\main_button_download-deactivate.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
|
@ -575,4 +490,7 @@ title=Ending</value>
|
|||
<data name="ffmpeg_OK_cL_hover" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\ffmpeg_OK_cL_hover.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="error_dis" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\error_dis.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
</root>
|
168
Crunchyroll Downloader/My Project/Settings.Designer.vb
generated
168
Crunchyroll Downloader/My Project/Settings.Designer.vb
generated
|
@ -78,18 +78,6 @@ Namespace My
|
|||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("None")> _
|
||||
Public Property Fun_Sub() As String
|
||||
Get
|
||||
Return CType(Me("Fun_Sub"),String)
|
||||
End Get
|
||||
Set
|
||||
Me("Fun_Sub") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute(" -c copy -c:a copy -bsf:a aac_adtstoasc")> _
|
||||
|
@ -114,42 +102,6 @@ Namespace My
|
|||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("Disabled")> _
|
||||
Public Property FunimationDub() As String
|
||||
Get
|
||||
Return CType(Me("FunimationDub"),String)
|
||||
End Get
|
||||
Set
|
||||
Me("FunimationDub") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("Disabled")> _
|
||||
Public Property FunimationHardsub() As String
|
||||
Get
|
||||
Return CType(Me("FunimationHardsub"),String)
|
||||
End Get
|
||||
Set
|
||||
Me("FunimationHardsub") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("Disabled")> _
|
||||
Public Property DefaultSubFunimation() As String
|
||||
Get
|
||||
Return CType(Me("DefaultSubFunimation"),String)
|
||||
End Get
|
||||
Set
|
||||
Me("DefaultSubFunimation") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("[ ignore subfolder ]")> _
|
||||
|
@ -174,18 +126,6 @@ Namespace My
|
|||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("https://www.crunchyroll.com/")> _
|
||||
Public Property Startseite() As String
|
||||
Get
|
||||
Return CType(Me("Startseite"),String)
|
||||
End Get
|
||||
Set
|
||||
Me("Startseite") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("[default season prefix]")> _
|
||||
|
@ -270,30 +210,6 @@ Namespace My
|
|||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("False")> _
|
||||
Public Property Funimation_srt() As Boolean
|
||||
Get
|
||||
Return CType(Me("Funimation_srt"),Boolean)
|
||||
End Get
|
||||
Set
|
||||
Me("Funimation_srt") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("False")> _
|
||||
Public Property Funimation_vtt() As Boolean
|
||||
Get
|
||||
Return CType(Me("Funimation_vtt"),Boolean)
|
||||
End Get
|
||||
Set
|
||||
Me("Funimation_vtt") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("False")> _
|
||||
|
@ -450,18 +366,6 @@ Namespace My
|
|||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("0")> _
|
||||
Public Property Funimation_Bitrate() As Integer
|
||||
Get
|
||||
Return CType(Me("Funimation_Bitrate"),Integer)
|
||||
End Get
|
||||
Set
|
||||
Me("Funimation_Bitrate") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("0")> _
|
||||
|
@ -570,18 +474,6 @@ Namespace My
|
|||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("False")> _
|
||||
Public Property SaveMode() As Boolean
|
||||
Get
|
||||
Return CType(Me("SaveMode"),Boolean)
|
||||
End Get
|
||||
Set
|
||||
Me("SaveMode") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("0")> _
|
||||
|
@ -678,6 +570,66 @@ Namespace My
|
|||
Me("FixCRStream") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("na")> _
|
||||
Public Property Mail() As String
|
||||
Get
|
||||
Return CType(Me("Mail"),String)
|
||||
End Get
|
||||
Set
|
||||
Me("Mail") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("na")> _
|
||||
Public Property PW() As String
|
||||
Get
|
||||
Return CType(Me("PW"),String)
|
||||
End Get
|
||||
Set
|
||||
Me("PW") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("False")> _
|
||||
Public Property HiddenQueue() As Boolean
|
||||
Get
|
||||
Return CType(Me("HiddenQueue"),Boolean)
|
||||
End Get
|
||||
Set
|
||||
Me("HiddenQueue") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("0")> _
|
||||
Public Property UpdateLog() As String
|
||||
Get
|
||||
Return CType(Me("UpdateLog"),String)
|
||||
End Get
|
||||
Set
|
||||
Me("UpdateLog") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("0")> _
|
||||
Public Property UpdateMode() As Integer
|
||||
Get
|
||||
Return CType(Me("UpdateMode"),Integer)
|
||||
End Get
|
||||
Set
|
||||
Me("UpdateMode") = value
|
||||
End Set
|
||||
End Property
|
||||
End Class
|
||||
End Namespace
|
||||
|
||||
|
|
|
@ -8,33 +8,18 @@
|
|||
<Setting Name="Pfad" Type="System.String" Scope="User">
|
||||
<Value Profile="(Default)" />
|
||||
</Setting>
|
||||
<Setting Name="Fun_Sub" Type="System.String" Scope="User">
|
||||
<Value Profile="(Default)">None</Value>
|
||||
</Setting>
|
||||
<Setting Name="ffmpeg_command" Type="System.String" Scope="User">
|
||||
<Value Profile="(Default)"> -c copy -c:a copy -bsf:a aac_adtstoasc</Value>
|
||||
</Setting>
|
||||
<Setting Name="AddedSubs" Type="System.String" Scope="User">
|
||||
<Value Profile="(Default)">None</Value>
|
||||
</Setting>
|
||||
<Setting Name="FunimationDub" Type="System.String" Scope="User">
|
||||
<Value Profile="(Default)">Disabled</Value>
|
||||
</Setting>
|
||||
<Setting Name="FunimationHardsub" Type="System.String" Scope="User">
|
||||
<Value Profile="(Default)">Disabled</Value>
|
||||
</Setting>
|
||||
<Setting Name="DefaultSubFunimation" Type="System.String" Scope="User">
|
||||
<Value Profile="(Default)">Disabled</Value>
|
||||
</Setting>
|
||||
<Setting Name="SubFolder_Value" Type="System.String" Scope="User">
|
||||
<Value Profile="(Default)">[ ignore subfolder ]</Value>
|
||||
</Setting>
|
||||
<Setting Name="TempFolder" Type="System.String" Scope="User">
|
||||
<Value Profile="(Default)" />
|
||||
</Setting>
|
||||
<Setting Name="Startseite" Type="System.String" Scope="User">
|
||||
<Value Profile="(Default)">https://www.crunchyroll.com/</Value>
|
||||
</Setting>
|
||||
<Setting Name="Prefix_S" Type="System.String" Scope="User">
|
||||
<Value Profile="(Default)">[default season prefix]</Value>
|
||||
</Setting>
|
||||
|
@ -56,12 +41,6 @@
|
|||
<Setting Name="Dark_Mode" Type="System.Boolean" Scope="User">
|
||||
<Value Profile="(Default)">False</Value>
|
||||
</Setting>
|
||||
<Setting Name="Funimation_srt" Type="System.Boolean" Scope="User">
|
||||
<Value Profile="(Default)">False</Value>
|
||||
</Setting>
|
||||
<Setting Name="Funimation_vtt" Type="System.Boolean" Scope="User">
|
||||
<Value Profile="(Default)">False</Value>
|
||||
</Setting>
|
||||
<Setting Name="QueueMode" Type="System.Boolean" Scope="User">
|
||||
<Value Profile="(Default)">False</Value>
|
||||
</Setting>
|
||||
|
@ -101,9 +80,6 @@
|
|||
<Setting Name="LeadingZero" Type="System.Int32" Scope="User">
|
||||
<Value Profile="(Default)">0</Value>
|
||||
</Setting>
|
||||
<Setting Name="Funimation_Bitrate" Type="System.Int32" Scope="User">
|
||||
<Value Profile="(Default)">0</Value>
|
||||
</Setting>
|
||||
<Setting Name="ServerPort" Type="System.Int32" Scope="User">
|
||||
<Value Profile="(Default)">0</Value>
|
||||
</Setting>
|
||||
|
@ -131,9 +107,6 @@
|
|||
<Setting Name="SaveThumbnail" Type="System.Boolean" Scope="User">
|
||||
<Value Profile="(Default)">False</Value>
|
||||
</Setting>
|
||||
<Setting Name="SaveMode" Type="System.Boolean" Scope="User">
|
||||
<Value Profile="(Default)">False</Value>
|
||||
</Setting>
|
||||
<Setting Name="DownloadScope" Type="System.Int32" Scope="User">
|
||||
<Value Profile="(Default)">0</Value>
|
||||
</Setting>
|
||||
|
@ -158,5 +131,20 @@
|
|||
<Setting Name="FixCRStream" Type="System.Boolean" Scope="User">
|
||||
<Value Profile="(Default)">True</Value>
|
||||
</Setting>
|
||||
<Setting Name="Mail" Type="System.String" Scope="User">
|
||||
<Value Profile="(Default)">na</Value>
|
||||
</Setting>
|
||||
<Setting Name="PW" Type="System.String" Scope="User">
|
||||
<Value Profile="(Default)">na</Value>
|
||||
</Setting>
|
||||
<Setting Name="HiddenQueue" Type="System.Boolean" Scope="User">
|
||||
<Value Profile="(Default)">False</Value>
|
||||
</Setting>
|
||||
<Setting Name="UpdateLog" Type="System.String" Scope="User">
|
||||
<Value Profile="(Default)">0</Value>
|
||||
</Setting>
|
||||
<Setting Name="UpdateMode" Type="System.Int32" Scope="User">
|
||||
<Value Profile="(Default)">0</Value>
|
||||
</Setting>
|
||||
</Settings>
|
||||
</SettingsFile>
|
Binary file not shown.
Binary file not shown.
|
@ -0,0 +1,5 @@
|
|||
[{000214A0-0000-0000-C000-000000000046}]
|
||||
Prop3=19,11
|
||||
[InternetShortcut]
|
||||
IDList=
|
||||
URL=https://www.vb-paradise.de/index.php/Thread/101710-UserSettingsProvider-Persistieren-von-UserSettings/?pageNo=1&s=21f5b5753290312d4aa7fe7e470f638c5fe2e4aa
|
Binary file not shown.
Binary file not shown.
BIN
Crunchyroll Downloader/Resources/error_dis.png
Normal file
BIN
Crunchyroll Downloader/Resources/error_dis.png
Normal file
Binary file not shown.
After Width: | Height: | Size: 5.3 KiB |
464
Crunchyroll Downloader/einstellungen.Designer.vb
generated
464
Crunchyroll Downloader/einstellungen.Designer.vb
generated
|
@ -38,6 +38,7 @@ Partial Class Einstellungen
|
|||
Me.TabPage2 = New MetroFramework.Controls.MetroTabPage()
|
||||
Me.GroupBox23 = New System.Windows.Forms.GroupBox()
|
||||
Me.GroupBox18 = New System.Windows.Forms.GroupBox()
|
||||
Me.CB_HideQueue = New MetroFramework.Controls.MetroCheckBox()
|
||||
Me.ListViewAdd_True = New MetroFramework.Controls.MetroCheckBox()
|
||||
Me.GroupBox16 = New System.Windows.Forms.GroupBox()
|
||||
Me.MetroLabel3 = New MetroFramework.Controls.MetroLabel()
|
||||
|
@ -83,7 +84,7 @@ Partial Class Einstellungen
|
|||
Me.ListBit_1000 = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.FFMPEG_CommandP4 = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.GB_Resolution = New System.Windows.Forms.GroupBox()
|
||||
Me.AAuto = New MetroFramework.Controls.MetroRadioButton()
|
||||
Me.A240p = New MetroFramework.Controls.MetroRadioButton()
|
||||
Me.A480p = New MetroFramework.Controls.MetroRadioButton()
|
||||
Me.A360p = New MetroFramework.Controls.MetroRadioButton()
|
||||
Me.A720p = New MetroFramework.Controls.MetroRadioButton()
|
||||
|
@ -100,9 +101,6 @@ Partial Class Einstellungen
|
|||
Me.Chb_Ign_tls = New MetroFramework.Controls.MetroCheckBox()
|
||||
Me.http_support = New MetroFramework.Controls.MetroComboBox()
|
||||
Me.DarkMode = New MetroFramework.Controls.MetroCheckBox()
|
||||
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
|
||||
Me.Label1 = New MetroFramework.Controls.MetroLabel()
|
||||
Me.TextBox1 = New MetroFramework.Controls.MetroTextBox()
|
||||
Me.DL_Count_simultaneous = New System.Windows.Forms.GroupBox()
|
||||
Me.NumericUpDown1 = New System.Windows.Forms.NumericUpDown()
|
||||
Me.TabControl1 = New MetroFramework.Controls.MetroTabControl()
|
||||
|
@ -132,23 +130,6 @@ Partial Class Einstellungen
|
|||
Me.GroupBox19 = New System.Windows.Forms.GroupBox()
|
||||
Me.CB_OverrideDub = New MetroFramework.Controls.MetroCheckBox()
|
||||
Me.CB_CR_Audio = New MetroFramework.Controls.MetroComboBox()
|
||||
Me.TabPage6 = New MetroFramework.Controls.MetroTabPage()
|
||||
Me.GroupBox15 = New System.Windows.Forms.GroupBox()
|
||||
Me.Bitrate_Funi = New MetroFramework.Controls.MetroComboBox()
|
||||
Me.GroupBox10 = New System.Windows.Forms.GroupBox()
|
||||
Me.Fun_Dub_Over = New MetroFramework.Controls.MetroComboBox()
|
||||
Me.GroupBox7 = New System.Windows.Forms.GroupBox()
|
||||
Me.CB_Fun_HardSubs = New MetroFramework.Controls.MetroComboBox()
|
||||
Me.GroupBox9 = New System.Windows.Forms.GroupBox()
|
||||
Me.GroupBox13 = New System.Windows.Forms.GroupBox()
|
||||
Me.FunSubDef = New MetroFramework.Controls.MetroComboBox()
|
||||
Me.GroupBox11 = New System.Windows.Forms.GroupBox()
|
||||
Me.CB_srt = New MetroFramework.Controls.MetroCheckBox()
|
||||
Me.CB_vtt = New MetroFramework.Controls.MetroCheckBox()
|
||||
Me.GroupBox8 = New System.Windows.Forms.GroupBox()
|
||||
Me.CB_fun_eng = New MetroFramework.Controls.MetroCheckBox()
|
||||
Me.CB_fun_es = New MetroFramework.Controls.MetroCheckBox()
|
||||
Me.CB_fun_ptbr = New MetroFramework.Controls.MetroCheckBox()
|
||||
Me.TabPage7 = New System.Windows.Forms.TabPage()
|
||||
Me.LastVersion = New MetroFramework.Controls.MetroLabel()
|
||||
Me.Label8 = New MetroFramework.Controls.MetroLabel()
|
||||
|
@ -161,6 +142,7 @@ Partial Class Einstellungen
|
|||
Me.Label5 = New MetroFramework.Controls.MetroLabel()
|
||||
Me.BackgroundWorker1 = New System.ComponentModel.BackgroundWorker()
|
||||
Me.Btn_Save = New System.Windows.Forms.Button()
|
||||
Me.DD_Update = New MetroFramework.Controls.MetroComboBox()
|
||||
CType(Me.pictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.GroupBox14.SuspendLayout()
|
||||
Me.SoftSubs.SuspendLayout()
|
||||
|
@ -179,7 +161,6 @@ Partial Class Einstellungen
|
|||
Me.GroupBox6.SuspendLayout()
|
||||
CType(Me.NumericUpDown2, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.GroupBox5.SuspendLayout()
|
||||
Me.GroupBox1.SuspendLayout()
|
||||
Me.DL_Count_simultaneous.SuspendLayout()
|
||||
CType(Me.NumericUpDown1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.TabControl1.SuspendLayout()
|
||||
|
@ -192,14 +173,6 @@ Partial Class Einstellungen
|
|||
Me.GroupBox22.SuspendLayout()
|
||||
Me.GroupBox20.SuspendLayout()
|
||||
Me.GroupBox19.SuspendLayout()
|
||||
Me.TabPage6.SuspendLayout()
|
||||
Me.GroupBox15.SuspendLayout()
|
||||
Me.GroupBox10.SuspendLayout()
|
||||
Me.GroupBox7.SuspendLayout()
|
||||
Me.GroupBox9.SuspendLayout()
|
||||
Me.GroupBox13.SuspendLayout()
|
||||
Me.GroupBox11.SuspendLayout()
|
||||
Me.GroupBox8.SuspendLayout()
|
||||
Me.TabPage7.SuspendLayout()
|
||||
CType(Me.PictureBox7, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
|
@ -359,12 +332,12 @@ Partial Class Einstellungen
|
|||
Me.TabPage2.HorizontalScrollbarBarColor = True
|
||||
Me.TabPage2.HorizontalScrollbarHighlightOnWheel = False
|
||||
Me.TabPage2.HorizontalScrollbarSize = 10
|
||||
Me.TabPage2.Location = New System.Drawing.Point(4, 44)
|
||||
Me.TabPage2.Location = New System.Drawing.Point(4, 54)
|
||||
Me.TabPage2.Name = "TabPage2"
|
||||
Me.TabPage2.Padding = New System.Windows.Forms.Padding(3)
|
||||
Me.TabPage2.Size = New System.Drawing.Size(501, 519)
|
||||
Me.TabPage2.Size = New System.Drawing.Size(501, 509)
|
||||
Me.TabPage2.TabIndex = 1
|
||||
Me.TabPage2.Text = "Output"
|
||||
Me.TabPage2.Text = " Output "
|
||||
Me.TabPage2.VerticalScrollbarBarColor = True
|
||||
Me.TabPage2.VerticalScrollbarHighlightOnWheel = False
|
||||
Me.TabPage2.VerticalScrollbarSize = 10
|
||||
|
@ -387,6 +360,7 @@ Partial Class Einstellungen
|
|||
'GroupBox18
|
||||
'
|
||||
Me.GroupBox18.BackColor = System.Drawing.Color.Transparent
|
||||
Me.GroupBox18.Controls.Add(Me.CB_HideQueue)
|
||||
Me.GroupBox18.Controls.Add(Me.ListViewAdd_True)
|
||||
Me.GroupBox18.Font = New System.Drawing.Font("Arial", 9.75!)
|
||||
Me.GroupBox18.ForeColor = System.Drawing.Color.Black
|
||||
|
@ -397,11 +371,22 @@ Partial Class Einstellungen
|
|||
Me.GroupBox18.TabStop = False
|
||||
Me.GroupBox18.Text = "Multi-Download"
|
||||
'
|
||||
'CB_HideQueue
|
||||
'
|
||||
Me.CB_HideQueue.AutoSize = True
|
||||
Me.CB_HideQueue.FontSize = MetroFramework.MetroCheckBoxSize.Medium
|
||||
Me.CB_HideQueue.Location = New System.Drawing.Point(328, 21)
|
||||
Me.CB_HideQueue.Name = "CB_HideQueue"
|
||||
Me.CB_HideQueue.Size = New System.Drawing.Size(112, 19)
|
||||
Me.CB_HideQueue.TabIndex = 6
|
||||
Me.CB_HideQueue.Text = "hidden Queue"
|
||||
Me.CB_HideQueue.UseSelectable = True
|
||||
'
|
||||
'ListViewAdd_True
|
||||
'
|
||||
Me.ListViewAdd_True.AutoSize = True
|
||||
Me.ListViewAdd_True.FontSize = MetroFramework.MetroCheckBoxSize.Medium
|
||||
Me.ListViewAdd_True.Location = New System.Drawing.Point(119, 25)
|
||||
Me.ListViewAdd_True.Location = New System.Drawing.Point(40, 21)
|
||||
Me.ListViewAdd_True.Name = "ListViewAdd_True"
|
||||
Me.ListViewAdd_True.Size = New System.Drawing.Size(255, 19)
|
||||
Me.ListViewAdd_True.TabIndex = 5
|
||||
|
@ -776,7 +761,7 @@ Partial Class Einstellungen
|
|||
'GB_Resolution
|
||||
'
|
||||
Me.GB_Resolution.BackColor = System.Drawing.Color.Transparent
|
||||
Me.GB_Resolution.Controls.Add(Me.AAuto)
|
||||
Me.GB_Resolution.Controls.Add(Me.A240p)
|
||||
Me.GB_Resolution.Controls.Add(Me.A480p)
|
||||
Me.GB_Resolution.Controls.Add(Me.A360p)
|
||||
Me.GB_Resolution.Controls.Add(Me.A720p)
|
||||
|
@ -790,18 +775,18 @@ Partial Class Einstellungen
|
|||
Me.GB_Resolution.TabStop = False
|
||||
Me.GB_Resolution.Text = "Auflösung"
|
||||
'
|
||||
'AAuto
|
||||
'A240p
|
||||
'
|
||||
Me.AAuto.AutoSize = True
|
||||
Me.AAuto.FontSize = MetroFramework.MetroCheckBoxSize.Medium
|
||||
Me.AAuto.ForeColor = System.Drawing.Color.Black
|
||||
Me.AAuto.Location = New System.Drawing.Point(377, 21)
|
||||
Me.AAuto.Name = "AAuto"
|
||||
Me.AAuto.Size = New System.Drawing.Size(63, 19)
|
||||
Me.AAuto.TabIndex = 16
|
||||
Me.AAuto.TabStop = True
|
||||
Me.AAuto.Text = "[Auto]"
|
||||
Me.AAuto.UseSelectable = True
|
||||
Me.A240p.AutoSize = True
|
||||
Me.A240p.FontSize = MetroFramework.MetroCheckBoxSize.Medium
|
||||
Me.A240p.ForeColor = System.Drawing.Color.Black
|
||||
Me.A240p.Location = New System.Drawing.Point(377, 21)
|
||||
Me.A240p.Name = "A240p"
|
||||
Me.A240p.Size = New System.Drawing.Size(57, 19)
|
||||
Me.A240p.TabIndex = 16
|
||||
Me.A240p.TabStop = True
|
||||
Me.A240p.Text = "240p"
|
||||
Me.A240p.UseSelectable = True
|
||||
'
|
||||
'A480p
|
||||
'
|
||||
|
@ -862,19 +847,18 @@ Partial Class Einstellungen
|
|||
Me.TabPage1.Controls.Add(Me.GroupBox21)
|
||||
Me.TabPage1.Controls.Add(Me.GroupBox6)
|
||||
Me.TabPage1.Controls.Add(Me.GroupBox5)
|
||||
Me.TabPage1.Controls.Add(Me.GroupBox1)
|
||||
Me.TabPage1.Controls.Add(Me.DL_Count_simultaneous)
|
||||
Me.TabPage1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.TabPage1.HorizontalScrollbar = True
|
||||
Me.TabPage1.HorizontalScrollbarBarColor = True
|
||||
Me.TabPage1.HorizontalScrollbarHighlightOnWheel = False
|
||||
Me.TabPage1.HorizontalScrollbarSize = 10
|
||||
Me.TabPage1.Location = New System.Drawing.Point(4, 35)
|
||||
Me.TabPage1.Location = New System.Drawing.Point(4, 54)
|
||||
Me.TabPage1.Name = "TabPage1"
|
||||
Me.TabPage1.Padding = New System.Windows.Forms.Padding(3)
|
||||
Me.TabPage1.Size = New System.Drawing.Size(501, 528)
|
||||
Me.TabPage1.Size = New System.Drawing.Size(501, 509)
|
||||
Me.TabPage1.TabIndex = 0
|
||||
Me.TabPage1.Text = " Main"
|
||||
Me.TabPage1.Text = " Main "
|
||||
Me.TabPage1.VerticalScrollbar = True
|
||||
Me.TabPage1.VerticalScrollbarBarColor = True
|
||||
Me.TabPage1.VerticalScrollbarHighlightOnWheel = False
|
||||
|
@ -886,7 +870,7 @@ Partial Class Einstellungen
|
|||
Me.GroupBox21.Controls.Add(Me.CB_HideSF)
|
||||
Me.GroupBox21.Font = New System.Drawing.Font("Arial", 9.75!)
|
||||
Me.GroupBox21.ForeColor = System.Drawing.Color.Black
|
||||
Me.GroupBox21.Location = New System.Drawing.Point(5, 417)
|
||||
Me.GroupBox21.Location = New System.Drawing.Point(5, 349)
|
||||
Me.GroupBox21.Name = "GroupBox21"
|
||||
Me.GroupBox21.Size = New System.Drawing.Size(490, 67)
|
||||
Me.GroupBox21.TabIndex = 81
|
||||
|
@ -916,7 +900,7 @@ Partial Class Einstellungen
|
|||
Me.GroupBox6.Controls.Add(Me.NumericUpDown2)
|
||||
Me.GroupBox6.Font = New System.Drawing.Font("Arial", 9.75!)
|
||||
Me.GroupBox6.ForeColor = System.Drawing.Color.Black
|
||||
Me.GroupBox6.Location = New System.Drawing.Point(5, 299)
|
||||
Me.GroupBox6.Location = New System.Drawing.Point(5, 231)
|
||||
Me.GroupBox6.Name = "GroupBox6"
|
||||
Me.GroupBox6.Size = New System.Drawing.Size(490, 112)
|
||||
Me.GroupBox6.TabIndex = 80
|
||||
|
@ -965,14 +949,15 @@ Partial Class Einstellungen
|
|||
'GroupBox5
|
||||
'
|
||||
Me.GroupBox5.BackColor = System.Drawing.Color.Transparent
|
||||
Me.GroupBox5.Controls.Add(Me.DD_Update)
|
||||
Me.GroupBox5.Controls.Add(Me.Chb_Ign_tls)
|
||||
Me.GroupBox5.Controls.Add(Me.http_support)
|
||||
Me.GroupBox5.Controls.Add(Me.DarkMode)
|
||||
Me.GroupBox5.Font = New System.Drawing.Font("Arial", 9.75!)
|
||||
Me.GroupBox5.ForeColor = System.Drawing.Color.Black
|
||||
Me.GroupBox5.Location = New System.Drawing.Point(5, 179)
|
||||
Me.GroupBox5.Location = New System.Drawing.Point(5, 85)
|
||||
Me.GroupBox5.Name = "GroupBox5"
|
||||
Me.GroupBox5.Size = New System.Drawing.Size(490, 114)
|
||||
Me.GroupBox5.Size = New System.Drawing.Size(490, 140)
|
||||
Me.GroupBox5.TabIndex = 70
|
||||
Me.GroupBox5.TabStop = False
|
||||
Me.GroupBox5.Text = "Other"
|
||||
|
@ -981,7 +966,7 @@ Partial Class Einstellungen
|
|||
'
|
||||
Me.Chb_Ign_tls.AutoSize = True
|
||||
Me.Chb_Ign_tls.FontSize = MetroFramework.MetroCheckBoxSize.Medium
|
||||
Me.Chb_Ign_tls.Location = New System.Drawing.Point(135, 80)
|
||||
Me.Chb_Ign_tls.Location = New System.Drawing.Point(242, 43)
|
||||
Me.Chb_Ign_tls.Name = "Chb_Ign_tls"
|
||||
Me.Chb_Ign_tls.Size = New System.Drawing.Size(223, 19)
|
||||
Me.Chb_Ign_tls.TabIndex = 46
|
||||
|
@ -997,9 +982,9 @@ Partial Class Einstellungen
|
|||
Me.http_support.IntegralHeight = False
|
||||
Me.http_support.ItemHeight = 23
|
||||
Me.http_support.Items.AddRange(New Object() {"add-on support disabled", "80", "8080"})
|
||||
Me.http_support.Location = New System.Drawing.Point(214, 25)
|
||||
Me.http_support.Location = New System.Drawing.Point(242, 90)
|
||||
Me.http_support.Name = "http_support"
|
||||
Me.http_support.Size = New System.Drawing.Size(237, 29)
|
||||
Me.http_support.Size = New System.Drawing.Size(223, 29)
|
||||
Me.http_support.TabIndex = 45
|
||||
Me.http_support.UseSelectable = True
|
||||
'
|
||||
|
@ -1007,70 +992,13 @@ Partial Class Einstellungen
|
|||
'
|
||||
Me.DarkMode.AutoSize = True
|
||||
Me.DarkMode.FontSize = MetroFramework.MetroCheckBoxSize.Medium
|
||||
Me.DarkMode.Location = New System.Drawing.Point(41, 30)
|
||||
Me.DarkMode.Location = New System.Drawing.Point(39, 43)
|
||||
Me.DarkMode.Name = "DarkMode"
|
||||
Me.DarkMode.Size = New System.Drawing.Size(135, 19)
|
||||
Me.DarkMode.TabIndex = 5
|
||||
Me.DarkMode.Text = "enable dark mode"
|
||||
Me.DarkMode.UseSelectable = True
|
||||
'
|
||||
'GroupBox1
|
||||
'
|
||||
Me.GroupBox1.BackColor = System.Drawing.Color.Transparent
|
||||
Me.GroupBox1.Controls.Add(Me.Label1)
|
||||
Me.GroupBox1.Controls.Add(Me.TextBox1)
|
||||
Me.GroupBox1.Font = New System.Drawing.Font("Arial", 9.75!)
|
||||
Me.GroupBox1.ForeColor = System.Drawing.Color.Black
|
||||
Me.GroupBox1.Location = New System.Drawing.Point(5, 85)
|
||||
Me.GroupBox1.Name = "GroupBox1"
|
||||
Me.GroupBox1.Size = New System.Drawing.Size(490, 88)
|
||||
Me.GroupBox1.TabIndex = 60
|
||||
Me.GroupBox1.TabStop = False
|
||||
Me.GroupBox1.Text = "Browser Settings"
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.FontWeight = MetroFramework.MetroLabelWeight.Regular
|
||||
Me.Label1.Location = New System.Drawing.Point(6, 20)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(469, 22)
|
||||
Me.Label1.TabIndex = 2
|
||||
Me.Label1.Text = "Default Website"
|
||||
Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'TextBox1
|
||||
'
|
||||
'
|
||||
'
|
||||
'
|
||||
Me.TextBox1.CustomButton.Image = Nothing
|
||||
Me.TextBox1.CustomButton.Location = New System.Drawing.Point(445, 1)
|
||||
Me.TextBox1.CustomButton.Name = ""
|
||||
Me.TextBox1.CustomButton.Size = New System.Drawing.Size(23, 23)
|
||||
Me.TextBox1.CustomButton.Style = MetroFramework.MetroColorStyle.Blue
|
||||
Me.TextBox1.CustomButton.TabIndex = 1
|
||||
Me.TextBox1.CustomButton.Theme = MetroFramework.MetroThemeStyle.Light
|
||||
Me.TextBox1.CustomButton.UseSelectable = True
|
||||
Me.TextBox1.CustomButton.Visible = False
|
||||
Me.TextBox1.FontSize = MetroFramework.MetroTextBoxSize.Medium
|
||||
Me.TextBox1.Lines = New String() {"https://www.crunchyroll.com/"}
|
||||
Me.TextBox1.Location = New System.Drawing.Point(6, 45)
|
||||
Me.TextBox1.MaxLength = 32767
|
||||
Me.TextBox1.Name = "TextBox1"
|
||||
Me.TextBox1.PasswordChar = Global.Microsoft.VisualBasic.ChrW(0)
|
||||
Me.TextBox1.ScrollBars = System.Windows.Forms.ScrollBars.None
|
||||
Me.TextBox1.SelectedText = ""
|
||||
Me.TextBox1.SelectionLength = 0
|
||||
Me.TextBox1.SelectionStart = 0
|
||||
Me.TextBox1.ShortcutsEnabled = True
|
||||
Me.TextBox1.Size = New System.Drawing.Size(469, 25)
|
||||
Me.TextBox1.TabIndex = 2
|
||||
Me.TextBox1.Text = "https://www.crunchyroll.com/"
|
||||
Me.TextBox1.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
|
||||
Me.TextBox1.UseSelectable = True
|
||||
Me.TextBox1.WaterMarkColor = System.Drawing.Color.FromArgb(CType(CType(109, Byte), Integer), CType(CType(109, Byte), Integer), CType(CType(109, Byte), Integer))
|
||||
Me.TextBox1.WaterMarkFont = New System.Drawing.Font("Segoe UI", 12.0!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Pixel)
|
||||
'
|
||||
'DL_Count_simultaneous
|
||||
'
|
||||
Me.DL_Count_simultaneous.BackColor = System.Drawing.Color.Transparent
|
||||
|
@ -1100,13 +1028,13 @@ Partial Class Einstellungen
|
|||
Me.TabControl1.Controls.Add(Me.TabPage2)
|
||||
Me.TabControl1.Controls.Add(Me.MetroTabPage2)
|
||||
Me.TabControl1.Controls.Add(Me.MetroTabPage1)
|
||||
Me.TabControl1.Controls.Add(Me.TabPage6)
|
||||
Me.TabControl1.Controls.Add(Me.TabPage7)
|
||||
Me.TabControl1.FontSize = MetroFramework.MetroTabControlSize.Tall
|
||||
Me.TabControl1.FontWeight = MetroFramework.MetroTabControlWeight.Regular
|
||||
Me.TabControl1.ItemSize = New System.Drawing.Size(86, 50)
|
||||
Me.TabControl1.Location = New System.Drawing.Point(22, 60)
|
||||
Me.TabControl1.Name = "TabControl1"
|
||||
Me.TabControl1.SelectedIndex = 3
|
||||
Me.TabControl1.SelectedIndex = 0
|
||||
Me.TabControl1.Size = New System.Drawing.Size(509, 567)
|
||||
Me.TabControl1.TabIndex = 0
|
||||
Me.TabControl1.UseSelectable = True
|
||||
|
@ -1120,11 +1048,11 @@ Partial Class Einstellungen
|
|||
Me.MetroTabPage2.HorizontalScrollbarBarColor = True
|
||||
Me.MetroTabPage2.HorizontalScrollbarHighlightOnWheel = False
|
||||
Me.MetroTabPage2.HorizontalScrollbarSize = 10
|
||||
Me.MetroTabPage2.Location = New System.Drawing.Point(4, 35)
|
||||
Me.MetroTabPage2.Location = New System.Drawing.Point(4, 54)
|
||||
Me.MetroTabPage2.Name = "MetroTabPage2"
|
||||
Me.MetroTabPage2.Size = New System.Drawing.Size(501, 528)
|
||||
Me.MetroTabPage2.Size = New System.Drawing.Size(501, 509)
|
||||
Me.MetroTabPage2.TabIndex = 8
|
||||
Me.MetroTabPage2.Text = "Naming"
|
||||
Me.MetroTabPage2.Text = " Naming "
|
||||
Me.MetroTabPage2.VerticalScrollbarBarColor = True
|
||||
Me.MetroTabPage2.VerticalScrollbarHighlightOnWheel = False
|
||||
Me.MetroTabPage2.VerticalScrollbarSize = 10
|
||||
|
@ -1426,11 +1354,11 @@ Partial Class Einstellungen
|
|||
Me.MetroTabPage1.HorizontalScrollbarBarColor = True
|
||||
Me.MetroTabPage1.HorizontalScrollbarHighlightOnWheel = False
|
||||
Me.MetroTabPage1.HorizontalScrollbarSize = 10
|
||||
Me.MetroTabPage1.Location = New System.Drawing.Point(4, 44)
|
||||
Me.MetroTabPage1.Location = New System.Drawing.Point(4, 54)
|
||||
Me.MetroTabPage1.Name = "MetroTabPage1"
|
||||
Me.MetroTabPage1.Size = New System.Drawing.Size(501, 519)
|
||||
Me.MetroTabPage1.Size = New System.Drawing.Size(501, 509)
|
||||
Me.MetroTabPage1.TabIndex = 7
|
||||
Me.MetroTabPage1.Text = "Crunchyroll"
|
||||
Me.MetroTabPage1.Text = " Crunchyroll "
|
||||
Me.MetroTabPage1.VerticalScrollbarBarColor = True
|
||||
Me.MetroTabPage1.VerticalScrollbarHighlightOnWheel = False
|
||||
Me.MetroTabPage1.VerticalScrollbarSize = 10
|
||||
|
@ -1523,241 +1451,6 @@ Partial Class Einstellungen
|
|||
Me.CB_CR_Audio.TabIndex = 21
|
||||
Me.CB_CR_Audio.UseSelectable = True
|
||||
'
|
||||
'TabPage6
|
||||
'
|
||||
Me.TabPage6.BackColor = System.Drawing.Color.FromArgb(CType(CType(243, Byte), Integer), CType(CType(243, Byte), Integer), CType(CType(243, Byte), Integer))
|
||||
Me.TabPage6.Controls.Add(Me.GroupBox15)
|
||||
Me.TabPage6.Controls.Add(Me.GroupBox10)
|
||||
Me.TabPage6.Controls.Add(Me.GroupBox7)
|
||||
Me.TabPage6.Controls.Add(Me.GroupBox9)
|
||||
Me.TabPage6.HorizontalScrollbarBarColor = True
|
||||
Me.TabPage6.HorizontalScrollbarHighlightOnWheel = False
|
||||
Me.TabPage6.HorizontalScrollbarSize = 10
|
||||
Me.TabPage6.Location = New System.Drawing.Point(4, 35)
|
||||
Me.TabPage6.Name = "TabPage6"
|
||||
Me.TabPage6.Padding = New System.Windows.Forms.Padding(3)
|
||||
Me.TabPage6.Size = New System.Drawing.Size(501, 528)
|
||||
Me.TabPage6.TabIndex = 4
|
||||
Me.TabPage6.Text = " Funimation"
|
||||
Me.TabPage6.VerticalScrollbarBarColor = True
|
||||
Me.TabPage6.VerticalScrollbarHighlightOnWheel = False
|
||||
Me.TabPage6.VerticalScrollbarSize = 10
|
||||
Me.TabPage6.Visible = False
|
||||
'
|
||||
'GroupBox15
|
||||
'
|
||||
Me.GroupBox15.BackColor = System.Drawing.Color.Transparent
|
||||
Me.GroupBox15.Controls.Add(Me.Bitrate_Funi)
|
||||
Me.GroupBox15.Font = New System.Drawing.Font("Arial", 9.75!)
|
||||
Me.GroupBox15.ForeColor = System.Drawing.Color.Black
|
||||
Me.GroupBox15.Location = New System.Drawing.Point(0, 365)
|
||||
Me.GroupBox15.Name = "GroupBox15"
|
||||
Me.GroupBox15.Size = New System.Drawing.Size(490, 69)
|
||||
Me.GroupBox15.TabIndex = 41
|
||||
Me.GroupBox15.TabStop = False
|
||||
Me.GroupBox15.Text = "Bitrate"
|
||||
'
|
||||
'Bitrate_Funi
|
||||
'
|
||||
Me.Bitrate_Funi.DropDownHeight = 250
|
||||
Me.Bitrate_Funi.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Bitrate_Funi.FormattingEnabled = True
|
||||
Me.Bitrate_Funi.IntegralHeight = False
|
||||
Me.Bitrate_Funi.ItemHeight = 23
|
||||
Me.Bitrate_Funi.Items.AddRange(New Object() {"prefer high bitrate", "prefer low bitrate"})
|
||||
Me.Bitrate_Funi.Location = New System.Drawing.Point(79, 24)
|
||||
Me.Bitrate_Funi.Name = "Bitrate_Funi"
|
||||
Me.Bitrate_Funi.Size = New System.Drawing.Size(326, 29)
|
||||
Me.Bitrate_Funi.Sorted = True
|
||||
Me.Bitrate_Funi.TabIndex = 32
|
||||
Me.Bitrate_Funi.UseSelectable = True
|
||||
'
|
||||
'GroupBox10
|
||||
'
|
||||
Me.GroupBox10.BackColor = System.Drawing.Color.Transparent
|
||||
Me.GroupBox10.Controls.Add(Me.Fun_Dub_Over)
|
||||
Me.GroupBox10.Font = New System.Drawing.Font("Arial", 9.75!)
|
||||
Me.GroupBox10.ForeColor = System.Drawing.Color.Black
|
||||
Me.GroupBox10.Location = New System.Drawing.Point(0, 6)
|
||||
Me.GroupBox10.Name = "GroupBox10"
|
||||
Me.GroupBox10.Size = New System.Drawing.Size(490, 69)
|
||||
Me.GroupBox10.TabIndex = 80
|
||||
Me.GroupBox10.TabStop = False
|
||||
Me.GroupBox10.Text = "Funimation Dub"
|
||||
'
|
||||
'Fun_Dub_Over
|
||||
'
|
||||
Me.Fun_Dub_Over.DropDownHeight = 250
|
||||
Me.Fun_Dub_Over.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Fun_Dub_Over.FormattingEnabled = True
|
||||
Me.Fun_Dub_Over.IntegralHeight = False
|
||||
Me.Fun_Dub_Over.ItemHeight = 23
|
||||
Me.Fun_Dub_Over.Items.AddRange(New Object() {"Disabled", "english", "japanese", "portuguese(Brazil)", "spanish(Mexico)"})
|
||||
Me.Fun_Dub_Over.Location = New System.Drawing.Point(79, 30)
|
||||
Me.Fun_Dub_Over.Name = "Fun_Dub_Over"
|
||||
Me.Fun_Dub_Over.Size = New System.Drawing.Size(326, 29)
|
||||
Me.Fun_Dub_Over.Sorted = True
|
||||
Me.Fun_Dub_Over.TabIndex = 40
|
||||
Me.Fun_Dub_Over.UseSelectable = True
|
||||
'
|
||||
'GroupBox7
|
||||
'
|
||||
Me.GroupBox7.BackColor = System.Drawing.Color.Transparent
|
||||
Me.GroupBox7.Controls.Add(Me.CB_Fun_HardSubs)
|
||||
Me.GroupBox7.Font = New System.Drawing.Font("Arial", 9.75!)
|
||||
Me.GroupBox7.ForeColor = System.Drawing.Color.Black
|
||||
Me.GroupBox7.Location = New System.Drawing.Point(0, 440)
|
||||
Me.GroupBox7.Name = "GroupBox7"
|
||||
Me.GroupBox7.Size = New System.Drawing.Size(490, 69)
|
||||
Me.GroupBox7.TabIndex = 40
|
||||
Me.GroupBox7.TabStop = False
|
||||
Me.GroupBox7.Text = "Hard Subtitle (post-processed)"
|
||||
'
|
||||
'CB_Fun_HardSubs
|
||||
'
|
||||
Me.CB_Fun_HardSubs.DropDownHeight = 250
|
||||
Me.CB_Fun_HardSubs.Enabled = False
|
||||
Me.CB_Fun_HardSubs.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.CB_Fun_HardSubs.FormattingEnabled = True
|
||||
Me.CB_Fun_HardSubs.IntegralHeight = False
|
||||
Me.CB_Fun_HardSubs.ItemHeight = 23
|
||||
Me.CB_Fun_HardSubs.Items.AddRange(New Object() {"Disabled", "English", "Español (LA)", "Português (Brasil)"})
|
||||
Me.CB_Fun_HardSubs.Location = New System.Drawing.Point(79, 30)
|
||||
Me.CB_Fun_HardSubs.Name = "CB_Fun_HardSubs"
|
||||
Me.CB_Fun_HardSubs.Size = New System.Drawing.Size(326, 29)
|
||||
Me.CB_Fun_HardSubs.Sorted = True
|
||||
Me.CB_Fun_HardSubs.TabIndex = 32
|
||||
Me.CB_Fun_HardSubs.UseSelectable = True
|
||||
'
|
||||
'GroupBox9
|
||||
'
|
||||
Me.GroupBox9.BackColor = System.Drawing.Color.Transparent
|
||||
Me.GroupBox9.Controls.Add(Me.GroupBox13)
|
||||
Me.GroupBox9.Controls.Add(Me.GroupBox11)
|
||||
Me.GroupBox9.Controls.Add(Me.GroupBox8)
|
||||
Me.GroupBox9.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.GroupBox9.Location = New System.Drawing.Point(0, 80)
|
||||
Me.GroupBox9.Name = "GroupBox9"
|
||||
Me.GroupBox9.Size = New System.Drawing.Size(490, 275)
|
||||
Me.GroupBox9.TabIndex = 50
|
||||
Me.GroupBox9.TabStop = False
|
||||
Me.GroupBox9.Text = "Soft-Subtitle"
|
||||
'
|
||||
'GroupBox13
|
||||
'
|
||||
Me.GroupBox13.BackColor = System.Drawing.Color.Transparent
|
||||
Me.GroupBox13.Controls.Add(Me.FunSubDef)
|
||||
Me.GroupBox13.Font = New System.Drawing.Font("Arial", 9.75!)
|
||||
Me.GroupBox13.ForeColor = System.Drawing.Color.Black
|
||||
Me.GroupBox13.Location = New System.Drawing.Point(10, 180)
|
||||
Me.GroupBox13.Name = "GroupBox13"
|
||||
Me.GroupBox13.Size = New System.Drawing.Size(474, 82)
|
||||
Me.GroupBox13.TabIndex = 70
|
||||
Me.GroupBox13.TabStop = False
|
||||
Me.GroupBox13.Text = "Default Subtitle"
|
||||
'
|
||||
'FunSubDef
|
||||
'
|
||||
Me.FunSubDef.DropDownHeight = 250
|
||||
Me.FunSubDef.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.FunSubDef.FormattingEnabled = True
|
||||
Me.FunSubDef.IntegralHeight = False
|
||||
Me.FunSubDef.ItemHeight = 23
|
||||
Me.FunSubDef.Items.AddRange(New Object() {"[Disabled]"})
|
||||
Me.FunSubDef.Location = New System.Drawing.Point(69, 30)
|
||||
Me.FunSubDef.Name = "FunSubDef"
|
||||
Me.FunSubDef.Size = New System.Drawing.Size(326, 29)
|
||||
Me.FunSubDef.Sorted = True
|
||||
Me.FunSubDef.TabIndex = 39
|
||||
Me.FunSubDef.UseSelectable = True
|
||||
'
|
||||
'GroupBox11
|
||||
'
|
||||
Me.GroupBox11.BackColor = System.Drawing.Color.Transparent
|
||||
Me.GroupBox11.Controls.Add(Me.CB_srt)
|
||||
Me.GroupBox11.Controls.Add(Me.CB_vtt)
|
||||
Me.GroupBox11.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.GroupBox11.Location = New System.Drawing.Point(10, 100)
|
||||
Me.GroupBox11.Name = "GroupBox11"
|
||||
Me.GroupBox11.Size = New System.Drawing.Size(474, 75)
|
||||
Me.GroupBox11.TabIndex = 60
|
||||
Me.GroupBox11.TabStop = False
|
||||
Me.GroupBox11.Text = "Format"
|
||||
'
|
||||
'CB_srt
|
||||
'
|
||||
Me.CB_srt.AutoSize = True
|
||||
Me.CB_srt.FontSize = MetroFramework.MetroCheckBoxSize.Medium
|
||||
Me.CB_srt.ForeColor = System.Drawing.Color.Black
|
||||
Me.CB_srt.Location = New System.Drawing.Point(139, 35)
|
||||
Me.CB_srt.Name = "CB_srt"
|
||||
Me.CB_srt.Size = New System.Drawing.Size(41, 19)
|
||||
Me.CB_srt.TabIndex = 36
|
||||
Me.CB_srt.Text = "srt"
|
||||
Me.CB_srt.UseSelectable = True
|
||||
'
|
||||
'CB_vtt
|
||||
'
|
||||
Me.CB_vtt.AutoSize = True
|
||||
Me.CB_vtt.FontSize = MetroFramework.MetroCheckBoxSize.Medium
|
||||
Me.CB_vtt.ForeColor = System.Drawing.Color.Black
|
||||
Me.CB_vtt.Location = New System.Drawing.Point(261, 35)
|
||||
Me.CB_vtt.Name = "CB_vtt"
|
||||
Me.CB_vtt.Size = New System.Drawing.Size(42, 19)
|
||||
Me.CB_vtt.TabIndex = 37
|
||||
Me.CB_vtt.Text = "vtt"
|
||||
Me.CB_vtt.UseSelectable = True
|
||||
'
|
||||
'GroupBox8
|
||||
'
|
||||
Me.GroupBox8.BackColor = System.Drawing.Color.Transparent
|
||||
Me.GroupBox8.Controls.Add(Me.CB_fun_eng)
|
||||
Me.GroupBox8.Controls.Add(Me.CB_fun_es)
|
||||
Me.GroupBox8.Controls.Add(Me.CB_fun_ptbr)
|
||||
Me.GroupBox8.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.GroupBox8.Location = New System.Drawing.Point(10, 21)
|
||||
Me.GroupBox8.Name = "GroupBox8"
|
||||
Me.GroupBox8.Size = New System.Drawing.Size(474, 75)
|
||||
Me.GroupBox8.TabIndex = 61
|
||||
Me.GroupBox8.TabStop = False
|
||||
Me.GroupBox8.Text = "Language"
|
||||
'
|
||||
'CB_fun_eng
|
||||
'
|
||||
Me.CB_fun_eng.AutoSize = True
|
||||
Me.CB_fun_eng.FontSize = MetroFramework.MetroCheckBoxSize.Medium
|
||||
Me.CB_fun_eng.ForeColor = System.Drawing.Color.Black
|
||||
Me.CB_fun_eng.Location = New System.Drawing.Point(34, 35)
|
||||
Me.CB_fun_eng.Name = "CB_fun_eng"
|
||||
Me.CB_fun_eng.Size = New System.Drawing.Size(68, 19)
|
||||
Me.CB_fun_eng.TabIndex = 33
|
||||
Me.CB_fun_eng.Text = "English"
|
||||
Me.CB_fun_eng.UseSelectable = True
|
||||
'
|
||||
'CB_fun_es
|
||||
'
|
||||
Me.CB_fun_es.AutoSize = True
|
||||
Me.CB_fun_es.FontSize = MetroFramework.MetroCheckBoxSize.Medium
|
||||
Me.CB_fun_es.ForeColor = System.Drawing.Color.Black
|
||||
Me.CB_fun_es.Location = New System.Drawing.Point(148, 35)
|
||||
Me.CB_fun_es.Name = "CB_fun_es"
|
||||
Me.CB_fun_es.Size = New System.Drawing.Size(100, 19)
|
||||
Me.CB_fun_es.TabIndex = 34
|
||||
Me.CB_fun_es.Text = "Español (LA)"
|
||||
Me.CB_fun_es.UseSelectable = True
|
||||
'
|
||||
'CB_fun_ptbr
|
||||
'
|
||||
Me.CB_fun_ptbr.AutoSize = True
|
||||
Me.CB_fun_ptbr.FontSize = MetroFramework.MetroCheckBoxSize.Medium
|
||||
Me.CB_fun_ptbr.ForeColor = System.Drawing.Color.Black
|
||||
Me.CB_fun_ptbr.Location = New System.Drawing.Point(270, 35)
|
||||
Me.CB_fun_ptbr.Name = "CB_fun_ptbr"
|
||||
Me.CB_fun_ptbr.Size = New System.Drawing.Size(131, 19)
|
||||
Me.CB_fun_ptbr.TabIndex = 35
|
||||
Me.CB_fun_ptbr.Text = "Português (Brasil)"
|
||||
Me.CB_fun_ptbr.UseSelectable = True
|
||||
'
|
||||
'TabPage7
|
||||
'
|
||||
Me.TabPage7.BackColor = System.Drawing.Color.Transparent
|
||||
|
@ -1770,11 +1463,11 @@ Partial Class Einstellungen
|
|||
Me.TabPage7.Controls.Add(Me.Label4)
|
||||
Me.TabPage7.Controls.Add(Me.Label6)
|
||||
Me.TabPage7.Controls.Add(Me.Label5)
|
||||
Me.TabPage7.Location = New System.Drawing.Point(4, 35)
|
||||
Me.TabPage7.Location = New System.Drawing.Point(4, 54)
|
||||
Me.TabPage7.Name = "TabPage7"
|
||||
Me.TabPage7.Size = New System.Drawing.Size(501, 528)
|
||||
Me.TabPage7.Size = New System.Drawing.Size(501, 509)
|
||||
Me.TabPage7.TabIndex = 5
|
||||
Me.TabPage7.Text = " About "
|
||||
Me.TabPage7.Text = " About "
|
||||
'
|
||||
'LastVersion
|
||||
'
|
||||
|
@ -1904,6 +1597,20 @@ Partial Class Einstellungen
|
|||
Me.Btn_Save.TabIndex = 9
|
||||
Me.Btn_Save.UseVisualStyleBackColor = False
|
||||
'
|
||||
'DD_Update
|
||||
'
|
||||
Me.DD_Update.DropDownHeight = 275
|
||||
Me.DD_Update.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.DD_Update.FormattingEnabled = True
|
||||
Me.DD_Update.IntegralHeight = False
|
||||
Me.DD_Update.ItemHeight = 23
|
||||
Me.DD_Update.Items.AddRange(New Object() {"Skip Updates", "Notify Only", "Notify Only (Beta Versions)", "Automatic Updates", "Automatic Updates (Beta Versions)"})
|
||||
Me.DD_Update.Location = New System.Drawing.Point(21, 90)
|
||||
Me.DD_Update.Name = "DD_Update"
|
||||
Me.DD_Update.Size = New System.Drawing.Size(215, 29)
|
||||
Me.DD_Update.TabIndex = 47
|
||||
Me.DD_Update.UseSelectable = True
|
||||
'
|
||||
'Einstellungen
|
||||
'
|
||||
Me.ApplyImageInvert = True
|
||||
|
@ -1947,7 +1654,6 @@ Partial Class Einstellungen
|
|||
CType(Me.NumericUpDown2, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.GroupBox5.ResumeLayout(False)
|
||||
Me.GroupBox5.PerformLayout()
|
||||
Me.GroupBox1.ResumeLayout(False)
|
||||
Me.DL_Count_simultaneous.ResumeLayout(False)
|
||||
CType(Me.NumericUpDown1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.TabControl1.ResumeLayout(False)
|
||||
|
@ -1963,16 +1669,6 @@ Partial Class Einstellungen
|
|||
Me.GroupBox20.ResumeLayout(False)
|
||||
Me.GroupBox20.PerformLayout()
|
||||
Me.GroupBox19.ResumeLayout(False)
|
||||
Me.TabPage6.ResumeLayout(False)
|
||||
Me.GroupBox15.ResumeLayout(False)
|
||||
Me.GroupBox10.ResumeLayout(False)
|
||||
Me.GroupBox7.ResumeLayout(False)
|
||||
Me.GroupBox9.ResumeLayout(False)
|
||||
Me.GroupBox13.ResumeLayout(False)
|
||||
Me.GroupBox11.ResumeLayout(False)
|
||||
Me.GroupBox11.PerformLayout()
|
||||
Me.GroupBox8.ResumeLayout(False)
|
||||
Me.GroupBox8.PerformLayout()
|
||||
Me.TabPage7.ResumeLayout(False)
|
||||
CType(Me.PictureBox7, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
|
@ -2005,7 +1701,6 @@ Partial Class Einstellungen
|
|||
Friend WithEvents FFMPEG_CommandP4 As ToolStripMenuItem
|
||||
Friend WithEvents GB_Resolution As GroupBox
|
||||
Friend WithEvents GroupBox5 As GroupBox
|
||||
Friend WithEvents GroupBox1 As GroupBox
|
||||
Friend WithEvents DL_Count_simultaneous As GroupBox
|
||||
Friend WithEvents NumericUpDown1 As NumericUpDown
|
||||
Friend WithEvents SoftSubs As GroupBox
|
||||
|
@ -2016,26 +1711,15 @@ Partial Class Einstellungen
|
|||
Private WithEvents TabPage2 As MetroFramework.Controls.MetroTabPage
|
||||
Private WithEvents TabPage1 As MetroFramework.Controls.MetroTabPage
|
||||
Private WithEvents TabControl1 As MetroFramework.Controls.MetroTabControl
|
||||
Private WithEvents TabPage6 As MetroFramework.Controls.MetroTabPage
|
||||
Friend WithEvents TabPage7 As TabPage
|
||||
Friend WithEvents PictureBox7 As PictureBox
|
||||
Friend WithEvents GroupBox7 As GroupBox
|
||||
Friend WithEvents GroupBox9 As GroupBox
|
||||
Friend WithEvents GroupBox10 As GroupBox
|
||||
Friend WithEvents GroupBox11 As GroupBox
|
||||
Friend WithEvents Button1 As Button
|
||||
Friend WithEvents Label1 As MetroFramework.Controls.MetroLabel
|
||||
Friend WithEvents Label2 As MetroFramework.Controls.MetroLabel
|
||||
Public WithEvents Label4 As MetroFramework.Controls.MetroLabel
|
||||
Public WithEvents Label6 As MetroFramework.Controls.MetroLabel
|
||||
Public WithEvents Label5 As MetroFramework.Controls.MetroLabel
|
||||
Friend WithEvents CheckBox2 As MetroFramework.Controls.MetroCheckBox
|
||||
Friend WithEvents CB_fun_ptbr As MetroFramework.Controls.MetroCheckBox
|
||||
Friend WithEvents CB_fun_es As MetroFramework.Controls.MetroCheckBox
|
||||
Friend WithEvents CB_fun_eng As MetroFramework.Controls.MetroCheckBox
|
||||
Friend WithEvents CB_srt As MetroFramework.Controls.MetroCheckBox
|
||||
Friend WithEvents CB_vtt As MetroFramework.Controls.MetroCheckBox
|
||||
Friend WithEvents AAuto As MetroFramework.Controls.MetroRadioButton
|
||||
Friend WithEvents A240p As MetroFramework.Controls.MetroRadioButton
|
||||
Friend WithEvents A480p As MetroFramework.Controls.MetroRadioButton
|
||||
Friend WithEvents A360p As MetroFramework.Controls.MetroRadioButton
|
||||
Friend WithEvents A720p As MetroFramework.Controls.MetroRadioButton
|
||||
|
@ -2046,15 +1730,10 @@ Partial Class Einstellungen
|
|||
Public WithEvents Label3 As MetroFramework.Controls.MetroLabel
|
||||
Friend WithEvents MetroLabel1 As MetroFramework.Controls.MetroLabel
|
||||
Friend WithEvents DarkMode As MetroFramework.Controls.MetroCheckBox
|
||||
Friend WithEvents TextBox1 As MetroFramework.Controls.MetroTextBox
|
||||
Friend WithEvents CB_CR_Harsubs As MetroFramework.Controls.MetroComboBox
|
||||
Friend WithEvents CB_Fun_HardSubs As MetroFramework.Controls.MetroComboBox
|
||||
Friend WithEvents Fun_Dub_Over As MetroFramework.Controls.MetroComboBox
|
||||
Public WithEvents LastVersion As MetroFramework.Controls.MetroLabel
|
||||
Friend WithEvents BackgroundWorker1 As System.ComponentModel.BackgroundWorker
|
||||
Friend WithEvents http_support As MetroFramework.Controls.MetroComboBox
|
||||
Friend WithEvents GroupBox13 As GroupBox
|
||||
Friend WithEvents FunSubDef As MetroFramework.Controls.MetroComboBox
|
||||
Friend WithEvents GroupBox14 As GroupBox
|
||||
Friend WithEvents CB_Format As MetroFramework.Controls.MetroComboBox
|
||||
Friend WithEvents MetroTabPage1 As MetroFramework.Controls.MetroTabPage
|
||||
|
@ -2068,9 +1747,6 @@ Partial Class Einstellungen
|
|||
Friend WithEvents ListBit_4500 As ToolStripMenuItem
|
||||
Friend WithEvents ListBit_3500 As ToolStripMenuItem
|
||||
Friend WithEvents ListBit_2500 As ToolStripMenuItem
|
||||
Friend WithEvents GroupBox8 As GroupBox
|
||||
Friend WithEvents GroupBox15 As GroupBox
|
||||
Friend WithEvents Bitrate_Funi As MetroFramework.Controls.MetroComboBox
|
||||
Friend WithEvents GroupBox16 As GroupBox
|
||||
Friend WithEvents DD_DLMode As MetroFramework.Controls.MetroComboBox
|
||||
Friend WithEvents MetroTabPage2 As MetroFramework.Controls.MetroTabPage
|
||||
|
@ -2118,4 +1794,6 @@ Partial Class Einstellungen
|
|||
Friend WithEvents CB_Mod1 As MetroFramework.Controls.MetroCheckBox
|
||||
Friend WithEvents CB_vttStyle As MetroFramework.Controls.MetroCheckBox
|
||||
Friend WithEvents AMD_AV1 As ToolStripMenuItem
|
||||
Friend WithEvents CB_HideQueue As MetroFramework.Controls.MetroCheckBox
|
||||
Friend WithEvents DD_Update As MetroFramework.Controls.MetroComboBox
|
||||
End Class
|
||||
|
|
|
@ -126,6 +126,9 @@
|
|||
<metadata name="MenuStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>118, 20</value>
|
||||
</metadata>
|
||||
<metadata name="MenuStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>118, 20</value>
|
||||
</metadata>
|
||||
<metadata name="BackgroundWorker1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>332, 20</value>
|
||||
</metadata>
|
||||
|
|
|
@ -19,13 +19,14 @@ Public Class Einstellungen
|
|||
Public CR_SoftSubsTemp As New List(Of String)
|
||||
Dim TempCheckSubMod1 As Boolean = False
|
||||
Dim TempVTTStyle As Boolean = False
|
||||
Dim TempMultiDL As Boolean = False
|
||||
|
||||
Private Sub Einstellungen_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||
|
||||
Label6.Text = "You have: v" + Application.ProductVersion.ToString '+ " WebView2_Test"
|
||||
|
||||
BackgroundWorker1.RunWorkerAsync()
|
||||
|
||||
DD_Update.SelectedIndex = My.Settings.UpdateMode
|
||||
|
||||
'CR_Anime_Folge = CR_Name_Staffel0_Folge1(1)
|
||||
'If GitHubLastTag1(0)
|
||||
|
@ -34,6 +35,8 @@ Public Class Einstellungen
|
|||
Manager.Owner = Me
|
||||
Me.StyleManager = Manager
|
||||
|
||||
CB_HideQueue.Checked = My.Settings.HiddenQueue
|
||||
|
||||
CB_OverrideDub.Checked = My.Settings.OverrideDub
|
||||
CB_Cap.Checked = My.Settings.Captions
|
||||
|
||||
|
@ -44,8 +47,6 @@ Public Class Einstellungen
|
|||
TempTB.Text = Main.TempFolder
|
||||
LeadingZeroDD.SelectedIndex = Main.LeadingZero
|
||||
|
||||
Bitrate_Funi.SelectedIndex = Main.Funimation_Bitrate
|
||||
|
||||
CB_Ignore.SelectedIndex = Main.IgnoreSeason
|
||||
|
||||
CB_HideSF.SelectedIndex = Main.HideFLInt
|
||||
|
@ -106,16 +107,7 @@ Public Class Einstellungen
|
|||
|
||||
#End Region
|
||||
|
||||
For i As Integer = 0 To Main.SubFunimation.Count - 1
|
||||
If Main.SubFunimation(i) = "en" Then
|
||||
CB_fun_eng.Checked = True
|
||||
ElseIf Main.SubFunimation(i) = "es" Then
|
||||
CB_fun_es.Checked = True
|
||||
ElseIf Main.SubFunimation(i) = "pt" Then
|
||||
CB_fun_ptbr.Checked = True
|
||||
End If
|
||||
|
||||
Next
|
||||
|
||||
Me.Location = New Point(CInt(Main.Location.X + Main.Width / 2 - Me.Width / 2), CInt(Main.Location.Y + Main.Height / 2 - Me.Height / 2))
|
||||
Try
|
||||
|
@ -132,32 +124,8 @@ Public Class Einstellungen
|
|||
DD_DLMode.SelectedIndex = 0
|
||||
End If
|
||||
|
||||
If Main.Funimation_srt = True Then
|
||||
CB_srt.Checked = True
|
||||
Else
|
||||
CB_srt.Checked = False
|
||||
End If
|
||||
|
||||
If Main.Funimation_vtt = True Then
|
||||
CB_vtt.Checked = True
|
||||
Else
|
||||
CB_vtt.Checked = False
|
||||
End If
|
||||
|
||||
|
||||
If Main.HardSubFunimation = "en" Then
|
||||
CB_Fun_HardSubs.SelectedItem = "English"
|
||||
|
||||
ElseIf Main.HardSubFunimation = "pt" Then
|
||||
CB_Fun_HardSubs.SelectedItem = "Português (Brasil)"
|
||||
|
||||
ElseIf Main.HardSubFunimation = "es" Then
|
||||
CB_Fun_HardSubs.SelectedItem = "Español (LA)"
|
||||
|
||||
Else
|
||||
CB_Fun_HardSubs.SelectedItem = "Disabled"
|
||||
'FunimationHardsub.Checked = True
|
||||
End If
|
||||
If Main.VideoFormat = ".mkv" Then
|
||||
CB_Format.SelectedItem = "MKV"
|
||||
ElseIf Main.VideoFormat = ".aac" Then
|
||||
|
@ -166,22 +134,6 @@ Public Class Einstellungen
|
|||
CB_Format.SelectedItem = "MP4"
|
||||
End If
|
||||
|
||||
If Main.DubFunimation = "english" Then
|
||||
Fun_Dub_Over.SelectedItem = "english"
|
||||
|
||||
ElseIf Main.DubFunimation = "japanese" Then
|
||||
Fun_Dub_Over.SelectedItem = "japanese"
|
||||
|
||||
ElseIf Main.DubFunimation = "portuguese(Brazil)" Then
|
||||
Fun_Dub_Over.SelectedItem = "portuguese(Brazil)"
|
||||
|
||||
ElseIf Main.DubFunimation = "spanish(Mexico)" Then
|
||||
Fun_Dub_Over.SelectedItem = "spanish(Mexico)"
|
||||
|
||||
Else
|
||||
Fun_Dub_Over.SelectedItem = "Disabled"
|
||||
End If
|
||||
|
||||
|
||||
Try
|
||||
GB_Resolution.Text = Main.GB_Resolution_Text
|
||||
|
@ -199,8 +151,8 @@ Public Class Einstellungen
|
|||
A480p.Checked = True
|
||||
ElseIf Main.Reso = 360 Then
|
||||
A360p.Checked = True
|
||||
ElseIf Main.Reso = 42 Then
|
||||
AAuto.Checked = True
|
||||
ElseIf Main.Reso = 240 Then
|
||||
A240p.Checked = True
|
||||
End If
|
||||
|
||||
CB_CR_Harsubs.Items.Clear()
|
||||
|
@ -238,7 +190,7 @@ Public Class Einstellungen
|
|||
|
||||
NumericUpDown2.Value = Main.ErrorTolerance
|
||||
NumericUpDown1.Value = Main.MaxDL
|
||||
TextBox1.Text = Main.Startseite
|
||||
|
||||
|
||||
Try
|
||||
|
||||
|
@ -291,18 +243,6 @@ Public Class Einstellungen
|
|||
End If
|
||||
|
||||
|
||||
If Main.DefaultSubFunimation = "en" Then
|
||||
FunSubDef.SelectedItem = "English"
|
||||
ElseIf Main.DefaultSubFunimation = "pt" Then
|
||||
FunSubDef.SelectedItem = "Português (Brasil)"
|
||||
ElseIf Main.DefaultSubFunimation = "es" Then
|
||||
FunSubDef.SelectedItem = "Español (LA)"
|
||||
Else
|
||||
FunSubDef.SelectedItem = "[Disabled]"
|
||||
'FunimationHardsub.Checked = True
|
||||
End If
|
||||
|
||||
|
||||
|
||||
If Main.DefaultSubCR = "de-DE" Then
|
||||
CR_SoftSubDefault.SelectedItem = "Deutsch"
|
||||
|
@ -358,9 +298,7 @@ Public Class Einstellungen
|
|||
My.Settings.LeadingZero = LeadingZeroDD.SelectedIndex
|
||||
My.Settings.OverrideDub = CB_OverrideDub.Checked
|
||||
My.Settings.Captions = CB_Cap.Checked
|
||||
Main.Funimation_Bitrate = Bitrate_Funi.SelectedIndex
|
||||
My.Settings.Funimation_Bitrate = Bitrate_Funi.SelectedIndex
|
||||
|
||||
My.Settings.UpdateMode = DD_Update.SelectedIndex
|
||||
|
||||
If http_support.Text = "add-on support disabled" Then
|
||||
My.Settings.ServerPort = 0
|
||||
|
@ -430,15 +368,9 @@ Public Class Einstellungen
|
|||
End If
|
||||
|
||||
' MsgBox(Name_season.Text)
|
||||
If CBool(InStr(TextBox1.Text, "https://")) Then
|
||||
Main.Startseite = TextBox1.Text
|
||||
My.Settings.Startseite = Main.Startseite
|
||||
ElseIf TextBox1.Text = Nothing Then
|
||||
Main.Startseite = "https://www.crunchyroll.com/"
|
||||
My.Settings.Startseite = Main.Startseite
|
||||
Else
|
||||
|
||||
End If
|
||||
|
||||
|
||||
If DD_Season_Prefix.Text IsNot "[default season prefix]" Then
|
||||
Main.Season_Prefix = DD_Season_Prefix.Text
|
||||
My.Settings.Prefix_S = Main.Season_Prefix
|
||||
|
@ -461,8 +393,8 @@ Public Class Einstellungen
|
|||
ElseIf A480p.Checked Then
|
||||
Main.Reso = 480
|
||||
My.Settings.Reso = Main.Reso
|
||||
ElseIf AAuto.Checked Then
|
||||
Main.Reso = 42
|
||||
ElseIf A240p.Checked Then
|
||||
Main.Reso = 240
|
||||
My.Settings.Reso = Main.Reso
|
||||
End If
|
||||
|
||||
|
@ -570,101 +502,6 @@ Public Class Einstellungen
|
|||
My.Settings.Keep_Cache = Main.KeepCache
|
||||
|
||||
|
||||
#Region "funimation"
|
||||
|
||||
|
||||
|
||||
|
||||
Main.DubFunimation = Fun_Dub_Over.SelectedItem.ToString
|
||||
|
||||
|
||||
My.Settings.FunimationDub = Main.DubFunimation
|
||||
|
||||
|
||||
'If CB_Fun_HardSubs.SelectedItem.ToString = "Disabled" Then
|
||||
' Main.HardSubFunimation = "Disabled"
|
||||
' rk.SetValue("FunimationHardsub", "Disabled", RegistryValueKind.String)
|
||||
|
||||
'ElseIf CB_Fun_HardSubs.SelectedItem.ToString = "English" Then
|
||||
' Main.HardSubFunimation = "en"
|
||||
' rk.SetValue("FunimationHardsub", "en", RegistryValueKind.String)
|
||||
|
||||
'ElseIf CB_Fun_HardSubs.SelectedItem.ToString = "Português (Brasil)" Then
|
||||
' Main.HardSubFunimation = "pt"
|
||||
' rk.SetValue("FunimationHardsub", "pt", RegistryValueKind.String)
|
||||
|
||||
'ElseIf CB_Fun_HardSubs.SelectedItem.ToString = "Español (LA)" Then
|
||||
' Main.HardSubFunimation = "es"
|
||||
' rk.SetValue("FunimationHardsub", "es", RegistryValueKind.String)
|
||||
|
||||
'End If
|
||||
|
||||
If FunSubDef.SelectedItem.ToString = "[Disabled]" Then
|
||||
Main.DefaultSubFunimation = "Disabled"
|
||||
My.Settings.DefaultSubFunimation = Main.DefaultSubFunimation
|
||||
ElseIf FunSubDef.SelectedItem.ToString = "English" Then
|
||||
Main.DefaultSubFunimation = "en"
|
||||
My.Settings.DefaultSubFunimation = Main.DefaultSubFunimation
|
||||
ElseIf FunSubDef.SelectedItem.ToString = "Português (Brasil)" Then
|
||||
Main.DefaultSubFunimation = "pt"
|
||||
My.Settings.DefaultSubFunimation = Main.DefaultSubFunimation
|
||||
ElseIf FunSubDef.SelectedItem.ToString = "Español (LA)" Then
|
||||
Main.DefaultSubFunimation = "es"
|
||||
My.Settings.DefaultSubFunimation = Main.DefaultSubFunimation
|
||||
End If
|
||||
|
||||
Main.SubFunimation.Clear()
|
||||
If CB_fun_eng.Checked = True Then
|
||||
Main.SubFunimation.Add("en")
|
||||
End If
|
||||
|
||||
If CB_fun_es.Checked = True Then
|
||||
Main.SubFunimation.Add("es")
|
||||
|
||||
End If
|
||||
|
||||
If CB_fun_ptbr.Checked = True Then
|
||||
Main.SubFunimation.Add("pt")
|
||||
End If
|
||||
|
||||
If Main.SubFunimation.Count > 0 And CB_vtt.Checked = False And CB_srt.Checked = False Then
|
||||
CB_vtt.Checked = True
|
||||
End If
|
||||
|
||||
|
||||
If CB_srt.Checked = True Then
|
||||
Main.Funimation_srt = True
|
||||
My.Settings.Funimation_srt = True
|
||||
Else
|
||||
Main.Funimation_srt = False
|
||||
My.Settings.Funimation_srt = False
|
||||
End If
|
||||
If CB_vtt.Checked = True Then
|
||||
Main.Funimation_vtt = True
|
||||
My.Settings.Funimation_vtt = True
|
||||
Else
|
||||
Main.Funimation_vtt = False
|
||||
My.Settings.Funimation_vtt = False
|
||||
End If
|
||||
|
||||
|
||||
Dim FunimationSaveString As String = Nothing
|
||||
For ii As Integer = 0 To Main.SubFunimation.Count - 1
|
||||
If FunimationSaveString = Nothing Then
|
||||
FunimationSaveString = Main.SubFunimation(ii)
|
||||
Else
|
||||
FunimationSaveString = FunimationSaveString + "," + Main.SubFunimation(ii)
|
||||
End If
|
||||
Next
|
||||
If FunimationSaveString = Nothing Then
|
||||
FunimationSaveString = "None"
|
||||
End If
|
||||
My.Settings.Fun_Sub = FunimationSaveString
|
||||
|
||||
#End Region
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
Dim ffpmeg_cmd As String = Nothing
|
||||
|
@ -706,14 +543,10 @@ Public Class Einstellungen
|
|||
Main.ErrorTolerance = CInt(NumericUpDown2.Value)
|
||||
My.Settings.ErrorTolerance = Main.ErrorTolerance
|
||||
|
||||
If ListViewAdd_True.Checked = True Then
|
||||
Main.UseQueue = True
|
||||
My.Settings.QueueMode = Main.UseQueue
|
||||
ElseIf ListViewAdd_True.Checked = False Then
|
||||
Main.UseQueue = False
|
||||
My.Settings.QueueMode = Main.UseQueue
|
||||
End If
|
||||
Main.UseQueue = ListViewAdd_True.Checked
|
||||
My.Settings.QueueMode = Main.UseQueue
|
||||
|
||||
My.Settings.HiddenQueue = CB_HideQueue.Checked
|
||||
|
||||
Main.SoftSubs.Clear()
|
||||
Main.SoftSubs.AddRange(CR_SoftSubsTemp)
|
||||
|
@ -789,7 +622,7 @@ Public Class Einstellungen
|
|||
End Sub
|
||||
|
||||
|
||||
Private Sub ComboBox1_DrawItem(sender As Object, e As DrawItemEventArgs) Handles CB_CR_Harsubs.DrawItem, CB_Fun_HardSubs.DrawItem, Fun_Dub_Over.DrawItem
|
||||
Private Sub ComboBox1_DrawItem(sender As Object, e As DrawItemEventArgs) Handles CB_CR_Harsubs.DrawItem
|
||||
Dim CB As ComboBox = CType(sender, ComboBox)
|
||||
CB.BackColor = Color.White
|
||||
If e.Index >= 0 Then
|
||||
|
@ -804,52 +637,6 @@ Public Class Einstellungen
|
|||
End Sub
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
Private Sub AAuto_Click(sender As Object, e As EventArgs) Handles AAuto.Click
|
||||
If CB_Merge.SelectedIndex > 0 Then
|
||||
If AAuto.Checked = True Then
|
||||
If MessageBox.Show("Resolution '[Auto]' and merge the subtitle with the video file will download all resolutions!" + vbNewLine + "Press 'Yes' to enable it anyway", "Prepare for unforeseen consequences.", MessageBoxButtons.YesNo) = DialogResult.Yes Then
|
||||
|
||||
Else
|
||||
AAuto.Checked = False
|
||||
A360p.Checked = True
|
||||
End If
|
||||
End If
|
||||
'ElseIf HybridMode_CB.Checked = True Then
|
||||
' If AAuto.Checked = True Then
|
||||
' MsgBox("Resolution '[Auto]' and 'Hybride Mode' does not work together", MsgBoxStyle.Information)
|
||||
' AAuto.Checked = False
|
||||
' A1080p.Checked = True
|
||||
' End If
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub MergeMP4_Click(sender As Object, e As EventArgs)
|
||||
If CB_Merge.SelectedIndex > 0 Then
|
||||
If AAuto.Checked = True Then
|
||||
If MessageBox.Show("Resolution '[Auto]' and merge the subtitle with the video file will download all resolutions!" + vbNewLine + "Press 'Yes' to enable it anyway", "Prepare for unforeseen consequences.", MessageBoxButtons.YesNo) = DialogResult.Yes Then
|
||||
|
||||
Else
|
||||
CB_Merge.SelectedIndex = 0
|
||||
End If
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
Private Sub ListC1_Click(sender As Object, e As EventArgs) Handles copy.Click, nv_h264.Click, nv_hevc.Click, nv_AV1.Click, CPU_h264.Click, CPU_h265.Click, CPU_AV1.Click, AMD_h264.Click, AMD_hevc.Click, AMD_AV1.Click, Intel_h264.Click, Intel_hevc.Click, Intel_AV1.Click
|
||||
Dim Button As ToolStripMenuItem = CType(sender, ToolStripMenuItem)
|
||||
|
||||
|
@ -892,21 +679,6 @@ Public Class Einstellungen
|
|||
End Sub
|
||||
|
||||
|
||||
|
||||
Private Sub Label7_Click(sender As Object, e As EventArgs)
|
||||
Process.Start("https://learn.microsoft.com/de-de/microsoft-edge/webview2/")
|
||||
End Sub
|
||||
|
||||
Private Sub Label3_Click(sender As Object, e As EventArgs)
|
||||
Process.Start("https://www.ffmpeg.org/about.html")
|
||||
End Sub
|
||||
|
||||
Private Sub Label9_Click(sender As Object, e As EventArgs)
|
||||
Process.Start("https://github.com/hama3254/metroframework-modern-ui")
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
Sub GroupBoxColor(ByVal color As Color)
|
||||
NumericUpDown1.ForeColor = color
|
||||
NumericUpDown2.ForeColor = color
|
||||
|
@ -919,21 +691,13 @@ Public Class Einstellungen
|
|||
DL_Count_simultaneous.ForeColor = color
|
||||
GB_Resolution.ForeColor = color
|
||||
GB_Filename_Pre.ForeColor = color
|
||||
GroupBox1.ForeColor = color
|
||||
GroupBox2.ForeColor = color
|
||||
GroupBox3.ForeColor = color
|
||||
GroupBox4.ForeColor = color
|
||||
GroupBox5.ForeColor = color
|
||||
GroupBox6.ForeColor = color
|
||||
GroupBox7.ForeColor = color
|
||||
GroupBox8.ForeColor = color
|
||||
GroupBox9.ForeColor = color
|
||||
GroupBox10.ForeColor = color
|
||||
GroupBox11.ForeColor = color
|
||||
GroupBox12.ForeColor = color
|
||||
GroupBox13.ForeColor = color
|
||||
GroupBox14.ForeColor = color
|
||||
GroupBox15.ForeColor = color
|
||||
GroupBox16.ForeColor = color
|
||||
GroupBox17.ForeColor = color
|
||||
GroupBox18.ForeColor = color
|
||||
|
@ -973,12 +737,6 @@ Public Class Einstellungen
|
|||
End Sub
|
||||
|
||||
|
||||
Private Sub Server_Click(sender As Object, e As EventArgs)
|
||||
'If Server.Checked = True Then
|
||||
' MsgBox("This feature requires a restart of the downloader", MsgBoxStyle.Information)
|
||||
'End If
|
||||
End Sub
|
||||
|
||||
Private Sub BackgroundWorker1_DoWork(sender As Object, e As System.ComponentModel.DoWorkEventArgs) Handles BackgroundWorker1.DoWork
|
||||
Try
|
||||
Dim client0 As New WebClient
|
||||
|
@ -1014,60 +772,6 @@ Public Class Einstellungen
|
|||
|
||||
|
||||
|
||||
Private Sub CB_Fun_HardSubs_SelectedIndexChanged(sender As Object, e As EventArgs) Handles CB_Fun_HardSubs.SelectedIndexChanged
|
||||
If CB_Fun_HardSubs.SelectedIndex = 0 Then
|
||||
Else
|
||||
If Main.HardSubFunimation = "Disabled" Then
|
||||
If FFMPEG_CommandP1.Text = "-c copy" Then
|
||||
If MessageBox.Show("Funimation hard subtitle are post-processed." + vbNewLine + "This cost a lot of performance and it should not more than one download run at the time!", "Prepare for unforeseen consequences.", MessageBoxButtons.YesNo) = DialogResult.Yes Then
|
||||
|
||||
Else
|
||||
CB_Fun_HardSubs.SelectedIndex = 0
|
||||
End If
|
||||
End If
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
'MetroMessageBox.Show(Me, "Test", "Test Box", MessageBoxButtons.YesNo, MessageBoxIcon.None, 150)
|
||||
'MetroMessageBox.Show(Me, "Test", "Test Box", MessageBoxButtons.YesNo, MessageBoxIcon.None, MessageBoxDefaultButton.Button2, 150, MetroThemeStyle.Dark)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub CB_fun_eng_CheckedChanged(sender As Object, e As EventArgs) Handles CB_fun_eng.CheckedChanged
|
||||
If CB_fun_eng.Checked = True Then
|
||||
FunSubDef.Items.Add("English")
|
||||
Else
|
||||
FunSubDef.Items.Remove("English")
|
||||
If FunSubDef.Text = "English" Then
|
||||
FunSubDef.SelectedItem = "[Disabled]"
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub CB_fun_es_CheckedChanged(sender As Object, e As EventArgs) Handles CB_fun_es.CheckedChanged
|
||||
If CB_fun_es.Checked = True Then
|
||||
FunSubDef.Items.Add("Español (LA)")
|
||||
Else
|
||||
FunSubDef.Items.Remove("Español (LA)")
|
||||
If FunSubDef.Text = "Español (LA)" Then
|
||||
FunSubDef.SelectedItem = "[Disabled]"
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub CB_fun_ptbr_CheckedChanged(sender As Object, e As EventArgs) Handles CB_fun_ptbr.CheckedChanged
|
||||
If CB_fun_ptbr.Checked = True Then
|
||||
FunSubDef.Items.Add("Português (Brasil)")
|
||||
Else
|
||||
FunSubDef.Items.Remove("Português (Brasil)")
|
||||
If FunSubDef.Text = "Português (Brasil)" Then
|
||||
FunSubDef.SelectedItem = "[Disabled]"
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub MetroLink1_Click(sender As Object, e As EventArgs)
|
||||
Process.Start("https://github.com/hama3254/Crunchyroll-Downloader-v3.0/discussions/276")
|
||||
End Sub
|
||||
|
@ -1256,15 +960,17 @@ Public Class Einstellungen
|
|||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub CB_HideQueue_CheckedChanged(sender As Object, e As EventArgs) Handles CB_HideQueue.CheckedChanged
|
||||
If CB_HideQueue.Checked = True Then
|
||||
TempMultiDL = ListViewAdd_True.Checked
|
||||
ListViewAdd_True.Checked = True
|
||||
ListViewAdd_True.Enabled = False
|
||||
|
||||
|
||||
|
||||
'Private Sub CB_CR_Audio_Click(sender As Object, e As EventArgs) Handles CB_CR_Audio.Click
|
||||
' Dim Popup As New CheckBoxComboBox
|
||||
' Popup.Text = "CR Dub selection"
|
||||
' Popup.Show()
|
||||
'End Sub
|
||||
|
||||
Else
|
||||
ListViewAdd_True.Checked = TempMultiDL
|
||||
ListViewAdd_True.Enabled = True
|
||||
End If
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
|
|
|
@ -1,5 +1,4 @@
|
|||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<packages>
|
||||
<package id="Microsoft.Web.WebView2" version="1.0.1418.22" targetFramework="net48" />
|
||||
<package id="Newtonsoft.Json" version="13.0.1" targetFramework="net452" />
|
||||
</packages>
|
|
@ -16,14 +16,22 @@ Public Class Queue
|
|||
ListBox1.ForeColor = Main.ForeColorValue
|
||||
bs.DataSource = Main.ListBoxList
|
||||
ListBox1.DataSource = bs
|
||||
|
||||
Me.Icon = My.Resources.icon
|
||||
Btn_min.Image = Main.MinImg
|
||||
Btn_Close.Image = Main.CloseImg
|
||||
|
||||
Me.StartPosition = 0
|
||||
If Main.UserQueue = False Then
|
||||
Me.Location = New Point(-10000, -10000)
|
||||
'Me.ShowInTaskbar = False
|
||||
'Me.WindowState = System.Windows.Forms.FormWindowState.Minimized
|
||||
RunQueue.Checked = True
|
||||
End If
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub Btn_Close_Click(sender As Object, e As EventArgs) Handles Btn_Close.Click
|
||||
Main.UserQueue = False
|
||||
Me.Close()
|
||||
End Sub
|
||||
|
||||
|
@ -44,7 +52,6 @@ Public Class Queue
|
|||
If Main.ListBoxList.Count <> ListBox1.Items.Count Then
|
||||
bs.ResetBindings(False)
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub Queue_Resize(sender As Object, e As EventArgs) Handles Me.Resize
|
||||
|
@ -84,48 +91,8 @@ Public Class Queue
|
|||
If Main.RunningDownloads < Main.MaxDL Then
|
||||
If Main.ListBoxList.Count > 0 Then
|
||||
|
||||
If CBool(InStr(ListBox1.GetItemText(Main.ListBoxList(0)), "funimation.com")) Then
|
||||
If Main.Funimation_Grapp_RDY = True Then
|
||||
Dim UriUsed As String = ListBox1.GetItemText(Main.ListBoxList(0))
|
||||
|
||||
If CBool(InStr(UriUsed, "funimation.com/v/")) Then
|
||||
Dim Episode0() As String = UriUsed.Split(New String() {"?"}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
Dim Episode() As String = Episode0(0).Split(New String() {"/"}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
|
||||
Dim v1JsonUrl As String = "https://d33et77evd9bgg.cloudfront.net/data/v1/episodes/" + Episode(Episode.Length - 1) + ".json"
|
||||
Dim v1Json As String = Nothing
|
||||
Try
|
||||
Using client As New WebClient()
|
||||
client.Encoding = System.Text.Encoding.UTF8
|
||||
client.Headers.Add(My.Settings.User_Agend.Replace(Chr(34), ""))
|
||||
v1Json = client.DownloadString(v1JsonUrl)
|
||||
End Using
|
||||
Main.Funimation_Grapp_RDY = False
|
||||
Main.WebbrowserURL = UriUsed
|
||||
Main.ListBoxList.Remove(UriUsed)
|
||||
Main.b = False
|
||||
Main.Invalidate()
|
||||
Main.GetFunimationNewJS_VideoProxy(Nothing, v1Json)
|
||||
Exit Sub
|
||||
Catch ex As Exception
|
||||
Debug.WriteLine("error- getting v1Json data for the bypasss")
|
||||
Debug.WriteLine(ex.ToString)
|
||||
End Try
|
||||
|
||||
End If
|
||||
|
||||
Main.Funimation_Grapp_RDY = False
|
||||
Main.WebbrowserURL = UriUsed
|
||||
Main.ListBoxList.Remove(UriUsed)
|
||||
Main.b = False
|
||||
|
||||
|
||||
Main.Text = "Status: loading in browser"
|
||||
Main.LoadBrowser(UriUsed)
|
||||
End If
|
||||
|
||||
Else
|
||||
Dim UriUsed As String = ListBox1.GetItemText(Main.ListBoxList(0))
|
||||
Dim UriUsed As String = ListBox1.GetItemText(Main.ListBoxList(0))
|
||||
|
||||
If Main.Grapp_RDY = True Then
|
||||
Main.Grapp_RDY = False
|
||||
|
@ -137,8 +104,6 @@ Public Class Queue
|
|||
End If
|
||||
|
||||
|
||||
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
|
||||
|
|
13
README.md
13
README.md
|
@ -1,4 +1,14 @@
|
|||
# Crunchyroll-Downloader-v3.0
|
||||
<details>
|
||||
<summary></summary>
|
||||
|
||||
untrue (for now)
|
||||
|
||||
# Crunchyroll-Downloader-v3.0 is deprecated since Crunchyroll updated to a DRM only system.
|
||||
|
||||
[This is the end.](https://www.youtube.com/watch?v=OUyfQLd3bCs)
|
||||
</details>
|
||||
|
||||
## Crunchyroll-Downloader-v3.0
|
||||
A simple to use Download Client for Crunchyroll, Funimation and Anime on Demand
|
||||
|
||||
## Software Requirements:
|
||||
|
@ -63,3 +73,4 @@ The main screen you after starting the application looks like this (v3.6)
|
|||
|
||||
#### to be continued
|
||||
|
||||
|
||||
|
|
Loading…
Reference in New Issue
Block a user