|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
FB38 MAN P01 : Manual mode building machine P01 |
|
|
|
Netzwerk 1: G120 Rubber Extruder - enable IF #ST_MANU AND NOT #SUPPORT_SEQ THEN IF "DI MAIN GLB".M00.CmpltMaRun_Imp THEN #G120.ManualVelocity_1 := "DI OUT P01".G120.DRV.Support.SetVelo; // rpm // Create +/- analogue velocity ELSIF "DI OUT P01".G120.DRV.MC_MoveJog.Busy AND NOT "DI OUT P01".G120.DRV.MC_MoveVelocity.Busy THEN IF #G120.ManualVelocity_1 < 1000.0 AND "HMI KEY".P01.G120.F2_WP AND "M00_Imp_2.5Hz" THEN #G120.ManualVelocity_1 := #G120.ManualVelocity_1 + 1.0; ELSIF #G120.ManualVelocity_1 > 0.0 AND "HMI KEY".P01.G120.F1_HP AND "M00_Imp_2.5Hz" THEN #G120.ManualVelocity_1 := #G120.ManualVelocity_1 - 1.0; END_IF; END_IF; // Assign velocity manual mode "DI OUT P01".G120.DRV.Support.SetVelo := #G120.ManualVelocity_1; // mm/s // On switching MoveJog IF "HMI KEY".P01.G120.F19_Jog_fast_WP AND NOT #G120.Jog_fast_WP_REg THEN #G120.CmdExe_slow_fast_WP := "HMI KEY".P01.G120.F12_Enable_WP; END_IF; #G120.Jog_fast_WP_REg := "HMI KEY".P01.G120.F19_Jog_fast_WP; END_IF; // Enable disable moving towards WP/HP "HMI KEY".P01.G120.F12_Enable_WP := "HMI KEY".P01.G120.F11_Enable_HP := "DI OUT P01".G120.DRV.Support.InOperation AND NOT "DI OUT P01".G120.Com_FLT; // Stop moving towards WP/HP IF "DI OUT P01".G120.HALT_01 OR "HMI KEY".P01.G120.F20_Jog_fast_HP OR "DI OUT P01".G120.DRV.MC_MoveVelocity.Busy OR "DI OUT P01".G120.DRV.Support.SetVelo = 0 THEN #G120.CmdExe_slow_fast_WP := FALSE; END_IF; |
|
|
|
Netzwerk 2: G120C Rubber Embossing Tool - enable IF #ST_MANU AND NOT #SUPPORT_SEQ THEN IF "DI MAIN GLB".M00.CmpltMaRun_Imp THEN #G120C.ManualVelocity_1 := "DI OUT P01".G120C.DRV.Support.SetVelo; // rpm // Create +/- analogue velocity ELSIF "DI OUT P01".G120C.DRV.MC_MoveJog.Busy AND NOT "DI OUT P01".G120C.DRV.MC_MoveVelocity.Busy THEN IF #G120C.ManualVelocity_1 < 1000.0 AND "HMI KEY".P01.G120C.F2_WP AND "M00_Imp_2.5Hz" THEN #G120C.ManualVelocity_1 := #G120C.ManualVelocity_1 + 1.0; ELSIF #G120C.ManualVelocity_1 > 0.0 AND "HMI KEY".P01.G120C.F1_HP AND "M00_Imp_2.5Hz" THEN #G120C.ManualVelocity_1 := #G120C.ManualVelocity_1 - 1.0; END_IF; END_IF; // Assign velocity manual mode "DI OUT P01".G120C.DRV.Support.SetVelo := #G120C.ManualVelocity_1; // mm/s // On switching MoveJog IF "HMI KEY".P01.G120C.F19_Jog_fast_WP AND NOT #G120C.Jog_fast_WP_REg THEN #G120C.CmdExe_slow_fast_WP := "HMI KEY".P01.G120C.F12_Enable_WP; END_IF; #G120C.Jog_fast_WP_REg := "HMI KEY".P01.G120C.F19_Jog_fast_WP; END_IF; // Enable disable moving towards WP/HP "HMI KEY".P01.G120C.F12_Enable_WP := "HMI KEY".P01.G120C.F11_Enable_HP := "DI OUT P01".G120C.DRV.Support.InOperation AND NOT "DI OUT P01".G120C.Com_FLT; // Stop moving towards WP/HP IF "DI OUT P01".G120C.HALT_01 OR "HMI KEY".P01.G120C.F20_Jog_fast_HP OR "DI OUT P01".G120C.DRV.MC_MoveVelocity.Busy OR "DI OUT P01".G120C.DRV.Support.SetVelo = 0 THEN #G120C.CmdExe_slow_fast_WP := FALSE; END_IF; |
|
|
|
Netzwerk 3: S120_M Deformable Rubber winding hub - enable IF #ST_MANU AND NOT #SUPPORT_SEQ THEN IF "DI MAIN GLB".M00.CmpltMaRun_Imp THEN #S120_M.ManualVelocity_1 := "DI OUT P01".S120_M.DRV.Support.SetVelo; // rpm // Create +/- analogue velocity ELSIF "DI OUT P01".S120_M.DRV.MC_MoveJog.Busy AND NOT ("DI OUT P01".S120_M.DRV.MC_MoveAbsolute.Busy OR "DI OUT P01".S120_M.DRV.MC_MoveRelative.Busy) THEN IF #S120_M.ManualVelocity_1 < 1000.0 AND "HMI KEY".P01.S120_M.F2_WP AND "M00_Imp_2.5Hz" THEN #S120_M.ManualVelocity_1 := #S120_M.ManualVelocity_1 + 1.0; ELSIF #S120_M.ManualVelocity_1 > 0.0 AND "HMI KEY".P01.S120_M.F1_HP AND "M00_Imp_2.5Hz" THEN #S120_M.ManualVelocity_1 := #S120_M.ManualVelocity_1 - 1.0; END_IF; END_IF; // Assign velocity manual mode "DI OUT P01".S120_M.DRV.Support.SetVelo := #S120_M.ManualVelocity_1; // rpm // Jog fast WP (toggle function) IF "HMI KEY".P01.S120_M.F19_Jog_fast_WP AND NOT #S120_M.Jog_fast_WP_REg THEN #S120_M.CmdExe_slow_fast_WP := NOT #S120_M.CmdExe_slow_fast_WP AND "HMI KEY".P01.S120_M.F12_Enable_WP; #S120_M.CmdExe_slow_fast_HP := FALSE; // Jog fast HP (toggle function) ELSIF "HMI KEY".P01.S120_M.F20_Jog_fast_HP AND NOT #S120_M.Jog_fast_HP_REg THEN #S120_M.CmdExe_slow_fast_HP := NOT #S120_M.CmdExe_slow_fast_HP AND "HMI KEY".P01.S120_M.F11_Enable_HP; #S120_M.CmdExe_slow_fast_WP := FALSE; END_IF; // Jog fast WP/HP (Assigning rising edge) #S120_M.Jog_fast_WP_REg := "HMI KEY".P01.S120_M.F19_Jog_fast_WP; #S120_M.Jog_fast_HP_REg := "HMI KEY".P01.S120_M.F20_Jog_fast_HP; END_IF; // Enable disable moving towards WP/HP "HMI KEY".P01.S120_M.F12_Enable_WP := "HMI KEY".P01.S120_M.F11_Enable_HP := "DI OUT P01".S120_M.DRV.Support.InOperation AND NOT ("DI OUT P01".S120_M.Com_FLT OR "DI OUT P01".S120_S.Com_FLT); // Stop moving towards WP/HP IF "DI OUT P01".S120_M.HALT_01 OR "DI OUT P01".S120_M.DRV.MC_MoveAbsolute.Busy OR "DI OUT P01".S120_M.DRV.MC_MoveRelative.Busy OR "DI OUT P01".S120_M.DRV.Support.SetVelo = 0 THEN #S120_M.CmdExe_slow_fast_WP := #S120_M.CmdExe_slow_fast_HP := FALSE; END_IF; |
|
|
|
Netzwerk 4: S120_S rubber Steering device - enable IF #ST_MANU AND NOT #SUPPORT_SEQ THEN IF "DI MAIN GLB".M00.CmpltMaRun_Imp THEN #S120_S.ManualVelocity_1 := "DI OUT P01".S120_S.DRV.Support.SetVelo; // rpm ELSE "DI OUT P01".S120_S.DRV.Support.SetVelo := #S120_S.ManualVelocity_1; // rpm #S120_S.CmdExe_slow_fast_WP := "HMI KEY".P01.S120_S.F3_Jog_slow_WP AND #S120_S.ManualVelocity_1 > 0.0 AND "HMI KEY".P01.S120_S.F12_Enable_WP; #S120_S.CmdExe_slow_fast_HP := "HMI KEY".P01.S120_S.F4_Jog_slow_HP AND #S120_S.ManualVelocity_1 > 0.0 AND "HMI KEY".P01.S120_S.F11_Enable_HP; END_IF; END_IF; // Enable disable moving towards HP "HMI KEY".P01.S120_S.F11_Enable_HP := "DI OUT P01".S120_S.DRV.Support.InOperation AND NOT ("DI OUT P01".S120_S.Com_FLT OR "DI OUT P01".S120_S.DRV.Support.SW_EndLim_Min) AND "E00 S120_S LimHP" AND "DI OUT P01".S120_S.DRV.Support.ActPos > "DI OUT P01".S120_S.DRV.Support.SW_EndLim_MinPos; // Enable disable moving towards WP "HMI KEY".P01.S120_S.F12_Enable_WP := "DI OUT P01".S120_S.DRV.Support.InOperation AND NOT ("DI OUT P01".S120_S.Com_FLT OR "DI OUT P01".S120_S.DRV.Support.SW_EndLim_Max) AND "E00 S120_S LimWP" AND "DI OUT P01".S120_S.DRV.Support.ActPos < "DI OUT P01".S120_S.DRV.Support.SW_EndLim_MaxPos; |
|
|
|
Netzwerk 5: CAM_DISC control - enable IF #ST_MANU AND NOT #SUPPORT_SEQ THEN IF "DI MAIN GLB".M00.CmpltMaRun_Imp THEN #CAM_DISC.ManualVelocity_1 := "DI OUT P01".CAM_DISC.CAM.MC_CamIn.Velocity; ELSIF #S120_M.ManualVelocity_1 < 100.0 AND "HMI KEY".P01.CAM_DISC.F2_WP AND "M00_Imp_2.5Hz" THEN #CAM_DISC.ManualVelocity_1 := #CAM_DISC.ManualVelocity_1 + 1.0; ELSIF #CAM_DISC.ManualVelocity_1 > 0.0 AND "HMI KEY".P01.CAM_DISC.F1_HP AND "M00_Imp_2.5Hz" THEN #CAM_DISC.ManualVelocity_1 := #CAM_DISC.ManualVelocity_1 - 1.0; END_IF; // Assign velocity manual mode IF "DI OUT P01".CAM_DISC.CAM.MC_CamIn.SyncProfileReference = 0 THEN "DI OUT P01".CAM_DISC.CAM.MC_CamIn.Velocity := #CAM_DISC.ManualVelocity_1; // mm/s ELSE "DI OUT P01".CAM_DISC.CAM.MC_CamIn.Velocity := #CAM_DISC.ManualVelocity_1 := -1.0; END_IF; // Cam_No 1 selection IF "HMI KEY".P01.CAM_DISC.F3_Jog_slow_WP AND NOT #CAM_DISC.Jog_fast_WP_REg THEN IF "HMI KEY".P01.CAM_DISC.F11_Enable_HP AND "DI OUT P01".S120_S.DRV.Support.LampOFF AND NOT #CAM_DISC.CmdExe_fast_WP THEN "DI OUT P01".CAM_DISC.CAM.Support.Get_Cam_No := 1; #CAM_DISC.CmdExe_fast_WP := TRUE; END_IF; // Cam_No 2 selection ELSIF "HMI KEY".P01.CAM_DISC.F4_Jog_slow_HP AND NOT #CAM_DISC.Jog_fast_HP_REg THEN IF "HMI KEY".P01.CAM_DISC.F11_Enable_HP AND "DI OUT P01".S120_S.DRV.Support.LampOFF AND #CAM_DISC.CmdExe_fast_WP THEN "DI OUT P01".CAM_DISC.CAM.Support.Get_Cam_No := 2; #CAM_DISC.CmdExe_fast_WP := FALSE; END_IF; END_IF; // Jog fast WP/HP (Assigning rising edge) #CAM_DISC.Jog_fast_WP_REg := "HMI KEY".P01.CAM_DISC.F3_Jog_slow_WP; #CAM_DISC.Jog_fast_HP_REg := "HMI KEY".P01.CAM_DISC.F4_Jog_slow_HP; END_IF; // Enabling HP/WP "HMI KEY".P01.CAM_DISC.F11_Enable_HP := NOT "DI OUT P01".CAM_DISC.CAM_OnOff AND "HMI KEY".P01.CAM_DISC.F12_Enable_WP AND "DI OUT P01".S120_M.DRV.Support.LampON; "HMI KEY".P01.CAM_DISC.F12_Enable_WP := NOT "DI OUT P01".CAM_DISC.Com_FLT; |
|
|
|
Netzwerk 6: Y100 Rubber Cutting Device - enable "HMI KEY".P01.Y100.F12_Enable_WP := NOT "DI OUT P01".Y100.Com_FLT; |
|
|
|
Netzwerk 7: Monitoring manual operation *** IF NOT #ST_MANU THEN RETURN; ELSIF #MODULE_HP AND NOT #Support.HomPos_REg THEN "DI MAIN P01".M00.Init := TRUE; END_IF; #Support.HomPos_REg := #MODULE_HP; "DI MAIN P01".M00.TOF_ModuleOFF_Pulse(IN := NOT #SUPPORT_SEQ AND #Support.HomPos_FEg, PT := t#500ms); #Support.HomPos_FEg := #SUPPORT_SEQ; IF #SUPPORT_SEQ THEN RETURN; END_IF; |
|
|
|
Netzwerk 8: CAM_DISC control - execute "DI OUT P01".CAM_DISC.CAM.MC_MeasuringInput.Execute := "DI OUT P01".CAM_DISC.CAM.Support.ReadTo_ReStart AND "HMI KEY".P01.CAM_DISC.F11_Enable_HP AND ("HMI KEY".P01.CAM_DISC.F4_Jog_slow_HP OR "HMI KEY".P01.CAM_DISC.F3_Jog_slow_WP); |
|
|
|
Netzwerk 9: Y100 rubber cutting Device - execute "DI OUT P01".Y100.VLV_O.CmdExe_WP := "HMI KEY".P01.Y100.F12_Enable_WP AND NOT "HMI KEY".P01.Y100.F4_Jog_slow_HP AND ("HMI KEY".P01.Y100.F3_Jog_slow_WP OR "DI OUT P01".Y100.FB_WP); |
|