Ticket #1174

naddani: (*************************************************************************************************************** * ÄNDERUNGSDATUM: 26. Juni 2009 * **************************************************************************************************************** **************************************************************************************************************** * BAUSTEIN-LISTE: fcEinrichtenStat8 FC 209 Einrichtfunktionen Station 8 * ***************************************************************************************************************) FUNCTION "fcEinrichtenStat8" : VOID VAR_IN_OUT anzeigeDb : "udtHMI_arbeitsDb"; bildDb : "udtHMI_einrichtDb"; END_VAR CONST statNr :=8; // * Für jede Station explizit zu ändern bild :=25; // Bild-Nummer END_CONST VAR_TEMP fktNr : INT; END_VAR BEGIN // Anzeige und Station aktiv IF NOT anzeigeDb.boPanelActive OR ( anzeigeDb.dsActualPict.inPictNb <> bild ) OR (anzeigeDb.dsActualPict.inParam1<>statNr) THEN RETURN; END_IF; // Hilfstexte löschen bildDb.hilfsTextNr:=0; // Anzahl der Bildseiten festlegen bildDb.anzahlBildSeite:=1; // Bild und Parameter für Taste F1 definieren bildDb.funktionsBild[1,1]:=0; // Bild-Nr bildDb.funktionsBild[1,2]:=0; // Parameter 1 bildDb.funktionsBild[1,3]:=0; // Parameter 2 bildDb.funktionsBild[1,4]:=0; // Parameter 3 bildDb.funktionsBild[1,5]:=0; // Parameter 4 bildDb.funktionsBild[1,6]:=0; // Parameter 5 bildDb.f_tasteText[1,1]:=' '; bildDb.f_tasteAktiv[1]:=FALSE; // Bild und Parameter für Taste F2 definieren bildDb.funktionsBild[2,1]:=0; // Bild-Nr bildDb.funktionsBild[2,2]:=0; // Parameter 1 bildDb.funktionsBild[2,3]:=0; // Parameter 2 bildDb.funktionsBild[2,4]:=0; // Parameter 3 bildDb.funktionsBild[2,5]:=0; // Parameter 4 bildDb.funktionsBild[2,6]:=0; // Parameter 5 bildDb.f_tasteText[2,1]:=' '; bildDb.f_tasteAktiv[2]:=FALSE; // Bildseite 1 IF bildDb.aktBildSeite =1 THEN // ********* EINRICHTEN 1 ************************************************** fktNr:=1; //TEXT bildDb.einrichtText[fktNr,1] :='Horizontalhub '; bildDb.einrichtText[fktNr,2] :=' '; // SIGNALE bildDb.ausgang[fktNr] := St8_Horizontalzyl_Ast; bildDb.eingang_GS[fktNr] := St8_Horizontalzyl_Grst; bildDb.eingang_AS[fktNr] := St8_Horizontalzyl_Arst; // SPERREN bildDb.fktSperreGS[fktNr] := M0.0; bildDb.fktSperreAS[fktNr] := M0.0; // AKTIONEN IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[20] THEN // Taste - anzeigeDb.boTouchs[20]:=FALSE; IF NOT bildDb.fktSperreGS[fktNr] THEN "DB_Ausgaenge".Station8.St8_Horizontalzyl_Ast:=FALSE; "DB_Ausgaenge".Station8.St8_Horizontalzyl_Gst:=TRUE; END_IF; END_IF; IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[21] THEN // Taste + anzeigeDb.boTouchs[21]:=FALSE; IF NOT bildDb.fktSperreAS[fktNr] THEN "DB_Ausgaenge".Station8.St8_Horizontalzyl_Gst:=FALSE; "DB_Ausgaenge".Station8.St8_Horizontalzyl_Ast:=TRUE; END_IF; END_IF; // ********* EINRICHTEN 2 ************************************************** fktNr:=2; //TEXT bildDb.einrichtText[fktNr,1] :='Greifer '; bildDb.einrichtText[fktNr,2] :=' '; // SIGNALE bildDb.ausgang[fktNr] := St1_NieteinheitAst; bildDb.eingang_GS[fktNr] := St8_Greifer_Grst; bildDb.eingang_AS[fktNr] := St8_Greifer_Arst; // SPERREN bildDb.fktSperreGS[fktNr] := M0.0; bildDb.fktSperreAS[fktNr] := M0.0; // AKTIONEN IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[20] THEN // Taste - anzeigeDb.boTouchs[20]:=FALSE; IF NOT bildDb.fktSperreGS[fktNr] THEN "DB_Ausgaenge".Station8.St8_Greifer_Ast:=FALSE; "DB_Ausgaenge".Station8.St8_Greifer_Gst:=TRUE; END_IF; END_IF; IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[21] THEN // Taste + anzeigeDb.boTouchs[21]:=FALSE; IF NOT bildDb.fktSperreAS[fktNr] THEN "DB_Ausgaenge".Station8.St8_Greifer_Gst:=FALSE; "DB_Ausgaenge".Station8.St8_Greifer_Ast:=TRUE; END_IF; END_IF; // ********* EINRICHTEN 3 ************************************************** fktNr:=3; //TEXT bildDb.einrichtText[fktNr,1] :='Zustellung '; bildDb.einrichtText[fktNr,2] :='Loctite '; // SIGNALE bildDb.ausgang[fktNr] := St8_ZustellungLoctiteAS; bildDb.eingang_GS[fktNr] := St8ZustellungLoctiteGS; bildDb.eingang_AS[fktNr] := St8ZustellungLoctiteAS; // SPERREN bildDb.fktSperreGS[fktNr] := M0.0; bildDb.fktSperreAS[fktNr] := M0.0; // AKTIONEN IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[20] THEN // Taste - anzeigeDb.boTouchs[20]:=FALSE; IF NOT bildDb.fktSperreGS[fktNr] THEN "DB_Ausgaenge".Station8.St8_ZustellungLoctite_AS:=FALSE; "DB_Ausgaenge".Station8.St8_ZustellungLoctite_GS:=TRUE; END_IF; END_IF; IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[21] THEN // Taste + anzeigeDb.boTouchs[21]:=FALSE; IF NOT bildDb.fktSperreAS[fktNr] THEN "DB_Ausgaenge".Station8.St8_ZustellungLoctite_AS:=TRUE; "DB_Ausgaenge".Station8.St8_ZustellungLoctite_GS:=FALSE; END_IF; END_IF; // ********* EINRICHTEN 4 ************************************************** fktNr:=4; //TEXT bildDb.einrichtText[fktNr,1] :=' '; bildDb.einrichtText[fktNr,2] :=' '; // SIGNALE bildDb.ausgang[fktNr] := FALSE; bildDb.eingang_GS[fktNr] := FALSE; bildDb.eingang_AS[fktNr] := FALSE; // SPERREN bildDb.fktSperreGS[fktNr] := M0.1; bildDb.fktSperreAS[fktNr] := M0.1; // AKTIONEN IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[20] THEN // Taste - anzeigeDb.boTouchs[20]:=FALSE; IF NOT bildDb.fktSperreGS[fktNr] THEN M0.2:=FALSE; M0.2:=TRUE; END_IF; END_IF; IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[21] THEN // Taste + anzeigeDb.boTouchs[21]:=FALSE; IF NOT bildDb.fktSperreAS[fktNr] THEN M0.2:=False; M0.2:=True; END_IF; END_IF; // ********* EINRICHTEN 5 ************************************************** fktNr:=5; //TEXT bildDb.einrichtText[fktNr,1] :=' '; bildDb.einrichtText[fktNr,2] :=' '; // SIGNALE bildDb.ausgang[fktNr] := FALSE; bildDb.eingang_GS[fktNr] := FALSE; bildDb.eingang_AS[fktNr] := FALSE; // SPERREN bildDb.fktSperreGS[fktNr] := M0.0; bildDb.fktSperreAS[fktNr] := M0.0; // AKTIONEN IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[20] THEN // Taste - anzeigeDb.boTouchs[20]:=FALSE; IF NOT bildDb.fktSperreGS[fktNr] THEN M0.2:=FALSE; M0.2:=TRUE; END_IF; END_IF; IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[21] THEN // Taste + anzeigeDb.boTouchs[21]:=FALSE; IF NOT bildDb.fktSperreAS[fktNr] THEN M0.2:=FALSE; M0.2:=TRUE; END_IF; END_IF; // ********* EINRICHTEN 6 ************************************************** fktNr:=6; //TEXT bildDb.einrichtText[fktNr,1] :='Spannfutter '; bildDb.einrichtText[fktNr,2] :='Mutter '; // SIGNALE bildDb.ausgang[fktNr] := St8_SpannfutterMutterAst; bildDb.eingang_GS[fktNr] := NOT St8_SpannfutterMutterAst; bildDb.eingang_AS[fktNr] := St8_SpannfutterMutterAst; // SPERREN bildDb.fktSperreGS[fktNr] := M0.0; bildDb.fktSperreAS[fktNr] := M0.0; // AKTIONEN IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[20] THEN // Taste - IF NOT bildDb.fktSperreGS[fktNr] THEN "DB_Ausgaenge".Station8.St8_SpannfutterMutterGst:=TRUE; END_IF; END_IF; IF bildDb.e_tasteAktiv[fktNr] AND NOT anzeigeDb.boTouchs[20] THEN // Taste - "DB_Ausgaenge".Station8.St8_SpannfutterMutterGst:=FALSE; END_IF; IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[21] THEN // Taste + IF NOT bildDb.fktSperreAS[fktNr] THEN "DB_Ausgaenge".Station8.St8_SpannfutterMutterAst:=TRUE; END_IF; END_IF; IF bildDb.e_tasteAktiv[fktNr] AND NOT anzeigeDb.boTouchs[21] THEN // Taste + "DB_Ausgaenge".Station8.St8_SpannfutterMutterAst:=FALSE; END_IF; // ********* EINRICHTEN 7 ************************************************** fktNr:=7; //TEXT bildDb.einrichtText[fktNr,1] :=' '; bildDb.einrichtText[fktNr,2] :=' '; // SIGNALE bildDb.ausgang[fktNr] := FALSE; bildDb.eingang_GS[fktNr] := FALSE; bildDb.eingang_AS[fktNr] := FAlSE; // SPERREN bildDb.fktSperreGS[fktNr] := M0.1; bildDb.fktSperreAS[fktNr] := M0.1; // AKTIONEN IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[20] THEN // Taste - anzeigeDb.boTouchs[20]:=FALSE; IF NOT bildDb.fktSperreGS[fktNr] THEN M0.2:=FALSE; M0.2:=TRUE; END_IF; END_IF; IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[21] THEN // Taste + anzeigeDb.boTouchs[21]:=FALSE; IF NOT bildDb.fktSperreAS[fktNr] THEN M0.2:=FALSE; M0.2:=TRUE; END_IF; END_IF; // ********* EINRICHTEN 8 ************************************************** fktNr:=8; //TEXT bildDb.einrichtText[fktNr,1] :=' '; bildDb.einrichtText[fktNr,2] :=' '; // SIGNALE bildDb.ausgang[fktNr] := FALSE; bildDb.eingang_GS[fktNr] := FALSE; bildDb.eingang_AS[fktNr] := FALSE; // SPERREN bildDb.fktSperreGS[fktNr] := M0.1; bildDb.fktSperreAS[fktNr] := M0.1; // AKTIONEN IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[20] THEN // Taste - anzeigeDb.boTouchs[20]:=FALSE; IF NOT bildDb.fktSperreGS[fktNr] THEN M0.2:=FALSE; M0.2:=TRUE; END_IF; END_IF; IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[21] THEN // Taste + anzeigeDb.boTouchs[21]:=FALSE; IF NOT bildDb.fktSperreAS[fktNr] THEN M0.2:=FALSE; M0.2:=TRUE; END_IF; END_IF; // ********* EINRICHTEN 9 ************************************************** fktNr:=9; //TEXT bildDb.einrichtText[fktNr,1] :='Horizontalhub '; bildDb.einrichtText[fktNr,2] :='Deprag Messtast.'; // SIGNALE bildDb.ausgang[fktNr] := NOT St8_MesstasterDeprag; bildDb.eingang_GS[fktNr] := St8_MesstasterDeprag; bildDb.eingang_AS[fktNr] := NOT St8_MesstasterDeprag; // SPERREN bildDb.fktSperreGS[fktNr] := M0.0; bildDb.fktSperreAS[fktNr] := M0.0; // AKTIONEN IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[20] THEN // Taste - anzeigeDb.boTouchs[20]:=FALSE; IF NOT bildDb.fktSperreGS[fktNr] THEN St8_MesstasterDeprag:=TRUE; END_IF; END_IF; IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[21] THEN // Taste + anzeigeDb.boTouchs[21]:=FALSE; IF NOT bildDb.fktSperreAS[fktNr] THEN St8_MesstasterDeprag:=FALSE; END_IF; END_IF; // ********* EINRICHTEN 10 ************************************************** fktNr:=10; //TEXT bildDb.einrichtText[fktNr,1] :='Vertikalhub '; bildDb.einrichtText[fktNr,2] :='Spannfutterüberw'; // SIGNALE bildDb.ausgang[fktNr] := NOT St8_MesstasterBackenhub; bildDb.eingang_GS[fktNr] := St8_MesstasterBackenhub; bildDb.eingang_AS[fktNr] := NOT St8_MesstasterBackenhub; // SPERREN bildDb.fktSperreGS[fktNr] := M0.0; bildDb.fktSperreAS[fktNr] := M0.0; // AKTIONEN IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[20] THEN // Taste - anzeigeDb.boTouchs[20]:=FALSE; IF NOT bildDb.fktSperreGS[fktNr] THEN St8_MesstasterBackenhub:=TRUE; END_IF; END_IF; IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[21] THEN // Taste + anzeigeDb.boTouchs[21]:=FALSE; IF NOT bildDb.fktSperreAS[fktNr] THEN St8_MesstasterBackenhub:=FALSE; END_IF; END_IF; END_IF; // Bildseite 2 IF bildDb.aktBildSeite =2 THEN // ********* EINRICHTEN 1 ************************************************** fktNr:=1; //TEXT //TEXT bildDb.einrichtText[fktNr,1] :=' '; bildDb.einrichtText[fktNr,2] :=' '; // SIGNALE bildDb.ausgang[fktNr] := FALSE; bildDb.eingang_GS[fktNr] := FALSE; bildDb.eingang_AS[fktNr] := FALSE; // SPERREN bildDb.fktSperreGS[fktNr] := M0.1; bildDb.fktSperreAS[fktNr] := M0.1; // AKTIONEN IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[20] THEN // Taste - anzeigeDb.boTouchs[20]:=FALSE; IF NOT bildDb.fktSperreGS[fktNr] THEN M0.2:=FALSE; M0.2:=TRUE; END_IF; END_IF; IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[21] THEN // Taste + anzeigeDb.boTouchs[21]:=FALSE; IF NOT bildDb.fktSperreAS[fktNr] THEN M0.2:=FALSE; M0.2:=TRUE; END_IF; END_IF; // ********* EINRICHTEN 2 ************************************************** fktNr:=2; //TEXT bildDb.einrichtText[fktNr,1] :=' '; bildDb.einrichtText[fktNr,2] :=' '; // SIGNALE bildDb.ausgang[fktNr] := FALSE; bildDb.eingang_GS[fktNr] := FALSE; bildDb.eingang_AS[fktNr] := FALSE; // SPERREN bildDb.fktSperreGS[fktNr] := M0.1; bildDb.fktSperreAS[fktNr] := M0.1; // AKTIONEN IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[20] THEN // Taste - anzeigeDb.boTouchs[20]:=FALSE; IF NOT bildDb.fktSperreGS[fktNr] THEN M0.2:=FALSE; M0.2:=TRUE; END_IF; END_IF; IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[21] THEN // Taste + anzeigeDb.boTouchs[21]:=FALSE; IF NOT bildDb.fktSperreAS[fktNr] THEN M0.2:=FALSE; M0.2:=TRUE; END_IF; END_IF; // ********* EINRICHTEN 3 ************************************************** fktNr:=3; //TEXT bildDb.einrichtText[fktNr,1] :=' '; bildDb.einrichtText[fktNr,2] :=' '; // SIGNALE bildDb.ausgang[fktNr] := FALSE; bildDb.eingang_GS[fktNr] := FALSE; bildDb.eingang_AS[fktNr] := FALSE; // SPERREN bildDb.fktSperreGS[fktNr] := M0.1; bildDb.fktSperreAS[fktNr] := M0.1; // AKTIONEN IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[20] THEN // Taste - anzeigeDb.boTouchs[20]:=FALSE; IF NOT bildDb.fktSperreGS[fktNr] THEN M0.2:=FALSE; M0.2:=TRUE; END_IF; END_IF; IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[21] THEN // Taste + anzeigeDb.boTouchs[21]:=FALSE; IF NOT bildDb.fktSperreAS[fktNr] THEN M0.2:=FALSE; M0.2:=TRUE; END_IF; END_IF; // ********* EINRICHTEN 4 ************************************************** fktNr:=4; //TEXT bildDb.einrichtText[fktNr,1] :=' '; bildDb.einrichtText[fktNr,2] :=' '; // SIGNALE bildDb.ausgang[fktNr] := FALSE; bildDb.eingang_GS[fktNr] := FALSE; bildDb.eingang_AS[fktNr] := FALSE; // SPERREN bildDb.fktSperreGS[fktNr] := M0.1; bildDb.fktSperreAS[fktNr] := M0.1; // AKTIONEN IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[20] THEN // Taste - anzeigeDb.boTouchs[20]:=FALSE; IF NOT bildDb.fktSperreGS[fktNr] THEN M0.2:=FALSE; M0.2:=TRUE; END_IF; END_IF; IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[21] THEN // Taste + anzeigeDb.boTouchs[21]:=FALSE; IF NOT bildDb.fktSperreAS[fktNr] THEN M0.2:=FALSE; M0.2:=TRUE; END_IF; END_IF; // ********* EINRICHTEN 5 ************************************************** fktNr:=5; //TEXT bildDb.einrichtText[fktNr,1] :=' '; bildDb.einrichtText[fktNr,2] :=' '; // SIGNALE bildDb.ausgang[fktNr] := FALSE; bildDb.eingang_GS[fktNr] := FALSE; bildDb.eingang_AS[fktNr] := FALSE; // SPERREN bildDb.fktSperreGS[fktNr] := M0.1; bildDb.fktSperreAS[fktNr] := M0.1; // AKTIONEN IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[20] THEN // Taste - anzeigeDb.boTouchs[20]:=FALSE; IF NOT bildDb.fktSperreGS[fktNr] THEN M0.2:=FALSE; M0.2:=TRUE; END_IF; END_IF; IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[21] THEN // Taste + anzeigeDb.boTouchs[21]:=FALSE; IF NOT bildDb.fktSperreAS[fktNr] THEN M0.2:=FALSE; M0.2:=TRUE; END_IF; END_IF; // ********* EINRICHTEN 6 ************************************************** fktNr:=6; //TEXT bildDb.einrichtText[fktNr,1] :=' '; bildDb.einrichtText[fktNr,2] :=' '; // SIGNALE bildDb.ausgang[fktNr] := FALSE; bildDb.eingang_GS[fktNr] := FALSE; bildDb.eingang_AS[fktNr] := FALSE; // SPERREN bildDb.fktSperreGS[fktNr] := M0.1; bildDb.fktSperreAS[fktNr] := M0.1; // AKTIONEN IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[20] THEN // Taste - anzeigeDb.boTouchs[20]:=FALSE; IF NOT bildDb.fktSperreGS[fktNr] THEN M0.2:=FALSE; M0.2:=TRUE; END_IF; END_IF; IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[21] THEN // Taste + anzeigeDb.boTouchs[21]:=FALSE; IF NOT bildDb.fktSperreAS[fktNr] THEN M0.2:=FALSE; M0.2:=TRUE; END_IF; END_IF; // ********* EINRICHTEN 7 ************************************************** fktNr:=7; //TEXT bildDb.einrichtText[fktNr,1] :=' '; bildDb.einrichtText[fktNr,2] :=' '; // SIGNALE bildDb.ausgang[fktNr] := FALSE; bildDb.eingang_GS[fktNr] := FALSE; bildDb.eingang_AS[fktNr] := FALSE; // SPERREN bildDb.fktSperreGS[fktNr] := M0.1; bildDb.fktSperreAS[fktNr] := M0.1; // AKTIONEN IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[20] THEN // Taste - anzeigeDb.boTouchs[20]:=FALSE; IF NOT bildDb.fktSperreGS[fktNr] THEN M0.2:=FALSE; M0.2:=TRUE; END_IF; END_IF; IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[21] THEN // Taste + anzeigeDb.boTouchs[21]:=FALSE; IF NOT bildDb.fktSperreAS[fktNr] THEN M0.2:=FALSE; M0.2:=TRUE; END_IF; END_IF; // ********* EINRICHTEN 8 ************************************************** fktNr:=8; //TEXT bildDb.einrichtText[fktNr,1] :=' '; bildDb.einrichtText[fktNr,2] :=' '; // SIGNALE bildDb.ausgang[fktNr] := FALSE; bildDb.eingang_GS[fktNr] := FALSE; bildDb.eingang_AS[fktNr] := FALSE; // SPERREN bildDb.fktSperreGS[fktNr] := M0.1; bildDb.fktSperreAS[fktNr] := M0.1; // AKTIONEN IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[20] THEN // Taste - anzeigeDb.boTouchs[20]:=FALSE; IF NOT bildDb.fktSperreGS[fktNr] THEN M0.2:=FALSE; M0.2:=TRUE; END_IF; END_IF; IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[21] THEN // Taste + anzeigeDb.boTouchs[21]:=FALSE; IF NOT bildDb.fktSperreAS[fktNr] THEN M0.2:=FALSE; M0.2:=TRUE; END_IF; END_IF; // ********* EINRICHTEN 9 ************************************************** fktNr:=9; //TEXT bildDb.einrichtText[fktNr,1] :=' '; bildDb.einrichtText[fktNr,2] :=' '; // SIGNALE bildDb.ausgang[fktNr] := FALSE; bildDb.eingang_GS[fktNr] := FALSE; bildDb.eingang_AS[fktNr] := FALSE; // SPERREN bildDb.fktSperreGS[fktNr] := M0.1; bildDb.fktSperreAS[fktNr] := M0.1; // AKTIONEN IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[20] THEN // Taste - anzeigeDb.boTouchs[20]:=FALSE; IF NOT bildDb.fktSperreGS[fktNr] THEN M0.2:=FALSE; M0.2:=TRUE; END_IF; END_IF; IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[21] THEN // Taste + anzeigeDb.boTouchs[21]:=FALSE; IF NOT bildDb.fktSperreAS[fktNr] THEN M0.2:=FALSE; M0.2:=TRUE; END_IF; END_IF; // ********* EINRICHTEN 10 ************************************************** fktNr:=10; //TEXT bildDb.einrichtText[fktNr,1] :=' '; bildDb.einrichtText[fktNr,2] :=' '; // SIGNALE bildDb.ausgang[fktNr] := FALSE; bildDb.eingang_GS[fktNr] := FALSE; bildDb.eingang_AS[fktNr] := FALSE; // SPERREN bildDb.fktSperreGS[fktNr] := M0.1; bildDb.fktSperreAS[fktNr] := M0.1; // AKTIONEN IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[20] THEN // Taste - anzeigeDb.boTouchs[20]:=FALSE; IF NOT bildDb.fktSperreGS[fktNr] THEN M0.2:=FALSE; M0.2:=TRUE; END_IF; END_IF; IF bildDb.e_tasteAktiv[fktNr] AND anzeigeDb.boTouchs[21] THEN // Taste + anzeigeDb.boTouchs[21]:=FALSE; IF NOT bildDb.fktSperreAS[fktNr] THEN M0.2:=FALSE; M0.2:=TRUE; END_IF; END_IF; END_IF; END_FUNCTION

2025-06-12 08:45:47