• Autoit

 #483121  por leo-johnlenon
 21 Ene 2016, 23:14
#cs ----------------------------------------------------------------------------
 AutoIt Version: 3.3.9.24 (Beta)
 Author: [email protected]
 Fecha; 01/01/2014
 Script Function: Delay Timer
 Uso: Delay($Time, [$Unidad])
                    $Unidad:
                        D - días.
                        M - meses.
                        Y - años
                        w - semanas
                        h - horas
                        n - minutos
                        s - segundos
#ce ----------------------------------------------------------------------------

#Include <Date.au3>

Delay(20, 's')

Func Delay($Timer, $Unidad= 's')
    Local $EndTime, $Now = _NowCalcDate() & " " & @HOUR & ":" & @MIN & ":" & @SEC
    $EndTime = _Dateadd($Unidad, $Timer, $Now)
    Do
        Sleep(1000)
    Until _NowCalcDate() & " " & @HOUR & ":" & @MIN & ":" & @SEC >= $EndTime
EndFunc
 #483128  por comand
 22 Ene 2016, 01:29
 #483135  por CrypterHacker
 22 Ene 2016, 02:12
Gracias por el aporte amigo
 #483235  por leo-johnlenon
 24 Ene 2016, 22:45
_ROOTt_ , comand & CrypterHacker