FB39 OUT P01 : Charging module |
|
|
|
Netzwerk 1: P01 Pre-Setting U "M00 EStp ok" L s5t#1s SA "T01 1M1 Main SA" U "T01 1M1 Main SA" = "A00 1M1 10PD main" = "A00 1M2 10PD main" = "A00 1M3 6PD main" |
|
|
|
Netzwerk 2: Call manual operation #MANUAL(ST_MANU := "M00 ManuCmpltMa run", MODUL_HP := "HMI KEY".P01.GLB.F20_HomPos, SUPPORT_SEQ := "M01 RunHomPos"); |
|
|
|
Netzwerk 3: 1M1 Charging conveyor #tmp_enable_start_auto := #"1M1".DRV.ReferenceOK AND "M01 1M1 GoToPos"; IF #tmp_enable_start_auto THEN #"1M1".DRV.SetValAcc := "DI OUT P04"."4A1".RTT_Acc; #"1M1".DRV.SetValDec := "DI OUT P04"."4A1".RTT_Dec; // Set speed value HP/WP IF #Support."1M2 EndLimDown" THEN #"1M1".DRV.SetValSpd := "DI OUT P04"."4A1".RTT_Speed_HP; ELSE #"1M1".DRV.SetValSpd := "DI OUT P04"."4A1".RTT_Speed_WP; END_IF; END_IF; // Assign running condition #tmp_axis_inhibit := "A00 1M1 10PD BrkModul" :="A00 1M1 10PD AxisEnbl DI01" :="A00 1M1 10PD RegEnbl DI00" := "HMI KEY".P01."1M1".Enable_HP AND "HMI KEY".P01."1M1".Enable_WP; #tmp_axis_RefStatic := "HMI KEY".P01."1M1".F5_Set_Ref_Point AND ("M00 AutoCmpltMa run" OR "M00 ManuCmpltMa run"); #tmp_axis_enable := "M00 ManuCmpltMa run" OR "M00 AutoCmpltMa run" OR "HMI KEY".P01."1M1".F17_GoToPos; #tmp_axis_start := #tmp_axis_RefStatic OR #tmp_enable_start_auto OR "HMI KEY".P01."1M1".F17_GoToPos; #tmp_axis_PosAbsolut := #tmp_enable_start_auto OR "HMI KEY".P01."1M1".F17_GoToPos;
#"1M1"(ADR_HW_IO := 372, INHIBIT := #tmp_axis_inhibit, ENABLE := #tmp_axis_enable, MCB := "E00 1M1 MCB", START := #tmp_axis_start, POS_ABSOLUTE := #tmp_axis_PosAbsolut, JOG_NEGATIV := #"1M1".DRV.ActorJog_HP, JOG_POSITIV := #"1M1".DRV.ActorJog_WP, REF_STATIC := #tmp_axis_RefStatic, ACK_FLT := "M00 ACK Imp"); |
|
|
|
Netzwerk 4: 1M2 Lifting drive #tmp_enable_start_auto := #"1M2".DRV.ReferenceOK AND "M01 1M2 GoToPos"; // Set speed value HP/WP IF #tmp_enable_start_auto THEN #"1M2".DRV.SetValSpd := "DI OUT P04"."4A1".RTT_Speed_WP; #"1M2".DRV.SetValAcc := "DI OUT P04"."4A1".RTT_Acc; #"1M2".DRV.SetValDec := "DI OUT P04"."4A1".RTT_Dec; END_IF; // Set min/max limit value #Support."1M2 EndLimUp" := "E01 1M2 UpLB" AND #"1M2".DRV.CrntPos <= #"1M2".DRV.MinAxisPoint; #Support."1M2 EndLimDown" := "E01 1M2 DnLB" AND #"1M2".DRV.CrntPos >= #"1M2".DRV.MaxAxisPoint; // Assign running condition #tmp_axis_inhibit := "A00 3M1 10PD BrkModul":= "A00 3M1 10PD AxisEnbl DI01":= "A00 3M1 10PD RegEnbl DI00":= "HMI KEY".P01."1M2".Enable_HP AND "HMI KEY".P01."1M2".Enable_WP; #tmp_axis_RefStatic := "HMI KEY".P01."1M2".F5_Set_Ref_Point AND ("M00 AutoCmpltMa run" OR "M00 ManuCmpltMa run"); #tmp_axis_enable := "M00 ManuCmpltMa run" OR "M00 AutoCmpltMa run" OR "HMI KEY".P01."1M2".F17_GoToPos; #tmp_axis_start := #tmp_axis_RefStatic OR #tmp_enable_start_auto OR "HMI KEY".P01."1M2".F17_GoToPos; #tmp_axis_PosAbsolut := #tmp_enable_start_auto OR "HMI KEY".P01."1M2".F17_GoToPos;
#"1M2"(ADR_HW_IO := 373, INHIBIT := #tmp_axis_inhibit, ENABLE := #tmp_axis_enable, MCB := "E00 1M2 MCB", START := #tmp_axis_start, POS_ABSOLUTE := #tmp_axis_PosAbsolut, JOG_NEGATIV := #"1M2".DRV.ActorJog_HP, JOG_POSITIV := #"1M2".DRV.ActorJog_WP, REF_STATIC := #tmp_axis_RefStatic, ACK_FLT := "M00 ACK Imp"); |
|
|
|
Netzwerk 5: 1M3 Cooling conveyor 2 #tmp_enable_start_auto := #"1M3".DRV.ReferenceOK AND "M01 1M3 GoToPos"; IF #tmp_enable_start_auto THEN #"1M3".DRV.SetValAcc := "DI OUT P04"."4A1".RTT_Acc; #"1M3".DRV.SetValDec := "DI OUT P04"."4A1".RTT_Dec; // Set speed value HP/WP IF #Support."1M2 EndLimDown" THEN #"1M3".DRV.SetValSpd := "DI OUT P04"."4A1".RTT_Speed_HP; ELSE #"1M3".DRV.SetValSpd := "DI OUT P04"."4A1".RTT_Speed_WP; END_IF; END_IF; // Assign running condition #tmp_axis_RefStatic := "HMI KEY".P01."1M3".F5_Set_Ref_Point AND ("M00 AutoCmpltMa run" OR "M00 ManuCmpltMa run"); #tmp_axis_enable := "M00 ManuCmpltMa run" OR "M00 AutoCmpltMa run" OR "HMI KEY".P01."1M3".F17_GoToPos; #tmp_axis_PosAbsolut := #tmp_enable_start_auto OR "HMI KEY".P01."1M3".F17_GoToPos;
#"1M3"(ADR_HW_IO := 374, ENABLE_RAPID_STOP := #tmp_axis_enable, MCB := "E00 1M3 MCB", POSITIONING_MODE := #tmp_axis_PosAbsolut, JOG_NEGATIV := #"1M3".DRV.ActorJog_HP, JOG_POSITIV := #"1M3".DRV.ActorJog_WP AND ("M00 ManuCmpltMa run" OR "M00 AutoCmpltMa run"), REF_STATIC := #tmp_axis_RefStatic, ACK_FLT := "M00 ACK Imp"); |
|
|
|
|