Jump to content

GamingBooster


spymare
 Share

Recommended Posts

Hi :blink: i am new to autoit and spend some time creating this program i call GamingBooster.

please reply what you think about it, and come with feedback to improvements.

Download: RapidShare: 1-CLICK Web hosting - Easy Filehosting

gamingbooster.au3

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <Process.au3>
#notrayicon
#Region ### START Koda GUI section ### Form=c:\users\pc\desktop\koda\form1.kxf
$Form1_1 = GUICreate("GamingBooster 1.0", 570, 219, 202, 158)
GUISetIcon(@scriptdir & "\icon.ico")
GUISetBkColor(0x000000)
$Pic1 = GUICtrlCreatePic(@scriptdir & "\image.bmp", 0, 0, 249, 217, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
$Label4 = GUICtrlCreateLabel("Boost Games", 273, 45, 67, 17)
GUICtrlSetColor(-1, 0x00FF00)
$gboost = GUICtrlCreateButton("", 249, 45, 17, 17, $WS_GROUP)
GUICtrlSetTip(-1, "Get highter performance in games - use the manager to edit your game list")
$Label5 = GUICtrlCreateLabel("UnBoost Games", 386, 46, 81, 17)
GUICtrlSetColor(-1, 0x00FF00)
$gunboost = GUICtrlCreateButton("", 362, 46, 17, 17, $WS_GROUP)
GUICtrlSetTip(-1, "Unboost all games - recommended if your done playing")
$Label6 = GUICtrlCreateLabel("Manage", 504, 47, 43, 17)
GUICtrlSetColor(-1, 0x00FF00)
$gmanager = GUICtrlCreateButton("", 480, 47, 17, 17, $WS_GROUP)
GUICtrlSetTip(-1, "Use the manager to edit the Game list - 1 game per line")
$Games = GUICtrlCreateLabel("Games", 256, 8, 85, 33)
GUICtrlSetFont(-1, 18, 800, 0, "Tahoma")
GUICtrlSetColor(-1, 0x00FFFF)
$service = GUICtrlCreateLabel("Services", 256, 81, 103, 33)
GUICtrlSetFont(-1, 18, 800, 0, "Tahoma")
GUICtrlSetColor(-1, 0x00FFFF)
$oneclick = GUICtrlCreateLabel("1Click Boost", 256, 149, 151, 33)
GUICtrlSetFont(-1, 18, 800, 0, "Tahoma")
GUICtrlSetColor(-1, 0x00FFFF)
$Label1 = GUICtrlCreateLabel("Boost Services", 273, 117, 75, 17)
GUICtrlSetColor(-1, 0x00FF00)
$Label2 = GUICtrlCreateLabel("UnBoost Services", 386, 118, 89, 17)
GUICtrlSetColor(-1, 0x00FF00)
$Label3 = GUICtrlCreateLabel("Manage", 504, 119, 43, 17)
GUICtrlSetColor(-1, 0x00FF00)
$sboost = GUICtrlCreateButton("", 249, 117, 17, 17, $WS_GROUP)
GUICtrlSetTip(-1, "Boost services - this is hightly recommended")
$sunboost = GUICtrlCreateButton("", 362, 117, 17, 17, $WS_GROUP)
GUICtrlSetTip(-1, "Unboost services  - recommended after your done playing")
$smanager = GUICtrlCreateButton("", 480, 117, 17, 17, $WS_GROUP)
GUICtrlSetTip(-1, "Use the manager to edit the Service list - 1 service name per line")
$boost = GUICtrlCreateButton("Boost", 249, 185, 153, 33, $WS_GROUP)
GUICtrlSetFont(-1, 12, 800, 0, "Tahoma")
GUICtrlSetTip(-1, "1Click will boost both games and services and your startup programs - requie logoff retstart first time using this functions")
$unboost = GUICtrlCreateButton("UnBoost", 410, 185, 153, 33, $WS_GROUP)
GUICtrlSetFont(-1, 12, 800, 0, "Tahoma")
GUICtrlSetTip(-1, "Unboost both games and services")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit


Case $gboost
$file = FileOpen("proc.ini", 0)
; Check if file opened for reading OK
If $file = -1 Then
MsgBox(0, "Error", "Unable to open file.")
Exit
EndIf
; Read in lines of text until the EOF is reached
While 1
$line = FileReadLine($file)
If @error = -1 Then ExitLoop
$test = ProcessSetPriority($line,  5)
; progress bar
ProgressOn("Progress Meter", "Increments every second")
ProgressSet($line)
ProgressSet(50 , $line, "Complete")
sleep(200)
ProgressOff()
Wend
FileClose($file)
            
            
Case $gunboost
$file = FileOpen("proc.ini", 0)
; Check if file opened for reading OK
If $file = -1 Then
MsgBox(0, "Error", "Unable to open file.")
Exit
EndIf
; Read in lines of text until the EOF is reached
While 1
$line = FileReadLine($file)
If @error = -1 Then ExitLoop
$test = ProcessSetPriority($line,  2)
; progress bar
ProgressOn("UnBoosting", "Increments every second")
ProgressSet($line)
ProgressSet(50 , $line, "Complete")
sleep(200)
ProgressOff()
Wend
FileClose($file)
            
            
Case $gmanager
ShellExecute(@scriptdir & "\proc.ini")
            
            
Case $sunboost
$file = FileOpen("service.ini", 0)
; Check if file opened for reading OK
If $file = -1 Then
MsgBox(0, "Error", "Unable to open file.")
Exit
EndIf
; Read in lines of text until the EOF is reached
While 1
$line = FileReadLine($file)
If @error = -1 Then ExitLoop
$testt = _RunDos("sc start " & $line)
; progress bar
ProgressOn("Boosting", "Increments every second")
ProgressSet($line)
ProgressSet(50 , $line, "Complete")
sleep(200)
ProgressOff()
Wend
FileClose($file)
            
            
Case $sboost
$file = FileOpen("service.ini", 0)
; Check if file opened for reading OK
If $file = -1 Then
MsgBox(0, "Error", "Unable to open file.")
Exit
EndIf
; Read in lines of text until the EOF is reached
While 1
$line = FileReadLine($file)
If @error = -1 Then ExitLoop
$testt = _RunDos("sc stop " & $line)
; progress bar
ProgressOn("Boosting", "Increments every second")
ProgressSet($line)
ProgressSet(50 , $line, "Complete")
sleep(200)
ProgressOff()
Wend
FileClose($file)
            
            
Case $smanager
ShellExecute(@scriptdir & "\service.ini")
            
            
Case $boost
$file = FileOpen("service.ini", 0)
; Check if file opened for reading OK
If $file = -1 Then
MsgBox(0, "Error", "Unable to open file.")
Exit
EndIf
; Read in lines of text until the EOF is reached
While 1
$line = FileReadLine($file)
If @error = -1 Then ExitLoop
$testt = _RunDos("sc stop " & $line)
; progress bar
ProgressOn("Boosting", "Increments every second")
ProgressSet($line)
ProgressSet(50 , $line, "Complete")
sleep(200)
ProgressOff()
Wend
FileClose($file)    

$file = FileOpen("proc.ini", 0)
; Check if file opened for reading OK
If $file = -1 Then
MsgBox(0, "Error", "Unable to open file.")
Exit
EndIf
; Read in lines of text until the EOF is reached
While 1
$line = FileReadLine($file)
If @error = -1 Then ExitLoop
$test = ProcessSetPriority($line,  5)
; progress bar
ProgressOn("Boosting", "Increments every second")
ProgressSet($line)
ProgressSet(50 , $line, "Complete")
sleep(200)
ProgressOff()
Wend
FileClose($file)
RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run")
RegDelete("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run")
RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Run")

            
            
            
Case $unboost
$file = FileOpen("service.ini", 0)
; Check if file opened for reading OK
If $file = -1 Then
MsgBox(0, "Error", "Unable to open file.")
Exit
EndIf
; Read in lines of text until the EOF is reached
While 1
$line = FileReadLine($file)
If @error = -1 Then ExitLoop
$testt = _RunDos("sc start " & $line)
; progress bar
ProgressOn("UnBoosting", "Increments every second")
ProgressSet($line)
ProgressSet(50 , $line, "Complete")
sleep(200)
ProgressOff()
Wend
FileClose($file)

$file = FileOpen("proc.ini", 0)
; Check if file opened for reading OK
If $file = -1 Then
MsgBox(0, "Error", "Unable to open file.")
Exit
EndIf
; Read in lines of text until the EOF is reached
While 1
$line = FileReadLine($file)
If @error = -1 Then ExitLoop
$test = ProcessSetPriority($line,  2)
; progress bar
ProgressOn("UnBoosting", "Increments every second")
ProgressSet($line)
ProgressSet(50 , $line, "Complete")
sleep(200)
ProgressOff()
Wend
FileClose($file)
            

            
            
    EndSwitch
WEnd

proc.ini

steam.exe
hl2.exe
itunes.exe
winword.exe
firefox.exe
counter-strike.exe

service.ini

6to4
Alerter
ALG
AppMgmt
AudioSrv
BITS
Browser
cisvc
ClipSrv
COMSysApp
CryptSvc
DcomLaunch
dmadmin
dmserver
Dnscache
Dot3svc
EapHost
ehRecvr
ehSched
ERSvc
ehSched
ERSvc
Eventlog
EventSystem
FastUserSwitchingCompatibility
Fax
helpsvc
HidServ
hkmsvc
HTTPFilter
IISADMIN
ImapiService
Iprip
lanmanserver
lanmanworkstation
LmHosts
LPDSVC
Messenger
MHN
mnmsrvc
MSDTC
MSFtpsvc
MSIServer
MSMQ
MSMQTriggers
napagent
NetDDE
NetDDEdsdm
Netlogon
Netman
Nla
NtLmSsp
NtmsSvc
p2pgasvc
p2pimsvc
p2psvc
PlugPlay
PNRPSvc
PolicyAgent
ProtectedStorage
RasAuto
RasMan
RDSessMgr
RemoteAccess
RemoteRegistry
RpcLocator
RpcSs
RSVP
SamSs
SCardSvr
Schedule
seclogon
SENS
SharedAccess
ShellHWDetection
SimpTcp
SMTPSVC
SNMP
SNMPTRAP
Spooler
srservice
SSDPSRV
stisvc
SwPrv
SysmonLog
TapiSrv
TermService
Themes
TlntSvr
TrkWks
upnphost
UPS
VSS
W32Time
w3svc
WebClient
winmgmt
WmdmPmSN
Wmi
WmiApSrv
wscsvc
wuauserv
WZCSVC
xmlprov

image.bmp

Posted Image

whole project folder with all files

http://rapidshare.com/files/407409187/project.7z.html

________________________________________________

Features:

- able to stop any process in 1 click

- able to manage all process from the manager

- able to boost specefic games/programs

- 1click Boost and UnBoost - will stop any process defined in the manager and will Boost all games/program defined in the game manager.

- diable startup items - requie restart or log off

- every single function have a little describtion witch makes it easy for you to see what it does

- very user friendly gui

________________________________________________

Pictures:

Posted Image

Posted Image

Posted Image

Posted Image

Edited by spymare
Link to comment
Share on other sites

Maybe I missed something? But, how does deleting a couple of windows registry keys and changing a processes priority to anything to "boost" a game?

If all you're doing is setting the process priority higher for your gaming application, maybe you should consider a different name for this? Or maybe say that in the description, I found your thread name, etc, to be confusing.

Link to comment
Share on other sites

Anything that deletes those registry keys without asking or letting the user know isn't going to get a try (or vote) from me.

Link to comment
Share on other sites

you can just delete the part where it deletes the startup items.

it will make the games run better on slow machine, because it stop almost any process running, if you want a specefic process

to run, just add it to proc.ini :blink: anyway this is just an example :=) an im new to autoit

Link to comment
Share on other sites

  • Developers

Don't think deleting the all RUN keys in the registry is too smart since your unboost options doesn't seem to restore them.

This could really give problems on PC's.

Jos

SciTE4AutoIt3 Full installer Download page   - Beta files       Read before posting     How to post scriptsource   Forum etiquette  Forum Rules 
 
Live for the present,
Dream of the future,
Learn from the past.
  :)

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...