Script für Umrechnung von Industriezeit in normale Zeit gesucht

[Slice]

Hallo zusammen,

hat hier jemand ein Script parat wo die Umrechnung von Industriezeit in eine normale Zeit gemacht wird?
Ich wollte schon lange mal eine SV vom Typ Zahl wie "Brenner Betriebstunden heute" mit dem Ergebnis 1.52 in die normale Zeit umrechnen wie 1 Std. 31 Min.
Über die Suche habe ich nichts gefunden und meine Scriptkenntnise reichen nicht aus um das selber hinzukriegen!
Daher wollte ich mal fragen ob jemand sowas schon gemacht hat und das Script zur Verfügung stellen kann?
Würde ich freuen wenn hier jemand weiter helfen kann.

Grüße,
Slice

[dondaik]

suche: betriebsstundenzähler ..... sollten xxx treffer sein

[Slice]

Naja, es wird ja schon alles berechnet.
Es geht primär um die Änderung der Darstellung, sprich mit 1.52 Industriestunden fang ich nichts an.
Schöner wäre da eine Umrechung einfach in 1 Std. 31 Min.
Aber ich such nochmal danach.

[Tyfys]

eine Möglichkeit z.B. so:

Code: Alles auswählen

real zeit  = 1.52;
integer std = zeit.ToInteger();
integer min = ((zeit - std) * 60).ToInteger();
string uhrzeit = std #":"#min;
WriteLine(uhrzeit);

[Black]

Stunden... reiner ganzzahlanzeil
Minuten.. Nachkommastellen mal 60.0 geteilt durch 100.0

[Slice]

eine Möglichkeit z.B. so:

Danke Tyfys, das sieht schonmal gut aus und wird richtig umgerechnet!
Ich versuche das mal umzusetzen.

Grüße,
Slice

[Slice]

Eine Frage noch, wie müsste der string uhrzeit aussehen:

Code: Alles auswählen

real zeit  = 1.52;
integer std = zeit.ToInteger();
integer min = ((zeit - std) * 60).ToInteger();
string uhrzeit = std #":"#min;
WriteLine(uhrzeit);

um die Angabe statt in "1:31" in "1 Std. 31 Min." zu erhalten?

[Baxxy]

Code: Alles auswählen

string uhrzeit = std # " Std. "# min # " Min.";

.

Freihand auf dem Handy daher ohne Gewähr.

[Slice]

Klasse, damit gehts nun und ich kann das bei mir umsetzen.
Danke an alle!

[[sprotte80]]

Hi

Code: Alles auswählen

integer std = zeit.ToInteger();

Funzt in dem Beispiel richtig.
Wenns aber andre Zahlen sind kanns schiefgehen.
siehe .ToInteger()-Bug ab ReGaHss-Version R1.00.0388.0121

Thomas