[LernScripts] Timer benutzen

    Diese Seite verwendet Cookies. Durch die Nutzung unserer Seite erklären Sie sich damit einverstanden, dass wir Cookies setzen. Weitere Informationen

    • [LernScripts] Timer benutzen

      Tag Godlikerz

      Hier habe ich ein Paar Timer lernscripts für euch =D

      Beispiel

      Quellcode

      1. $timer1 = TimerInit ()
      3. While 1
      4. If TimerDiff ($timer1) > 10000 then ;10000 = 10sec(wird in milisecunden gezählt)
      5. MsgBox (0,"","10 sekunden sind vergangen")
      6. Exit
      7. EndIf
      8. WEnd


      Hier ein Kleines Fenster was MilliSekunden und Sekunden zählt.

      MAX Minuten einstellbar =D

      Quellcode

      1. [FONT=monospace]
      3. $Minutes = 90 ; will wait 90 minutes
      5. Local $60Count = 0, $begin = TimerInit()
      6. While $Minutes > $60Count
      8. $dif = TimerDiff($begin)
      9. $dif2 = StringLeft($dif, StringInStr($dif, ".") -1)
      10. $Count = int($dif/1000)
      11. $60Count = Int($Count / 60)
      13. ToolTip("Minutes Required = " & $Minutes & @CRLF & "Minutes Past = " & $60Count & @CRLF & "Seconds Count = " & $Count & @CRLF & "Mili-Seconds Count = " & $dif2, 20, 20, "Time Machine #1", 1)
      15. Sleep(20)
      17. WEnd
      19. MsgBox(64, "Time-Up!!", "Your " & $Minutes & " minutes have passed ")[/FONT]
      Alles anzeigen


      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:

      Quellcode

      1. $count=Inputbox("enter time count","","30000")
      2. $timerinit=TimerInit()
      4. While 1
      5. MsgBox(0, "countDowb",$count-TimerDiff($timerinit), 1)
      6. If $count-TimerDiff($timerinit)<0 then exit
      7. WEnd



      Hier 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-Quellcode

      1. #include <GUIConstants.au3>
      2. #include <EditConstants.au3>
      3. #include <_CountDown.au3>
      5. Local $sec, $min, $hr, $day
      6. $gui = GUICreate('CountDown')
      7. GUICtrlCreateLabel('Tage', 15, 18, 60, 17)
      8. $iD = GUICtrlCreateInput('', 80, 15, 20, 20, $ES_NUMBER)
      9. GUICtrlCreateLabel('Stunden', 15, 48, 60, 17)
      10. $iH = GUICtrlCreateInput('', 80, 45, 20, 20, $ES_NUMBER)
      11. GUICtrlCreateLabel('Minuten', 15, 78, 60, 17)
      12. $iM = GUICtrlCreateInput('', 80, 75, 20, 20, $ES_NUMBER)
      13. GUICtrlCreateLabel('Sekunden', 15, 108, 60, 17)
      14. $iS = GUICtrlCreateInput('', 80, 105, 20, 20, $ES_NUMBER)
      15. $bt = GUICtrlCreateButton('Start', 140, 15, 50, 20)
      16. $iDown = GUICtrlCreateInput('', 200, 15, 80, 20, $ES_READONLY)
      17. GUISetState()
      19. While True
      20. $msg = GUIGetMsg()
      21. If $msg = $bt Then
      22. If GUICtrlRead($iD) = '' Then
      23. $day = 0
      24. Else
      25. $day = GUICtrlRead($iD)
      26. EndIf
      27. If GUICtrlRead($iH) = '' Then
      28. $hr = 0
      29. Else
      30. $hr = GUICtrlRead($iH)
      31. EndIf
      32. If GUICtrlRead($iM) = '' Then
      33. $min = 0
      34. Else
      35. $min = GUICtrlRead($iM)
      36. EndIf
      37. If GUICtrlRead($iS) = '' Then
      38. $sec = 0
      39. Else
      40. $sec = GUICtrlRead($iS)
      41. EndIf
      42. _CountDown($sec, $min, $hr, $day, True, $iDown)
      43. ElseIf $msg = $GUI_EVENT_CLOSE Then
      44. Exit
      45. EndIf
      46. WEnd
      Alles anzeigen


      Viel Spass damit

      MFG
      xDrago

    • Werbung zur Unterstützung des Forums ( Bitte AddBlocker deaktivieren )