InfStarMC/PCL-ISE
1
0
Fork 0
Code Issues Pull Requests Actions 1 Packages Projects Releases Wiki Activity

Update ModLaunch.vb

Browse Source
This commit is contained in:
YIJANGs
2026-03-05 21:02:17 +08:00
parent 3db574fcdc
commit be9798669d
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files
Plain Craft Launcher 2/Modules/Minecraft/ModLaunch.vb
+2 -2
View File
@@ -573,7 +573,7 @@ Relogin:
If Data.IsAborted Then Throw New ThreadInterruptedException If Data.IsAborted Then Throw New ThreadInterruptedException
Dim MinecraftAPI As String() = MsLoginStep4(Tokens) '更改了第4步验证的返回格式，第一项为Minecraft Access Token，第二项为Token有效期 Dim MinecraftAPI As String() = MsLoginStep4(Tokens) '更改了第4步验证的返回格式，第一项为Minecraft Access Token，第二项为Token有效期
Dim AccessToken As String = MinecraftAPI(0) 'Access Token Dim AccessToken As String = MinecraftAPI(0) 'Access Token
McLoginMsRefreshTime = GetTimeMs() + MinecraftAPI(1) 'Token 到期时间 McLoginMsRefreshTime = GetTimeMs() + (MinecraftAPI(1) * 1000) 'Token 到期时间，并转换为毫秒
Data.Progress = 0.7 Data.Progress = 0.7
If Data.IsAborted Then Throw New ThreadInterruptedException If Data.IsAborted Then Throw New ThreadInterruptedException
MsLoginStep5(AccessToken) MsLoginStep5(AccessToken)
@@ -1027,7 +1027,7 @@ Retry:
Return { Return {
GetJson(Result)("access_token").ToString, GetJson(Result)("access_token").ToString,
GetJson(Result)("expires_in").ToString GetJson(Result)("expires_in").ToString '以秒为单位
} }
End Function End Function
'微软登录步骤 5：验证微软账号是否持有 MC，这也会刷新 XGP '微软登录步骤 5：验证微软账号是否持有 MC，这也会刷新 XGP