#NoTrayIcon
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <INet.au3>
#include <StaticConstants.au3>
#include <ButtonConstants.au3>
If @CPUArch = "X86" Then
    $cpu="32-bit"
EndIf
If @CPUArch = "X64" Then
    $cpu="64-bit"
EndIf

$form1 = GUICreate("cyb3rmann", 800,400)
$helo=GUICtrlCreateLabel("                    Hello, "&@UserName&" !",0,0,800,30)
GUICtrlSetFont($helo,18,"","","Comic Sans Ms")
GUICtrlSetColor($helo,0xffffff)
GUICtrlSetBkColor($helo,0x0000ff)
$hi=GUICtrlCreateLabel("Hi. I'm cyb3rmann, and I'm glad to help you customizing your computer."&@CRLF&"Hope you like this.",10,30,900,70)
guictrlsetfont($hi,20,'','',"Times New Roman")
GUICtrlSetColor($hi,0xff0000)
$sysbtn = GUICtrlCreateButton("System info", 300, 100, 85, 25, 0)
$poza=GUICtrlCreatePic(@ScriptDir & "\poza.bmp",0,220,"","",BitOR($SS_NOTIFY, $WS_GROUP, $WS_CLIPSIBLINGS))
$modify=GUICtrlCreateButton("Modify XP",400,100,85,25)
$shut=guictrlcreatebutton("Shut down",0,100,60,25)
$logoff=guictrlcreatebutton("Logg off",120,100,60,25)
$restart=guictrlcreatebutton("Restart",60,100,60,25)
$stand=GUICtrlCreateButton("Standby",180,100,60,25)
$process=GUI CtrlCreateInput("",0,195,200,25)
$kill=guictrlcreatebutton("Kill this process!",0,170)
$runnotepad=GUICtrlCreateButton("Run notepad!",530,195)
$runregedit=guictrlcreatebutton("Run regedit!",610,195)
$runtask=GUICtrlCreateButton("Run task manager!",680,195)
$calk=guictrlcreatebutton("Calculeaza:",280,170)
$numere = GUICtrlCreateInput("", 280, 195, 215, 25)

$form2 = GUICreate("sys info", 300, 200)
$iplab2=GUICtrlCreateLabel("Your IP is: "&_GetIP(),10,10)
$compnamelab2=GUICtrlCreateLabel("Your computer name is: "& @ComputerName,10,30)
$usernamelab2=GUICtrlCreateLabel("Your user name is: "& @UserName,10,50)
$osversionlab2=GUICtrlCreateLabel("Your OS is: "& @OSType& " ==> "&@OSVersion,10,70)
$desktopwidth2=GUICtrlCreateLabel("Your desktop width is: "&@DesktopWidth,10,90)
$deskheight2=GUICtrlCreateLabel("Your desktop height is: "&@DesktopHeight,10,110)
$deskdeph2=GUICtrlCreateLabel("Your desktop depth is: "&@DesktopDepth,10,130)
$deskrate2=GUICtrlCreateLabel("Your desktop refresh rate is: "&@DesktopRefresh& " Hz",10,150)
$cpu=guictrlcreatelabel("Your CPU is "& $cpu,10,170)

$Form3=GUICreate("modify XP",300,200)
$echeck=GUICtrlCreateCheckbox("Enable multimessenger",10,10)
$user=GUICtrlCreateCheckbox("No username in startmenu",10,30)
$apply=GUICtrlCreateButton("Apply",230,0,70)
$deltemp=guictrlcreatebutton("Delete temp files",5,110,100,25)
$delnet=guictrlcreatebutton("Delete all cookies",5,140,100,25)
$delhist=guictrlcreatebutton("Delete history",5,170,100,25)

GUISetState(@SW_SHOW,$form1)

Func apply()
    enable()
    user()
EndFunc
Func user()
    If GUICtrlRead($user)=1 Then
       RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer","NoUserNameInStartMenu","REG_DWORD",1)
    Else
       RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer","NoUserNameInStartMenu","REG_DWORD",0)
    EndIf
EndFunc
Func enable()
    If GUICtrlRead($echeck)=1 Then
       RegWrite("HKEY_CURRENT_USER\Software\Yahoo\pager\Test","Plural","REG_DWORD",1)
    Else  
       RegWrite("HKEY_CURRENT_USER\Software\Yahoo\pager\Test","Plural","REG_DWORD",0)
    EndIf
EndFunc

While 1
    $nMsg = GUIGetMsg(1)
    Switch $nMsg[0]
       Case $GUI_EVENT_CLOSE
          Switch $nMsg[1]
             Case $Form1
                MsgBox(0,"Message from cyb3rmann:","Thank you for using my shit!")
                Exit
             Case $Form2
                GUISetState(@SW_HIDE, $Form2)
             Case $Form3
                GUISetState(@SW_HIDE, $Form3)
          EndSwitch
       Case $sysbtn
          GUISetState(@SW_SHOW, $Form2)
       Case $modify
          GUISetState(@SW_Show,$Form3)
       Case $apply
          apply()
       Case $deltemp
          Run(@ScriptDir&"\temp.bat","", @SW_HIDE)
       Case $delnet
          ;===========================
       Case $shut
          Shutdown(1)
       Case $logoff
          Shutdown(0)
       Case $restart
          Shutdown(2)
       Case $stand
          Shutdown(32)
       Case $kill
          ProcessClose(GUICtrlRead($process))
       Case $runnotepad
          Run("notepad.exe")
       Case $runregedit
          Run("regedit.exe")
       Case $runtask
          Run("taskmgr.exe")
       Case $delnet
          Run("cookie.bat",@scriptDir,"",@SW_HIDE)
       Case $delhist
          Run("history.bat",@scriptdir,"",@SW_HIDE)
       Case $calk
          $rezultat=Execute(GUICtrlRead($numere))
          guictrlsetdata($numere,$rezultat)
    EndSwitch
WEnd