Added Beltchange

2015-07-03 06:09:58 +02:00
parent 478c123a51
commit 8264bcb338
11 changed files with 272 additions and 110 deletions
--- a/Logical/Axises/SSTCtrl/SSTCtrl.typ
+++ b/Logical/Axises/SSTCtrl/SSTCtrl.typ
@@ -13,6 +13,16 @@ TYPE
 		enSSTStep_WAIT_BRUSHED, (*warten bis geb<65>rstet*)
 		enSSTStep_AX_BACK_BRUSH (*Achsen zur<75>ckstellen*)
 		);
+	typ_enStepBelt : 
+		(
+		enBeltStep_INIT := 0,
+		enBeltStep_WAIT_START,
+		enBeltStep_SHIFT_BELT,
+		enBeltStep_RELEASE_BELT,
+		enBeltStep_RETURN,
+		enBeltStep_HOLD_BELT,
+		enBeltStep_BELT_CHANGE
+		);
 	typ_enStepHoming : 
 		( (*Grundstellungsfahrt*)
 		enPressStepHoming_INIT, (*Auf Start warten*)
--- a/Logical/Axises/SSTCtrl/SSTCtrl.var
+++ b/Logical/Axises/SSTCtrl/SSTCtrl.var
@@ -14,16 +14,26 @@ VAR
 	bReferenedShaft2 : BOOL;
 	bStop : BOOL;
 	bHalt : BOOL;
+	bBeltChange : BOOL;
 	bEnableNextStep : BOOL; (*N<>chsten Schritt (Semiautomatik) Freigeben*)
 	bMachIsInHomepos : BOOL;
 	bAxis1Reverse : BOOL;
 	bAxis2Reverse : BOOL;
+	bBeltShiftFw : BOOL;
+	bBeltClampOutClose : BOOL;
+	bBeltClampShiftClose : BOOL;
+	bBeltClampInClose : BOOL;
+	bShiftBelt : BOOL;
 	usi : USINT;
 	usErrorReset : USINT;
 	usMaskPos : USINT;
-	udSteptime : UDINT; (*[0.1s]*)
+	udSteptime : UDINT; (*[ms]*)
+	udSteptime2 : UDINT; (*[ms]*)
 	udCycletime : UDINT;
 	udBrushtime : UDINT := 1500;
+	udPartsShift : UDINT;
+	udPartsOverall : UDINT;
+	udPartsBelt : UDINT;
 	diModPos : DINT;
 	StatusVCControls : typStatusPressVCControls;
 	ManualCommands : typManualCommnands; (*Kommandos Betriebsart Hand*)
@@ -32,6 +42,7 @@ VAR
 	enStepHomeShaft2 : typ_enHome;
 	enStepSST : typ_enStepSST;
 	enStepSSTHoming : typ_enStepHoming;
+	enStepBelt : typ_enStepBelt;
 	rMaskPos : REAL;
 	rAveragePos : REAL;
 	rOverrideVelocity : REAL := 100.0;
--- a/Logical/Axises/SSTCtrl/SSTCtrlCyclic.st
+++ b/Logical/Axises/SSTCtrl/SSTCtrlCyclic.st
@@ -8,6 +8,7 @@ PROGRAM _CYCLIC
      
  IF EDGEPOS (bBlink0_1) THEN
    udSteptime := udSteptime + 100;
+    udSteptime2 := udSteptime2 + 100;
    udCycletime := udCycletime + 100;
  END_IF  

@@ -42,7 +43,8 @@ PROGRAM _CYCLIC
  
  bMachIsInHomepos := gbInGrinderFw AND (
                      (gbInTurnTablePos1 AND gbInAxis2Fw AND gbInAxis1Bw) OR
-                      (gbInTurnTablePos2 AND gbInAxis1Fw AND gbInAxis2Bw));
+                      (gbInTurnTablePos2 AND gbInAxis1Fw AND gbInAxis2Bw))AND 
+                      NOT bBeltShiftFw AND NOT bBeltClampOutClose AND bBeltClampShiftClose AND bBeltClampInClose;
  

  //Move Conditions  
@@ -313,6 +315,10 @@ PROGRAM _CYCLIC
        gbOuAxis2Bw := NOT gbInTurnTablePos1;
        gbOuGrinderFw := TRUE;
        gbOuGrinderBw := FALSE;
+        bBeltShiftFw := FALSE;
+        bBeltClampOutClose := FALSE;
+        bBeltClampShiftClose := TRUE;
+        bBeltClampInClose := TRUE;
        IF ((gbOuAxis1Fw AND gbInAxis1Fw) OR 
           (gbOuAxis2Fw AND gbInAxis2Fw)) AND gbInGrinderFw THEN
          enStepSSTHoming := enPressStepHoming_DONE;
@@ -474,6 +480,11 @@ PROGRAM _CYCLIC
      //---------------------------
  	  enSSTStep_WAIT_BRUSHED:
        bTransitionCondition :=  (udSteptime >= udBrushtime);
+        IF (udSteptime >= udBrushtime / 2) THEN
+          bShiftBelt := TRUE;
+          udPartsBelt := 0;
+        END_IF
+
        IF bTransitionCondition THEN
          lAxisShaft1.Move.bVelocity := FALSE;
          lAxisShaft2.Move.bVelocity := FALSE;
@@ -502,17 +513,127 @@ PROGRAM _CYCLIC
          enStepSST := enSSTStep_WAIT_START;
          lAxisShaft1.bStop := FALSE;
          lAxisShaft2.bStop := FALSE;
+          udPartsBelt := udPartsBelt + 1;
+          udPartsShift := udPartsShift + 1;
+          udPartsOverall := udPartsOverall + 1;
        END_IF;
+    END_CASE
+    
+    //Belt
+    CASE enStepBelt OF
+      //Init
+      //---------------------------
+  	  enBeltStep_INIT:
+        bTransitionCondition := TRUE;
+
+        IF bTransitionCondition THEN
+          enStepBelt := enBeltStep_WAIT_START;
+        END_IF      
+        
+      //Wait for Start
+      //---------------------------
+  	  enBeltStep_WAIT_START:
+        bTransitionCondition := bShiftBelt;
+
+        IF bShiftBelt AND NOT bBeltChange THEN
+          udSteptime2 := 0;
+          enStepBelt := enBeltStep_SHIFT_BELT;
+        END_IF 
+        
+        IF bBeltChange THEN
+          enStepBelt := enBeltStep_BELT_CHANGE;
+        END_IF
+
+      //Shift Belt
+      //---------------------------
+  	  enBeltStep_SHIFT_BELT:
+        bBeltShiftFw := TRUE;
+        gbOuBeltMotor := TRUE;
+        bTransitionCondition :=  (udSteptime2 >= 500);
+        
+        IF bTransitionCondition THEN
+          udSteptime2 := 0;
+          enStepBelt := enBeltStep_RELEASE_BELT;
+        END_IF
+       
+      //Grab Belt
+      //---------------------------
+  	  enBeltStep_RELEASE_BELT:
+        bBeltClampInClose := FALSE;
+        bBeltClampOutClose := TRUE;
+        bBeltClampShiftClose := FALSE;
                
+        bTransitionCondition :=  (udSteptime2 >= 500);
+        
+        IF bTransitionCondition THEN
+          udSteptime2 := 0;
+          enStepBelt := enBeltStep_RETURN;
+        END_IF 
+
+
+      //Return Shifter
+      //---------------------------
+  	  enBeltStep_RETURN:
+        bBeltShiftFw := FALSE;
+        
+        bTransitionCondition :=  (udSteptime2 >= 200);
+        
+        IF bTransitionCondition THEN
+          udSteptime2 := 0;
+          enStepBelt := enBeltStep_HOLD_BELT;
+          bShiftBelt := FALSE;
+        END_IF
+
+              //Hold Belt
+      //---------------------------
+  	  enBeltStep_HOLD_BELT:
+        gbOuBeltMotor := FALSE;
+        bBeltClampInClose := TRUE;
+        bBeltClampOutClose := FALSE;
+        bBeltClampShiftClose := TRUE;
+        
+        bTransitionCondition :=  (udSteptime2 >= 200);
+        
+        IF bTransitionCondition THEN
+          udSteptime2 := 0;
+          enStepBelt := enBeltStep_WAIT_START;
+        END_IF         
+                                
+      //Belt Change
+      //---------------------------
+      enBeltStep_BELT_CHANGE:
+        gbOuBeltMotor := FALSE;
+        bBeltClampInClose := FALSE;
+        bBeltClampOutClose := FALSE;
+        bBeltClampShiftClose := FALSE;
+        
+        IF NOT bBeltChange THEN
+          bBeltClampInClose := TRUE;
+          bBeltClampOutClose := FALSE;
+          bBeltClampShiftClose := TRUE;
+          enStepBelt := enBeltStep_WAIT_START;
+        END_IF
+        
+        
+        
    END_CASE   


+    
  END_IF;

  gbEnableNextStepBtn := bTransitionCondition AND (gMachine.enMode = enMACH_MANUAL);
  
  //Set Ouputs
-   
+  gbOuBeltShiftFw := bBeltShiftFw;
+  gbOuBeltShiftBw := NOT bBeltShiftFw;
+  gbOuBeltClampOutClose := bBeltClampOutClose;
+  gbOuBeltClampOutOpen := NOT bBeltClampOutClose;
+  gbOuBeltClampShiftClose := bBeltClampShiftClose;
+  gbOuBeltClampShiftOpen :=  NOT bBeltClampShiftClose;
+  gbOuBeltClampInClose := bBeltClampInClose;
+  gbOuBeltClampInOpen := NOT bBeltClampInClose;
+  
  IF bSafetyOkFP THEN
    FOR usi:=100 TO 126 DO
 //      gMachineAlarms.Alarm[usi] := FALSE;
--- a/Logical/GlobalVar/Global.var
+++ b/Logical/GlobalVar/Global.var
@@ -9,6 +9,8 @@ END_VAR
 VAR
 	gbOuLEDEStop : BOOL;
 	gbOuLEDStart : BOOL;
+	gBOuVaccuumCleaner : BOOL;
+	gbOuBeltMotor : BOOL;
 END_VAR
 (*//ST5 XV-Valves*)
 VAR
@@ -20,6 +22,14 @@ VAR
 	gbOuAxis2Bw : BOOL; (*Achse 2 Einfahren*)
 	gbOuGrinderFw : BOOL; (*Schleifvlies Ausfahren*)
 	gbOuGrinderBw : BOOL; (*Schleifvlies Einfahren*)
+	gbOuBeltShiftFw : BOOL; (*Schleifvlies Vorschub Vor*)
+	gbOuBeltShiftBw : BOOL; (*Schleifvlies Vorschub R<>ck*)
+	gbOuBeltClampOutClose : BOOL; (*Klemme Schleifvlies Auslauf Zu*)
+	gbOuBeltClampOutOpen : BOOL; (*Klemme Schleifvlies Auslauf <20>ffnen*)
+	gbOuBeltClampShiftClose : BOOL; (*Klemme Schleifvlies Vorschub Zu*)
+	gbOuBeltClampShiftOpen : BOOL; (*Klemme Schleifvlies Vorschub <20>ffnen*)
+	gbOuBeltClampInClose : BOOL; (*Klemme Schleifvlies Einlauf Zu*)
+	gbOuBeltClampInOpen : BOOL; (*Klemme Schleifvlies Einlauf <20>ffnen*)
 END_VAR
 (*//ST6 Machine Inputs*)
 VAR
--- a/Logical/Mach/machine/machineCyclic.st
+++ b/Logical/Mach/machine/machineCyclic.st
@@ -46,6 +46,7 @@ gMachineAlarms.Alarm[0] := NOT gbInEStopOk;
 gMachineAlarms.Alarm[1] := gbInEStopPressed;
 gMachineAlarms.Alarm[2] := gbInEStopOk AND NOT gbInSafetyChainOk;
 gMachineAlarms.Alarm[3] := gAxis[0].DriveStatus.bAxisError;
+gMachineAlarms.Alarm[4] := gAxis[1].DriveStatus.bAxisError;

 //Accesslevels
 genAccessLevel := enACCESSLEVEL_5;
--- a/Logical/VCShared/AlarmGroups/MachineAlarms.algrp
+++ b/Logical/VCShared/AlarmGroups/MachineAlarms.algrp
@@ -1,10 +1,10 @@
 <?xml version="1.0" encoding="UTF-8"?>
-<?AutomationStudio Version="4.0.14.207"?>
+<?AutomationStudio Version="4.0.20.56 SP"?>
 <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="None"/>
+  <Property Name="AlarmImage" Value="Source[global].Variable[DataSource.Mach.gMachineAlarms.Alarm]"/>
  <Property Name="BypassBackColor" Value="14"/>
  <Property Name="BypassForeColor" Value="0"/>
  <Property Name="BypassImage" Value="None"/>
@@ -56,6 +56,30 @@
      <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="Group">
      <Property Name="Acknowledge" Value="Possible"/>
      <Property Name="AcknowledgeActive" Value="Enabled"/>
@@ -74,12 +98,16 @@
      <Text ID="21" Value="Nothaltkreis unterbrochen"/>
      <Text ID="22" Value="Nothaltbetätigt"/>
      <Text ID="23" Value="Schutztür geöffnet"/>
+      <Text ID="31" Value="Fehler Achse 1"/>
+      <Text ID="32" Value="Fehler Achse 2"/>
      <Text ID="20" Value=""/>
    </TextLayer>
    <IndexMap>
      <Index ID="21" Value="0"/>
      <Index ID="22" Value="1"/>
      <Index ID="23" Value="2"/>
+      <Index ID="31" Value="3"/>
+      <Index ID="32" Value="4"/>
      <Index ID="20" Value="Group"/>
    </IndexMap>
  </TextGroup>
--- a/Logical/VCShared/DataSources/DataSource.dso
+++ b/Logical/VCShared/DataSources/DataSource.dso
@@ -320,6 +320,15 @@
          <Property Name="UserID" Value="None"/>
          <Property Name="VCType" Value="INTEGER"/>
        </DataPoint>
+        <DataPoint Name="bBeltChange">
+          <Property Name="ConnectedBySharedResource" Value="False"/>
+          <Property Name="ConnectingVisus" Value="Visualization\Visu"/>
+          <Property Name="Description" Value=""/>
+          <Property Name="PLCType" Value="BOOL"/>
+          <Property Name="UpdateTime" Value="Default"/>
+          <Property Name="UserID" Value="None"/>
+          <Property Name="VCType" Value="BOOL"/>
+        </DataPoint>
      </Folder>
    </Folder>
    <Folder Name="Mach">
@@ -372,15 +381,6 @@
          <Property Name="UserID" Value="None"/>
          <Property Name="VCType" Value="INTEGER"/>
        </DataPoint>
-        <DataPoint Name="usBtnNextStep">
-          <Property Name="ConnectedBySharedResource" Value="False"/>
-          <Property Name="ConnectingVisus" Value="Visualization\Visu"/>
-          <Property Name="Description" Value=""/>
-          <Property Name="PLCType" Value="USINT"/>
-          <Property Name="UpdateTime" Value="Default"/>
-          <Property Name="UserID" Value="None"/>
-          <Property Name="VCType" Value="INTEGER"/>
-        </DataPoint>
        <DataPoint Name="usBtnAutoMode">
          <Property Name="ConnectedBySharedResource" Value="False"/>
          <Property Name="ConnectingVisus" Value="Visualization\Visu"/>
@@ -431,6 +431,18 @@
          <Property Name="VCType" Value="BOOL"/>
        </DataPoint>
      </Folder>
+      <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/Visualization/Visu/Pages/tmpl10_MainPage.page
+++ b/Logical/Visualization/Visu/Pages/tmpl10_MainPage.page
@@ -132,6 +132,7 @@
          <Property Name="BypassState_Position" Value="None"/>
          <Property Name="ColumnCount" Value="2"/>
          <Property Name="ControlID" Value="0"/>
+          <Property Name="Cursor_Border" Value="Source[local].Border[SunkenNG]"/>
          <Property Name="Cursor_LeftBitmap" Value="None"/>
          <Property Name="Cursor_LeftTextGroup" Value="None"/>
          <Property Name="Cursor_RightBitmap" Value="None"/>
@@ -147,59 +148,11 @@
          <Property Name="Priority_Position" Value="None"/>
          <Property Name="SortColumn" Value="Time"/>
          <Property Name="SortOrder" Value="Descending"/>
-          <Property Name="Source" Value="Active"/>
+          <Property Name="Source" Value="Current"/>
          <Property Name="StyleClass" Value="Source[relative:StyleGroup].StyleClass[Default]"/>
          <Property Name="Top" Value="187"/>
          <Property Name="Width" Value="309"/>
        </Control>
-        <Control ClassId="0x00001002" Name="butJog">
-          <Property Name="AlignmentHorizontal" Value="Right"/>
-          <Property Name="Bitmap" Value="Source[local].Bitmap[arrow_right_24]"/>
-          <Property Name="BitmapIndexDatapoint" Value="None"/>
-          <Property Name="BitmapSource" Value="SingleBitmap"/>
-          <Property Name="ControlID" Value="0"/>
-          <Property Name="Description" Value=""/>
-          <Property Name="EmbVirtualKey" Value="Source[local].VirtualKey[%embVirtualKey_5]"/>
-          <Property Name="Height" Value="30"/>
-          <Property Name="KeyMatrixOffset" Value="None"/>
-          <Property Name="Left" Value="240"/>
-          <Property Name="PressedBitmapSource" Value="Source[embedded].Property[BitmapSource]"/>
-          <Property Name="PressedTextSource" Value="Source[embedded].Property[TextSource]"/>
-          <Property Name="StatusDatapoint" Value="Source[global].Variable[DataSource.Mach.gStatusVCControls.usBtnNextStep]"/>
-          <Property Name="StyleClass" Value="Source[relative:StyleGroup].StyleClass[Default]"/>
-          <Property Name="TextGroup" Value="Source[local].TextGroup[Buttons_PageTexts]"/>
-          <Property Name="TextIndex" Value="11"/>
-          <Property Name="TextIndexDatapoint" Value="None"/>
-          <Property Name="TextSimulationValue" Value="0"/>
-          <Property Name="TextSource" Value="SingleText"/>
-          <Property Name="Top" Value="150"/>
-          <Property Name="VirtualKey" Value="Source[local].VirtualKey[%embVirtualKey_5]"/>
-          <Property Name="Width" Value="70"/>
-        </Control>
-        <Control ClassId="0x00001002" Name="butMan">
-          <Property Name="AlignmentHorizontal" Value="Right"/>
-          <Property Name="Bitmap" Value="Source[local].Bitmap[hand55_24]"/>
-          <Property Name="BitmapIndexDatapoint" Value="None"/>
-          <Property Name="BitmapSource" Value="SingleBitmap"/>
-          <Property Name="ControlID" Value="0"/>
-          <Property Name="Description" Value=""/>
-          <Property Name="EmbVirtualKey" Value="Source[local].VirtualKey[%embVirtualKey_6]"/>
-          <Property Name="Height" Value="30"/>
-          <Property Name="KeyMatrixOffset" Value="None"/>
-          <Property Name="Left" Value="240"/>
-          <Property Name="PressedBitmapSource" Value="Source[embedded].Property[BitmapSource]"/>
-          <Property Name="PressedTextSource" Value="Source[embedded].Property[TextSource]"/>
-          <Property Name="StatusDatapoint" Value="Source[global].Variable[DataSource.Mach.gStatusVCControls.usBtnManMode]"/>
-          <Property Name="StyleClass" Value="Source[relative:StyleGroup].StyleClass[Default]"/>
-          <Property Name="TextGroup" Value="Source[local].TextGroup[Buttons_PageTexts]"/>
-          <Property Name="TextIndex" Value="10"/>
-          <Property Name="TextIndexDatapoint" Value="None"/>
-          <Property Name="TextSimulationValue" Value="0"/>
-          <Property Name="TextSource" Value="SingleText"/>
-          <Property Name="Top" Value="90"/>
-          <Property Name="VirtualKey" Value="Source[local].VirtualKey[%embVirtualKey_6]"/>
-          <Property Name="Width" Value="70"/>
-        </Control>
        <Control ClassId="0x00001002" Name="butJog1">
          <Property Name="AlignmentHorizontal" Value="Right"/>
          <Property Name="Bitmap" Value="Source[local].Bitmap[hand55_24]"/>
@@ -526,7 +479,7 @@
          <Property Name="TextIndexDatapoint" Value="None"/>
          <Property Name="TextSimulationValue" Value="0"/>
          <Property Name="TextSource" Value="SingleText"/>
-          <Property Name="Top" Value="120"/>
+          <Property Name="Top" Value="90"/>
          <Property Name="VirtualKey" Value="Source[local].VirtualKey[%embVirtualKey_11]"/>
          <Property Name="Width" Value="70"/>
        </Control>
@@ -604,6 +557,30 @@
          <Property Name="ValueMode" Value="Standard"/>
          <Property Name="Width" Value="70"/>
        </Control>
+        <Control ClassId="0x00001002" Name="butBelt">
+          <Property Name="AlignmentHorizontal" Value="Right"/>
+          <Property Name="Bitmap" Value="Source[local].Bitmap[hand55_24]"/>
+          <Property Name="BitmapIndexDatapoint" Value="None"/>
+          <Property Name="BitmapSource" Value="SingleBitmap"/>
+          <Property Name="ControlID" Value="0"/>
+          <Property Name="Description" Value=""/>
+          <Property Name="EmbVirtualKey" Value="Source[local].VirtualKey[%embVirtualKey_22]"/>
+          <Property Name="Height" Value="30"/>
+          <Property Name="KeyMatrixOffset" Value="None"/>
+          <Property Name="Left" Value="180"/>
+          <Property Name="PressedBitmapSource" Value="Source[embedded].Property[BitmapSource]"/>
+          <Property Name="PressedTextSource" Value="Source[embedded].Property[TextSource]"/>
+          <Property Name="StatusDatapoint" Value="Source[global].Variable[DataSource.Mach.gStatusVCControls.usBtnManMode]"/>
+          <Property Name="StyleClass" Value="Source[relative:StyleGroup].StyleClass[Default]"/>
+          <Property Name="TextGroup" Value="Source[local].TextGroup[Buttons_PageTexts]"/>
+          <Property Name="TextIndex" Value="13"/>
+          <Property Name="TextIndexDatapoint" Value="None"/>
+          <Property Name="TextSimulationValue" Value="0"/>
+          <Property Name="TextSource" Value="SingleText"/>
+          <Property Name="Top" Value="150"/>
+          <Property Name="VirtualKey" Value="Source[local].VirtualKey[%embVirtualKey_22]"/>
+          <Property Name="Width" Value="120"/>
+        </Control>
      </Controls>
      <KeyMapping>
        <VirtualKey Name="%embVirtualKey_1">
@@ -654,38 +631,6 @@
            </KeyAction>
          </KeyActions>
        </VirtualKey>
-        <VirtualKey Name="%embVirtualKey_5">
-          <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.SSTCtrl.bEnableNextStep]"/>
-            </KeyAction>
-          </KeyActions>
-        </VirtualKey>
-        <VirtualKey Name="%embVirtualKey_6">
-          <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.Mach.gMachineCommands.bManualMode]"/>
-            </KeyAction>
-          </KeyActions>
-        </VirtualKey>
        <VirtualKey Name="%embVirtualKey_7">
          <Property Name="Description" Value=""/>
          <Property Name="VirtualKey_LED" Value="False"/>
@@ -926,6 +871,22 @@
            </KeyAction>
          </KeyActions>
        </VirtualKey>
+        <VirtualKey Name="%embVirtualKey_22">
+          <Property Name="Description" Value=""/>
+          <Property Name="VirtualKey_LED" Value="False"/>
+          <KeyActions>
+            <KeyAction ClassId="0x0000016A">
+              <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.SSTCtrl.bBeltChange]"/>
+            </KeyAction>
+          </KeyActions>
+        </VirtualKey>
      </KeyMapping>
    </Layer>
    <Layer Name="Default">
--- a/Logical/Visualization/Visu/Textgroups/Buttons_PageTexts.txtgrp
+++ b/Logical/Visualization/Visu/Textgroups/Buttons_PageTexts.txtgrp
@@ -57,6 +57,7 @@
    <Text ID="96446" Value="Maske2"/>
    <Text ID="96604" Value="Reset A1"/>
    <Text ID="96605" Value="Reset A2"/>
+    <Text ID="96765" Value="Bandwechsel"/>
  </TextLayer>
  <IndexMap>
    <Index ID="89135" Value="6010"/>
@@ -65,7 +66,7 @@
    <Index ID="89138" Value="1"/>
    <Index ID="89139" Value="0"/>
    <Index ID="89142" Value="6011"/>
-    <Index ID="89290" Value="1000"/>
+    <Index ID="89290" Value="1001"/>
    <Index ID="89291" Value="6"/>
    <Index ID="89302" Value="6001"/>
    <Index ID="89304" Value="6002"/>
@@ -111,5 +112,6 @@
    <Index ID="96446" Value="3012"/>
    <Index ID="96604" Value="3013"/>
    <Index ID="96605" Value="3014"/>
+    <Index ID="96765" Value="13"/>
  </IndexMap>
 </TextGroup>
--- a/Logical/Visualization/Visu/VirtualKeys.vcvk
+++ b/Logical/Visualization/Visu/VirtualKeys.vcvk
@@ -1513,14 +1513,6 @@
    <Property Name="Description" Value=""/>
    <Property Name="VirtualKey_LED" Value="False"/>
  </VirtualKey>
-  <VirtualKey Name="%embVirtualKey_5">
-    <Property Name="Description" Value=""/>
-    <Property Name="VirtualKey_LED" Value="False"/>
-  </VirtualKey>
-  <VirtualKey Name="%embVirtualKey_6">
-    <Property Name="Description" Value=""/>
-    <Property Name="VirtualKey_LED" Value="False"/>
-  </VirtualKey>
  <VirtualKey Name="%embVirtualKey_7">
    <Property Name="Description" Value=""/>
    <Property Name="VirtualKey_LED" Value="False"/>
@@ -1585,4 +1577,8 @@
    <Property Name="Description" Value=""/>
    <Property Name="VirtualKey_LED" Value="False"/>
  </VirtualKey>
+  <VirtualKey Name="%embVirtualKey_22">
+    <Property Name="Description" Value=""/>
+    <Property Name="VirtualKey_LED" Value="False"/>
+  </VirtualKey>
 </KeyMapping>
--- a/Physical/Config1/4PP065_0351_P74/IoMap.iom
+++ b/Physical/Config1/4PP065_0351_P74/IoMap.iom
@@ -30,9 +30,19 @@ VAR_CONFIG
 	gbInAxis2Fw AT %IX."X67DM1321.L08".DigitalInput06;
 	gbInGrinderBw AT %IX."X67DM1321.L08".DigitalInput07;
 	gbInGrinderFw AT %IX."X67DM1321.L08".DigitalInput08;
-	gbInMaskPosMid  AT %IX."X67DM1321.L08".DigitalInput11;
-	gbInMaskPosPos0  AT %IX."X67DM1321.L08".DigitalInput12;
-	gbInMaskPosNeg0  AT %IX."X67DM1321.L08".DigitalInput13;
-	gbInMaskPosNeg1  AT %IX."X67DM1321.L08".DigitalInput15;
-	gbInMaskPosPos1  AT %IX."X67DM1321.L08".DigitalInput14;
+	gbInMaskPosMid AT %IX."X67DM1321.L08".DigitalInput11;
+	gbInMaskPosPos0 AT %IX."X67DM1321.L08".DigitalInput12;
+	gbInMaskPosNeg0 AT %IX."X67DM1321.L08".DigitalInput13;
+	gbInMaskPosNeg1 AT %IX."X67DM1321.L08".DigitalInput15;
+	gbInMaskPosPos1 AT %IX."X67DM1321.L08".DigitalInput14;
+	gbOuBeltShiftBw AT %QX."7XV116.50-51".DigitalOutput09;
+	gbOuBeltShiftFw AT %QX."7XV116.50-51".DigitalOutput10;
+	gbOuBeltClampOutOpen AT %QX."7XV116.50-51".DigitalOutput11;
+	gbOuBeltClampOutClose AT %QX."7XV116.50-51".DigitalOutput12;
+	gbOuBeltClampShiftOpen AT %QX."7XV116.50-51".DigitalOutput13;
+	gbOuBeltClampShiftClose AT %QX."7XV116.50-51".DigitalOutput14;
+	gbOuBeltClampInOpen AT %QX."7XV116.50-51".DigitalOutput15;
+	gbOuBeltClampInClose AT %QX."7XV116.50-51".DigitalOutput16;
+	gBOuVaccuumCleaner AT %QX."X20DO6322".DigitalOutput03;
+	gbOuBeltMotor AT %QX."X20DO6322".DigitalOutput04;
 END_VAR