|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
FB SET GLB : SET Home position entire plant |
|
|
|
|
|
Network 1: Define last step #SSM(LAST_STEP := 3); |
|
|
|
|
|
Network 2: CASE-Function correspond to actual SSM CASE "DI MAIN GLB".SET.SSM.S.stepact OF 0: // Waiting for SSM enabled "DI MAIN GLB".SET.SSM.S.stepd := "DI MAIN GLB".SET.SSM.S.steps;
1: // Start impulse homing P01/P02 IF "DI MAIN GLB".SET.SSM.S.stepfc THEN "DI MAIN P01".M00.Init := "DI MAIN P02".M00.Init := TRUE; ELSE "DI MAIN P01".M00.Init := "DI MAIN P02".M00.Init := FALSE; "DI MAIN GLB".SET.SSM.S.stepd := TRUE; END_IF; 2: // Query home position entire plant (P01,P02) "DI MAIN GLB".SET.SSM.S.stepd := "DI MAIN GLB".M00.HomPosSR;
3: // Quit homing entire plant "DI MAIN GLB".M00.OM_HOME_POS_ON := "DI MAIN P01".M00.HomPosRun OR "DI MAIN P02".M00.HomPosRun; END_CASE; |
|