Tag Godlikerz
Hier habe ich ein Paar Timer lernscripts für euch =D
Beispiel
Code
$timer1 = TimerInit ()
While 1
If TimerDiff ($timer1) > 10000 then ;10000 = 10sec(wird in milisecunden gezählt)
MsgBox (0,"","10 sekunden sind vergangen")
Exit
EndIf
WEndHier ein Kleines Fenster was MilliSekunden und Sekunden zählt.
MAX Minuten einstellbar =D
Code
[FONT=monospace]
$Minutes = 90 ; will wait 90 minutes
Local $60Count = 0, $begin = TimerInit()
While $Minutes > $60Count
$dif = TimerDiff($begin)
$dif2 = StringLeft($dif, StringInStr($dif, ".") -1)
$Count = int($dif/1000)
$60Count = Int($Count / 60)
ToolTip("Minutes Required = " & $Minutes & @CRLF & "Minutes Past = " & $60Count & @CRLF & "Seconds Count = " & $Count & @CRLF & "Mili-Seconds Count = " & $dif2, 20, 20, "Time Machine #1", 1)
Sleep(20)
WEnd
MsgBox(64, "Time-Up!!", "Your " & $Minutes & " minutes have passed ")[/FONT]
Relativ eifnach zu verstehen schauts euch an testen , probieren ... =D, so könnt ihr auch Timer für SPiele amchen...
Hier nochmal ein einfacher Countdown in milliSekunden:
Code
$count=Inputbox("enter time count","","30000")
$timerinit=TimerInit()
While 1
MsgBox(0, "countDowb",$count-TimerDiff($timerinit), 1)
If $count-TimerDiff($timerinit)<0 then exit
WEndHier nochmal ein CountDown in Sec
Achtung: Dafür braucht ihr _CountDown.au3 diese Datei downlaoden und in C:\Programme\AutoIt3\Includes rein! (Ps Creditz gehen an BugFix aus autoit.de für _CountDown.au3)
testet bissel rumm, so lernt man am besten =D
Script:
C
#include <GUIConstants.au3>
#include <EditConstants.au3>
#include <_CountDown.au3>
Local $sec, $min, $hr, $day
$gui = GUICreate('CountDown')
GUICtrlCreateLabel('Tage', 15, 18, 60, 17)
$iD = GUICtrlCreateInput('', 80, 15, 20, 20, $ES_NUMBER)
GUICtrlCreateLabel('Stunden', 15, 48, 60, 17)
$iH = GUICtrlCreateInput('', 80, 45, 20, 20, $ES_NUMBER)
GUICtrlCreateLabel('Minuten', 15, 78, 60, 17)
$iM = GUICtrlCreateInput('', 80, 75, 20, 20, $ES_NUMBER)
GUICtrlCreateLabel('Sekunden', 15, 108, 60, 17)
$iS = GUICtrlCreateInput('', 80, 105, 20, 20, $ES_NUMBER)
$bt = GUICtrlCreateButton('Start', 140, 15, 50, 20)
$iDown = GUICtrlCreateInput('', 200, 15, 80, 20, $ES_READONLY)
GUISetState()
While True
$msg = GUIGetMsg()
If $msg = $bt Then
If GUICtrlRead($iD) = '' Then
$day = 0
Else
$day = GUICtrlRead($iD)
EndIf
If GUICtrlRead($iH) = '' Then
$hr = 0
Else
$hr = GUICtrlRead($iH)
EndIf
If GUICtrlRead($iM) = '' Then
$min = 0
Else
$min = GUICtrlRead($iM)
EndIf
If GUICtrlRead($iS) = '' Then
$sec = 0
Else
$sec = GUICtrlRead($iS)
EndIf
_CountDown($sec, $min, $hr, $day, True, $iDown)
ElseIf $msg = $GUI_EVENT_CLOSE Then
Exit
EndIf
WEndViel Spass damit
MFG
xDrago