Decremento de datos BCD
Estas instrucciones FP restan 1 a los datos BCD especificados por d si la entrada de trigger EN es TRUE. El resultado se guarda en d.
Entrada/salida
Datos de los que debe reducirse 1 y resultado
Todas las variables de entrada y de salida utilizadas para la programación de esta función han sido declaradas en la Cabecera de la POU. Se utiliza la misma cabecera de la POU para todos los lenguajes de programación.
VAR
bStart: BOOL:=FALSE;
(*activates the function*)
dwDecrement_value: DWORD:=16#87654322;
(*result after a 0->1 leding
edge from start:
16#87654321*)
END_VAR
Cuando la variable bStart pasa de FALSE a TRUE, se ejecuta la función.
BODY
WORKSPACE
NETWORK_LIST_TYPE := NWTYPELD ;
ACTIVE_NETWORK := 0 ;
END_WORKSPACE
NET_WORK
NETWORK_TYPE := NWTYPELD ;
NETWORK_LABEL := ;
NETWORK_TITLE := ;
NETWORK_HEIGHT := 5 ;
NETWORK_BODY
B(B_F,FP_DEC_BCD!,,18,1,26,5,,?DEN?Dd?Ad?AENO);
B(B_CONTACT,,bStart,12,2,14,4,R);
B(B_VARIN,,dwDecrement_value,14,3,16,5,);
L(1,3,12,3);
L(14,3,18,3);
L(16,4,18,4);
L(1,0,1,5);
END_NETWORK_BODY
END_NET_WORK
END_BODY
If DF(bStart) then
FP_DEC_BCD(d := dwDecrement_value);
End_if;