F53_DBDIV

Division de données BCD à 8 digits avec transfert

Le résultat est sauvegardé dans la zone spécifiée par d et le reste est sauvegardé dans la variable système sys_diDDivRemainder.

Paramètres

Entrée

s1 (DWORD): Dividende, zone de 32 bits pour données BCD ou constante équivalente à des données BCD à 8 digits
s2 (DWORD): Diviseur, zone de 32 bits pour données BCD ou constante équivalente à des données BCD à 8 digits

Sortie

d (DWORD): Quotient, zone de 32 bits pour données BCD (le reste est sauvegardé dans la variable système sys_diDDivRemainder)

Exemple

(1) Valeur exemple 16#00001110 (BCD)
(2) Valeur exemple 16#0000011 (BCD)
(3) Résultat 16#00000100 (BCD) lorsque le déclencheur est activé
(4) Reste 16#00000010 (BCD) lorsque le déclencheur est activé. Valeur sauvegardée dans sys_diDDivRemainder
(5) Zone de 32 bits
(6) Déclencheur : TRUE

Remarques

Au lieu d’utiliser cette instruction F, nous recommandons d’utiliser l’instruction FP7 correspondante :

FP_MOD_BCD,FP_DIV_MOD_BCD,FP_DIV_BCD

Thèmes apparentés

FP_MOD_BCD

FP_DIV_MOD_BCD

FP_DIV_BCD

Drapeaux d’erreur

sys_bIsEqual (passe à TRUE pendant un cycle): Si le résultat calculé est 0.

Thèmes apparentés

Exemple

En-tête du POU

Toutes les variables d’entrée et de sortie utilisées pour programmer cette fonction ont été déclarées dans l’en-tête du POU. Le même en-tête de POU est utilisé pour tous les langages de programmation.

	VAR
		start: BOOL:=FALSE;
			(*activates the fuction*)
		dividend: DWORD:=16#00001110;
			(*dividend*)
		divisor: DWORD:=16#00000011;
			(*divisor*)
		output_value: DWORD:=0;
			(*result after 0->1 leading edge
from start: 16#00000100*)
	END_VAR

Corps en LD

La fonction est exécutée lorsque la variable start est sur TRUE.

BODY
    WORKSPACE
        NETWORK_LIST_TYPE := NWTYPELD ;
        ACTIVE_NETWORK := 0 ;
    END_WORKSPACE
    NET_WORK
        NETWORK_TYPE := NWTYPELD ;
        NETWORK_LABEL :=  ;
        NETWORK_TITLE :=  ;
        NETWORK_HEIGHT := 6 ;
        NETWORK_BODY
B(B_CONTACT,,start,10,1,12,3,);
B(B_VARIN,,dividend,12,2,14,4,);
B(B_VARIN,,divisor,12,3,14,5,);
B(B_VAROUT,,output_value,21,2,23,4,);
B(B_F,F53_DBDIV!,Instance,14,0,21,5,,?DEN?D@'s1'?Ds2?AENO?Cd);
L(1,2,10,2);
L(12,2,14,2);
L(1,0,1,6);
        END_NETWORK_BODY
    END_NET_WORK
    NET_WORK
        NETWORK_TYPE := NWTYPELD ;
        NETWORK_LABEL :=  ;
        NETWORK_TITLE :=  ;
        NETWORK_HEIGHT := 6 ;
        NETWORK_BODY
L(1,0,1,6);
        END_NETWORK_BODY
    END_NET_WORK
    NET_WORK
        NETWORK_TYPE := NWTYPELD ;
        NETWORK_LABEL :=  ;
        NETWORK_TITLE :=  ;
        NETWORK_HEIGHT := 6 ;
        NETWORK_BODY
L(1,0,1,6);
        END_NETWORK_BODY
    END_NET_WORK
    NET_WORK
        NETWORK_TYPE := NWTYPELD ;
        NETWORK_LABEL :=  ;
        NETWORK_TITLE :=  ;
        NETWORK_HEIGHT := 6 ;
        NETWORK_BODY
L(1,0,1,6);
        END_NETWORK_BODY
    END_NET_WORK
END_BODY

Corps en ST

IF start then
    F53_DBDIV(dividend, divisor, output_value);
END_IF;