|
@@ -676,8 +676,8 @@
|
|
|
If SelectedNeoForge IsNot Nothing Then Return "与 NeoForge 不兼容"
|
|
If SelectedNeoForge IsNot Nothing Then Return "与 NeoForge 不兼容"
|
|
|
If LoadOptiFine Is Nothing OrElse LoadOptiFine.State.LoadingState = MyLoading.MyLoadingState.Run Then Return "加载中……"
|
|
If LoadOptiFine Is Nothing OrElse LoadOptiFine.State.LoadingState = MyLoading.MyLoadingState.Run Then Return "加载中……"
|
|
|
If LoadOptiFine.State.LoadingState = MyLoading.MyLoadingState.Error Then Return "获取版本列表失败:" & CType(LoadOptiFine.State, Object).Error.Message
|
|
If LoadOptiFine.State.LoadingState = MyLoading.MyLoadingState.Error Then Return "获取版本列表失败:" & CType(LoadOptiFine.State, Object).Error.Message
|
|
|
- '检查 Fabric 1.21.5+:没有 OptiFabric 故全部不兼容
|
|
|
|
|
- If SelectedFabric IsNot Nothing AndAlso VersionSortInteger(SelectedMinecraftId, "1.21.4") > 0 Then Return "与 Fabric 不兼容"
|
|
|
|
|
|
|
+ '检查 Fabric 1.20.5+:没有 OptiFabric 故全部不兼容
|
|
|
|
|
+ If SelectedFabric IsNot Nothing AndAlso VersionSortInteger(SelectedMinecraftId, "1.20.4") > 0 Then Return "与 Fabric 不兼容"
|
|
|
'检查 Forge 1.13 - 1.14.3:全部不兼容
|
|
'检查 Forge 1.13 - 1.14.3:全部不兼容
|
|
|
If SelectedForge IsNot Nothing AndAlso
|
|
If SelectedForge IsNot Nothing AndAlso
|
|
|
VersionSortInteger(SelectedMinecraftId, "1.13") >= 0 AndAlso VersionSortInteger("1.14.3", SelectedMinecraftId) >= 0 Then
|
|
VersionSortInteger(SelectedMinecraftId, "1.13") >= 0 AndAlso VersionSortInteger("1.14.3", SelectedMinecraftId) >= 0 Then
|
|
@@ -988,8 +988,8 @@
|
|
|
Private Function LoadFabricGetError() As String
|
|
Private Function LoadFabricGetError() As String
|
|
|
If LoadFabric Is Nothing OrElse LoadFabric.State.LoadingState = MyLoading.MyLoadingState.Run Then Return "加载中……"
|
|
If LoadFabric Is Nothing OrElse LoadFabric.State.LoadingState = MyLoading.MyLoadingState.Run Then Return "加载中……"
|
|
|
If LoadFabric.State.LoadingState = MyLoading.MyLoadingState.Error Then Return "获取版本列表失败:" & CType(LoadFabric.State, Object).Error.Message
|
|
If LoadFabric.State.LoadingState = MyLoading.MyLoadingState.Error Then Return "获取版本列表失败:" & CType(LoadFabric.State, Object).Error.Message
|
|
|
- '检查 Fabric 1.21.5+:没有 OptiFabric 故全部不兼容
|
|
|
|
|
- If SelectedOptiFine IsNot Nothing AndAlso VersionSortInteger(SelectedMinecraftId, "1.21.4") > 0 Then Return "与 OptiFine 不兼容"
|
|
|
|
|
|
|
+ '检查 Fabric 1.20.5+:没有 OptiFabric 故全部不兼容
|
|
|
|
|
+ If SelectedOptiFine IsNot Nothing AndAlso VersionSortInteger(SelectedMinecraftId, "1.20.4") > 0 Then Return "与 OptiFine 不兼容"
|
|
|
For Each Version As JObject In DlFabricListLoader.Output.Value("game")
|
|
For Each Version As JObject In DlFabricListLoader.Output.Value("game")
|
|
|
If Version("version").ToString = SelectedMinecraftId.Replace("∞", "infinite").Replace("Combat Test 7c", "1.16_combat-3") Then
|
|
If Version("version").ToString = SelectedMinecraftId.Replace("∞", "infinite").Replace("Combat Test 7c", "1.16_combat-3") Then
|
|
|
If SelectedForge IsNot Nothing Then Return "与 Forge 不兼容"
|
|
If SelectedForge IsNot Nothing Then Return "与 Forge 不兼容"
|