#RequireAdmin

FileInstall("C:\Users\ccsetup.exe", "C:\ccsetup.exe", 1)

SplashTextOn("CCleaner", "Installing Please do not touch the keyboard or mouse until installation is complete.", 300, 100)

AutoItSetOption('MouseCoordMode', 0)

Run('C:\ccsetup.exe')

Install()

Func Install() ;~ Install Program

	Local $CCHandle = WinGetHandle("[CLASS:#32770]", "CCleaner v5.39 Setup")

	If $CCHandle = 0x00000000 Then
		Sleep(1500)
		Install()
	EndIf

	WinActivate($CCHandle, '')
	WinWaitActive($CCHandle, '')
	Sleep(50)

	ControlClick($CCHandle, "", 1005)
	ControlCommand($CCHandle, "", 'Button4', 'UnCheck')
	ControlCommand($CCHandle, "", 'Button5', 'Check')
	ControlCommand($CCHandle, "", 'Button6', 'UnCheck')
	ControlCommand($CCHandle, "", 'Button7', 'UnCheck')
	ControlCommand($CCHandle, "", 'Button8', 'UnCheck')
	ControlClick($CCHandle, "", 'Button3')
	Sleep(100)
	Open()

EndFunc   ;==>Install

Func Open() ;~Program installed. Run it

	Local $CCHandle1 = WinGetHandle("[CLASS:#32770]", "CCleaner v5.39 Setup Completed")

	If $CCHandle1 = 0x00000000 Then
		Sleep(1500)
		Open()
	EndIf

	WinActivate($CCHandle1)
	WinWaitActive($CCHandle1)
	Sleep(50)

	ControlCommand($CCHandle1, "", 'Button3', 'UnCheck')
	ControlClick($CCHandle1, "", 'Button1')
	Sleep(50)
	StopMon()

EndFunc   ;==>Open

Func StopMon() ;~Disable Monitoring

	Local $CCHandle2 = WinGetHandle("Piriform CCleaner")

	If $CCHandle2 = 0x00000000 Then
		Sleep(1500)
		StopMon()
	EndIf

	WinActivate($CCHandle2)
	WinWaitActive($CCHandle2)
	Sleep(50)

	ControlClick($CCHandle2, "&Options", 1003)
	Sleep(300)
	ControlClick($CCHandle2, "Monitoring", 1021)
	Sleep(300)
	Send("{ESC}")
	Sleep(300)
	ControlCommand($CCHandle2, "Enable &system monitoring", "Button12", 'UnCheck')
	Sleep(300)
	ControlCommand($CCHandle2, "&Enable Active Monitoring", "Button15", 'UnCheck')

	WinWait("Disable Active Monitoring")
	WinActivate("Disable Active Monitoring")
	WinWaitActive("Disable Active Monitoring")
	Sleep(50)

	Send("{TAB 2}")
	Sleep(300)
	Send("{ENTER}")
	Sleep(300)

	ControlClick($CCHandle2, "&Cleaner", 1000)

	FileDelete('C:\ccsetup.exe')

	Exit

EndFunc   ;==>StopMon