Cleaned Up

added additional Homing after Program change
2013-08-30 15:06:41 +02:00
parent 291e105036
commit 99750329ce
15 changed files with 432 additions and 138 deletions
--- a/LastUser.set
+++ b/LastUser.set
@@ -0,0 +1,6 @@
+<?xml version="1.0" encoding="utf-8"?>
+<?AutomationStudio Version=4.0.14.207?>
+<ProjectSettings xmlns="http://br-automation.co.at/AS/ProjectSettings">
+  <Print Header="%lProject: %n%c%x" Footer="%cPage: %p" />
+  <ConfigurationManager ActiveConfigurationName="ConfigPP65" />
+</ProjectSettings>
--- a/Logical/Axises/GrillCtrl/FUB_CylinderCheck.st
+++ b/Logical/Axises/GrillCtrl/FUB_CylinderCheck.st
@@ -0,0 +1,15 @@
+
+FUNCTION_BLOCK FUB_CylinderCheck
+  TON_CylinderFw.IN := bInOutputCylinderFw AND (bInSensorCylinderBw OR NOT bInSensorCylinderFw);
+  TON_CylinderFw.PT := tInCylinderFw;
+  TON_CylinderFw ();
+  bOuErrorCylinderFw := TON_CylinderFw.Q;
+  
+  TON_CylinderBw.IN := bInOutputCylinderBw AND (bInSensorCylinderFw OR NOT bInSensorCylinderBw);
+  TON_CylinderBw.PT := tInCylinderBw;
+  TON_CylinderBw ();
+  bOuErrorCylinderBw := TON_CylinderBw.Q;
+
+  bOuErrorBothSensorsHigh := bInSensorCylinderFw AND bInSensorCylinderBw;
+  
+END_FUNCTION_BLOCK
--- a/Logical/Axises/GrillCtrl/GrillCtrl.fun
+++ b/Logical/Axises/GrillCtrl/GrillCtrl.fun
@@ -0,0 +1,22 @@
+
+FUNCTION_BLOCK FUB_CylinderCheck (*Zylinder<EFBFBD>berwachung*)
+	VAR_INPUT
+		bInOutputCylinderFw : BOOL; (*Ausgang Zylinder Ausfahren*)
+		bInOutputCylinderBw : BOOL; (*Ausgang Zylinder Einfahren*)
+		bInSensorCylinderFw : BOOL; (*Sensor Zylinder Ausfahren*)
+		bInSensorCylinderBw : BOOL; (*Sensor Zylinder Einfahren*)
+	END_VAR
+	VAR_OUTPUT
+		bOuErrorCylinderFw : BOOL; (*Fehler Zylinder Ausfahren*)
+		bOuErrorCylinderBw : BOOL; (*Fehler Zylinder Einfahren*)
+		bOuErrorBothSensorsHigh : BOOL; (*Fehler beide Zynlinderschalter bet<EFBFBD>tigt*)
+	END_VAR
+	VAR_INPUT
+		tInCylinderFw : TIME := T#2s; (*<EFBFBD>berwachungszeit Zylinder Ausfahren*)
+		tInCylinderBw : TIME := T#2s; (*<EFBFBD>berwachungszeit Zylinder Ausfahren*)
+	END_VAR
+	VAR
+		TON_CylinderFw : TON;
+		TON_CylinderBw : TON;
+	END_VAR
+END_FUNCTION_BLOCK
--- a/Logical/Axises/GrillCtrl/GrillCtrl.typ
+++ b/Logical/Axises/GrillCtrl/GrillCtrl.typ
@@ -81,6 +81,7 @@ TYPE
 		enBeltStep_INIT,
 		enBeltStep_MOVE_TO_LOADPOS, (*Best<73>ckungsposition anfahren*)
 		enBeltStep_ADJUST_LANE, (*Spur einstellen*)
+		enBelt_Step_HOME_BELT, (*Taktband Referenzieren*)
 		enBeltStep_WAIT_LOADED, (*Warten bis Band best<73>ckt*)
 		enBeltStep_MOVE_TO_WELDPOS, (*Schwei<65>positon anfahren*)
 		enBeltStep_WAIT_WELDED, (*Warten bis Schwei<65>vorgang beendet*)
--- a/Logical/Axises/GrillCtrl/GrillCtrl.var
+++ b/Logical/Axises/GrillCtrl/GrillCtrl.var
@@ -76,9 +76,9 @@ VAR
 	rBender1Pos0 : REAL := 19.0; (*Bender 1 0<> Infeedpos*)
 	rBender1Pos90 : REAL := 123.0; (*Bender 1 90<39> Bendpos Lane1*)
 	rBender1Pos270 : REAL := -78.0; (*Bender 1 270<37> Bendpos Lane2*)
-	rBender2Pos0 : REAL := -33.0; (*Bender 2 0<> Infeedpos*)
-	rBender2Pos90 : REAL := -131.0; (*Bender 2 90<39> Bendpos Lane1*)
-	rBender2Pos270 : REAL := 70.0; (*Bender 2 270<37> Bendpos Lane2*)
+	rBender2Pos0 : REAL := -38.0; (*Bender 2 0<> Infeedpos*)
+	rBender2Pos90 : REAL := -136.0; (*Bender 2 90<39> Bendpos Lane1*)
+	rBender2Pos270 : REAL := 65.0; (*Bender 2 270<37> Bendpos Lane2*)
 	rBenderOpenAngle : REAL := 1.0; (*Bender Angle for Open after Bending*)
 	rBenderOpenAngle2 : REAL := 3.0; (*Bender Angle for Open after Bending*)
 	rBeltVelocityEmpty : REAL := 1250.0; (*Taktband leerfahrt (1500)*)
@@ -92,6 +92,12 @@ VAR
 END_VAR
 (*//FUBs*)
 VAR
+	CylChckLane : FUB_CylinderCheck;
+	CylChckWireDistributor : FUB_CylinderCheck;
+	CylChckWire1Hor : FUB_CylinderCheck;
+	CylChckWire1Ver : FUB_CylinderCheck;
+	CylChckWire2Hor : FUB_CylinderCheck;
+	CylChckWire2Ver : FUB_CylinderCheck;
 	TON_StoreWeldpos : TON; (*Schwei<65>pos Speichern*)
 	TON_WireCutterClosed : TON; (*Drahtschneider geschlossen verz<72>gert*)
 	TOF_WireCutterClosed : TOF;
--- a/Logical/Axises/GrillCtrl/GrillCtrlCyclic.st
+++ b/Logical/Axises/GrillCtrl/GrillCtrlCyclic.st
@@ -713,13 +713,21 @@ PROGRAM _CYCLIC
      //---------------------------
      enBeltStep_ADJUST_LANE:
        IF NOT lAxisLane.Move.bAbsolute THEN
+          enStepBelt := enBelt_Step_HOME_BELT;
+          enLastBladetype := enBladetype;
+          usActBladesInFrame := 1;
+          lAxisBelt.bHome :=  TRUE;
+        END_IF
+        
+      //Home Belt
+      //---------------------------
+      enBelt_Step_HOME_BELT:
+        IF NOT lAxisBelt.DriveStatus.bHomingOk THEN
          lAxisBelt.Para.usDirection := mcNEGATIVE_DIR;
          lAxisBelt.Para.rPosition := grBladeStartPos[enBladetype];
          lAxisBelt.Para.rVelocity := rBeltVelocityEmpty;
          lAxisBelt.Move.bAbsolute:= TRUE;
          enStepBelt := enBeltStep_MOVE_TO_LOADPOS;
-          enLastBladetype := enBladetype;
-          usActBladesInFrame := 1;
        END_IF
        
      //Move to Loadpos
@@ -863,6 +871,67 @@ PROGRAM _CYCLIC
                     (enStepWirehandling1 = enWireHandlingStep_COOL_WIRE) OR (enStepWirehandling2 = enWireHandlingStep_COOL_WIRE)) AND
                      ((gMachine.enMode = enMACH_AUTOMATIC) OR (gMachine.enMode = enMACH_MANUAL));
                         
+  //Cylinder Checks
+  CylChckLane (bInOutputCylinderBw := gbOuWireDistributorLane2,
+               bInOutputCylinderFw := gbOuWireDistributorLane1,
+               bInSensorCylinderBw := gbInWireDistributorLane2,
+               bInSensorCylinderFw := gbInWireDistributorLane1,
+               tInCylinderBw := UDINT_TO_TIME (4000),
+               tInCylinderFw := UDINT_TO_TIME (4000));
+               
+  gMachineAlarms.Alarm[0] := CylChckLane.bOuErrorCylinderFw;
+  gMachineAlarms.Alarm[1] := CylChckLane.bOuErrorCylinderBw;
+                        
+  CylChckWireDistributor (bInOutputCylinderBw := NOT gbOuWireDistirbutorOpen,
+               bInOutputCylinderFw := gbOuWireDistirbutorOpen,
+               bInSensorCylinderBw := gbInWireDistributorClosed,
+               bInSensorCylinderFw := gbInWireDistributorOpen,
+               tInCylinderBw := UDINT_TO_TIME (2000),
+               tInCylinderFw := UDINT_TO_TIME (2000));
+
+  gMachineAlarms.Alarm[2] := CylChckWireDistributor.bOuErrorCylinderFw;
+  gMachineAlarms.Alarm[3] := CylChckWireDistributor.bOuErrorCylinderBw;
+
+  CylChckWire1Ver (bInOutputCylinderBw := gbOuVertStrokeBwWire1,
+               bInOutputCylinderFw := gbOuVertStrokeFwWire1,
+               bInSensorCylinderBw := gbInVertStrokeBwWire1,
+               bInSensorCylinderFw := gbInVertStrokeFwWire1,
+               tInCylinderBw := UDINT_TO_TIME (4000),
+               tInCylinderFw := UDINT_TO_TIME (4000));
+
+  gMachineAlarms.Alarm[4] := CylChckWire1Ver.bOuErrorCylinderFw;
+  gMachineAlarms.Alarm[5] := CylChckWire1Ver.bOuErrorCylinderBw;
+
+  CylChckWire1Hor (bInOutputCylinderBw := gbOuHorStrokeBwWire1,
+               bInOutputCylinderFw := gbOuHorStrokeFwWire1,
+               bInSensorCylinderBw := gbInHorStrokeBwWire1,
+               bInSensorCylinderFw := gbInHorStrokeFwWire1,
+               tInCylinderBw := UDINT_TO_TIME (2000),
+               tInCylinderFw := UDINT_TO_TIME (9000));
+
+  gMachineAlarms.Alarm[6] := CylChckWire1Hor.bOuErrorCylinderFw;
+  gMachineAlarms.Alarm[7] := CylChckWire1Hor.bOuErrorCylinderBw;
+                                                            
+  CylChckWire2Ver (bInOutputCylinderBw := gbOuVertStrokeBwWire2,
+               bInOutputCylinderFw := gbOuVertStrokeFwWire2,
+               bInSensorCylinderBw := gbInVertStrokeBwWire2,
+               bInSensorCylinderFw := gbInVertStrokeFwWire2,
+               tInCylinderBw := UDINT_TO_TIME (4000),
+               tInCylinderFw := UDINT_TO_TIME (4000));
+
+  gMachineAlarms.Alarm[8] := CylChckWire2Ver.bOuErrorCylinderFw;
+  gMachineAlarms.Alarm[9] := CylChckWire2Ver.bOuErrorCylinderBw;
+               
+  CylChckWire2Hor (bInOutputCylinderBw := gbOuHorStrokeBwWire2,
+               bInOutputCylinderFw := gbOuHorStrokeFwWire2,
+               bInSensorCylinderBw := gbInHorStrokeBwWire2,
+               bInSensorCylinderFw := gbInHorStrokeFwWire2,
+               tInCylinderBw := UDINT_TO_TIME (2000),
+               tInCylinderFw := UDINT_TO_TIME (9000));
+
+  gMachineAlarms.Alarm[10] := CylChckWire1Hor.bOuErrorCylinderFw;
+  gMachineAlarms.Alarm[11] := CylChckWire1Hor.bOuErrorCylinderBw;
+                                                    
  IF EDGEPOS (usErrorReset = 1) THEN
    lAxisWire1.Error.bAcknowledge := (lAxisWire1.Error.uiID > 0);
    lAxisWire2.Error.bAcknowledge := (lAxisWire2.Error.uiID > 0);
--- a/Logical/Axises/GrillCtrl/IEC.prg
+++ b/Logical/Axises/GrillCtrl/IEC.prg
@@ -1,10 +1,12 @@
 <?xml version="1.0" encoding="utf-8"?>
-<?AutomationStudio Version=3.0.90.23 SP05?>
+<?AutomationStudio Version=4.0.14.207?>
 <Program xmlns="http://br-automation.co.at/AS/Program">
  <Files>
    <File Description="Implementation code">GrillCtrlCyclic.st</File>
    <File>GrillCtrllInit.st</File>
    <File Description="Local data types" Private="true">GrillCtrl.typ</File>
    <File Description="Local variables" Private="true">GrillCtrl.var</File>
+    <File Private="true">GrillCtrl.fun</File>
+    <File Description="Zylinderüberwachung">FUB_CylinderCheck.st</File>
  </Files>
 </Program>
--- a/Logical/VCShared/AlarmGroups/MachineAlarms.algrp
+++ b/Logical/VCShared/AlarmGroups/MachineAlarms.algrp
@@ -0,0 +1,242 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<?AutomationStudio Version="4.0.14.207"?>
+<AlarmGroup xmlns="http://br-automation.co.at/AS/VC/Project" Name="MachineAlarms">
+  <Property Name="AcknowledgeImage" Value="None"/>
+  <Property Name="ActiveBackColor" Value="4"/>
+  <Property Name="ActiveForeColor" Value="0"/>
+  <Property Name="AlarmImage" Value="Source[global].Variable[DataSource.Machine.gMachineAlarms.Alarm]"/>
+  <Property Name="BypassBackColor" Value="14"/>
+  <Property Name="BypassForeColor" Value="0"/>
+  <Property Name="BypassImage" Value="None"/>
+  <Property Name="DefaultBackColor" Value="15"/>
+  <Property Name="DefaultForeColor" Value="0"/>
+  <Property Name="Description" Value=""/>
+  <Property Name="GroupAlarm" Value="None"/>
+  <Property Name="ImageOffset" Value="0"/>
+  <Property Name="Index" Value="1"/>
+  <Property Name="LatchedBackColor" Value="2"/>
+  <Property Name="LatchedForeColor" Value="0"/>
+  <Property Name="Priority" Value="1"/>
+  <Property Name="QuitBackColor" Value="1"/>
+  <Property Name="QuitForeColor" Value="0"/>
+  <Alarms>
+    <Alarm Index="0">
+      <Property Name="Acknowledge" Value="Possible"/>
+      <Property Name="AcknowledgeActive" Value="Enabled"/>
+      <Property Name="Bypass" Value="Enabled"/>
+      <Property Name="Description" Value=""/>
+      <Property Name="Latched" Value="False"/>
+      <Property Name="RecordAcknowledge" Value="True"/>
+      <Property Name="RecordBypass" Value="All"/>
+      <Property Name="RecordReset" Value="All"/>
+      <Property Name="RecordTrigger" Value="True"/>
+      <Property Name="TriggerGroupAlarm" Value="False"/>
+    </Alarm>
+    <Alarm Index="1">
+      <Property Name="Acknowledge" Value="Possible"/>
+      <Property Name="AcknowledgeActive" Value="Enabled"/>
+      <Property Name="Bypass" Value="Enabled"/>
+      <Property Name="Description" Value=""/>
+      <Property Name="Latched" Value="False"/>
+      <Property Name="RecordAcknowledge" Value="True"/>
+      <Property Name="RecordBypass" Value="All"/>
+      <Property Name="RecordReset" Value="All"/>
+      <Property Name="RecordTrigger" Value="True"/>
+      <Property Name="TriggerGroupAlarm" Value="False"/>
+    </Alarm>
+    <Alarm Index="2">
+      <Property Name="Acknowledge" Value="Possible"/>
+      <Property Name="AcknowledgeActive" Value="Enabled"/>
+      <Property Name="Bypass" Value="Enabled"/>
+      <Property Name="Description" Value=""/>
+      <Property Name="Latched" Value="False"/>
+      <Property Name="RecordAcknowledge" Value="True"/>
+      <Property Name="RecordBypass" Value="All"/>
+      <Property Name="RecordReset" Value="All"/>
+      <Property Name="RecordTrigger" Value="True"/>
+      <Property Name="TriggerGroupAlarm" Value="False"/>
+    </Alarm>
+    <Alarm Index="3">
+      <Property Name="Acknowledge" Value="Possible"/>
+      <Property Name="AcknowledgeActive" Value="Enabled"/>
+      <Property Name="Bypass" Value="Enabled"/>
+      <Property Name="Description" Value=""/>
+      <Property Name="Latched" Value="False"/>
+      <Property Name="RecordAcknowledge" Value="True"/>
+      <Property Name="RecordBypass" Value="All"/>
+      <Property Name="RecordReset" Value="All"/>
+      <Property Name="RecordTrigger" Value="True"/>
+      <Property Name="TriggerGroupAlarm" Value="False"/>
+    </Alarm>
+    <Alarm Index="4">
+      <Property Name="Acknowledge" Value="Possible"/>
+      <Property Name="AcknowledgeActive" Value="Enabled"/>
+      <Property Name="Bypass" Value="Enabled"/>
+      <Property Name="Description" Value=""/>
+      <Property Name="Latched" Value="False"/>
+      <Property Name="RecordAcknowledge" Value="True"/>
+      <Property Name="RecordBypass" Value="All"/>
+      <Property Name="RecordReset" Value="All"/>
+      <Property Name="RecordTrigger" Value="True"/>
+      <Property Name="TriggerGroupAlarm" Value="False"/>
+    </Alarm>
+    <Alarm Index="5">
+      <Property Name="Acknowledge" Value="Possible"/>
+      <Property Name="AcknowledgeActive" Value="Enabled"/>
+      <Property Name="Bypass" Value="Enabled"/>
+      <Property Name="Description" Value=""/>
+      <Property Name="Latched" Value="False"/>
+      <Property Name="RecordAcknowledge" Value="True"/>
+      <Property Name="RecordBypass" Value="All"/>
+      <Property Name="RecordReset" Value="All"/>
+      <Property Name="RecordTrigger" Value="True"/>
+      <Property Name="TriggerGroupAlarm" Value="False"/>
+    </Alarm>
+    <Alarm Index="6">
+      <Property Name="Acknowledge" Value="Possible"/>
+      <Property Name="AcknowledgeActive" Value="Enabled"/>
+      <Property Name="Bypass" Value="Enabled"/>
+      <Property Name="Description" Value=""/>
+      <Property Name="Latched" Value="False"/>
+      <Property Name="RecordAcknowledge" Value="True"/>
+      <Property Name="RecordBypass" Value="All"/>
+      <Property Name="RecordReset" Value="All"/>
+      <Property Name="RecordTrigger" Value="True"/>
+      <Property Name="TriggerGroupAlarm" Value="False"/>
+    </Alarm>
+    <Alarm Index="7">
+      <Property Name="Acknowledge" Value="Possible"/>
+      <Property Name="AcknowledgeActive" Value="Enabled"/>
+      <Property Name="Bypass" Value="Enabled"/>
+      <Property Name="Description" Value=""/>
+      <Property Name="Latched" Value="False"/>
+      <Property Name="RecordAcknowledge" Value="True"/>
+      <Property Name="RecordBypass" Value="All"/>
+      <Property Name="RecordReset" Value="All"/>
+      <Property Name="RecordTrigger" Value="True"/>
+      <Property Name="TriggerGroupAlarm" Value="False"/>
+    </Alarm>
+    <Alarm Index="8">
+      <Property Name="Acknowledge" Value="Possible"/>
+      <Property Name="AcknowledgeActive" Value="Enabled"/>
+      <Property Name="Bypass" Value="Enabled"/>
+      <Property Name="Description" Value=""/>
+      <Property Name="Latched" Value="False"/>
+      <Property Name="RecordAcknowledge" Value="True"/>
+      <Property Name="RecordBypass" Value="All"/>
+      <Property Name="RecordReset" Value="All"/>
+      <Property Name="RecordTrigger" Value="True"/>
+      <Property Name="TriggerGroupAlarm" Value="False"/>
+    </Alarm>
+    <Alarm Index="9">
+      <Property Name="Acknowledge" Value="Possible"/>
+      <Property Name="AcknowledgeActive" Value="Enabled"/>
+      <Property Name="Bypass" Value="Enabled"/>
+      <Property Name="Description" Value=""/>
+      <Property Name="Latched" Value="False"/>
+      <Property Name="RecordAcknowledge" Value="True"/>
+      <Property Name="RecordBypass" Value="All"/>
+      <Property Name="RecordReset" Value="All"/>
+      <Property Name="RecordTrigger" Value="True"/>
+      <Property Name="TriggerGroupAlarm" Value="False"/>
+    </Alarm>
+    <Alarm Index="10">
+      <Property Name="Acknowledge" Value="Possible"/>
+      <Property Name="AcknowledgeActive" Value="Enabled"/>
+      <Property Name="Bypass" Value="Enabled"/>
+      <Property Name="Description" Value=""/>
+      <Property Name="Latched" Value="False"/>
+      <Property Name="RecordAcknowledge" Value="True"/>
+      <Property Name="RecordBypass" Value="All"/>
+      <Property Name="RecordReset" Value="All"/>
+      <Property Name="RecordTrigger" Value="True"/>
+      <Property Name="TriggerGroupAlarm" Value="False"/>
+    </Alarm>
+    <Alarm Index="11">
+      <Property Name="Acknowledge" Value="Possible"/>
+      <Property Name="AcknowledgeActive" Value="Enabled"/>
+      <Property Name="Bypass" Value="Enabled"/>
+      <Property Name="Description" Value=""/>
+      <Property Name="Latched" Value="False"/>
+      <Property Name="RecordAcknowledge" Value="True"/>
+      <Property Name="RecordBypass" Value="All"/>
+      <Property Name="RecordReset" Value="All"/>
+      <Property Name="RecordTrigger" Value="True"/>
+      <Property Name="TriggerGroupAlarm" Value="False"/>
+    </Alarm>
+    <Alarm Index="12">
+      <Property Name="Acknowledge" Value="Possible"/>
+      <Property Name="AcknowledgeActive" Value="Enabled"/>
+      <Property Name="Bypass" Value="Enabled"/>
+      <Property Name="Description" Value=""/>
+      <Property Name="Latched" Value="False"/>
+      <Property Name="RecordAcknowledge" Value="True"/>
+      <Property Name="RecordBypass" Value="All"/>
+      <Property Name="RecordReset" Value="All"/>
+      <Property Name="RecordTrigger" Value="True"/>
+      <Property Name="TriggerGroupAlarm" Value="False"/>
+    </Alarm>
+    <Alarm Index="Group">
+      <Property Name="Acknowledge" Value="Possible"/>
+      <Property Name="AcknowledgeActive" Value="Enabled"/>
+      <Property Name="Bypass" Value="Enabled"/>
+      <Property Name="Description" Value=""/>
+      <Property Name="Latched" Value="False"/>
+      <Property Name="RecordAcknowledge" Value="True"/>
+      <Property Name="RecordBypass" Value="All"/>
+      <Property Name="RecordReset" Value="All"/>
+      <Property Name="RecordTrigger" Value="True"/>
+    </Alarm>
+  </Alarms>
+  <TextGroup>
+    <TextSnippets/>
+    <TextLayer LanguageId="en">
+      <Text ID="25" Value=""/>
+      <Text ID="26" Value=""/>
+      <Text ID="27" Value=""/>
+      <Text ID="28" Value=""/>
+      <Text ID="29" Value=""/>
+      <Text ID="30" Value=""/>
+      <Text ID="31" Value=""/>
+      <Text ID="32" Value=""/>
+      <Text ID="33" Value=""/>
+      <Text ID="34" Value=""/>
+      <Text ID="35" Value=""/>
+      <Text ID="36" Value=""/>
+      <Text ID="44" Value=""/>
+      <Text ID="20" Value=""/>
+    </TextLayer>
+    <TextLayer LanguageId="de">
+      <Text ID="25" Value="Verteiler erreicht Spur 1 nicht"/>
+      <Text ID="26" Value="Verteiler erreicht Spur 2 nicht"/>
+      <Text ID="27" Value="Verteiler öffnet nicht"/>
+      <Text ID="28" Value="Verteiler schließt nicht"/>
+      <Text ID="29" Value="Draht 1 nicht oben"/>
+      <Text ID="30" Value="Draht 1 nicht unten"/>
+      <Text ID="31" Value="Draht 1 nicht vorne"/>
+      <Text ID="32" Value="Draht 1 nicht hinten"/>
+      <Text ID="33" Value="Draht 2 nicht oben"/>
+      <Text ID="34" Value="Draht 2 nicht unten"/>
+      <Text ID="35" Value="Draht 2 nicht vorne"/>
+      <Text ID="36" Value="Draht 2 nicht hinten"/>
+      <Text ID="44" Value="Testalarm"/>
+      <Text ID="20" Value=""/>
+    </TextLayer>
+    <IndexMap>
+      <Index ID="25" Value="0"/>
+      <Index ID="26" Value="1"/>
+      <Index ID="27" Value="2"/>
+      <Index ID="28" Value="3"/>
+      <Index ID="29" Value="4"/>
+      <Index ID="30" Value="5"/>
+      <Index ID="31" Value="6"/>
+      <Index ID="32" Value="7"/>
+      <Index ID="33" Value="8"/>
+      <Index ID="34" Value="9"/>
+      <Index ID="35" Value="10"/>
+      <Index ID="36" Value="11"/>
+      <Index ID="44" Value="12"/>
+      <Index ID="20" Value="Group"/>
+    </IndexMap>
+  </TextGroup>
+</AlarmGroup>
--- a/Logical/VCShared/DataSources/DataSource.dso
+++ b/Logical/VCShared/DataSources/DataSource.dso
@@ -811,6 +811,18 @@
          <Property Name="VCType" Value="INTEGER"/>
        </DataPoint>
      </DataPoint>
+      <Folder Name="gMachineAlarms">
+        <Property Name="Description" Value=""/>
+        <Property Name="FolderType" Value="Struct"/>
+        <DataPoint Name="Alarm">
+          <Property Name="ConnectedBySharedResource" Value="True"/>
+          <Property Name="Description" Value=""/>
+          <Property Name="PLCType" Value="BOOL[0..127]"/>
+          <Property Name="UpdateTime" Value="Default"/>
+          <Property Name="UserID" Value="None"/>
+          <Property Name="VCType" Value="BOOL[]"/>
+        </DataPoint>
+      </Folder>
    </Folder>
  </DataPoints>
 </DataSource>
--- a/Logical/VCShared/Package.vcp
+++ b/Logical/VCShared/Package.vcp
@@ -23,6 +23,7 @@
    <Source File="UnitGroups\Volume.vcug"/>
    <Source File="AlarmGroups\AlarmSystem.alcfg"/>
    <Source File="AlarmGroups\SystemAlarms.algrp"/>
+    <Source File="AlarmGroups\MachineAlarms.algrp"/>
    <Source File="DataSources\Internal.dso"/>
    <Source File="DataSources\DataSource.dso"/>
    <Source File="ControlVersion.cvinfo"/>
--- a/Logical/Visualization/Visu/Package.vcp
+++ b/Logical/Visualization/Visu/Package.vcp
@@ -13,7 +13,7 @@
  <Property Name="DefaultKeyLevelNumeric" Value="0"/>
  <Property Name="DefaultKeyLevelString" Value="0"/>
  <Property Name="DefaultLanguage" Value="de"/>
-  <Property Name="DefaultPage" Value="Source[local].Page[tmpl00_StartPage]"/>
+  <Property Name="DefaultPage" Value="Source[local].Page[tmpl10_MainPage]"/>
  <Property Name="DefaultStyleSheet" Value="Source[local].StyleSheet[Default]"/>
  <Property Name="FocusControlDatapoint" Value="None"/>
  <Property Name="FontAntialiasing" Value="Off"/>
@@ -144,7 +144,6 @@
    <Source File="BitmapGroups\msgBox.bmgrp"/>
    <Source File="BitmapGroups\LED_Gr_Gn.bmgrp"/>
    <Source File="BitmapGroups\Bladepoles.bmgrp"/>
-    <Source File="Pages\tmpl00_StartPage.page"/>
    <Source File="Pages\tmpl10_MainPage.page"/>
    <Source File="Pages\tmpl30_AlarmPage.page"/>
    <Source File="Pages\tmpl31_AlarmHistoryPage.page"/>
--- a/Logical/Visualization/Visu/Pages/tmpl00_StartPage.page
+++ b/Logical/Visualization/Visu/Pages/tmpl00_StartPage.page
@@ -1,124 +0,0 @@
-<?xml version="1.0" encoding="UTF-8"?>
-<?AutomationStudio Version="4.0.14.207"?>
-<Page xmlns="http://br-automation.co.at/AS/VC/Project" Name="tmpl00_StartPage">
-  <Property Name="Description" Value="Template Start page - shown during boot up"/>
-  <Property Name="Height" Value="240"/>
-  <Property Name="Index" Value="0"/>
-  <Property Name="MoveFocus" Value="Circular"/>
-  <Property Name="StyleClass" Value="Source[relative:StyleGroup].StyleClass[Default]"/>
-  <Property Name="Width" Value="320"/>
-  <Layers>
-    <LayerRef Source="Source[local].Layer[globalArea]">
-      <Property Name="Description" Value=""/>
-      <Property Name="EditingMode" Value="Frozen"/>
-      <Property Name="Left" Value="0"/>
-      <Property Name="Name" Value="globalArea"/>
-      <Property Name="OutlineColor" Value="0"/>
-      <Property Name="OutlineDisplayControl" Value="False"/>
-      <Property Name="OutlineDisplayName" Value="True"/>
-      <Property Name="OutlineHatched" Value="False"/>
-      <Property Name="Top" Value="0"/>
-      <Property Name="VisibilityMode" Value="Normal"/>
-      <Property Name="Z-Order" Value="0"/>
-    </LayerRef>
-    <Layer Name="Default">
-      <Property Name="BackColor" Value="9"/>
-      <Property Name="Description" Value=""/>
-      <Property Name="EditingMode" Value="Normal"/>
-      <Property Name="Height" Value="240"/>
-      <Property Name="Left" Value="0"/>
-      <Property Name="OutlineColor" Value="0"/>
-      <Property Name="OutlineDisplayControl" Value="False"/>
-      <Property Name="OutlineDisplayName" Value="True"/>
-      <Property Name="OutlineHatched" Value="False"/>
-      <Property Name="StatusDatapoint" Value="None"/>
-      <Property Name="Top" Value="0"/>
-      <Property Name="VisibilityMode" Value="Normal"/>
-      <Property Name="Width" Value="320"/>
-      <Property Name="Z-Order" Value="1"/>
-      <TextGroup>
-        <TextLayer LanguageId="en"/>
-        <TextLayer LanguageId="de"/>
-        <IndexMap/>
-      </TextGroup>
-      <Controls/>
-      <KeyMapping>
-        <VirtualKey Name="CalibTouch">
-          <Property Name="Description" Value=""/>
-          <Property Name="VirtualKey_LED" Value="False"/>
-          <KeyActions>
-            <KeyAction ClassId="0x00000164">
-              <Property Name="Description" Value=""/>
-              <Property Name="Locking" Value="Never"/>
-              <Property Name="Name" Value="Action_0"/>
-            </KeyAction>
-          </KeyActions>
-        </VirtualKey>
-        <VirtualKey Name="SetMachOnline">
-          <Property Name="Description" Value=""/>
-          <Property Name="VirtualKey_LED" Value="False"/>
-          <KeyActions>
-            <KeyAction ClassId="0x00000161">
-              <Property Name="CompletionDatapoint" Value="None"/>
-              <Property Name="CompletionValue" Value="0"/>
-              <Property Name="Description" Value=""/>
-              <Property Name="Locking" Value="Never"/>
-              <Property Name="Name" Value="Action_0"/>
-              <Property Name="SetValue" Value="2"/>
-              <Property Name="ValueDatapoint" Value="Source[global].Variable[DataSource.Machine.gMachine.enMode]"/>
-            </KeyAction>
-          </KeyActions>
-        </VirtualKey>
-        <VirtualKey Name="SetMachOffline">
-          <Property Name="Description" Value=""/>
-          <Property Name="VirtualKey_LED" Value="False"/>
-          <KeyActions>
-            <KeyAction ClassId="0x00000161">
-              <Property Name="CompletionDatapoint" Value="None"/>
-              <Property Name="CompletionValue" Value="0"/>
-              <Property Name="Description" Value=""/>
-              <Property Name="Locking" Value="Never"/>
-              <Property Name="Name" Value="Action_0"/>
-              <Property Name="SetValue" Value="0"/>
-              <Property Name="ValueDatapoint" Value="Source[global].Variable[DataSource.Machine.gMachine.enMode]"/>
-            </KeyAction>
-          </KeyActions>
-        </VirtualKey>
-        <VirtualKey Name="ResetError">
-          <Property Name="Description" Value=""/>
-          <Property Name="VirtualKey_LED" Value="False"/>
-          <KeyActions>
-            <KeyAction ClassId="0x0000016B">
-              <Property Name="CompletionDatapoint" Value="None"/>
-              <Property Name="CompletionValue" Value="0"/>
-              <Property Name="Description" Value=""/>
-              <Property Name="Locking" Value="Never"/>
-              <Property Name="Name" Value="Action_0"/>
-              <Property Name="ResetValue" Value="0"/>
-              <Property Name="SetValue" Value="1"/>
-              <Property Name="ValueDatapoint" Value="Source[global].Variable[DataSource.Axises.GrillCtrl.usErrorReset]"/>
-            </KeyAction>
-          </KeyActions>
-        </VirtualKey>
-        <VirtualKey Name="Trigger">
-          <Property Name="Description" Value=""/>
-          <Property Name="VirtualKey_LED" Value="False"/>
-          <KeyActions>
-            <KeyAction ClassId="0x0000016B">
-              <Property Name="CompletionDatapoint" Value="None"/>
-              <Property Name="CompletionValue" Value="0"/>
-              <Property Name="Description" Value=""/>
-              <Property Name="Locking" Value="Never"/>
-              <Property Name="Name" Value="Action_0"/>
-              <Property Name="ResetValue" Value="0"/>
-              <Property Name="SetValue" Value="1"/>
-              <Property Name="ValueDatapoint" Value="Source[global].Variable[DataSource.GlobalVars.gbOuWireheatOn2]"/>
-            </KeyAction>
-          </KeyActions>
-        </VirtualKey>
-      </KeyMapping>
-    </Layer>
-  </Layers>
-  <MovementOrder/>
-  <TabSequence/>
-</Page>
--- a/Logical/Visualization/Visu/Pages/tmpl10_MainPage.page
+++ b/Logical/Visualization/Visu/Pages/tmpl10_MainPage.page
@@ -402,6 +402,39 @@
          <Property Name="ValueMode" Value="Standard"/>
          <Property Name="Width" Value="72"/>
        </Control>
+        <Control ClassId="0x00001009" Name="Alarm_Current">
+          <Property Name="AcknowledgeState_Position" Value="None"/>
+          <Property Name="AlarmNumber_Position" Value="None"/>
+          <Property Name="AlarmState_Position" Value="None"/>
+          <Property Name="AlarmText_Alignment" Value="Left"/>
+          <Property Name="AlarmText_Position" Value="Column 1"/>
+          <Property Name="AlarmText_SeparatorTextGroup" Value="None"/>
+          <Property Name="AlarmText_Width" Value="292"/>
+          <Property Name="Border" Value="Source[local].Border[Flat_grey]"/>
+          <Property Name="BypassState_Position" Value="None"/>
+          <Property Name="ColumnCount" Value="1"/>
+          <Property Name="ControlID" Value="0"/>
+          <Property Name="Cursor_LeftBitmap" Value="None"/>
+          <Property Name="Cursor_LeftTextGroup" Value="None"/>
+          <Property Name="Cursor_RightBitmap" Value="None"/>
+          <Property Name="Cursor_RightTextGroup" Value="None"/>
+          <Property Name="DateTime_Position" Value="None"/>
+          <Property Name="Description" Value=""/>
+          <Property Name="Event_Position" Value="None"/>
+          <Property Name="ForeColor" Value="4"/>
+          <Property Name="GroupNumber_Position" Value="None"/>
+          <Property Name="Height" Value="26"/>
+          <Property Name="Input" Value="False"/>
+          <Property Name="Left" Value="12"/>
+          <Property Name="Node1" Value="User order"/>
+          <Property Name="Priority_Position" Value="None"/>
+          <Property Name="SortColumn" Value="Time"/>
+          <Property Name="SortOrder" Value="Descending"/>
+          <Property Name="Source" Value="Active"/>
+          <Property Name="StyleClass" Value="Source[relative:StyleGroup].StyleClass[Default]"/>
+          <Property Name="Top" Value="187"/>
+          <Property Name="Width" Value="292"/>
+        </Control>
      </Controls>
      <KeyMapping>
        <VirtualKey Name="SetMachOnline">
@@ -557,5 +590,6 @@
  <TabSequence>
    <TabSeqItem Index="0" Value="Source[embedded].Layer[FrameLayer].Control[NumeCycletime]"/>
    <TabSeqItem Index="1" Value="Source[embedded].Layer[FrameLayer].Control[Numeric_Beltpos]"/>
+    <TabSeqItem Index="2" Value="Source[embedded].Layer[FrameLayer].Control[Alarm_Current]"/>
  </TabSequence>
 </Page>
--- a/Logical/Visualization/Visu/Textgroups/Steps_Shiftbelt.txtgrp
+++ b/Logical/Visualization/Visu/Textgroups/Steps_Shiftbelt.txtgrp
@@ -14,6 +14,7 @@
    <Text ID="97920" Value="Eject Frame"/>
    <Text ID="97946" Value=""/>
    <Text ID="97947" Value="Adjust Lane"/>
+    <Text ID="101478" Value="Home Belt"/>
  </TextLayer>
  <TextLayer LanguageId="de">
    <Text ID="97914" Value="Init"/>
@@ -25,16 +26,18 @@
    <Text ID="97920" Value="Rahmen auswerfen"/>
    <Text ID="97946" Value=""/>
    <Text ID="97947" Value="Spur einstellen"/>
+    <Text ID="101478" Value="Spur referenzieren"/>
  </TextLayer>
  <IndexMap>
    <Index ID="97914" Value="0"/>
    <Index ID="97915" Value="1"/>
-    <Index ID="97916" Value="3"/>
-    <Index ID="97917" Value="4"/>
-    <Index ID="97918" Value="5"/>
-    <Index ID="97919" Value="6"/>
-    <Index ID="97920" Value="7"/>
-    <Index ID="97946" Value="8"/>
+    <Index ID="97916" Value="4"/>
+    <Index ID="97917" Value="5"/>
+    <Index ID="97918" Value="6"/>
+    <Index ID="97919" Value="7"/>
+    <Index ID="97920" Value="8"/>
+    <Index ID="97946" Value="9"/>
    <Index ID="97947" Value="2"/>
+    <Index ID="101478" Value="3"/>
  </IndexMap>
 </TextGroup>
--- a/michi.set
+++ b/michi.set
@@ -0,0 +1,6 @@
+<?xml version="1.0" encoding="utf-8"?>
+<?AutomationStudio Version=4.0.14.207?>
+<ProjectSettings xmlns="http://br-automation.co.at/AS/ProjectSettings">
+  <Print Header="%lProject: %n%c%x" Footer="%cPage: %p" />
+  <ConfigurationManager ActiveConfigurationName="ConfigPP65" />
+</ProjectSettings>