FB39 OUT P01 : P01 output program (LIF)

[hit  <- on your browser to return]

Netzwerk 1: Pre-Setting

#Support.T01_ESto_TOF(IN := "E01 S04 ESTP ok", PT := t#1s);

Netzwerk 2: Call manual operation

#MANUAL(ST_MANU:="M00 ManuCmpltMa run",

        MODULE_HP:="HMI KEY".P01.GLB.F20_HomPos,

        SUPPORT_SEQ:="M01 HomPosRun");

Netzwerk 3: S120_X Lift fork drive up down

// Execute output stage

#S120_X.DRV.MC_Home.Execute := #S120_X.DRV.Support.LampOFF AND "HMI KEY".P01.#S120_X.F5_Set_Ref_Point AND ("DI MAIN GLB".SET.S.steps OR "M00 ManuCmpltMa run");

#S120_X.DRV.MC_Power.StartMode := #S120_X.DRV.MC_MoveAbsolute.Direction := 1;

#S120_X.DRV.MC_MoveJog.PosCntrl := TRUE;

// Halt impulse

#tmp_enable_axis := "HMI KEY".P01.S120_X.F11_Enable_HP AND "HMI KEY".P01.S120_X.F12_Enable_WP;

#Support.S120_X_FEg_Halt_Imp := #Support.S120_X_FEg_Halt AND NOT #tmp_enable_axis;

#Support.S120_X_FEg_Halt := #tmp_enable_axis;

// Execute output stage

#S120_X(ENABLE := #Support.T01_ESto_TOF.Q,

        HALT_01 := "HMI KEY".P01.S120_X.F21_HALT_Epos OR "DI MAIN GLB".TOF_CmpltMaOFF_Pulse.Q OR #Support.S120_X_FEg_Halt_Imp,

        MCB := "E01 S120_X MCB",

        START_ABSO := #tmp_enable_axis AND (#S120_X.DRV.Support.Cmd_MovAbso AND ("M00 AutoCmpltMa run" OR "M01 HomPosRun" OR "DI MAIN P01".SEQ1.S.stepin) OR "HMI KEY".P01.S120_X.F17_GoToAbsoPos),

        START_RELA := #tmp_enable_axis AND (#S120_X.DRV.Support.Cmd_MovRela AND ("M00 AutoCmpltMa run" OR "M01 HomPosRun" OR "DI MAIN P01".SEQ1.S.stepin) OR "HMI KEY".P01.S120_X.F18_GoToRelaPos),

        JOG_WP := #S120_X.DRV.Support.Cmd_MovJogWP AND ("M00 AutoCmpltMa run" OR "M01 HomPosRun" OR "DI MAIN P01".SEQ1.S.stepin) OR #MANUAL.S120_X.CmdExe_slow_fast_WP,

        JOG_HP := #S120_X.DRV.Support.Cmd_MovJogHP AND ("M00 AutoCmpltMa run" OR "M01 HomPosRun" OR "DI MAIN P01".SEQ1.S.stepin) OR #MANUAL.S120_X.CmdExe_slow_fast_HP,

        ACK_FLT := "M00 FLT CmpltMaACK REg",

        HOM_MODE := 3, // Encoder dig.input active referenzing

        AXIS := "+1-S120_X");

Netzwerk 4: G120C_Y Lift fork drive FWD BWD

// Execute output stage

#G120C_Y.DRV.MC_Home.Execute := #G120C_Y.DRV.Support.LampOFF AND "HMI KEY".P01.#G120C_Y.F5_Set_Ref_Point AND ("DI MAIN GLB".SET.S.steps OR "M00 ManuCmpltMa run");

#G120C_Y.DRV.MC_Power.StartMode := #G120C_Y.DRV.MC_MoveAbsolute.Direction := 1;

#G120C_Y.DRV.MC_MoveJog.PosCntrl := TRUE;

// Halt impulse

#tmp_enable_axis := "HMI KEY".P01.G120C_Y.F11_Enable_HP AND "HMI KEY".P01.G120C_Y.F12_Enable_WP;

#Support.G120C_Y_FEg_Halt_Imp := #Support.G120C_Y_FEg_Halt AND NOT #tmp_enable_axis;

#Support.G120C_Y_FEg_Halt := #tmp_enable_axis;

// Execute output stage

#G120C_Y(ENABLE := #Support.T01_ESto_TOF.Q,

         HALT_01 := "HMI KEY".P01.G120C_Y.F21_HALT_Epos OR "DI MAIN GLB".TOF_CmpltMaOFF_Pulse.Q OR #Support.G120C_Y_FEg_Halt_Imp,

         MCB := "E01 G120C_Y MCB",

         START_ABSO := #tmp_enable_axis AND (#G120C_Y.DRV.Support.Cmd_MovAbso AND ("M00 AutoCmpltMa run" OR "M01 HomPosRun" OR "DI MAIN P01".SEQ1.S.stepin) OR "HMI KEY".P01.G120C_Y.F17_GoToAbsoPos),

         START_RELA := #tmp_enable_axis AND (#G120C_Y.DRV.Support.Cmd_MovRela AND ("M00 AutoCmpltMa run" OR "M01 HomPosRun" OR "DI MAIN P01".SEQ1.S.stepin) OR "HMI KEY".P01.G120C_Y.F18_GoToRelaPos),

         JOG_WP := #G120C_Y.DRV.Support.Cmd_MovJogWP AND ("M00 AutoCmpltMa run" OR "M01 HomPosRun" OR "DI MAIN P01".SEQ1.S.stepin) OR #MANUAL.G120C_Y.CmdExe_slow_fast_WP,

         JOG_HP := #G120C_Y.DRV.Support.Cmd_MovJogHP AND ("M00 AutoCmpltMa run" OR "M01 HomPosRun" OR "DI MAIN P01".SEQ1.S.stepin) OR #MANUAL.G120C_Y.CmdExe_slow_fast_HP,

         ACK_FLT := "M00 FLT CmpltMaACK REg",

         HOM_MODE := 3, // Encoder dig.input active referenzing

         AXIS := "+1-G120C_Y");

Netzwerk 5: C01 Lift fork cylinder

#C01(CMD_HP := FALSE,

     CMD_WP := FALSE,

     FB_HP := "E01 C01 HP",

     FB_WP := "E01 C01 WP",

     RLS := "E00 AirPrsr ok",

     ACK_FLT := "M00 FLT CmpltMaACK Imp",

     VALV_HP => "A01 C01 HP",

     VALV_WP => "A01 C01 WP");