Initial commit...

This commit is contained in:
maximstewart 2021-02-18 17:45:52 -06:00
parent dc3906fa9b
commit 1180e3171f
2159 changed files with 45470 additions and 2 deletions

12
Atom Plugins Made/compress.sh Executable file
View File

@ -0,0 +1,12 @@
#!/bin/bash
function main() {
for i in `ls`; do
if [[ "${i}" == *".sh"* || "${i}" == *".txt" ]]; then
echo "Shell file";
else
7z a -t7z -m0=lzma -mx=9 -mfb=64 -md=32m -ms=on "${i}".7z ./"${i}"
fi
done
}
main

Binary file not shown.

View File

@ -0,0 +1,12 @@
# MAXIMUS-Installer
MAXIMUS Installer is a GUI for Chocolatey NuGet , a machine package installer for Windows!
Chocolatey NuGet is like what Synaptic is for Linux.
Yet Chocolatety NuGet has no included GUI and solely uses cmd to run.
So I added one that I like using HTA and VBScript so that one can simply use one-click options to install programs.
MAXIMUS Installer(or MI installer) has also a popular section that lists programs that are highly regarded.
Not only that, MI allows typing out commands much like what one would do using the cmd prompt.
This is done through the search/run bar.
PLEASE NOTE: You MUST run "Install Chocolatey NuGet!" if you haven't already installed it.
You can of course use their web page to install Chocolatey NuGet or click on the green text that says "Install Chocolatey NuGet!" MAXIMUS Installer does need to be run with administration for it to function properly.

View File

@ -0,0 +1,199 @@
<!doctype html>
<head>
<title>MAXIMUS Installer</title>
<link rel="stylesheet" type="text/css" href="./resources/other/css.css">
<HTA:APPLICATION
ID="MAXIMUS Installer"
VERSION="1.0"
APPLICATIONNAME="MAXIMUS Installer"
icon = "./resources/other/favicon.ico"
SCROLL="yes"
WINDOWSTATE="normal"
border = "thin"
caption = "yes"
maximizeButton = "no"
minimizeButton = "yes"
showInTaskbar = "yes"
version = "1.0"
/>
<script language="VBScript">
Window.ReSizeTo 1050, 640
Set objCall = CreateObject("WScript.Shell")
Function installChoco
Set objfsoChk = CreateObject("Scripting.FileSystemObject")
path="C:\ProgramData\chocolatey\"
exists = objfsoChk.FolderExists(path)
if (exists) then
MsgBox("Chocolatey Is Already Installed!")
Else
objCall.Run "cmd.exe /k @powershell -NoProfile -ExecutionPolicy unrestricted -Command ""iex ((new-object net.webclient).DownloadString('https://chocolatey.org/install.ps1'))"" && SET PATH=%PATH%;%systemdrive%\chocolatey\bin", 1, True
MsgBox("Chocolatey Has Been Installed!")
end if
End Function
Sub callFaves
objCall.Run ".\resources\bin\popular.hta", 1, True
End Sub
Sub aboutMAXIMUS
objCall.Run ".\resources\bin\maximusAbout.hta", 1, True
End Sub
Sub aboutChoco
objCall.Run ".\resources\bin\chocoAbout.hta", 1, True
End Sub
Function searchFunc(searcher)
' Setting up a slew of variables and objects
strFileNameRaw = "C:\rawlist.txt"
strFileName = "C:\list.txt"
outFile = "C:\dlList.html"
Set objFSOW = CreateObject("Scripting.FileSystemObject")
Set objFSOR = CreateObject("Scripting.FileSystemObject")
Set write = objFSOW.CreateTextFile(strFileNameRaw,True)
write.Write ""
Set write = objFSOW.CreateTextFile(strFileName,True)
write.Write ""
Set write = objFSOW.CreateTextFile(outFile,True)
Set read = objFSOR.OpenTextFile(strFileName)
Set objFS = CreateObject("Scripting.FileSystemObject")
Set objTS = objFS.OpenTextFile(strFileNameRaw, ForReading)
Const ForReading = 1
Const ForWriting = 2
chkString = "Chocolatey"
chkString1 = "found."
' End of variables and objects declaration
' Setting up raw list from chocolatey search
commandSearch = "cmd.exe /c chocolatey list " & searcher & " > C:\rawlist.txt"
objCall.Run commandSearch, 0, True
strContents = objTS.ReadAll
objTS.Close
arrLines = Split(strContents, vbNewLine)
Set objTS = objFS.OpenTextFile(strFileName, ForWriting)
For Each strLine In arrLines
If Not(Left((LTrim(strLine)),Len(chkString)) = chkString) AND Not(Right((RTrim(strLine)),Len(chkString1)) = chkString1) Then
objTS.WriteLine strLine
End If
Next
write.Write "<!DOCTYPE HTML>" & vbCrLf &_
"<head>" & vbCrLf &_
"<style>" & vbCrLf &_
".bttnStyle {" & vbCrLf &_
"width: 100%;" & vbCrLf &_
"height: 2em;" & vbCrLf &_
"}" & vbCrLf &_
"</style>" & vbCrLf
write.Write "<script language=""vbscript"">" & vbCrLf &_
"Function cmdBtn_Click()" & vbCrLf &_
"target = window.event.srcElement.Value" & vbCrLf &_
"reply = MsgBox(""Do you wish to install ""& target, vbYesNo)" & vbCrLf &_
"Select Case reply" & vbCrLf &_
"Case vbYes" & vbCrLf &_
"Set objShell = CreateObject(""WScript.Shell"")" & vbCrLf &_
"objShell.Run ""cmd.exe /k cinst "" & target, 1, True" & vbCrLf &_
"Case vbNo" & vbCrLf &_
"End Select" & vbCrLf &_
"End Function" & vbCrLf &_
"</" &_
"script" &_
">" &_
"</head>" & vbCrLf &_
"<body style=""background:#222222;"">" & vbCrLf
Do Until read.AtEndOfStream
strLine= read.ReadLine
write.Write "<input style=""width:100%;"" type=""button"" name=""cmdBtn"" value=""" & strLine & """ onclick=""vbscript:cmdBtn_Click""><br>" & vbCrLf
Loop
write.Write "</body>" & vbCrLf &_
"</html>"
write.Close
parent.ifrme.Location.Reload(True)
End Function
Function preSearchFunc(searcher)
checker = InStr(searcher,"cinst") OR InStr(searcher,"choco") OR InStr(searcher,"chocolatey")
If ( checker = 0 ) Then
searchFunc(searcher)
Else
inputVal = "cmd.exe /k " & searcher
objCall.Run inputVal, 1, True
End If
End Function
</script>
</head>
<body>
<div class="divStyleHeader">
<div onclick="callFaves">
<img src="resources\menuIcons\star.png" style="float:left;clear:right;"></img>
<p class="populr"><font size="5">Popular</font><p>
</div>
<div>
<p class="bttn" onclick="installChoco"><font size="5">Install Chocolatey NuGet!</font></p>
</div>
<script language="vbscript">
Function formSubmt
searcher = document.getElementById("query").value
preSearchFunc(searcher)
End Function
</script>
<form style="float:right;">
<input name="query" type="text" >
<input type="submit" value="Search/Run" onclick="formSubmt">
</form>
</div>
<div class="divStyleLeftColumn">
<div>
<script language="vbscript">
Function mediaFunc
searcher = "media"
preSearchFunc(searcher)
End Function
</script>
<img class="image" src="resources\menuIcons\media.png" onclick="mediaFunc"></img>
<br><br>&nbsp;&nbsp; Media
</div>
<div>
<script language="vbscript">
Function officeFunc
searcher = "office"
preSearchFunc(searcher)
End Function
</script>
<img class="image" src="resources\menuIcons\office.png" onclick="officeFunc"></img>
<br><br>&nbsp;&nbsp; Office
</div>
<div>
<script language="vbscript">
Function webFunc
searcher = "web"
preSearchFunc(searcher)
End Function
</script>
<img class="image" src="resources\menuIcons\web.png" onclick="webFunc"></img>
<br><br>&nbsp;&nbsp; Web
</div>
<div>
<script language="vbscript">
Function securityFunc
searcher = "security"
preSearchFunc(searcher)
End Function
</script>
<img class="image" src="resources\menuIcons\security.png" onclick="securityFunc"></img>
<br><br>&nbsp;&nbsp; Secirity
</div>
</div>
<div class="divStyleRightTopFrame">
<iframe id="ifrme" name="ifrme" src="C:/dlList.html" style="height:18em;width:100%;" application="yes"></iframe>
</div>
<div class="divStyleRightBottomFrame">
</div>
<div class="BottomFrame">
<div style="margin-left:20%;">
<p class="bttnBTTM" onclick="aboutMAXIMUS"><font size="5">About MAXIMUS</font></p>
<p class="bttnBTTM" onclick="aboutChoco"><font size="5">About Chocolatey NuGet</font></p>
</div>
</div>
</body>
</html>

View File

@ -0,0 +1,57 @@
<!doctype html>
<head>
<title>About: Chocolatey</title>
<link rel="stylesheet" type="text/css" href="./resources/other/css.css">
<HTA:APPLICATION
ID="About: Chocolatey"
VERSION="1.0"
APPLICATIONNAME="About: Chocolatey"
icon = "../other/chocolateyicon.ico"
SCROLL="yes"
WINDOWSTATE="normal"
border = "thin"
caption = "yes"
maximizeButton = "no"
minimizeButton = "yes"
showInTaskbar = "yes"
version = "1.0"
/>
<link rel="stylesheet" type="text/css" href="../other/css.css">
<script language="vbscript">
Window.ReSizeTo 800, 700
</script>
</head>
<body>
<div class="divStyleAbout">
<p>
<font size="4">
Chocolatey NuGet
</font>
</p>
<img src="../other/chocolateyicon.ico" style="width:8em;height:6em;"></img>
<p>
<font size="3">
Developer: Rob Reynolds
</font>
</p>
<p>
<font size="3">
Github Link: <a href="https://github.com/chocolatey/choco/">Chocolatey NuGet</a>
</font>
</p>
<p>
<font size="3">
Chocolatey NuGet is a Machine Package Manager,<br>
somewhat like apt-get, but built with Windows in mind.
</font>
</p>
<p>
<font size="3">
Copyleft: Apache License 2.0
<a href=""></a>
</font>
</p>
<iframe application="yes" src="../other/apacheLicenseChocolatey.html" style="width:100%;height:18em;"></iframe>
</div>
</body>
</html>

View File

@ -0,0 +1,58 @@
<!doctype html>
<head>
<title>About: MAXIMUS Installer</title>
<link rel="stylesheet" type="text/css" href="./resources/other/css.css">
<HTA:APPLICATION
ID="About: MAXIMUS Installer"
VERSION="1.0"
APPLICATIONNAME="About: MAXIMUS Installer"
icon = "../other/favicon.ico"
SCROLL="yes"
WINDOWSTATE="normal"
border = "thin"
caption = "yes"
maximizeButton = "no"
minimizeButton = "yes"
showInTaskbar = "yes"
version = "1.0"
/>
<link rel="stylesheet" type="text/css" href="../other/css.css">
<script language="vbscript">
Window.ReSizeTo 800, 700
</script>
</head>
<body>
<div class="divStyleAbout">
<p>
<font size="4">
MAXIMUS Installer
</font>
</p>
<img src="../other/favicon.ico" style="width:8em;height:6em;"></img>
<p>
<font size="3">
Developer: Maxim Stewart
</font>
</p>
<p>
<font size="3">
Github Link: <a href="https://github.com/RaveYoda/MAXIMUS-Installer/">MAXIMUS Installer</a>
</font>
</p>
<p>
<font size="3">
MAXIMUS Installer is a GUI frontend for Chocolatey NuGet.<br>
Chocolatey is a Package Manager, somewhat like apt-get,
but built with Windows in mind.
</font>
</p>
<p>
<font size="3">
Copyleft: Apache License 2.0
<a href=""></a>
</font>
</p>
<iframe application="yes" src="../other/apacheLicenseMAXIMUS.html" style="width:100%;height:18em;"></iframe>
</div>
</body>
</html>

View File

@ -0,0 +1,887 @@
<!doctype html>
<head>
<title>Popular Programs</title>
<link rel="stylesheet" type="text/css" href="../other/css.css">
<HTA:APPLICATION
ID="Popular Programs"
VERSION="1.0"
APPLICATIONNAME="Popular Programs"
icon = "../other/favicon.ico"
SCROLL="yes"
WINDOWSTATE="normal"
border = "thin"
caption = "yes"
maximizeButton = "no"
minimizeButton = "yes"
showInTaskbar = "yes"
version = "1.0"
/>
<script language="vbscript">
Window.ReSizeTo 1050, 600
Set objShell = CreateObject("WScript.Shell")
</script>
</head>
<body>
<div class="divStyle">
<p class="groupTitle"><b>Security Software</b></p>
<div>
<script language="VBScript">
Sub avastInst
result = MsgBox ("Install Avast FreeAV?", vbYesNo, "Avast FreeAV...")
Select Case result
Case vbYes
objShell.run("cinst avastfreeantivirus")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/avast.jpg" class="imageStyl" onClick="avastInst">
</img>
</div>
<div>
<script language="VBScript">
Sub malwarebytesInst
result = MsgBox ("Install Malwarebytes?", vbYesNo, "Malwarebytes...")
Select Case result
Case vbYes
objShell.run("cinst malwarebytes")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/malwarebytes.jpg" class="imageStyl" onClick="malwarebytesInst">
</img>
</div>
<div>
<script language="VBScript">
Sub herdProtectInst
result = MsgBox ("Install HerdProtect?", vbYesNo, "HerdProtect...")
Select Case result
Case vbYes
objShell.Run "curl --insecure --url https://www.herdprotect.com/installers/herdProtectScan_Setup.exe --output Downloads\herdProtectScan_Setup.exe", 1, True
objShell.Exec("Downloads\herdProtectScan_Setup.exe")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/herdProtect.jpg" class="imageStyl" onClick="herdProtectInst">
</img>
</div>
<div>
<script language="VBScript">
Sub privateFirewallInst
result = MsgBox ("Install PrivateFirewall?", vbYesNo, "PrivateFirewall...")
Select Case result
Case vbYes
objShell.Run "curl --url http://www.privacyware.com/software/privatefirewall.exe --output Downloads\privatefirewall.exe", 1, True
objShell.Exec("Downloads\privatefirewall.exe")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/privateFirewall.jpg" class="imageStyl" onClick="privateFirewallInst">
</img>
</div>
<div>
<script language="VBScript">
Sub hitmanproInst
result = MsgBox ("Install HitmanPro Portable?", vbYesNo, "HitmanPro Portable...")
Select Case result
Case vbYes
objShell.run("cinst HitmanProPortable_x86")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/hitmanpro.jpg" class="imageStyl" onClick="hitmanproInst">
</img>
</div>
<div>
<script language="VBScript">
Sub tdsskillerInst
result = MsgBox ("Install TDSSKiller Portable?", vbYesNo, "TDSSKiller Portable...")
Select Case result
Case vbYes
objShell.run("cinst TDSSKillerPortable")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/tdsskiller.jpg" class="imageStyl" onClick="tdsskillerInst">
</img>
</div>
<div>
<script language="VBScript">
Sub superantispywareInst
result = MsgBox ("Install SuperAntiSpyware?", vbYesNo, "SuperAntiSpyware...")
Select Case result
Case vbYes
objShell.run("cinst superantispyware")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/superantispyware.jpg" class="imageStyl" onClick="superantispywareInst">
</img>
</div>
<div>
<script language="VBScript">
Sub adwcleanerInst
result = MsgBox ("Install Adwcleaner?", vbYesNo, "Adwcleaner...")
Select Case result
Case vbYes
objShell.run("cinst adwcleaner")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/adwcleaner.jpg" class="imageStyl" onClick="adwcleanerInst">
</img>
</div>
<div>
<script language="VBScript">
Sub roguekillerInst
result = MsgBox ("Install RogueKiller Portable?", vbYesNo, "RogueKiller Portable...")
Select Case result
Case vbYes
objShell.run("cinst RogueKillerPortable")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/roguekiller.jpg" class="imageStyl" onClick="roguekillerInst">
</img>
</div>
<div>
<script language="VBScript">
Sub teamviewerInst
result = MsgBox ("Install Teamviewer?", vbYesNo, "Teamviewer...")
Select Case result
Case vbYes
objShell.run("cinst teamviewer")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/teamviewer.jpg" class="imageStyl" onClick="teamviewerInst">
</img>
</div>
</div>
<div class="divStyle">
<p class="groupTitle"><b>Internet Related Programs</b></p>
<div>
<script language="VBScript">
Sub firefoxInst
result = MsgBox ("Install Firefox?", vbYesNo, "Firefox...")
Select Case result
Case vbYes
objShell.run("cinst firefox")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/firefox.jpg" class="imageStyl" onClick="firefoxInst">
</img>
</div>
<div>
<script language="VBScript">
Sub chromeInst
result = MsgBox ("Install Chrome?", vbYesNo, "Chrome...")
Select Case result
Case vbYes
objShell.run("cinst GoogleChrome")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/chrome.jpg" class="imageStyl" onClick="chromeInst">
</img>
</div>
<div>
<script language="VBScript">
Sub operaInst
result = MsgBox ("Install Opera?", vbYesNo, "Opera...")
Select Case result
Case vbYes
objShell.run("cinst opera")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/opera.jpg" class="imageStyl" onClick="operaInst">
</img>
</div>
<div>
<script language="VBScript">
Sub midoriInst
result = MsgBox ("Install Midori?", vbYesNo, "Midori...")
Select Case result
Case vbYes
objShell.run("cinst midori-browser")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/midori.jpg" class="imageStyl" onClick="midoriInst">
</img>
</div>
<div>
<script language="VBScript">
Sub qupzillaInst
result = MsgBox ("Install Qupzilla?", vbYesNo, "Qupzilla...")
Select Case result
Case vbYes
objShell.run("cinst qupzilla")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/qupzilla.jpg" class="imageStyl" onClick="qupzillaInst">
</img>
</div>
<div>
<script language="VBScript">
Sub fileZillaInst
result = MsgBox ("Install Filezilla?", vbYesNo, "Filezilla...")
Select Case result
Case vbYes
objShell.run("cinst filezilla")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/fileZilla.jpg" class="imageStyl" onClick="fileZillaInst">
</img>
</div>
<div>
<script language="VBScript">
Sub dropboxInst
result = MsgBox ("Install Dropbox?", vbYesNo, "Dropbox...")
Select Case result
Case vbYes
objShell.run("cinst dropbox")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/dropbox.jpg" class="imageStyl" onClick="dropboxInst">
</img>
</div>
<div>
<script language="VBScript">
Sub megaSyncInst
result = MsgBox ("Install MegaSync?", vbYesNo, "MegaSync...")
Select Case result
Case vbYes
objShell.Run "curl --url https://mega.nz/MEGAsyncSetup.exe --output Downloads\MegaSync.exe", 1, True
objShell.Exec("Downloads\MegaSync.exe")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/megaSync.jpg" class="imageStyl" onClick="megaSyncInst">
</img>
</div>
</div>
<div class="divStyle">
<p class="groupTitle"><b>Office/Art Programs</b></p>
<div>
<script language="VBScript">
Sub calibreInst
result = MsgBox ("Install Calibre?", vbYesNo, "Calibre...")
Select Case result
Case vbYes
objShell.run("cinst calibre")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/calibre.jpg" class="imageStyl" onClick="calibreInst">
</img>
</div>
<div>
<script language="VBScript">
Sub libreofficeInst
result = MsgBox ("Install Libreoffice?", vbYesNo, "Libreoffice...")
Select Case result
Case vbYes
objShell.run("cinst libreoffice")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/libreoffice.jpg" class="imageStyl" onClick="libreofficeInst">
</img>
</div>
<div>
<script language="VBScript">
Sub openofficeInst
result = MsgBox ("Install OpenOffice?", vbYesNo, "Openoffice...")
Select Case result
Case vbYes
objShell.run("cinst OpenOffice")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/openoffice.jpg" class="imageStyl" onClick="openofficeInst">
</img>
</div>
<div>
<script language="VBScript">
Sub wpsOfficeInst
result = MsgBox ("Install WPSOffice?", vbYesNo, "WPSOffice...")
Select Case result
Case vbYes
objShell.Run "curl --url http://Downloads.wps.com/personal/wps_office_free.exe --output Downloads\WPSOffice.exe", 1, True
objShell.Exec("Downloads\WPSOffice.exe")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/wpsOffice.jpg" class="imageStyl" onClick="wpsOfficeInst">
</img>
</div>
<div>
<script language="VBScript">
Sub foxitInst
result = MsgBox ("Install FoxitPDF Reader?", vbYesNo, "FoxitPDF Reader...")
Select Case result
Case vbYes
objShell.run("cinst FoxitReader")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/foxit.jpg" class="imageStyl" onClick="foxitInst">
</img>
</div>
<div>
<script language="VBScript">
Sub notepadPlusPlusInst
result = MsgBox ("Install Notepad++?", vbYesNo, "Notepad++...")
Select Case result
Case vbYes
objShell.run("cinst notepadplusplus")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/notepad++.jpg" class="imageStyl" onClick="notepadPlusPlusInst">
</img>
</div>
<div>
<script language="VBScript">
Sub gimpInst
result = MsgBox ("Install Gimp?", vbYesNo, "Gimp...")
Select Case result
Case vbYes
objShell.run("cinst gimp")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/gimp.jpg" class="imageStyl" onClick="gimpInst">
</img>
</div>
<div>
<script language="VBScript">
Sub kritaInst
result = MsgBox ("Install Krita?", vbYesNo, "Krita...")
Select Case result
Case vbYes
objShell.run("cinst krita")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/krita.jpg" class="imageStyl" onClick="kritaInst">
</img>
</div>
<div>
<script language="VBScript">
Sub paintnetInst
result = MsgBox ("Install Paint.Net?", vbYesNo, "Paint.Net...")
Select Case result
Case vbYes
objShell.run("cinst paint.net")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/paintnet.jpg" class="imageStyl" onClick="paintnetInst">
</img>
</div>
<div>
<script language="VBScript">
Sub xnviewInst
result = MsgBox ("Install XnView?", vbYesNo, "XnView...")
Select Case result
Case vbYes
objShell.run("cinst XnView")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/xnview.jpg" class="imageStyl" onClick="xnviewInst">
</img>
</div>
</div>
<div class="divStyle">
<p class="groupTitle"><b>Media Programs</b></p>
<div>
<script language="VBScript">
Sub daumPotPlayerInst
result = MsgBox ("Install Daum PotPlayer?", vbYesNo, "Daum PotPlayer...")
Select Case result
Case vbYes
objShell.run("cinst potplayer")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/daumPotPlayer.jpg" class="imageStyl" onClick="daumPotPlayerInst">
</img>
</div>
<div>
<script language="VBScript">
Sub smplayer2Inst
result = MsgBox ("Install SMPlayer2?", vbYesNo, "SMPlayer2...")
Select Case result
Case vbYes
objShell.run("cinst smplayer2")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/smplayer2.jpg" class="imageStyl" onClick="smplayer2Inst">
</img>
</div>
<div>
<script language="VBScript">
Sub vlcInst
result = MsgBox ("Install VLC?", vbYesNo, "VLC...")
Select Case result
Case vbYes
objShell.run("cinst vlc")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/vlc.jpg" class="imageStyl" onClick="vlcInst">
</img>
</div>
<div>
<script language="VBScript">
Sub obsInst
result = MsgBox ("Install Open Broadcaster Software?", vbYesNo, "Open Broadcaster Software...")
Select Case result
Case vbYes
objShell.run("cinst obs")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/obs.jpg" class="imageStyl" onClick="obsInst">
</img>
</div>
</div>
<div class="divStyle">
<p class="groupTitle"><b>Torrent Clients</b></p>
<div>
<script language="VBScript">
Sub qBittorrentInst
result = MsgBox ("Install qBittorrent?", vbYesNo, "qBittorrent...")
Select Case result
Case vbYes
objShell.run("cinst qbittorrent")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/qBittorrent.jpg" class="imageStyl" onClick="qBittorrentInst">
</img>
</div>
<div>
<script language="VBScript">
Sub delugeInst
result = MsgBox ("Install Deluge?", vbYesNo, "Deluge...")
Select Case result
Case vbYes
objShell.run("cinst deluge")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/deluge.jpg" class="imageStyl" onClick="delugeInst">
</img>
</div>
<div>
<script language="VBScript">
Sub vuzeInst
result = MsgBox ("Install Vuze?", vbYesNo, "Vuze...")
Select Case result
Case vbYes
objShell.run("cinst vuzeclient")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/vuze.jpg" class="imageStyl" onClick="vuzeInst">
</img>
</div>
<div>
<script language="VBScript">
Sub transmissionInst
result = MsgBox ("Install Transmission?", vbYesNo, "Transmission...")
Select Case result
Case vbYes
objShell.run("cinst transmission-qt")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/transmission-qt.jpg" class="imageStyl" onClick="transmissionInst">
</img>
</div>
</div>
<div class="divStyle">
<p class="groupTitle"><b>Social Programs</b></p>
<div>
<script language="VBScript">
Sub thunderbirdInst
result = MsgBox ("Install Thunderbird?", vbYesNo, "Thunderbird...")
Select Case result
Case vbYes
objShell.run("cinst thunderbird")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/thunderbird.jpg" class="imageStyl" onClick="thunderbirdInst">
</img>
</div>
<div>
<script language="VBScript">
Sub pidginInst
result = MsgBox ("Install Pidgin?", vbYesNo, "Pidgin...")
Select Case result
Case vbYes
objShell.run("cinst pidgin")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/pidgin.jpg" class="imageStyl" onClick="pidginInst">
</img>
</div>
<div>
<script language="VBScript">
Sub teamSpeakInst
result = MsgBox ("Install Teamspeak?", vbYesNo, "Teamspeak...")
Select Case result
Case vbYes
objShell.run("cinst teamspeak")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/teamSpeak.jpg" class="imageStyl" onClick="teamSpeakInst">
</img>
</div>
<div>
<script language="VBScript">
Sub skypeInst
result = MsgBox ("Install Skype?", vbYesNo, "Skype...")
Select Case result
Case vbYes
objShell.run("cinst teamspeak")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/skype.jpg" class="imageStyl" onClick="skypeInst">
</img>
</div>
<div>
<script language="VBScript">
Sub hexchatInst
result = MsgBox ("Install Hexchat?", vbYesNo, "Hexchat...")
Select Case result
Case vbYes
objShell.run("cinst hexchat")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/hexchat.jpg" class="imageStyl" onClick="hexchatInst">
</img>
</div>
</div>
<div class="divStyle">
<p class="groupTitle"><b>Enhancements & Utilities</b></p>
<div>
<script language="VBScript">
Sub vboxInst
result = MsgBox ("Install VirtualBox?", vbYesNo, "VirtualBox...")
Select Case result
Case vbYes
objShell.run("cinst virtualbox")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/vbox.jpg" class="imageStyl" onClick="vboxInst">
</img>
</div>
<div>
<script language="VBScript">
Sub dexpotInst
result = MsgBox ("Install Dexpot?", vbYesNo, "Dexpot...")
Select Case result
Case vbYes
objShell.run("cinst dexpot")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/dexpot.jpg" class="imageStyl" onClick="dexpotInst">
</img>
</div>
<div>
<script language="VBScript">
Sub fluxtInst
result = MsgBox ("Install F.Lux?", vbYesNo, "F.Lux...")
Select Case result
Case vbYes
objShell.run("cinst f.lux")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/flux.jpg" class="imageStyl" onClick="fluxtInst">
</img>
</div>
<div>
<script language="VBScript">
Sub cloverInst
result = MsgBox ("Install Clover?", vbYesNo, "Clover...")
Select Case result
Case vbYes
objShell.run("cinst Clover")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/clover.jpg" class="imageStyl" onClick="cloverInst">
</img>
</div>
<div>
<script language="VBScript">
Sub peazipInst
result = MsgBox ("Install Peazip?", vbYesNo, "Peazip...")
Select Case result
Case vbYes
objShell.run("cinst peazip")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/peazip.jpg" class="imageStyl" onClick="peazipInst">
</img>
</div>
<div>
<script language="VBScript">
Sub winrarInst
result = MsgBox ("Install Winrar?", vbYesNo, "Winrar...")
Select Case result
Case vbYes
objShell.run("cinst winrar")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/winrar.jpg" class="imageStyl" onClick="winrarInst">
</img>
</div>
<div>
<script language="VBScript">
Sub sevenZipInst
result = MsgBox ("Install 7zip?", vbYesNo, "7zip...")
Select Case result
Case vbYes
objShell.run("cinst 7zip")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/7zip.jpg" class="imageStyl" onClick="sevenZipInst">
</img>
</div>
<div>
<script language="VBScript">
Sub vcdInst
result = MsgBox ("Install Virtual Clone Drive?", vbYesNo, "Virtual Clone Drive...")
Select Case result
Case vbYes
objShell.run("cinst VirtualCloneDrive")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/vcd.jpg" class="imageStyl" onClick="vcdInst">
</img>
</div>
<div>
<script language="VBScript">
Sub sumoInst
result = MsgBox ("Install SUMo?", vbYesNo, "SUMo...")
Select Case result
Case vbYes
objShell.run("cinst sumo")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/sumo.jpg" class="imageStyl" onClick="sumoInst">
</img>
</div>
<div>
<script language="VBScript">
Sub pcdecrapifierInst
result = MsgBox ("Install Pc-Decrapifier?", vbYesNo, "Pc-Decrapifier...")
Select Case result
Case vbYes
objShell.run("cinst PCDecrapifierPortable")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/pc-decrapifier.jpg" class="imageStyl" onClick="pcdecrapifierInst">
</img>
</div>
<div>
<script language="VBScript">
Sub cCleanerInst
result = MsgBox ("Install cCleaner?", vbYesNo, "cCleaner...")
Select Case result
Case vbYes
objShell.run("cinst ccleaner")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/cCleaner.jpg" class="imageStyl" onClick="cCleanerInst">
</img>
</div>
<div>
<script language="VBScript">
Sub bleachbitInst
result = MsgBox ("Install Bleachbit?", vbYesNo, "Bleachbit...")
Select Case result
Case vbYes
objShell.run("cinst bleachbit")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/bleachbit.jpg" class="imageStyl" onClick="bleachbitInst">
</img>
</div>
<div>
<script language="VBScript">
Sub deffragglerInst
result = MsgBox ("Install Deffraggler?", vbYesNo, "Deffraggler...")
Select Case result
Case vbYes
objShell.Run "curl --url http://download.piriform.com/dfsetup219.exe --output Downloads\Deffraggler.exe", 1, True
objShell.Exec("Downloads\Deffraggler.exe")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/deffraggler.jpg" class="imageStyl" onClick="deffragglerInst">
</img>
</div>
<div>
<script language="VBScript">
Sub myDefragInst
result = MsgBox ("Install myDefrag?", vbYesNo, "myDefrag...")
Select Case result
Case vbYes
objShell.Run "curl --url http://www.mydefrag.com/Downloads/Download.php?File=MyDefrag-v4.3.1.exe --output Downloads\myDefrag.exe", 1, True
objShell.Exec("Downloads\myDefrag.exe")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/myDefrag.jpg" class="imageStyl" onClick="myDefragInst">
</img>
</div>
</div>
</body>
</html>

Binary file not shown.

After

Width:  |  Height:  |  Size: 76 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 34 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 4.2 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 1.5 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 52 KiB

View File

@ -0,0 +1,14 @@
<br>&nbsp; Copyright 2015 - Present
<br>Maxim F. Stewart
<br>
<br>Licensed under the Apache License, Version 2.0 (the "License");
<br>you may not use this file except in compliance with the License.
<br>You may obtain a copy of the License at
<br>
<br>&nbsp;&nbsp;&nbsp;&nbsp; <a href="http://www.apache.org/licenses/LICENSE-2.0">http://www.apache.org/licenses/LICENSE-2.0</a>
<br>
<br>Unless required by applicable law or agreed to in writing, software
<br>distributed under the License is distributed on an "AS IS" BASIS,
<br>WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
<br>See the License for the specific language governing permissions and
<br>limitations under the License.

View File

@ -0,0 +1,22 @@
<!DOCTYPE HTML>
<head>
</head>
<body>
<center>
<br>&nbsp; Copyright 2011 - Present
<br>Rob Reynolds
<br>
<br>Licensed under the Apache License, Version 2.0 (the "License");
<br>you may not use this file except in compliance with the License.
<br>You may obtain a copy of the License at
<br>
<br>&nbsp;&nbsp;&nbsp;&nbsp; <a href="http://www.apache.org/licenses/LICENSE-2.0">http://www.apache.org/licenses/LICENSE-2.0</a>
<br>
<br>Unless required by applicable law or agreed to in writing, software
<br>distributed under the License is distributed on an "AS IS" BASIS,
<br>WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
<br>See the License for the specific language governing permissions and
<br>limitations under the License.
</center>
</body>
</html>

View File

@ -0,0 +1,22 @@
<!DOCTYPE HTML>
<head>
</head>
<body>
<center>
<br>&nbsp; Copyright 2015 - Present
<br>Maxim F. Stewart
<br>
<br>Licensed under the Apache License, Version 2.0 (the "License");
<br>you may not use this file except in compliance with the License.
<br>You may obtain a copy of the License at
<br>
<br>&nbsp;&nbsp;&nbsp;&nbsp; <a href="http://www.apache.org/licenses/LICENSE-2.0">http://www.apache.org/licenses/LICENSE-2.0</a>
<br>
<br>Unless required by applicable law or agreed to in writing, software
<br>distributed under the License is distributed on an "AS IS" BASIS,
<br>WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
<br>See the License for the specific language governing permissions and
<br>limitations under the License.
</center>
</body>
</html>

Binary file not shown.

After

Width:  |  Height:  |  Size: 12 KiB

View File

@ -0,0 +1,131 @@
/*Affects both hta files*/
body {
width: auto;
background: #333333;
}
/*Affects both hta files*/
/* BEGINNING OF TECHNICAL INSTALLER CSS*/
.divStyleHeader, .divStyleLeftColumn,
.divStyleRightTopFrame, .divStyleRightBottomFrame,
.BottomFrame {
clear: both;
z-index: 0;
color: #FFFFFF;
border-style: solid;
border-width: .2em;
background: #222222;
filter: alpha(opacity=80);
}
.bttn, .populr {
background: #222222;
float: left;
}
.bttn {
color: #00FF00;
margin-left: 4em;
}
.bttn:hover {
background: #FFFFFF;
color: #000000;
}
.bttnBTTM {
float: left;
background: #222222;
color: #FFFFFF;
margin-left: 4em;
}
.bttnBTTM:hover {
color: #00E8FF;
}
.populr:hover {
background: #FFFFFF;
color: #000000;
}
.divStyleHeader {
clear: both;
width: 100%;
height: 2em;
margin-bottom: 1em;
}
.divStyleLeftColumn {
float: left;
width: 30%;
height: 28em;
margin-right: 1em;
}
.divStyleRightTopFrame {
float: right;
width: 65%;
height: 18em;
}
.divStyleRightBottomFrame {
float: right;
width: 65%;
height: 10em;
margin-top: 1em;
}
.BottomFrame {
width: 100%;
height: 2em;
margin-top: .5em;
}
.image {
float: left;
text-align: center;
clear: left;
margin-top: .5em;
margin-left: 25%;
width: 50%;
height: 6em;
background: #222222;
}
.image:hover {
background: #FFFFFF;
}
/* END OF TECHNICAL INSTALLER CSS*/
/* BEGINNING OF POPULER HTA PAGE CSS*/
.imageStyl {
width: 6em;
height: 4em;
float: left;
margin-top: 1.5em;
margin-left: 1.3em;
margin-right: 3em;
z-index: 1;
}
.imageStyl:hover {
background-color: #000000;
width: 8em;
height: 8em;
}
.groupTitle {
color: #0E8FF;
font-size: 200%;
}
.divStyle, .divStyleAbout {
z-index: 0;
clear: both;
position: relative;
text-align: center;
width: 98%;
font-size: 100%;
border-style: solid;
border-width: .2em;
color: #FFFFFF;
background-color: #222222;
filter: alpha(opacity=80);
}
.divStyle {
margin: .2em;
margin-top: 2em;
padding: .2em;
}
.divStyle:hover {
height: 20em;
}

Binary file not shown.

After

Width:  |  Height:  |  Size: 163 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 168 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 10 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 14 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 5.1 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 6.5 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 9.0 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 5.9 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 2.2 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 14 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 12 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 2.8 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 1.8 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 8.9 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 19 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 6.5 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 13 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 4.5 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 9.9 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 33 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 2.6 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 11 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 11 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 24 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 2.3 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 7.7 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 6.1 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 14 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 13 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 14 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 2.5 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 29 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 6.1 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 12 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 4.4 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 36 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 44 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 2.8 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 16 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 54 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 1.5 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 42 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 29 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 16 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 3.6 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 8.6 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 11 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 7.4 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 3.4 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 2.1 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 7.5 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 3.0 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 9.0 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 12 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 13 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 7.8 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 27 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 9.1 KiB

View File

@ -0,0 +1,200 @@
<!doctype html>
<head>
<title>MAXIMUS Installer</title>
<link rel="stylesheet" type="text/css" href="./resources/other/css.css">
<HTA:APPLICATION
ID="MAXIMUS Installer"
VERSION="1.0"
APPLICATIONNAME="MAXIMUS Installer"
icon = "./resources/other/favicon.ico"
SCROLL="yes"
WINDOWSTATE="normal"
border = "thin"
caption = "yes"
maximizeButton = "no"
minimizeButton = "yes"
showInTaskbar = "yes"
version = "1.0"
/>
<script language="VBScript">
Window.ReSizeTo 1050, 640
Set objCall = CreateObject("WScript.Shell")
Function installChoco
Set objfsoChk = CreateObject("Scripting.FileSystemObject")
path="C:\ProgramData\chocolatey\"
exists = objfsoChk.FolderExists(path)
if (exists) then
MsgBox("Chocolatey Is Already Installed!")
Else
objCall.Run "cmd.exe /k @powershell -NoProfile -ExecutionPolicy unrestricted -Command ""iex ((new-object net.webclient).DownloadString('https://chocolatey.org/install.ps1'))"" && SET PATH=%PATH%;%systemdrive%\chocolatey\bin", 1, True
MsgBox("Chocolatey Has Been Installed!")
end if
End Function
Sub callFaves
objCall.Run ".\resources\bin\popular.hta", 1, True
End Sub
Sub aboutMAXIMUS
objCall.Run ".\resources\bin\maximusAbout.hta", 1, True
End Sub
Sub aboutChoco
objCall.Run ".\resources\bin\chocoAbout.hta", 1, True
End Sub
Function searchFunc(searcher)
' Setting up a slew of variables and objects
strFileNameRaw = "C:\rawlist.txt"
strFileName = "C:\list.txt"
outFile = "C:\dlList.html"
Set objFSOW = CreateObject("Scripting.FileSystemObject")
Set objFSOR = CreateObject("Scripting.FileSystemObject")
Set write = objFSOW.CreateTextFile(strFileNameRaw,True)
write.Write ""
Set write = objFSOW.CreateTextFile(strFileName,True)
write.Write ""
Set write = objFSOW.CreateTextFile(outFile,True)
Set read = objFSOR.OpenTextFile(strFileName)
Set objFS = CreateObject("Scripting.FileSystemObject")
Set objTS = objFS.OpenTextFile(strFileNameRaw, ForReading)
Const ForReading = 1
Const ForWriting = 2
chkString = "Chocolatey"
chkString1 = "found."
' End of variables and objects declaration
' Setting up raw list from chocolatey search
commandSearch = "cmd.exe /c chocolatey list " & searcher & " > C:\rawlist.txt"
objCall.Run commandSearch, 0, True
strContents = objTS.ReadAll
objTS.Close
arrLines = Split(strContents, vbNewLine)
Set objTS = objFS.OpenTextFile(strFileName, ForWriting)
For Each strLine In arrLines
If Not(Left((LTrim(strLine)),Len(chkString)) = chkString) AND Not(Right((RTrim(strLine)),Len(chkString1)) = chkString1) Then
objTS.WriteLine strLine
End If
Next
write.Write "<!DOCTYPE HTML>" & vbCrLf &_
"<head>" & vbCrLf &_
"<style>" & vbCrLf &_
".bttnStyle {" & vbCrLf &_
"width: 100%;" & vbCrLf &_
"height: 2em;" & vbCrLf &_
"}" & vbCrLf &_
"</style>" & vbCrLf
write.Write "<script language=""vbscript"">" & vbCrLf &_
"Function cmdBtn_Click()" & vbCrLf &_
"target = window.event.srcElement.Value" & vbCrLf &_
"reply = MsgBox(""Do you wish to install ""& target, vbYesNo)" & vbCrLf &_
"Select Case reply" & vbCrLf &_
"Case vbYes" & vbCrLf &_
"Set objShell = CreateObject(""WScript.Shell"")" & vbCrLf &_
"objShell.Run ""cmd.exe /k cinst "" & target, 1, True" & vbCrLf &_
"Case vbNo" & vbCrLf &_
"End Select" & vbCrLf &_
"End Function" & vbCrLf &_
"</" &_
"script" &_
">" &_
"</head>" & vbCrLf &_
"<body style=""background:#222222;"">" & vbCrLf
Do Until read.AtEndOfStream
strLine= read.ReadLine
write.Write "<input style=""width:100%;"" type=""button"" name=""cmdBtn"" value=""" & strLine & """ onclick=""vbscript:cmdBtn_Click""><br>" & vbCrLf
Loop
write.Write "</body>" & vbCrLf &_
"</html>"
write.Close
parent.ifrme.Location.Reload(True)
End Function
Function preSearchFunc(searcher)
checker = InStr(searcher,"cinst") OR InStr(searcher,"choco") OR InStr(searcher,"chocolatey")
If ( checker = 0 ) Then
searchFunc(searcher)
Else
inputVal = "cmd.exe /k " & searcher
objCall.Run inputVal, 1, True
End If
End Function
</script>
</head>
<body>
<div class="divStyleHeader">
<a href="./resources/bin/popular.html" target="ifrme">
<img src="resources\menuIcons\star.png" style="float:left;clear:right;"></img>
<p class="populr"><font size="5">Popular</font><p>
</a>
<div>
<p class="bttn" onclick="installChoco"><font size="5">Install Chocolatey NuGet!</font></p>
<a href="C:/dlList.html" style="clear:both;float:right;"target="ifrme">Search List</a>
</div>
<script language="vbscript">
Function formSubmt
searcher = document.getElementById("query").value
preSearchFunc(searcher)
End Function
</script>
<form style="float:right;">
<input name="query" type="text" >
<input type="submit" value="Search/Run" onclick="formSubmt">
</form>
</div>
<div class="divStyleLeftColumn">
<div>
<script language="vbscript">
Function mediaFunc
searcher = "media"
preSearchFunc(searcher)
End Function
</script>
<img class="image" src="resources\menuIcons\media.png" onclick="mediaFunc"></img>
<br><br>&nbsp;&nbsp; Media
</div>
<div>
<script language="vbscript">
Function officeFunc
searcher = "office"
preSearchFunc(searcher)
End Function
</script>
<img class="image" src="resources\menuIcons\office.png" onclick="officeFunc"></img>
<br><br>&nbsp;&nbsp; Office
</div>
<div>
<script language="vbscript">
Function webFunc
searcher = "web"
preSearchFunc(searcher)
End Function
</script>
<img class="image" src="resources\menuIcons\web.png" onclick="webFunc"></img>
<br><br>&nbsp;&nbsp; Web
</div>
<div>
<script language="vbscript">
Function securityFunc
searcher = "security"
preSearchFunc(searcher)
End Function
</script>
<img class="image" src="resources\menuIcons\security.png" onclick="securityFunc"></img>
<br><br>&nbsp;&nbsp; Secirity
</div>
</div>
<div class="divStyleRightTopFrame">
<iframe id="ifrme" name="ifrme" src="resources/bin/popular.html" style="height:18em;width:100%;" application="yes"></iframe>
</div>
<div class="divStyleRightBottomFrame">
</div>
<div class="BottomFrame">
<div style="margin-left:20%;">
<p class="bttnBTTM" onclick="aboutMAXIMUS"><font size="5">About MAXIMUS</font></p>
<p class="bttnBTTM" onclick="aboutChoco"><font size="5">About Chocolatey NuGet</font></p>
</div>
</div>
</body>
</html>

View File

@ -0,0 +1,57 @@
<!doctype html>
<head>
<title>About: Chocolatey</title>
<link rel="stylesheet" type="text/css" href="./resources/other/css.css">
<HTA:APPLICATION
ID="About: Chocolatey"
VERSION="1.0"
APPLICATIONNAME="About: Chocolatey"
icon = "../other/chocolateyicon.ico"
SCROLL="yes"
WINDOWSTATE="normal"
border = "thin"
caption = "yes"
maximizeButton = "no"
minimizeButton = "yes"
showInTaskbar = "yes"
version = "1.0"
/>
<link rel="stylesheet" type="text/css" href="../other/css.css">
<script language="vbscript">
Window.ReSizeTo 800, 700
</script>
</head>
<body>
<div class="divStyleAbout">
<p>
<font size="4">
Chocolatey NuGet
</font>
</p>
<img src="../other/chocolateyicon.ico" style="width:8em;height:6em;"></img>
<p>
<font size="3">
Developer: Rob Reynolds
</font>
</p>
<p>
<font size="3">
Github Link: <a href="https://github.com/chocolatey/choco/">Chocolatey NuGet</a>
</font>
</p>
<p>
<font size="3">
Chocolatey NuGet is a Machine Package Manager,<br>
somewhat like apt-get, but built with Windows in mind.
</font>
</p>
<p>
<font size="3">
Copyleft: Apache License 2.0
<a href=""></a>
</font>
</p>
<iframe application="yes" src="../other/apacheLicenseChocolatey.html" style="width:100%;height:18em;"></iframe>
</div>
</body>
</html>

View File

@ -0,0 +1,58 @@
<!doctype html>
<head>
<title>About: MAXIMUS Installer</title>
<link rel="stylesheet" type="text/css" href="./resources/other/css.css">
<HTA:APPLICATION
ID="About: MAXIMUS Installer"
VERSION="1.0"
APPLICATIONNAME="About: MAXIMUS Installer"
icon = "../other/favicon.ico"
SCROLL="yes"
WINDOWSTATE="normal"
border = "thin"
caption = "yes"
maximizeButton = "no"
minimizeButton = "yes"
showInTaskbar = "yes"
version = "1.0"
/>
<link rel="stylesheet" type="text/css" href="../other/css.css">
<script language="vbscript">
Window.ReSizeTo 800, 700
</script>
</head>
<body>
<div class="divStyleAbout">
<p>
<font size="4">
MAXIMUS Installer
</font>
</p>
<img src="../other/favicon.ico" style="width:8em;height:6em;"></img>
<p>
<font size="3">
Developer: Maxim Stewart
</font>
</p>
<p>
<font size="3">
Github Link: <a href="https://github.com/RaveYoda/MAXIMUS-Installer/">MAXIMUS Installer</a>
</font>
</p>
<p>
<font size="3">
MAXIMUS Installer is a GUI frontend for Chocolatey NuGet.<br>
Chocolatey is a Package Manager, somewhat like apt-get,
but built with Windows in mind.
</font>
</p>
<p>
<font size="3">
Copyleft: Apache License 2.0
<a href=""></a>
</font>
</p>
<iframe application="yes" src="../other/apacheLicenseMAXIMUS.html" style="width:100%;height:18em;"></iframe>
</div>
</body>
</html>

View File

@ -0,0 +1,884 @@
<head>
<title>Popular Programs</title>
<link rel="stylesheet" type="text/css" href="../other/css.css">
<HTA:APPLICATION
ID="Popular Programs"
VERSION="1.0"
APPLICATIONNAME="Popular Programs"
icon = "../other/favicon.ico"
SCROLL="yes"
WINDOWSTATE="normal"
border = "thin"
caption = "yes"
maximizeButton = "no"
minimizeButton = "yes"
showInTaskbar = "yes"
version = "1.0"
/>
<script language="vbscript">
Set objShell = CreateObject("WScript.Shell")
</script>
</head>
<body>
<div class="divStyle">
<p class="groupTitle"><b>Security Software</b></p>
<div>
<script language="VBScript">
Sub avastInst
result = MsgBox ("Install Avast FreeAV?", vbYesNo, "Avast FreeAV...")
Select Case result
Case vbYes
objShell.run("cinst avastfreeantivirus")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/avast.jpg" class="imageStyl" onClick="avastInst">
</img>
</div>
<div>
<script language="VBScript">
Sub malwarebytesInst
result = MsgBox ("Install Malwarebytes?", vbYesNo, "Malwarebytes...")
Select Case result
Case vbYes
objShell.run("cinst malwarebytes")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/malwarebytes.jpg" class="imageStyl" onClick="malwarebytesInst">
</img>
</div>
<div>
<script language="VBScript">
Sub herdProtectInst
result = MsgBox ("Install HerdProtect?", vbYesNo, "HerdProtect...")
Select Case result
Case vbYes
objShell.Run "curl --insecure --url https://www.herdprotect.com/installers/herdProtectScan_Setup.exe --output Downloads\herdProtectScan_Setup.exe", 1, True
objShell.Exec("Downloads\herdProtectScan_Setup.exe")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/herdProtect.jpg" class="imageStyl" onClick="herdProtectInst">
</img>
</div>
<div>
<script language="VBScript">
Sub privateFirewallInst
result = MsgBox ("Install PrivateFirewall?", vbYesNo, "PrivateFirewall...")
Select Case result
Case vbYes
objShell.Run "curl --url http://www.privacyware.com/software/privatefirewall.exe --output Downloads\privatefirewall.exe", 1, True
objShell.Exec("Downloads\privatefirewall.exe")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/privateFirewall.jpg" class="imageStyl" onClick="privateFirewallInst">
</img>
</div>
<div>
<script language="VBScript">
Sub hitmanproInst
result = MsgBox ("Install HitmanPro Portable?", vbYesNo, "HitmanPro Portable...")
Select Case result
Case vbYes
objShell.run("cinst HitmanProPortable_x86")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/hitmanpro.jpg" class="imageStyl" onClick="hitmanproInst">
</img>
</div>
<div>
<script language="VBScript">
Sub tdsskillerInst
result = MsgBox ("Install TDSSKiller Portable?", vbYesNo, "TDSSKiller Portable...")
Select Case result
Case vbYes
objShell.run("cinst TDSSKillerPortable")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/tdsskiller.jpg" class="imageStyl" onClick="tdsskillerInst">
</img>
</div>
<div>
<script language="VBScript">
Sub superantispywareInst
result = MsgBox ("Install SuperAntiSpyware?", vbYesNo, "SuperAntiSpyware...")
Select Case result
Case vbYes
objShell.run("cinst superantispyware")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/superantispyware.jpg" class="imageStyl" onClick="superantispywareInst">
</img>
</div>
<div>
<script language="VBScript">
Sub adwcleanerInst
result = MsgBox ("Install Adwcleaner?", vbYesNo, "Adwcleaner...")
Select Case result
Case vbYes
objShell.run("cinst adwcleaner")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/adwcleaner.jpg" class="imageStyl" onClick="adwcleanerInst">
</img>
</div>
<div>
<script language="VBScript">
Sub roguekillerInst
result = MsgBox ("Install RogueKiller Portable?", vbYesNo, "RogueKiller Portable...")
Select Case result
Case vbYes
objShell.run("cinst RogueKillerPortable")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/roguekiller.jpg" class="imageStyl" onClick="roguekillerInst">
</img>
</div>
<div>
<script language="VBScript">
Sub teamviewerInst
result = MsgBox ("Install Teamviewer?", vbYesNo, "Teamviewer...")
Select Case result
Case vbYes
objShell.run("cinst teamviewer")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/teamviewer.jpg" class="imageStyl" onClick="teamviewerInst">
</img>
</div>
</div>
<div class="divStyle">
<p class="groupTitle"><b>Internet Related Programs</b></p>
<div>
<script language="VBScript">
Sub firefoxInst
result = MsgBox ("Install Firefox?", vbYesNo, "Firefox...")
Select Case result
Case vbYes
objShell.run("cinst firefox")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/firefox.jpg" class="imageStyl" onClick="firefoxInst">
</img>
</div>
<div>
<script language="VBScript">
Sub chromeInst
result = MsgBox ("Install Chrome?", vbYesNo, "Chrome...")
Select Case result
Case vbYes
objShell.run("cinst GoogleChrome")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/chrome.jpg" class="imageStyl" onClick="chromeInst">
</img>
</div>
<div>
<script language="VBScript">
Sub operaInst
result = MsgBox ("Install Opera?", vbYesNo, "Opera...")
Select Case result
Case vbYes
objShell.run("cinst opera")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/opera.jpg" class="imageStyl" onClick="operaInst">
</img>
</div>
<div>
<script language="VBScript">
Sub midoriInst
result = MsgBox ("Install Midori?", vbYesNo, "Midori...")
Select Case result
Case vbYes
objShell.run("cinst midori-browser")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/midori.jpg" class="imageStyl" onClick="midoriInst">
</img>
</div>
<div>
<script language="VBScript">
Sub qupzillaInst
result = MsgBox ("Install Qupzilla?", vbYesNo, "Qupzilla...")
Select Case result
Case vbYes
objShell.run("cinst qupzilla")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/qupzilla.jpg" class="imageStyl" onClick="qupzillaInst">
</img>
</div>
<div>
<script language="VBScript">
Sub fileZillaInst
result = MsgBox ("Install Filezilla?", vbYesNo, "Filezilla...")
Select Case result
Case vbYes
objShell.run("cinst filezilla")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/fileZilla.jpg" class="imageStyl" onClick="fileZillaInst">
</img>
</div>
<div>
<script language="VBScript">
Sub dropboxInst
result = MsgBox ("Install Dropbox?", vbYesNo, "Dropbox...")
Select Case result
Case vbYes
objShell.run("cinst dropbox")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/dropbox.jpg" class="imageStyl" onClick="dropboxInst">
</img>
</div>
<div>
<script language="VBScript">
Sub megaSyncInst
result = MsgBox ("Install MegaSync?", vbYesNo, "MegaSync...")
Select Case result
Case vbYes
objShell.Run "curl --url https://mega.nz/MEGAsyncSetup.exe --output Downloads\MegaSync.exe", 1, True
objShell.Exec("Downloads\MegaSync.exe")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/megaSync.jpg" class="imageStyl" onClick="megaSyncInst">
</img>
</div>
</div>
<div class="divStyle">
<p class="groupTitle"><b>Office/Art Programs</b></p>
<div>
<script language="VBScript">
Sub calibreInst
result = MsgBox ("Install Calibre?", vbYesNo, "Calibre...")
Select Case result
Case vbYes
objShell.run("cinst calibre")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/calibre.jpg" class="imageStyl" onClick="calibreInst">
</img>
</div>
<div>
<script language="VBScript">
Sub libreofficeInst
result = MsgBox ("Install Libreoffice?", vbYesNo, "Libreoffice...")
Select Case result
Case vbYes
objShell.run("cinst libreoffice")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/libreoffice.jpg" class="imageStyl" onClick="libreofficeInst">
</img>
</div>
<div>
<script language="VBScript">
Sub openofficeInst
result = MsgBox ("Install OpenOffice?", vbYesNo, "Openoffice...")
Select Case result
Case vbYes
objShell.run("cinst OpenOffice")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/openoffice.jpg" class="imageStyl" onClick="openofficeInst">
</img>
</div>
<div>
<script language="VBScript">
Sub wpsOfficeInst
result = MsgBox ("Install WPSOffice?", vbYesNo, "WPSOffice...")
Select Case result
Case vbYes
objShell.Run "curl --url http://Downloads.wps.com/personal/wps_office_free.exe --output Downloads\WPSOffice.exe", 1, True
objShell.Exec("Downloads\WPSOffice.exe")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/wpsOffice.jpg" class="imageStyl" onClick="wpsOfficeInst">
</img>
</div>
<div>
<script language="VBScript">
Sub foxitInst
result = MsgBox ("Install FoxitPDF Reader?", vbYesNo, "FoxitPDF Reader...")
Select Case result
Case vbYes
objShell.run("cinst FoxitReader")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/foxit.jpg" class="imageStyl" onClick="foxitInst">
</img>
</div>
<div>
<script language="VBScript">
Sub notepadPlusPlusInst
result = MsgBox ("Install Notepad++?", vbYesNo, "Notepad++...")
Select Case result
Case vbYes
objShell.run("cinst notepadplusplus")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/notepad++.jpg" class="imageStyl" onClick="notepadPlusPlusInst">
</img>
</div>
<div>
<script language="VBScript">
Sub gimpInst
result = MsgBox ("Install Gimp?", vbYesNo, "Gimp...")
Select Case result
Case vbYes
objShell.run("cinst gimp")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/gimp.jpg" class="imageStyl" onClick="gimpInst">
</img>
</div>
<div>
<script language="VBScript">
Sub kritaInst
result = MsgBox ("Install Krita?", vbYesNo, "Krita...")
Select Case result
Case vbYes
objShell.run("cinst krita")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/krita.jpg" class="imageStyl" onClick="kritaInst">
</img>
</div>
<div>
<script language="VBScript">
Sub paintnetInst
result = MsgBox ("Install Paint.Net?", vbYesNo, "Paint.Net...")
Select Case result
Case vbYes
objShell.run("cinst paint.net")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/paintnet.jpg" class="imageStyl" onClick="paintnetInst">
</img>
</div>
<div>
<script language="VBScript">
Sub xnviewInst
result = MsgBox ("Install XnView?", vbYesNo, "XnView...")
Select Case result
Case vbYes
objShell.run("cinst XnView")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/xnview.jpg" class="imageStyl" onClick="xnviewInst">
</img>
</div>
</div>
<div class="divStyle">
<p class="groupTitle"><b>Media Programs</b></p>
<div>
<script language="VBScript">
Sub daumPotPlayerInst
result = MsgBox ("Install Daum PotPlayer?", vbYesNo, "Daum PotPlayer...")
Select Case result
Case vbYes
objShell.run("cinst potplayer")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/daumPotPlayer.jpg" class="imageStyl" onClick="daumPotPlayerInst">
</img>
</div>
<div>
<script language="VBScript">
Sub smplayer2Inst
result = MsgBox ("Install SMPlayer2?", vbYesNo, "SMPlayer2...")
Select Case result
Case vbYes
objShell.run("cinst smplayer2")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/smplayer2.jpg" class="imageStyl" onClick="smplayer2Inst">
</img>
</div>
<div>
<script language="VBScript">
Sub vlcInst
result = MsgBox ("Install VLC?", vbYesNo, "VLC...")
Select Case result
Case vbYes
objShell.run("cinst vlc")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/vlc.jpg" class="imageStyl" onClick="vlcInst">
</img>
</div>
<div>
<script language="VBScript">
Sub obsInst
result = MsgBox ("Install Open Broadcaster Software?", vbYesNo, "Open Broadcaster Software...")
Select Case result
Case vbYes
objShell.run("cinst obs")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/obs.jpg" class="imageStyl" onClick="obsInst">
</img>
</div>
</div>
<div class="divStyle">
<p class="groupTitle"><b>Torrent Clients</b></p>
<div>
<script language="VBScript">
Sub qBittorrentInst
result = MsgBox ("Install qBittorrent?", vbYesNo, "qBittorrent...")
Select Case result
Case vbYes
objShell.run("cinst qbittorrent")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/qBittorrent.jpg" class="imageStyl" onClick="qBittorrentInst">
</img>
</div>
<div>
<script language="VBScript">
Sub delugeInst
result = MsgBox ("Install Deluge?", vbYesNo, "Deluge...")
Select Case result
Case vbYes
objShell.run("cinst deluge")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/deluge.jpg" class="imageStyl" onClick="delugeInst">
</img>
</div>
<div>
<script language="VBScript">
Sub vuzeInst
result = MsgBox ("Install Vuze?", vbYesNo, "Vuze...")
Select Case result
Case vbYes
objShell.run("cinst vuzeclient")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/vuze.jpg" class="imageStyl" onClick="vuzeInst">
</img>
</div>
<div>
<script language="VBScript">
Sub transmissionInst
result = MsgBox ("Install Transmission?", vbYesNo, "Transmission...")
Select Case result
Case vbYes
objShell.run("cinst transmission-qt")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/transmission-qt.jpg" class="imageStyl" onClick="transmissionInst">
</img>
</div>
</div>
<div class="divStyle">
<p class="groupTitle"><b>Social Programs</b></p>
<div>
<script language="VBScript">
Sub thunderbirdInst
result = MsgBox ("Install Thunderbird?", vbYesNo, "Thunderbird...")
Select Case result
Case vbYes
objShell.run("cinst thunderbird")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/thunderbird.jpg" class="imageStyl" onClick="thunderbirdInst">
</img>
</div>
<div>
<script language="VBScript">
Sub pidginInst
result = MsgBox ("Install Pidgin?", vbYesNo, "Pidgin...")
Select Case result
Case vbYes
objShell.run("cinst pidgin")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/pidgin.jpg" class="imageStyl" onClick="pidginInst">
</img>
</div>
<div>
<script language="VBScript">
Sub teamSpeakInst
result = MsgBox ("Install Teamspeak?", vbYesNo, "Teamspeak...")
Select Case result
Case vbYes
objShell.run("cinst teamspeak")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/teamSpeak.jpg" class="imageStyl" onClick="teamSpeakInst">
</img>
</div>
<div>
<script language="VBScript">
Sub skypeInst
result = MsgBox ("Install Skype?", vbYesNo, "Skype...")
Select Case result
Case vbYes
objShell.run("cinst teamspeak")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/skype.jpg" class="imageStyl" onClick="skypeInst">
</img>
</div>
<div>
<script language="VBScript">
Sub hexchatInst
result = MsgBox ("Install Hexchat?", vbYesNo, "Hexchat...")
Select Case result
Case vbYes
objShell.run("cinst hexchat")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/hexchat.jpg" class="imageStyl" onClick="hexchatInst">
</img>
</div>
</div>
<div class="divStyle">
<p class="groupTitle"><b>Enhancements & Utilities</b></p>
<div>
<script language="VBScript">
Sub vboxInst
result = MsgBox ("Install VirtualBox?", vbYesNo, "VirtualBox...")
Select Case result
Case vbYes
objShell.run("cinst virtualbox")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/vbox.jpg" class="imageStyl" onClick="vboxInst">
</img>
</div>
<div>
<script language="VBScript">
Sub dexpotInst
result = MsgBox ("Install Dexpot?", vbYesNo, "Dexpot...")
Select Case result
Case vbYes
objShell.run("cinst dexpot")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/dexpot.jpg" class="imageStyl" onClick="dexpotInst">
</img>
</div>
<div>
<script language="VBScript">
Sub fluxtInst
result = MsgBox ("Install F.Lux?", vbYesNo, "F.Lux...")
Select Case result
Case vbYes
objShell.run("cinst f.lux")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/flux.jpg" class="imageStyl" onClick="fluxtInst">
</img>
</div>
<div>
<script language="VBScript">
Sub cloverInst
result = MsgBox ("Install Clover?", vbYesNo, "Clover...")
Select Case result
Case vbYes
objShell.run("cinst Clover")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/clover.jpg" class="imageStyl" onClick="cloverInst">
</img>
</div>
<div>
<script language="VBScript">
Sub peazipInst
result = MsgBox ("Install Peazip?", vbYesNo, "Peazip...")
Select Case result
Case vbYes
objShell.run("cinst peazip")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/peazip.jpg" class="imageStyl" onClick="peazipInst">
</img>
</div>
<div>
<script language="VBScript">
Sub winrarInst
result = MsgBox ("Install Winrar?", vbYesNo, "Winrar...")
Select Case result
Case vbYes
objShell.run("cinst winrar")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/winrar.jpg" class="imageStyl" onClick="winrarInst">
</img>
</div>
<div>
<script language="VBScript">
Sub sevenZipInst
result = MsgBox ("Install 7zip?", vbYesNo, "7zip...")
Select Case result
Case vbYes
objShell.run("cinst 7zip")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/7zip.jpg" class="imageStyl" onClick="sevenZipInst">
</img>
</div>
<div>
<script language="VBScript">
Sub vcdInst
result = MsgBox ("Install Virtual Clone Drive?", vbYesNo, "Virtual Clone Drive...")
Select Case result
Case vbYes
objShell.run("cinst VirtualCloneDrive")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/vcd.jpg" class="imageStyl" onClick="vcdInst">
</img>
</div>
<div>
<script language="VBScript">
Sub sumoInst
result = MsgBox ("Install SUMo?", vbYesNo, "SUMo...")
Select Case result
Case vbYes
objShell.run("cinst sumo")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/sumo.jpg" class="imageStyl" onClick="sumoInst">
</img>
</div>
<div>
<script language="VBScript">
Sub pcdecrapifierInst
result = MsgBox ("Install Pc-Decrapifier?", vbYesNo, "Pc-Decrapifier...")
Select Case result
Case vbYes
objShell.run("cinst PCDecrapifierPortable")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/pc-decrapifier.jpg" class="imageStyl" onClick="pcdecrapifierInst">
</img>
</div>
<div>
<script language="VBScript">
Sub cCleanerInst
result = MsgBox ("Install cCleaner?", vbYesNo, "cCleaner...")
Select Case result
Case vbYes
objShell.run("cinst ccleaner")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/cCleaner.jpg" class="imageStyl" onClick="cCleanerInst">
</img>
</div>
<div>
<script language="VBScript">
Sub bleachbitInst
result = MsgBox ("Install Bleachbit?", vbYesNo, "Bleachbit...")
Select Case result
Case vbYes
objShell.run("cinst bleachbit")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/bleachbit.jpg" class="imageStyl" onClick="bleachbitInst">
</img>
</div>
<div>
<script language="VBScript">
Sub deffragglerInst
result = MsgBox ("Install Deffraggler?", vbYesNo, "Deffraggler...")
Select Case result
Case vbYes
objShell.Run "curl --url http://download.piriform.com/dfsetup219.exe --output Downloads\Deffraggler.exe", 1, True
objShell.Exec("Downloads\Deffraggler.exe")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/deffraggler.jpg" class="imageStyl" onClick="deffragglerInst">
</img>
</div>
<div>
<script language="VBScript">
Sub myDefragInst
result = MsgBox ("Install myDefrag?", vbYesNo, "myDefrag...")
Select Case result
Case vbYes
objShell.Run "curl --url http://www.mydefrag.com/Downloads/Download.php?File=MyDefrag-v4.3.1.exe --output Downloads\myDefrag.exe", 1, True
objShell.Exec("Downloads\myDefrag.exe")
Case vbNo
End Select
End Sub
</script>
<img src="../thumbnails/myDefrag.jpg" class="imageStyl" onClick="myDefragInst">
</img>
</div>
</div>
</body>

Binary file not shown.

After

Width:  |  Height:  |  Size: 76 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 34 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 4.2 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 1.5 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 52 KiB

View File

@ -0,0 +1,22 @@
<!DOCTYPE HTML>
<head>
</head>
<body>
<center>
<br>&nbsp; Copyright 2015 - Present
<br>Maxim F. Stewart
<br>
<br>Licensed under the Apache License, Version 2.0 (the "License");
<br>you may not use this file except in compliance with the License.
<br>You may obtain a copy of the License at
<br>
<br>&nbsp;&nbsp;&nbsp;&nbsp; <a href="http://www.apache.org/licenses/LICENSE-2.0">http://www.apache.org/licenses/LICENSE-2.0</a>
<br>
<br>Unless required by applicable law or agreed to in writing, software
<br>distributed under the License is distributed on an "AS IS" BASIS,
<br>WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
<br>See the License for the specific language governing permissions and
<br>limitations under the License.
</center>
</body>
</html>

View File

@ -0,0 +1,22 @@
<!DOCTYPE HTML>
<head>
</head>
<body>
<center>
<br>&nbsp; Copyright 2011 - Present
<br>Rob Reynolds
<br>
<br>Licensed under the Apache License, Version 2.0 (the "License");
<br>you may not use this file except in compliance with the License.
<br>You may obtain a copy of the License at
<br>
<br>&nbsp;&nbsp;&nbsp;&nbsp; <a href="http://www.apache.org/licenses/LICENSE-2.0">http://www.apache.org/licenses/LICENSE-2.0</a>
<br>
<br>Unless required by applicable law or agreed to in writing, software
<br>distributed under the License is distributed on an "AS IS" BASIS,
<br>WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
<br>See the License for the specific language governing permissions and
<br>limitations under the License.
</center>
</body>
</html>

View File

@ -0,0 +1,22 @@
<!DOCTYPE HTML>
<head>
</head>
<body>
<center>
<br>&nbsp; Copyright 2015 - Present
<br>Maxim F. Stewart
<br>
<br>Licensed under the Apache License, Version 2.0 (the "License");
<br>you may not use this file except in compliance with the License.
<br>You may obtain a copy of the License at
<br>
<br>&nbsp;&nbsp;&nbsp;&nbsp; <a href="http://www.apache.org/licenses/LICENSE-2.0">http://www.apache.org/licenses/LICENSE-2.0</a>
<br>
<br>Unless required by applicable law or agreed to in writing, software
<br>distributed under the License is distributed on an "AS IS" BASIS,
<br>WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
<br>See the License for the specific language governing permissions and
<br>limitations under the License.
</center>
</body>
</html>

Binary file not shown.

After

Width:  |  Height:  |  Size: 12 KiB

View File

@ -0,0 +1,130 @@
/*Affects both hta files*/
body {
width: auto;
background: #333333;
}
/*Affects both hta files*/
/* BEGINNING OF TECHNICAL INSTALLER CSS*/
.divStyleHeader, .divStyleLeftColumn,
.divStyleRightTopFrame, .divStyleRightBottomFrame,
.BottomFrame {
clear: both;
z-index: 0;
color: #FFFFFF;
border-style: solid;
border-width: .2em;
background: #222222;
filter: alpha(opacity=80);
}
.bttn, .populr {
background: #222222;
float: left;
}
.bttn {
color: #00FF00;
margin-left: 4em;
}
.bttn:hover {
background: #FFFFFF;
color: #000000;
}
.bttnBTTM {
float: left;
background: #222222;
color: #FFFFFF;
margin-left: 4em;
}
.bttnBTTM:hover {
color: #00E8FF;
}
.populr:hover {
background: #FFFFFF;
color: #000000;
}
.divStyleHeader {
clear: both;
width: 100%;
height: 2em;
margin-bottom: 1em;
}
.divStyleLeftColumn {
float: left;
width: 30%;
height: 28em;
margin-right: 1em;
}
.divStyleRightTopFrame {
float: right;
width: 65%;
height: 18em;
}
.divStyleRightBottomFrame {
float: right;
width: 65%;
height: 10em;
margin-top: 1em;
}
.BottomFrame {
width: 100%;
height: 2em;
margin-top: .5em;
}
.image {
float: left;
text-align: center;
clear: left;
margin-top: .5em;
margin-left: 25%;
width: 50%;
height: 6em;
background: #222222;
}
.image:hover {
background: #FFFFFF;
}
/* END OF TECHNICAL INSTALLER CSS*/
/* BEGINNING OF POPULER HTA PAGE CSS*/
.imageStyl {
width: 6em;
height: 4em;
float: left;
margin-top: 1em;
margin-left: 3em;
z-index: 1;
}
.imageStyl:hover {
background-color: #000000;
width: 8em;
height: 8em;
}
.groupTitle {
color: #0E8FF;
font-size: 200%;
}
.divStyle, .divStyleAbout {
z-index: 0;
clear: both;
position: relative;
text-align: center;
width: 100%;
font-size: 100%;
border-style: solid;
border-width: .2em;
color: #FFFFFF;
background-color: #222222;
filter: alpha(opacity=80);
}
.divStyle {
margin: .2em;
margin-top: 2em;
padding: .2em;
}
.divStyle:hover {
height: 20em;
}

Binary file not shown.

After

Width:  |  Height:  |  Size: 163 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 168 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 10 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 14 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 5.1 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 6.5 KiB

Some files were not shown because too many files have changed in this diff Show More