Avira / Antivir Personal Free v8 desatendido.

prog[pn]=['Avira Personal Free v8'];
ordr[pn]=[94];
desc[pn]=['[img(128,128)]./icons/avira.png[/img]
Avira, es un antivirus de calidad y eficacia realmente impresionante.[i] Recomendado[/i] [b][ES][/b]'];
uid[pn]=['Avira'];
dflt[pn]=['no'];
cat[pn]=['Mantenimiento'];
forc[pn]=['no'];
cmd1[pn]=['%cdrom%\\Install\\Avira\\InstalaAvira.exe'];
pn++;

Opt("WinWaitDelay",100)
Opt("WinTitleMatchMode",4)
Opt("TrayIconHide", 1)

dim $txt1 ,$txt2, $txt3

$txt1 = "Avira AntiVir Personal - Free Antivirus"
$txt2 = "Avira AntiVir Personal – Free Antivirus"
$txt3 =  "Setup of Avira AntiVir Personal – Free Antivirus"

;Instalar Avira / Antivir Personal Free v8
Run("AviraPersonalFrev8.exe")

WinWait($txt1 ,"Decline")
If Not WinActive($txt1 ,"Decline") Then WinActivate($txt1 ,"Decline")
WinWaitActive($txt1 ,"Decline")
ControlClick ($txt1 ,"Decline", "Button1" )

WinWait($txt2,"To continue")
If Not WinActive($txt2,"To continue") Then WinActivate($txt2,"To continue")
WinWaitActive($txt2,"To continue")
ControlClick ($txt2,"To continue","Button2")

WinWait($txt2,"&Atrás")
If Not WinActive($txt2,"&Atrás") Then WinActivate($txt2,"&Atrás")
WinWaitActive($txt2,"&Atrás")
ControlClick ($txt2,"&Atrás","Button2")

WinWait($txt2,"Please read through")
If Not WinActive($txt2,"Please read through") Then WinActivate($txt2,"Please read through")
WinWaitActive($txt2,"Please read through")
Send("{SPACE}")
ControlClick ($txt2,"Please read through","Button3")

WinWait($txt2,"Please confirm")
If Not WinActive($txt2,"Please confirm") Then WinActivate($txt2,"Please confirm")
WinWaitActive($txt2,"Please confirm")
Send("{SPACE}")
ControlClick ($txt2,"Please confirm","Button4")
 
WinWait($txt2,"Generate random serial number")
If Not WinActive($txt2,"Generate random serial number") Then WinActivate($txt2,"Generate random serial number")
WinWaitActive($txt2,"Generate random serial number")
ControlClick ($txt2,"Generate random serial number","Button5")

WinWait($txt2,"Please select a setup type.")
If Not WinActive($txt2,"Please select a setup type.") Then WinActivate($txt2,"Please select a setup type.")
WinWaitActive($txt2,"Please select a setup type.")
ControlClick ($txt2,"Please select a setup type.","Button7")

WinWait($txt2,"Installation complete")
If Not WinActive($txt2,"Installation complete") Then WinActivate($txt2,"Installation complete")
WinWaitActive($txt2,"Installation complete")
send("{SPACE}")
send("{TAB}")
ControlClick ($txt2,"Installation complete","Button12")

WinWait($txt3,"Do you want to start an update now?")
If Not WinActive($txt3,"Do you want to start an update now?") Then WinActivate($txt3,"Do you want to start an update now?")
WinWaitActive($txt3,"Do you want to start an update now?")
send("{TAB}")
send("{ENTER}")

;Cierra Aplicacion
Sleep("200")
ProcessWait("avscan.exe", 10)
ProcessClose("avscan.exe")
ProcessWait("avgnt.exe", 10)
ProcessClose("avgnt.exe")
ProcessWait("avguard.exe", 10)
ProcessClose("avguard.exe")
ProcessWait("sched.exe", 10)
ProcessClose("sched.exe")
Exit

Noticia en Softonic
Nueva versión de AntiVir Personal Edition es un estupendo programa antivirus totalmente gratuito capaz de protegernos, detectar y eliminar más de 150.000 virus.

Incorpora un sistema de actualización automática a través de Internet, dispone de "Virus Guard", una aplicación complementaria residente en memoria y que monitoriza las entradas y salidas de nuestro sistema operativo y es capaz de mantener a raya a todo tipo de engendros informáticos

Está en inglés, es de fácil uso, consume pocos recursos, dispone de una comodísima interfaz de usuario que apuesta por la simplicidad y es gratis.