spymare Posted July 17, 2010 Share Posted July 17, 2010 (edited) Hi 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 Filehostinggamingbooster.au3expandcollapse popup#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 WEndproc.inisteam.exe hl2.exe itunes.exe winword.exe firefox.exe counter-strike.exeservice.iniexpandcollapse popup6to4 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 xmlprovimage.bmpwhole project folder with all fileshttp://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: Edited July 17, 2010 by spymare Link to comment Share on other sites More sharing options...
Theri Posted July 18, 2010 Share Posted July 18, 2010 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 More sharing options...
Ascend4nt Posted July 18, 2010 Share Posted July 18, 2010 Anything that deletes those registry keys without asking or letting the user know isn't going to get a try (or vote) from me. My contributions: Performance Counters in Windows - Measure CPU, Disk, Network etc Performance | Network Interface Info, Statistics, and Traffic | CPU Multi-Processor Usage w/o Performance Counters | Disk and Device Read/Write Statistics | Atom Table Functions | Process, Thread, & DLL Functions UDFs | Process CPU Usage Trackers | PE File Overlay Extraction | A3X Script Extract | File + Process Imports/Exports Information | Windows Desktop Dimmer Shade | Spotlight + Focus GUI - Highlight and Dim for Eyestrain Relief | CrossHairs (FullScreen) | Rubber-Band Boxes using GUI's (_GUIBox) | GUI Fun! | IE Embedded Control Versioning (use IE9+ and HTML5 in a GUI) | Magnifier (Vista+) Functions UDF | _DLLStructDisplay (Debug!) | _EnumChildWindows (controls etc) | _FileFindEx | _ClipGetHTML | _ClipPutHTML + ClipPutHyperlink | _FileGetShortcutEx | _FilePropertiesDialog | I/O Port Functions | File(s) Drag & Drop | _RunWithReducedPrivileges | _ShellExecuteWithReducedPrivileges | _WinAPI_GetSystemInfo | dotNETGetVersions | Drive(s) Power Status | _WinGetDesktopHandle | _StringParseParameters | Screensaver, Sleep, Desktop Lock Disable | Full-Screen Crash Recovery Wrappers/Modifications of others' contributions: _DOSWildcardsToPCRegEx (original code: RobSaunder's) | WinGetAltTabWinList (original: Authenticity) UDF's added support/programming to: _ExplorerWinGetSelectedItems | MIDIEx UDF (original code: eynstyne) (All personal code/wrappers centrally located at Ascend4nt's AutoIT Code) Link to comment Share on other sites More sharing options...
spymare Posted July 18, 2010 Author Share Posted July 18, 2010 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 anyway this is just an example :=) an im new to autoit Link to comment Share on other sites More sharing options...
Developers Jos Posted July 18, 2010 Developers Share Posted July 18, 2010 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 More sharing options...
Recommended Posts
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 accountSign in
Already have an account? Sign in here.
Sign In Now