(****** QuickLD compiler *******************************)
(****** Copyright Rockwell Automation Canada, Ltd ******)
(****** ST *********************************************)

(*************** Rung **********************************)
(*Set de la Dirección*)
__STEPPRAGMA
0,1
__ENDSTEPPRAGMA
(*Label :*)(**)
__EDTB1 := PF_525_2_CMDFWD_MANUAL AND NOT(PF_525_2_CMDREV_MANUAL) ;
IF __EDTB1 THEN
(*Set coil*)
PF_525_2_DIREC := TRUE ;
END_IF ;

(*************** Code for the end of Rung **************)
__GL __LG0001 ;


(*************** Rung **********************************)
(*Control del PowerFlex 525 (Posicion): MENSAJERÍA IMPLÍCITA*)
__STEPPRAGMA
0,3
__ENDSTEPPRAGMA
(*Label :*)(**)
(* FB call: RA_PF525_POS *)
RA_PF525_POS_1(TRUE, PF_525_2_START, PF_525_2_STOP, PF_525_2_JOG, PF_525_2_DIREC, PF_525_2_CLRFLT, PF_525_2_SPEEDREF, PF_525_2_I, PF_525_2_LOGIN1, PF_525_2_LOGIN2, PF_525_2_FREQPOS_SELEC, PF_525_2_FINDHOME, PF_525_2_POSREDIF, PF_525_2_HOLDSTEP, PF_525_SYNC_ENAB, PF_525_TRAVDISAB) ;
PF_525_2_READY := RA_PF525_POS_1.Ready ;
PF_525_2_ACTIVE := RA_PF525_POS_1.Active ;
PF_525_2_FLT := RA_PF525_POS_1.Faulted ;
PF_525_2_OUTFREC := RA_PF525_POS_1.OutputFreq ;
PF_525_2_ACTDIREC := RA_PF525_POS_1.ActualDir ;
PF_525_2_ATREF := RA_PF525_POS_1.AtRef ;
PF_525_2_ATPOS := RA_PF525_POS_1.AtPos ;
PF_525_2_TRAVPOS := RA_PF525_POS_1.TravelPosDir ;
PF_525_2_ACCELSTS := RA_PF525_POS_1.Accel_Sts ;
PF_525_2_DECEL_STS := RA_PF525_POS_1.Decel_Sts ;
PF_525_2_ATHOME := RA_PF525_POS_1.AtHome ;
PF_525_2_DRVHOME := RA_PF525_POS_1.Drv_Homed ;
PF_525_2_O := RA_PF525_POS_1.Ref_Output ;
PF_525_2_TRAVEON := RA_PF525_POS_1.TraverseOn ;
PF_525_2_TRAVEDECEL := RA_PF525_POS_1.TraverseDecel ;
PF_525_2_SYNCHOLD := RA_PF525_POS_1.SyncHold ;
PF_525_2_SYNCRAMP := RA_PF525_POS_1.SyncRamp ;

(*************** Code for the end of Rung **************)
__GL __LG0002 ;


(*************** Rung **********************************)
(*Lectura de Parámetros adicionales: MENSAJERÍA EXPLICITA*)
__STEPPRAGMA
0,22
__ENDSTEPPRAGMA
(*Label :*)(**)
(* FB call: RA_PFx_ENET_PAR_READ *)
RA_PFx_ENET_PAR_READ_2(TRUE, '192.168.10.13', 1000, 3) ;
PF_525_2_ERROR := RA_PFx_ENET_PAR_READ_2.CIPErrorStatus ;
PF_525_2_OUTCURRENT := RA_PFx_ENET_PAR_READ_2.ParameterValue ;

(*************** Code for the end of Rung **************)
__GL __LG0003 ;


(*************** Rung **********************************)
(*Lectura de Parámetros adicionales: MENSAJERÍA EXPLICITA*)
__STEPPRAGMA
0,27
__ENDSTEPPRAGMA
(*Label :*)(**)
(* FB call: RA_PFx_ENET_PAR_READ *)
RA_PFx_ENET_PAR_READ_3(TRUE, '192.168.10.13', 1000, 4) ;
PF_525_2_ERROR := RA_PFx_ENET_PAR_READ_3.CIPErrorStatus ;
PF_525_2_OUTVOLTAGE := RA_PFx_ENET_PAR_READ_3.ParameterValue ;

(*************** Code for the end of Rung **************)
__GL __LG0004 ;


(*************** Rung **********************************)
(*Lectura de Parámetros adicionales: MENSAJERÍA EXPLICITA*)
__STEPPRAGMA
0,32
__ENDSTEPPRAGMA
(*Label :*)(**)
(* FB call: RA_PFx_ENET_PAR_READ *)
RA_PFx_ENET_PAR_READ_4(TRUE, '192.168.10.13', 1000, 5) ;
PF_525_2_ERROR := RA_PFx_ENET_PAR_READ_4.CIPErrorStatus ;
PF_525_2_DCBUSV := RA_PFx_ENET_PAR_READ_4.ParameterValue ;

(*************** Code for the end of Rung **************)
__GL __LG0005 ;


(*************** Rung **********************************)
(*Lectura de Parámetros adicionales: MENSAJERÍA EXPLICITA*)
__STEPPRAGMA
0,37
__ENDSTEPPRAGMA
(*Label :*)(**)
(* FB call: RA_PFx_ENET_PAR_READ *)
RA_PFx_ENET_PAR_READ_5(TRUE, '192.168.10.13', 1000, 27) ;
PF_525_2_ERROR := RA_PFx_ENET_PAR_READ_5.CIPErrorStatus ;
PF_525_2_DTEMP := RA_PFx_ENET_PAR_READ_5.ParameterValue ;

(*************** Code for the end of Rung **************)
__GL __LG0006 ;


(*************** Rung **********************************)
(*Lectura de Parámetros adicionales: MENSAJERÍA EXPLICITA*)
__STEPPRAGMA
0,42
__ENDSTEPPRAGMA
(*Label :*)(**)
(* FB call: RA_PFx_ENET_PAR_READ *)
RA_PFx_ENET_PAR_READ_6(TRUE, '192.168.10.13', 1000, 21) ;
PF_525_2_ERROR := RA_PFx_ENET_PAR_READ_6.CIPErrorStatus ;
PF_525_2_EKWH := RA_PFx_ENET_PAR_READ_6.ParameterValue ;

(*************** Code for the end of Rung **************)
__GL __LG0007 ;


(*************** Rung **********************************)
(*Lectura de Parámetros adicionales: MENSAJERÍA EXPLICITA*)
__STEPPRAGMA
0,47
__ENDSTEPPRAGMA
(*Label :*)(**)
(* FB call: RA_PFx_ENET_PAR_READ *)
RA_PFx_ENET_PAR_READ_7(TRUE, '192.168.10.13', 1000, 23) ;
PF_525_2_ERROR := RA_PFx_ENET_PAR_READ_7.CIPErrorStatus ;
PF_525_2_ENESAV := RA_PFx_ENET_PAR_READ_7.ParameterValue ;

(*************** Code for the end of Rung **************)
__GL __LG0008 ;


(*************** Rung **********************************)
(*Lectura de Parámetros adicionales: MENSAJERÍA EXPLICITA*)
__STEPPRAGMA
0,52
__ENDSTEPPRAGMA
(*Label :*)(**)
(* FB call: RA_PFx_ENET_PAR_READ *)
RA_PFx_ENET_PAR_READ_1(TRUE, '192.168.10.13', 1000, 25) ;
PF_525_2_ERROR := RA_PFx_ENET_PAR_READ_1.CIPErrorStatus ;
PF_525_2_ACCCOSTSAV := RA_PFx_ENET_PAR_READ_1.ParameterValue ;

(*************** Code for the end of Rung **************)
__GL __LG0009 ;


(*************** Rung **********************************)
(*Lectura de Parámetros adicionales: MENSAJERÍA EXPLICITA*)
__STEPPRAGMA
0,57
__ENDSTEPPRAGMA
(*Label :*)(**)
(* FB call: RA_PFx_ENET_PAR_READ *)
RA_PFx_ENET_PAR_READ_8(TRUE, '192.168.10.13', 1000, 7) ;
PF_525_2_ERROR := RA_PFx_ENET_PAR_READ_8.CIPErrorStatus ;
PF_525_2_ERRORCODE := RA_PFx_ENET_PAR_READ_8.ParameterValue ;

(*************** Code for the end of Rung **************)
__GL __LG000A ;


(*************** Rung **********************************)
(*Escribir tiempo de aceleración*)
__STEPPRAGMA
0,62
__ENDSTEPPRAGMA
(*Label :*)(**)
(* FB call: RA_PFx_ENET_PAR_WRITE *)
RA_PFx_ENET_PAR_WRITE_1(TRUE, '192.168.10.13', 1, 41, PF_525_2_ACCEL_TIME1) ;
PF_525_2_ERRORW := RA_PFx_ENET_PAR_WRITE_1.CIPErrorStatus ;

(*************** Code for the end of Rung **************)
__GL __LG000B ;


(*************** Rung **********************************)
(*Escribir tiempo de desaceleración*)
__STEPPRAGMA
0,68
__ENDSTEPPRAGMA
(*Label :*)(**)
(* FB call: RA_PFx_ENET_PAR_WRITE *)
RA_PFx_ENET_PAR_WRITE_2(TRUE, '192.168.10.13', 1, 42, PF_525_2_DECEL_TIME1) ;
PF_525_2_ERRORW := RA_PFx_ENET_PAR_WRITE_2.CIPErrorStatus ;

(*************** Code for the end of Rung **************)
__GL __LG000C ;


(*************** Code for the end of File **************)
__GL __LG0000 ;



(*************** Local Symbols table *******************)
(* __EDTB1 *)

