Home

Erfahrung

Referenzen

Sondermaschinen

MSR-Maschinen

SPS-Programmierung

Visualisierung HMI

Elektro CAD

Leistungsprofil

Personalia

SW-Development

Dokumentation

Impressum & DSGVO

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);