Zeitberechnung - Dauer auf aktuelle Uhrzeit aufrechnen Topic is solved

[Bruchpilot1982]

Hallo zusammen.

Ich könnte euer Fachwissen kurz gebrauchen. Steh gerade am Anfang der Programmierung, deswegen ist mein Know-how leider noch nicht ausreichend. Für euch wahrscheinlich eine simple Sache, ich komm leider gerade nicht weiter

Habe hier nur eine kleine Berechnung, welche ich über die MsgBox ausgeben möchte. Diese soll mir folgende Werte letzten Endes ausgeben:
1. Aktuelle Uhrzeit hh:mm:ss (Uhr1)
2. Wiederholungen (Wdh)
3. Dauer mm:ss (Wdh * 9 - Eine Wiederholung dauert 9 Sekunden)
4. End-Uhrzeit hh:mm:ss (Uhr1 + Dauer)

Code: Select all

InputBox, Wdh, Test-Wiederholungen (9 Sekunden), Anzahl der Wiederholungen,

FormatTime, Uhr1, time, hh:mm:ss
Dauer = %Wdh% 
Dauer *= 9
uhr2 = %uhr1%
uhr2 += Dauer, s


MsgBox Aktuelle Uhrzeit: %Uhr1% `nWiederholungen: %Wdh% `nDauer: %Dauer% `nEnd Uhrzeit: %Uhr2%

Hab schonmal angefangen, bekomm es aber irgendwie nicht fertig. Vielleicht habt ihr nen TIpp für mich.
Viele Grüße
Bruchpilot1982

[ElektroBerry]

Hallo, ich denke das Problem liegt an dem Stück hier:

Code: Select all

uhr2 += Dauer, s

In der EnvAdd Anleitung steht, dass ein YYYYMMDDHH24MISS Zeitstempel benötigt wird.
Also wäre meine Lösung, das nach dem Addieren, einfach noch einmal in dein gewünschtes Format umzuwandeln.

Code: Select all

InputBox, Wdh, Test-Wiederholungen (9 Sekunden), Anzahl der Wiederholungen,

FormatTime, Uhr1, time, hh:mm:ss
Dauer = %Wdh% 
Dauer *= 9
; uhr2 = %uhr1% weg mit dem
uhr2 += Dauer, s
FormatTime, Uhr2, %Uhr2%, hh:mm:ss ; Und dies neu hinzu

MsgBox Aktuelle Uhrzeit: %Uhr1% `nWiederholungen: %Wdh% `nDauer: %Dauer% `nEnd Uhrzeit: %Uhr2%

[Bruchpilot1982]

Oje... ich glaub, i muss no viel lernen. So einfach wärs gewesen (und ich meine die Lösung hatte ich schon, hats mir aber dann nicht richtig angezeigt). Ja vielen Dank jedenfalls

[Bruchpilot1982]

Hat jemand vielleicht noch ne kurze Lösung dafür, dass Fenster der MsgBox im stehen bleibt?
Also mit dem "Zeitlimit" klappts leider nicht, da geht es ja weg. Wenn ich danach aber einen Befehl ausführe, muss ich erst das Fenster wegklicken. Kann man das mit ner einfachen Lösung stehen lassen und trotzdem das Script weiter ausführen lassen?

[garry]

statt inputbox und msgbox > ein GUI erstellen mit Edit Felder ...

[Bruchpilot1982]

Danke, habs derweil mit "SplashTextOn" lösen können, aber ich werd mich mit GUI mal beschäftigen. Thx

[garry]

ja stimmt, habe's vergessen , noch ein Beispiel mit splashimage

Code: Select all

  Splashimage,,b w900 h150 x100 Y400 CWsilver m9 b fs10 zh0,Line1`nLine2
  Sleep,2000             ;- eventuell Anzeige für 2 Sekunden bevor Schliessen
  Splashimage, off    ;- eventuell schliessen

[Bruchpilot1982]

[garry]

hier noch ein Beisiel mit GUI
2 EDIT's , eins zum Variable eingeben, zweites für Resultat Ausgabe

Code: Select all

;- Zeit Addition x-Sekunden ---------------------
#warn
#NoEnv
#SingleInstance force
filename1=TEST
SetWorkingDir, %A_ScriptDir%
Gui,2:default
Gui,2: -DPIScale
;Gui,2:Font,s14 , Lucida Console
Gui,2:Font,s14 cYellow, Verdana
Gui,2:Color,Black
;---
Repeat=2   ;- vorgegebenes Beispiel / kann überschrieben werden 
;---
Gui,2: Add, Text    , x10  y10  , REPEAT=
Gui,2: Add, Edit    , x200 y10  w100  h50   vC1 right cBlack         ,%repeat%       ;
Gui,2: Add, Edit    , x10  y80  w1000 h200  vC2 right readonly,                   ;
Gui,2: Add, Button  , x10  y300 w400 h50  gA1 center,CALCULATE
;---
Gui,2: Show         , x100 y10 w1200 h450,%filename1%
Guicontrol,2:Focus,C1
SendInput , {end}
return
;-------------
2Guiclose:
exitapp
;-------------
A1:
Gui,2:submit,nohide
cc:=""
uhr2:=""
FormatTime, Uhr1, time, hh:mm:ss

Dauer:=(C1*3)      ;- Beispiel = REPEAT * 3 Sekunden
uhr2 += Dauer, s
FormatTime, Uhr2x, %Uhr2%, hh:mm:ss ; Und dies neu hinzu
cc=Aktuelle Uhrzeit: %Uhr1% `nWiederholungen: %C1% `nDauer: %Dauer% `nEnd Uhrzeit: %Uhr2x%
Guicontrol,2:,C2,%cc%
return
;======= END SCRIPT ==========

[Bruchpilot1982]

Super, Danke. Da test ich doch glei am Wochenende mal bisschen rum.

Nochmal ne (wirklich banale) Frage, aber irgendwie klappts bei mir grad nicht.

Wenn eine Variable z.B: Zeit1 den Wert 100 besitzt, was jetz in dem Fall 100 Sekunden wäre, wie bekomme ich die Variable auf das Format mm:ss?

Code: Select all

FormatTime, Zeit1, %Zeit1%, mm:ss

Habs auf mehrere Arten versucht, aber irgendwie ists dann im Ausgabeformat (z.B. SplashText) nix drin. Wo liegt mein Fehler?

[haichen]

FormatTime benötigt die Zeit im YYYYMMDDHH24MISS Format! Und das fängt immer mit dem Jahr an.
ElektroBerry hat bereits beschrieben wie man deine Sekunden zu einer Zeit dazu addiert:
Du kannst also eine beliebiges Jahr zb 1999 nehmen und deine sek addieren. Wenn du dieses Ergebnis mit FormatTime formatierst klappt das mit der Ausgabe.

Hast du schon in die Hilfe zu FormatTime geschaut?

[Bruchpilot1982]

Ja, klasse, hatt nen kleinen Denkfehler drin. Passt jetz DANKEEEE