#include <buttonconstants.au3>
#include <guiconstantsex.au3>
#include <staticconstants.au3>
#include <windowsconstants.au3>
#include <process.au3>
#include <ie.au3>
#include <inet.au3>
Global $Versione = "2.0"
Global $Linkdellaversione = "http://menteinformatica.altervista.org/wp-content/uploads/2009/12/versione.txt"
Global $Linkdelfile = "http://menteinformatica.altervista.org/wp-content/uploads/2009/12/scarica.txt"
If _INetGetSource ($Linkdellaversione) > $Versione Then
$Avvisonuovaversione = MsgBox(64 + 4,"Avviso","Nuova versione disponibile. Scaricare ora?")
If $Avvisonuovaversione = 6 Then
$Linkscaricamento = _INetGetSource ($Linkdelfile)
_IECreate($Linkscaricamento)
EndIf
EndIf
If Not IsAdmin() Then
MsgBox(16,"Attenzione","Impossibile avviare il programma in modalità guest.")
Exit
EndIf
If UBound(ProcessList(@ScriptName)) > 2 Then
MsgBox(16,"Attenzione", "Mein Optimize è già in esecuzione!", 5)
Exit
EndIf
$pubblic=GUICreate("pubblicità",400,440)
$ok=GUICtrlCreateButton("OK",10,410,380)
_pub("http://googleads.g.doubleclick.net/aclk?sa=l&ai=Bl-oWyCcyS7T2NcKIsga47qjxDcOErZ4Bw4CesAyhlLmgBfC5JhABGAEgoLD9CDgAULzm_uv9_____wFg_YqXhPwRoAH3i7r8A7IBH21lbnRlaW5mb3JtYXRpY2EuYWx0ZXJ2aXN0YS5vcme6AQoxMjV4MTI1X2FzyAEB2gEnaHR0cDovL21lbnRlaW5mb3JtYXRpY2EuYWx0ZXJ2aXN0YS5vcmcvgAIBwAIByAL5n5AGqAMByAMH6APlA-gDGegDpgP1AwAAAIQ&num=1&sig=AGiWqtzPNICfbuwDLuNWwPj2XFomL7pL9w&client=ca-pub-9690415737402155&adurl=http://www.dead-sea-health.org/it/index.html&nm=28",0,0,400,400)
GUISetState()
While 1
Switch GUIGetMsg()
Case $gui_event_close
ExitLoop
Case $ok
ExitLoop
EndSwitch
WEnd
GUIDelete($pubblic)
$Form1 = GUICreate("Mein Optimizer", 604, 445, 731, 204)
$MenuItem1 = GUICtrlCreateMenu("File")
$MenuItem3 = GUICtrlCreateMenuItem("Visita il sito", $MenuItem1)
$MenuItem4 = GUICtrlCreateMenuItem("Visita il forum", $MenuItem1)
$MenuItem5 = GUICtrlCreateMenuItem("Esci", $MenuItem1)
$MenuItem2 = GUICtrlCreateMenu("Opzioni")
$MenuItem3 = GUICtrlCreateMenu("Sostienici")
$MenuItem6 = GUICtrlCreateMenuItem("Segnala bug", $MenuItem2)
$MenuItem7 = GUICtrlCreateMenuItem("Dacci un consiglio", $MenuItem2)
$MenuItem8 = GUICtrlCreateMenuItem("Contattaci", $MenuItem2)
$MenuItem10 = GUICtrlCreateMenuItem("Info", $MenuItem2)
$MenuItem9 = GuictrlcreateMenuitem("Donazione", $MenuItem3)
$button1 = GUICtrlCreateButton("Pulizia Disco", 0, 80, 75, 25, $WS_GROUP)
$button2 = GUICtrlCreateButton("Aggiorna PC", 0, 120, 75, 25, $WS_GROUP)
$button3 = GUICtrlCreateButton("Backup", 0, 160, 75, 25, $WS_GROUP)
$button9 = GUICtrlCreateButton ("Pulizia", 0, 200, 75, 25, $WS_GROUP)
$button4 = GUICtrlCreateButton ("Velocizza Spegnimento", 0, 240, 120, 25, $WS_GROUP)
$button5 = GUICtrlCreateButton ("Velocizza avvio sistema", 0, 280, 120, 25, $WS_GROUP)
$button6 = GUICtrlCreateButton ("Libera memoria registro di di sistema", 0, 320, 180, 25, $WS_GROUP)
$button7 = GUICtrlCreateButton ("Velocizzare avvio dei menu", 0, 360, 150, 25, $WS_GROUP)
$button8 = GUICtrlCreateButton ("Mein Optimizer all'avvio di Windows", 0, 400, 180, 25, $WS_GROUP)
Fileinstall("C:UsersPC-GiovanniDesktoppulizia.jpg", "C:pulizia.jpg")
$Pic1 = GUICtrlCreatePic("C:pulizia.jpg", -16, 8, 628, 420, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
$Riconoscimenti = GUICtrlCreateLabel("MEIN OPTIMIZE by Trade_96", 0, 0, 316, 17, $SS_CENTER, BitOR($WS_EX_STATICEDGE,$GUI_WS_EX_PARENTDRAG))
GUICtrlSetCursor (-1, 0)
GUISetState(@SW_SHOW)
While 1
$nmsg = GUIGetMsg()
Switch $nmsg
Case $GUI_EVENT_CLOSE
Exit
Case $button1
Run ("cleanmgr.exe")
Case $button2
Run ("wuapp.exe")
Case $button3
Run ("sdclt.exe")
Case $button9
FileChangeDir(@TempDir)
$file=FileFindFirstFile("*.*")
While 1
$find=FileFindNextFile($file)
If @error Then ExitLoop
FileDelete($find)
$var1 = "Pulizia file temporanei eseguita con successo,"
$var2 = "attendi che la finestra si chiuda"
$var3 = $var1&$var2
MsgBox(4096,"Funzione eseguita con successo",$var3,2)
WEnd
Case $button4
RegWrite("HKEY_CURRENT_USERControl PanelDesktop","WaitToKillAppTimeout","REG_SZ","1000")
MsgBox(0,"Funzione eseguita con successo","Velocizza Spegnimento è stato applicato al vostro computer")
Case $button5
RegWrite("HKEY_LOCAL_MACHINESYSTEMCurrentControlSetControlSession ManagerMemory ManagementPrefetchParameters", "EnablePrefetcher", "REG_DWORD","3")
MsgBox(0,"Funzione eseguita con successo","Velocizza Avvio è stato applicato al vostro computer")
Case $button6
RegWrite("HKEY_LOCAL_MACHINESOFTWAREMicrosoftWindowsCurrentVersionExplorer", "AlwaysUnloadDll", "REG_DWORD", "1")
MsgBox(0,"Funzione eseguita con successo","Libera memoria registro di sistema è stato applicato al vostro computer")
Case $button7
RegWrite("HKEY_CURRENT_USERControl PanelDesktop", "MenuShowDelay", "REG_SZ","1")
MsgBox(0,"Funzione eseguita con successo","Velocizza i menu è stato applicato al vostro computer")
Case $button8
RegWrite("HKEY_LOCAL_MACHINESOFTWAREMicrosoftWindowsCurrentVersionRun", "Mein Optimizer", "REG_SZ", "C:user@UserNameDesktopMein Optimizer.exe")
MsgBox(0,"Funzione eseguita con successo","Mein Optimizer all'avvio del computer è stata applicato al vostro computer")
Case $MenuItem3
_RunDOS("start [URL=http://www.menteinformatica.altervista.org"]http://www.menteinformatica.altervista.org"[/URL])
Case $MenuItem4
_RunDOS("start [URL=http://www.forumsupporto.altervista.org"]http://www.forumsupporto.altervista.org"[/URL])
Case $MenuItem5
Exit
Case $MenuItem6
_RunDOS("start [URL=http://menteinformatica.altervista.org/bugsoftware"]http://menteinformatica.altervista.org/bugsoftware"[/URL])
Case $MenuItem7
_RunDOS("start [URL=http://menteinformatica.altervista.org/consiglisoftware"]http://menteinformatica.altervista.org/con...isoftware"[/URL])
Case $MenuItem10
$var1 = "Mein Optimizer ver.1.0 è un programma completamente gratuito. "
$var2 = "Il software implementa sempre nuove funzioni, quindi vi consiglio di "
$var3 = "visitare sempre il sito [URL=http://www.menteinformatica.altervista.org]www.menteinformatica.altervista.org[/URL] "
$var4 = "per essere aggiornati. "
$var5 = "Versione attuale: 1.0"
$var6 = $var1&$var2&$var3&$var4&$var5
MsgBox(0,"Info", $var6)
Case $MenuItem9
$var1 = "Effettua una donazione tramite postepay per Mein Optimizer, anche un tuo piccolo gesto ci aiuta. "
$var2 = "Grazie. "
$var3 = "Intestatario: Giovanni Silvestre. Numero carta: 4023600446475446."
$var4 = $var1&$var2&$var3
MsgBox(0,"Donazione", $var4)
Case $MenuItem8
$var1 = "Contatti: "
$var2 = "Msn: ago4ever@live.it "
$var3 = "E-mail: menteinformatica@ymail.com "
$var4 = "Sito Web: [URL=http://www.menteinformatica.altervista.org"]www.menteinformatica.altervista.org"[/URL]
$var5 = $var1&$var2&$var3&$var4
MsgBox(0,"Contattaci", $var5)
EndSwitch
WEnd
;~ Case $filedelete
;~ FileChangeDir(@TempDir)
;~ $file=FileFindFirstFile("*.*")
;~ While 1
;~ $find=FileFindNextFile($file)
;~ If @error Then ExitLoop
;~ FileDelete($find)
;~ WEnd
Func _pub($_url,$left,$top,$width,$height)
$obj_ie=ObjCreate("shell.explorer.2")
$_create_obj=GUICtrlCreateObj($obj_ie,$left,$top,$width,$height)
$obj_ie.navigate($_url)
Return $obj_ie
EndFunc
