2.6.3 重新上传
This commit is contained in:
@@ -116,7 +116,7 @@ Public Class FormMain
|
|||||||
'3:BUG+ IMP* FEAT-
|
'3:BUG+ IMP* FEAT-
|
||||||
'2:BUG* IMP-
|
'2:BUG* IMP-
|
||||||
'1:BUG-
|
'1:BUG-
|
||||||
If LastVersion < 295 Then 'Snapshot 2.6.3
|
If LastVersion < 297 Then 'Snapshot 2.6.3
|
||||||
FeatureList.Add(New KeyValuePair(Of Integer, String)(2, "优化崩溃分析,添加多种崩溃情况的判断"))
|
FeatureList.Add(New KeyValuePair(Of Integer, String)(2, "优化崩溃分析,添加多种崩溃情况的判断"))
|
||||||
FeatureCount += 12
|
FeatureCount += 12
|
||||||
BugCount += 14
|
BugCount += 14
|
||||||
|
|||||||
@@ -16,7 +16,7 @@ Public Module ModBase
|
|||||||
#If BETA Then
|
#If BETA Then
|
||||||
Public Const VersionCode As Integer = 293 'Release
|
Public Const VersionCode As Integer = 293 'Release
|
||||||
#Else
|
#Else
|
||||||
Public Const VersionCode As Integer = 295 'Snapshot
|
Public Const VersionCode As Integer = 297 'Snapshot
|
||||||
#End If
|
#End If
|
||||||
'自动生成的版本信息
|
'自动生成的版本信息
|
||||||
Public Const VersionDisplayName As String = VersionBranchName & " " & VersionBaseName
|
Public Const VersionDisplayName As String = VersionBranchName & " " & VersionBaseName
|
||||||
|
|||||||
@@ -742,7 +742,6 @@ Retry:
|
|||||||
.OptiFineVersion = If(Addons.ContainsKey("optifine"), Addons("optifine"), Nothing),
|
.OptiFineVersion = If(Addons.ContainsKey("optifine"), Addons("optifine"), Nothing),
|
||||||
.ForgeVersion = If(Addons.ContainsKey("forge"), Addons("forge"), Nothing),
|
.ForgeVersion = If(Addons.ContainsKey("forge"), Addons("forge"), Nothing),
|
||||||
.FabricVersion = If(Addons.ContainsKey("fabric"), Addons("fabric"), Nothing)
|
.FabricVersion = If(Addons.ContainsKey("fabric"), Addons("fabric"), Nothing)
|
||||||
.QuiltVersion = If(Addons.ContainsKey("quilt"), Hint("PCL 暂不支持安装需要 Quilt 的整合包!", HintType.Critical), Exit Sub)
|
|
||||||
}
|
}
|
||||||
Dim InstallExpectTime As Double = 0
|
Dim InstallExpectTime As Double = 0
|
||||||
For Each InstallLoader In InstallLoaders
|
For Each InstallLoader In InstallLoaders
|
||||||
|
|||||||
@@ -531,7 +531,8 @@ Finish:
|
|||||||
End Sub
|
End Sub
|
||||||
'启动按钮
|
'启动按钮
|
||||||
Public Sub LaunchButtonClick() Handles BtnLaunch.Click
|
Public Sub LaunchButtonClick() Handles BtnLaunch.Click
|
||||||
If McLaunchLoader.State = LoadState.Loading OrElse Not BtnLaunch.IsEnabled OrElse FrmMain.PageRight.PageState <> MyPageRight.PageStates.ContentStay Then Exit Sub
|
If McLaunchLoader.State = LoadState.Loading OrElse Not BtnLaunch.IsEnabled OrElse
|
||||||
|
(FrmMain.PageRight IsNot Nothing AndAlso FrmMain.PageRight.PageState <> MyPageRight.PageStates.ContentStay AndAlso FrmMain.PageRight.PageState <> MyPageRight.PageStates.ContentEnter) Then Exit Sub
|
||||||
'愚人节处理
|
'愚人节处理
|
||||||
If IsAprilEnabled AndAlso Not IsAprilGiveup Then
|
If IsAprilEnabled AndAlso Not IsAprilGiveup Then
|
||||||
ThemeUnlock(12, False, "隐藏主题 滑稽彩 已解锁!")
|
ThemeUnlock(12, False, "隐藏主题 滑稽彩 已解锁!")
|
||||||
|
|||||||
Reference in New Issue
Block a user