TCP VERMESSUNG ( AUTO TOOL )

Zumindest der Zähler:

Declaration:
INT ZAEHLER=0

im Programm:
ZAEHLER=ZAEHLER+1

Datum u. Uhrzeit stehen in der Variable $date(ist eine Struktur mit month, day etc.) Da ich im Augenblick nicht an einem Roboter bin, kann ich es genauer nicht sagen. Ich weiß auch nicht, ob die Abfrage komplikationslos ist. Bei einem Roboter habe ich mir die Variable mal mit Anzeige - Variable - einzeln anschauen wollen, da kam aber nix. Beim 2. Roboter kam eine Anzeige.

Gruß

P.-A.

Ich täte dies so angehen:

STRUC DATSATZ DATE Datum, TIME Uhrzeit

DECL AUTOOLSATZ DATSATZ[128]
DECL INT Zaehler

Dann im Programm einfügen
...
PTP Check_TCP Vel= 33 % PDAT1 Tool[0] Base[0]
PTP P3 CONT Vel= 100 % PDAT Tool[1]:Brenner IR2 Base[0]
PTP P4 CONT Vel= 100 % PDAT Tool[1]:Brenner IR2 Base[0]
PULSE 60 'R2 Autotool ist fertig' State= TRUE CONT Time= 0.5 sec

Zaehler=Zaehler+1
AUTOOLSATZ[Zaehler].Datum=$DATE
AUTOOLSATZ[Zaehler].Uhrzeit=$TIME

PTP HOME Vel= 100 % DEFAULT
END
.....
So in etwa. Ich kann gerade nicht prüfen ob der Aufruf AUTOOLSATZ.Datum[Zaehler] oder wie oben heißen muß. Wenn's ganz dumm läuft, habe ich noch irgendwo einen Formalfehler, aber im Prinzip sollte das so gehen.

Ersma

Zitat von derwestermann

Ich täte dies so angehen:

STRUC DATSATZ DATE Datum, TIME Uhrzeit

DECL AUTOOLSATZ DATSATZ[128]
DECL INT Zaehler

Dann im Programm einfügen
...
Zaehler=Zaehler+1
AUTOOLSATZ[Zaehler].Datum=$DATE
AUTOOLSATZ[Zaehler].Uhrzeit=$TIME

PTP HOME Vel= 100 % DEFAULT
END
.....
So in etwa. Ich kann gerade nicht prüfen ob der Aufruf AUTOOLSATZ.Datum[Zaehler] oder wie oben heißen muß. Wenn's ganz dumm läuft, habe ich noch irgendwo einen Formalfehler, aber im Prinzip sollte das so gehen.

Ersma

Alles anzeigen

Fast richtig!

DECL DATSATZ AUTOOLSATZ[128]
AUTOOLSATZ[Zaehler].Datum=$DATE.day
AUTOOLSATZ[Zaehler].Uhrzeit=$date.time

Dann würde ich noch den Zähler kippen:
if zaehler=128 then
zaehler=1
endif
Oder: wenn Du die letzten in chronoligischer Reihenfolge haben willst:

Im INIT:
int i
und dann:
for i=128 to 2 step -1
autoolsatz[i]=autoolsatz[i]-1
endif
autoolsatz[1].datum=$date.day
autoolsatz[1].time=$date.time

und schon sieht's im Datfile ganz aufgeräumt aus

Gruß Robodoc

Danke Roland!

merci

Danke Roland!

merci

Also ich weiß nich, so ganz richtig scheint mir das noch nicht zu sein...

Die STRUC DATE hat keine Komponente time, und in day ist nur der Tag eines Monats drin !
Sieht nämlich so aus (V4.x):
STRUC DATE INT CSEC, SEC, MIN, HOUR, DAY, MONTH, YEAR
Also funzen die Zeilen $DATE.day nicht richtig und $DATE.time garnicht! Auch der direkte Zugriff auf die $DATE Komponenten macht manchmal Probleme...

besser und einfacher so:
DECL DATE AUTOOLSATZ[128]AUTOOLSATZ[Zaehler]=$DATE

Jetzt ist zwar Datum und Uhrzeit zusammen gespeichert, aber das kann man ja, mit etwas mehr Aufwand, auch auseinanderziehen.

Hartmut

:schuldig:

*Patsch*. Da hab ich doch glatt zwei Programmiersprachen verwechselt.

Jou Hartmut das stimmt was Du schreibst.

Gruß