Ganz genau das!
Die IT Abteilung soll sich die Daten dann da abgreifen. Soll aber nicht unser Problem sein. Ist so gewünscht...Das möchtest du, oder?
Eine CPU mit TCP/IP Port oder ein CP dafür; aber wo gehen die Daten denn hin...Intranet...wofür?
NW1
L PEW 10 //Analogwert einladen von AI
T DB1.DBW 0 // In Datenbaustein Transferieren (Datentyp INT)
NOP 0
NW2
AUF DB 1 // Aufrufen den Datenbausteins
L DBW 0 //Laden des Datenbausteinwortes 0
T PAW 100 // in Periepherieausgangswort der IT Karte und ab dafür
NW 1 über SCALE 105 normiert
U "Schmiermerker"
= L 0.0
BLD 103
U "Trigger Keyence"
SPBNB _001
CALL "SCALE"
IN :=PEW2
HI_LIM :=9.999900e+001
LO_LIM :=0.000000e+000
BIPOLAR:=L0.0
RET_VAL:=MW44
OUT :=MD40
_001: NOP 0
NW 2
L MD 40
T DB10.DBD 0
L 2.764800e+004 //27648 Punkte - Einheiten S7->Nennbe
L 2.000000e+001 //20mA Analogeingang
/R
T #Zwischenergebnis
L #Zwischenergebnis [COLOR=Blue] //Laden hier noch notwenig??[/COLOR]
L 2.064000e+001 //20,64 mA (Übersteuerungsbereich)
*R
T #Obergrenze //HI-Wert S7 Einheiten
L #Zwischenergebnis
L 3.360000e+000 //3,36mA
T #Untergrenze //LO-Wert S7 Einheiten
L #Obergrenze
L #Untergrenze
-R
T #Wertebereich //genutzter Bereich S7 Einheiten
L 1.000000e+004 //10.000ym HI-Wert physikalisch
L #Wertebereich
/R
T #Faktor_Norm //Normierungsfaktor
L #Untergrenze //S7 Einheit ->0ym
L #Faktor_Norm
*R
T #Offset //LO-Wert S7-Einheiten bei physikalisch 0
L PEW 2 //Analogwert einlesen
[COLOR=Blue] ITD [/COLOR] //Analogwert in 32-Bit-Ganzzahl umwandeln
DTR //32-Bit-Ganzzahl in Real umwandeln
L #Faktor_Norm //Normierungsfaktor
*R
T #Gesamt //Offsetwert + Wert X
L #Offset
-R
T MD 62 //physikalisches Ergebnis
[COLOR=Blue]AUF "Datentransfer" //Datenbaustein aufrufen
L MD 62 //Merkerdoppelwort laden
T DB1.DBD 0 //transferieren[/COLOR] [COLOR=blue]AUF "Datentransfer" //Datenbaustein aufrufen[/COLOR]
[COLOR=blue] L MD 62 //Merkerdoppelwort laden [/COLOR]
[COLOR=blue] T DBD 0 //transferieren[/COLOR]
L #Zwischenergebnis
L 3.360000e+000 //3,36mA
T #Untergrenze //LO-Wert S7 Einheiten L 2.764800e+004 //27648 Punkte - Einheiten S7->Nennbereich in Akku1
L 2.000000e-002 //20mA Analogeingang in Akku2
/R //dividiert die Real Zahlen (32bit) Akku1 / Akku2 = Akku1
T #Zwischenergebnis //und transferiert das Ergebnis in Temp Variable
L #Zwischenergebnis
L 2.064000e-002 //20,64 mA (leichter Übersteuerungsbereich)
*R
T #Obergrenze //HI-Wert S7 Einheiten
L #Zwischenergebnis
L 3.360000e-003 //3,36mA
*R
T #Untergrenze //LO-Wert S7 Einheiten
L #Obergrenze
L #Untergrenze
-R
T #Wertebereich //genutzter Bereich S7 Einheiten
L 1.000000e+004 //10.000ym HI-Wert physikalisch
L #Wertebereich
/R
T #Faktor_Norm //Normierungsfaktor
L #Untergrenze //S7 Einheit ->0ym
L #Faktor_Norm
*R
T #Offset //LO-Wert S7-Einheiten bei physikalisch 0
L PEW 2 //Analogwert einlesen
ITD //Integere Zahl in 32-Bit-Ganzzahl umwandeln
DTR //32-Bit-Ganzzahl in Gleitpunktzahl (Real) umwandeln
L #Faktor_Norm //Normierungsfaktor
*R
T #Gesamt //Offsetwert + Wert X
L #Offset
-R
T MD 34 U "Trigger Meßwert" //Trigger Impuls je anstehender Meßwert 20ms lang-> positive Flanke
FP M 6.5
= M 6.6 //Pro Signal (positive Flanke) high für Zyklus U M 6.6
U "Trigger Keyence"
SPBN LOW //Wenn VKE = 0 ->Sprungbefehl
L P#0.0 //Läd Pointer mit Anfangs Byte 0
T MD 40 // Transferiere Pointer in MD 40
L 1 //Läd Integere Ganzzahl 1 für DB
T MW 24 //und transferiert sie in in MW 24
//hier noch ein Sprungbefehl das er einmal DB 2 setzt wenn Trigger Keyence fällt
AUF DB [MW 24] //DB Nummer 1 oder 2 (Integere aus MW24)
L MD 34 // Ergebnis aus Berechnung NW1
T DBD [MD 40] //ARRAY of REAL, Anfang bei Byte 0
L P#4.0 //Läd den Pointer mit Anfangsbyte 4
L MD 40 //Transferiert Pointer in MD
+D //addiert die Bytes auf MD 40 (eine REAL Adresse rauf)
T MD 40 //transferiert die neue Adresse in MD 40
LOW: NOP 0nein. ehr von nachteil da der aufruf einer fc zeit kostet.
NW2
U "Trigger Meßwert" //Trigger Impuls je anstehender Meßwert 20ms lang-> positive Flanke
FP M 6.5
= M 6.6 //Pro Signal (positive Flanke) high für Zyklus
NW3
L L#0 //Läd Pointer mit Anfangs Byte 0
SLD 3 //Verschieben um 3 Bit nach links erzeugt Pointer
T MD 40 // Transferiere Pointer in MD 40
U "Trigger Keyence"
SPBN LOW //Wenn VKE = 0 ->Sprungbefehl
WDH: L 1 //Läd Integere Ganzzahl 1 für DB
T MW 24 //und transferiert sie in MW 24
U M 6.6
SPB TIME
AUF DB [MW 24] //DB Nummer 1 (Integere aus MW24), Vorbereitung für Programmerweiterung
L MD 34 // Ergebnis aus Berechnung NW1
T DBD [MD 40] //ARRAY of REAL, Anfang bei Byte 0
L L#4 //Läd den Pointer mit Anfangsbyte 4
SLD 3 //Verschieben um 3 Bit nach links erzeugt Pointer
L MD 40 //Transferiert Pointer in MD
+D //addiert die Bytes auf MD 40 (eine REAL Adresse rauf)
T MD 40 //transferiert die neue Adresse in MD 40
L MW 38 //Schleifenzähler zur Kontrolle
L 1
+I
T MW 38
U "Trigger Keyence" //Schleifenende, Beendigung der Meßwerterfassung
FN M 6.7
SPB ENDE
TIME: SPA WDH //Verschleifen mit Kette / TIME abwarte bis Impuls Messwert kommt
LOW: NOP 0 //Überspringen des Ablaufes
ENDE: NOP 0 //Schleifenende und Ausgang wenn Trigger Keyence fällt
