-
Notifications
You must be signed in to change notification settings - Fork 1
/
launcher.bat
81 lines (73 loc) · 3.02 KB
/
launcher.bat
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
@echo off
color 0A
MODE CON: COLS=32 LINES=8
cls
if exist replacer.bat del replacer.bat
if not exist bin mkdir bin
rmdir /s /q .\doc\
call :MIGRATEFILES
call :UPDATE
exit
:MIGRATEFILES
cls
title=Migrating Minecraft Files
if exist .\data\.minecraft\ xcopy .\data\.minecraft\* .\data\minecraft\.minecraft\ /e /i /y
if exist .\data\java\ xcopy .\data\java\* .\data\minecraft\java\ /e /i /y
if exist .\data\profiles\ xcopy .\data\profiles\* .\data\minecraft\profiles\ /e /i /y
if exist .\data\.minecraft\ rmdir /s /q .\data\.minecraft\
if exist .\data\java\ rmdir /s /q .\data\java\
if exist .\data\profiles\ rmdir /s /q .\data\profiles\
exit /b
:UPDATE
cls
if not exist .\bin\wget.exe call :DOWNLOADWGET
.\bin\wget.exe https://raw.githubusercontent.com/MarioMasta64/EverythingPortable/master/launch_minecraft.bat
if exist launch_minecraft.bat echo del launcher.bat > replacer.bat
if exist launch_minecraft.bat echo start launch_minecraft.bat >> replacer.bat
if exist launch_minecraft.bat echo exit >> replacer.bat
start replacer.bat
exit /b
:DOWNLOADWGET
cls
title=Downloading WGET
:CHECKWGETDOWNLOADER
cls
if not exist .\bin\downloadwget.vbs call :CREATEWGETDOWNLOADER
if exist .\bin\downloadwget.vbs call :EXECUTEWGETDOWNLOADER
exit /b
:CREATEWGETDOWNLOADER
cls
echo ' Set your settings > .\bin\downloadwget.vbs
echo strFileURL = "https://eternallybored.org/misc/wget/current/wget.exe" >> .\bin\downloadwget.vbs
echo strHDLocation = "wget.exe" >> .\bin\downloadwget.vbs
echo. >> .\bin\downloadwget.vbs
echo ' Fetch the file >> .\bin\downloadwget.vbs
echo Set objXMLHTTP = CreateObject("MSXML2.XMLHTTP") >> .\bin\downloadwget.vbs
echo. >> .\bin\downloadwget.vbs
echo objXMLHTTP.open "GET", strFileURL, false >> .\bin\downloadwget.vbs
echo objXMLHTTP.send() >> .\bin\downloadwget.vbs
echo. >> .\bin\downloadwget.vbs
echo If objXMLHTTP.Status = 200 Then >> .\bin\downloadwget.vbs
echo Set objADOStream = CreateObject("ADODB.Stream") >> .\bin\downloadwget.vbs
echo objADOStream.Open >> .\bin\downloadwget.vbs
echo objADOStream.Type = 1 'adTypeBinary >> .\bin\downloadwget.vbs
echo. >> .\bin\downloadwget.vbs
echo objADOStream.Write objXMLHTTP.ResponseBody >> .\bin\downloadwget.vbs
echo objADOStream.Position = 0 'Set the stream position to the start >> .\bin\downloadwget.vbs
echo. >> .\bin\downloadwget.vbs
echo Set objFSO = Createobject("Scripting.FileSystemObject") >> .\bin\downloadwget.vbs
echo If objFSO.Fileexists(strHDLocation) Then objFSO.DeleteFile strHDLocation >> .\bin\downloadwget.vbs
echo Set objFSO = Nothing >> .\bin\downloadwget.vbs
echo. >> .\bin\downloadwget.vbs
echo objADOStream.SaveToFile strHDLocation >> .\bin\downloadwget.vbs
echo objADOStream.Close >> .\bin\downloadwget.vbs
echo Set objADOStream = Nothing >> .\bin\downloadwget.vbs
echo End if >> .\bin\downloadwget.vbs
echo. >> .\bin\downloadwget.vbs
echo Set objXMLHTTP = Nothing >> .\bin\downloadwget.vbs
exit /b
:EXECUTEWGETDOWNLOADER
cls
cscript.exe .\bin\downloadwget.vbs
move wget.exe .\bin\
exit /b