Skip to content
This repository has been archived by the owner on Feb 3, 2024. It is now read-only.

Commit

Permalink
Add files via upload
Browse files Browse the repository at this point in the history
  • Loading branch information
pikakid98 committed Mar 2, 2022
1 parent 27ec6ae commit d5168d4
Show file tree
Hide file tree
Showing 11 changed files with 99 additions and 0 deletions.
5 changes: 5 additions & 0 deletions AppInfo/Launcher/PLUpdater.ini
Original file line number Diff line number Diff line change
@@ -0,0 +1,5 @@
[Launch]
ProgramExecutable=PLUpdater\mainrun.bat
WorkingDirectory=%PAL:DataDir%
DirectoryMoveOK=yes
SupportsUNC=yes
Binary file added AppInfo/appicon.ico
Binary file not shown.
Binary file added AppInfo/appicon_16.ico
Binary file not shown.
Binary file added AppInfo/appicon_32.ico
Binary file not shown.
26 changes: 26 additions & 0 deletions AppInfo/appinfo.ini
Original file line number Diff line number Diff line change
@@ -0,0 +1,26 @@
[Format]
Type=PortableApps.comFormat
Version=3.3

[Details]
Name=Pikakid98 Launcher Updater
AppID=PLUpdater
Publisher=Pikakid98
Homepage=https://pikakid98.github.io
Category=Games
Description=Pikakid98 Launcher Updater
Language=English

[License]
Shareable=true
OpenSource=true
Freeware=true
CommercialUse=true

[Version]
PackageVersion=2.0
DisplayVersion=2.0

[Control]
Icons=1
Start=PLUpdater.exe
29 changes: 29 additions & 0 deletions dl-latest.vbs
Original file line number Diff line number Diff line change
@@ -0,0 +1,29 @@
Set objWinHttp = CreateObject("WinHttp.WinHttpRequest.5.1")

URL = "https://github.com/pikakid98/pikakid98-launcher/releases/latest/download/Pikakid98.Launcher.exe"
objWinHttp.open "GET", URL, False
objWinHttp.send ""

SaveBinaryData "Launcher\Pikakid98.Launcher.exe",objWinHttp.responseBody

Function SaveBinaryData(FileName, Data)

' adTypeText for binary = 1
Const adTypeText = 1
Const adSaveCreateOverWrite = 2

' Create Stream object
Dim BinaryStream
Set BinaryStream = CreateObject("ADODB.Stream")

' Specify stream type - we want To save Data/string data.
BinaryStream.Type = adTypeText

' Open the stream And write binary data To the object
BinaryStream.Open
BinaryStream.Write Data

' Save binary data To disk
BinaryStream.SaveToFile FileName, adSaveCreateOverWrite

End Function
29 changes: 29 additions & 0 deletions dl.vbs
Original file line number Diff line number Diff line change
@@ -0,0 +1,29 @@
Set objWinHttp = CreateObject("WinHttp.WinHttpRequest.5.1")

URL = "https://github.com/pikakid98/pikakid98-launcher-data/releases/download/data/Launcher-2.bat"
objWinHttp.open "GET", URL, False
objWinHttp.send ""

SaveBinaryData "Launcher-2.bat",objWinHttp.responseBody

Function SaveBinaryData(FileName, Data)

' adTypeText for binary = 1
Const adTypeText = 1
Const adSaveCreateOverWrite = 2

' Create Stream object
Dim BinaryStream
Set BinaryStream = CreateObject("ADODB.Stream")

' Specify stream type - we want To save Data/string data.
BinaryStream.Type = adTypeText

' Open the stream And write binary data To the object
BinaryStream.Open
BinaryStream.Write Data

' Save binary data To disk
BinaryStream.SaveToFile FileName, adSaveCreateOverWrite

End Function
2 changes: 2 additions & 0 deletions mainrun.bat
Original file line number Diff line number Diff line change
@@ -0,0 +1,2 @@
@ECHO OFF
START "" "..\App\PLUpdater\silent.vbs"
4 changes: 4 additions & 0 deletions run.bat
Original file line number Diff line number Diff line change
@@ -0,0 +1,4 @@
@ECHO OFF
START "" "..\App\PLUpdater\dl.vbs"
timeout 2
START "" "..\App\PLUpdater\silent-latest.vbs"
2 changes: 2 additions & 0 deletions silent-latest.vbs
Original file line number Diff line number Diff line change
@@ -0,0 +1,2 @@
Set objShell = WScript.CreateObject("WScript.Shell")
objShell.Run "cmd /c Launcher-2.bat", 0, True
2 changes: 2 additions & 0 deletions silent.vbs
Original file line number Diff line number Diff line change
@@ -0,0 +1,2 @@
Set objShell = WScript.CreateObject("WScript.Shell")
objShell.Run "cmd /c ..\App\PLUpdater\run.bat", 0, True

0 comments on commit d5168d4

Please sign in to comment.