conteo y apagado de pc
Publicado: 27 May 2015, 19:00
Hola,!! gente tengo una pregunta estoy intentando hacer q cuando llege a un cierto numero se apage la pc por ejmplo llege al 800 y se apage pero algo configurable porque si yo ya tengo 200 le quiero poner q cuente de 200 para arriba asta 800, buscando encontré algo que es mas o menos lo que quiero hacer pero no se me ocurre como modificarlo para poderlo adaptar al scrip q estoy tratando de hacer :( alguien me da una mano???
Código: Seleccionar todo
$sRespuesta=InputBox("Programación de apagado del pc","¿En cuantos minutos quiere que se apague el PC?")
if $sRespuesta="" or not(StringIsDigit($sRespuesta)) then exit
sleep(number($sRespuesta)*60000)
$sInformacion="Han pasado los "&$sRespuesta&" minutos"& @crlf &"Si no pulsa Cancelar se apaga en 20 segundos"
if MsgBox(1,"Programación de apagado del pc ",$sInformacion,20)<>2 then Shutdown(5)
Código: Seleccionar todo
HotKeySet("{F3}", "contador")
While 1
Sleep(100)
WEnd
func contador()
while 1
PixelSearch (440, 658, 440, 658, 0xB80201 , 1)
If Not @error Then
Sleep (100)
MouseMove (623,254)
MouseDown ("primary")
Sleep (100)
MouseUp ("primary")
Sleep (600)
EndIf
Prueba()
WEnd
EndFunc
Func Prueba()
Local static $contador=0
MsgBox(0,"",$contador)
$contador+=1
EndFunc