F53_DBDIV

8-Digit-BCD-Division mit Transfer

Das Ergebnis der Division steht im Speicherregister d und der Divisionsrest steht in der Systemvariablen sys_diDDivRemainder.

Parameter

Eingang

s1 (DWORD): Dividend, 32-Bit-Bereich für BCD-codierte Daten oder achtstellige BCD-äquivalente Konstante
s2 (DWORD): Divisor, 32-Bit-Bereich für BCD-codierte Daten oder achtstellige BCD-äquivalente Konstante

Ausgang

d (DWORD): Quotient, 32-Bit-Bereich für BCD-codierte Daten (der Restbetrag wird in der Systemvariablen sys_diDDivRemainder gespeichert)

Beispiel

(1) Beispiel 16#00001110 (BCD)
(2) Beispiel 16#0000011 (BCD)
(3) Ergebnis: 16#00000100 (BCD), wenn der Trigger TRUE ist
(4) Rest 16#00000010 (BCD) in sys_diDDivRemainder gespeichert, wenn der Trigger ON ist
(5) 32-Bit-Bereich
(6) Trigger: TRUE

Anmerkungen

Wir empfehlen, anstelle von diesem F-Befehl den entsprechenden FP7-Befehl zu verwenden:

FP_MOD_BCD,FP_DIV_MOD_BCD,FP_DIV_BCD

Verwandte Themen

FP_MOD_BCD

FP_DIV_MOD_BCD

FP_DIV_BCD

Fehleralarmmerker

sys_bIsEqual (wird für einen Zyklus auf TRUE gesetzt): wenn das Funktionsergebnis 0 ist.

Verwandte Themen

Beispiel

POE-Kopf

Im POE-Kopf werden alle Ein- und Ausgangsvariablen deklariert, die für die Programmierung dieser Funktion verwendet werden. Für alle Programmiersprachen wird der gleiche POE-Kopf verwendet.

	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

KOP-Rumpf

Wenn die Variable start auf TRUE gesetzt wird, wird die Funktion ausgeführt.

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

ST-Rumpf

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