Aventinus
Level-3
- Beiträge
- 1.361
- Reaktionspunkte
- 328
-> Hier kostenlos registrieren
Mist, da hab ich mich verkopiert. Wenn ich das recht sehe, schreibt er die Sekunden in die Variable für Stunden.
Mit deiner Änderung sollten dann die Minuten in den Stunden stehen und die Sekunden in den Minuten.
Dann müsstest du so anpassen:
Mit deiner Änderung sollten dann die Minuten in den Stunden stehen und die Sekunden in den Minuten.
Dann müsstest du so anpassen:
Code:
U E 124.1
FP M 10.1
SPBN ende
L "Uhrzeit".Aktuell_Stunden
T #Temp_akt_h
L "Uhrzeit".Aktuell_Minuten
T #Temp_akt_m
L "Uhrzeit".Aktuell_Sekunden
T #Temp_akt_s
AUF "Register"
// Zeiger inkrementieren
L MW 12 // Zeiger für Ringpuffer
+ 1
T MW 12 // Zeiger für Ringpuffer
// Zeiger auf Überlauf prüfen
L MW 12 // Zeiger für Ringpuffer
L 10 // maximale Anzahl an Datensätzen
>I
SPBN over
L 0
over: T MW 12 // Zeiger für Ringpuffer
// Ereigniszähler inkrementiern
L MW 14 // Ereigniszähler
+ 1
T MW 14 // Ereigniszähler
// Daten eintragen
L 8 // Datensatzlänge
*I
+ 10 // Startadresse des Datenfeldes
SLD 3
LAR1
L MW 14 // Ereigniszähler
T DBW [AR1,P#0.0] // und wieder sichern
L #Temp_akt_h // Aktuelle Stunde laden
T DB[COLOR=#ff0000]B[/COLOR] [AR1,P#[COLOR=#ff0000]4[/COLOR].0] // und in Ringpuffer sichern
L #Temp_akt_m // Aktuelle Minute laden
T DB[COLOR=#ff0000]B[/COLOR] [AR1,P#[COLOR=#ff0000]5[/COLOR].0] // und in Ringpuffer sichern
L #Temp_akt_s // Aktuelle Sekunde laden
T DB[COLOR=#ff0000]B[/COLOR] [AR1,P#[COLOR=#ff0000]6[/COLOR].0] // und in Ringpuffer sichern
ende: NOP 0