Emerson Exchange 365

Jeff,

In the past I have used the Calc logic as Neil has suggested. Here is a snippet of the code you can just paste into a calc block.

======================================================
VAR EXPONENT END_VAR;

VAR SGN END_VAR;

VAR MANTISSA END_VAR;



(* IEEE754_IN is a 32 Bit Unsigned Integer parameter *)

(* FLOAT is a floating point parameter *)



(* Extract the Exponent from the bits 24 to 31 of the 32 bit word *)

(* AND Mask to extract bits 24 to 31 then shift 23 bits to the right *)

EXPONENT := SHR((IN1 & 2139095040),23);



(* Extract the Sign from the bit 32 of the 32 bit word *)

(* AND Mask to extract bit 32 then shift 31 bits to the right *)

SGN := SHR((IN1 & 2147483648),31);



(* Extract the Mantissa from the bits 1 to 23 of the 32 bit word *)

(* AND Mask to extract bits 1 to 23 *)

MANTISSA := (IN1 & 8388607);





(* The maths used to create the FLOAT from SIGN, EXPONENT and MANTISSA *)



OUT2 := EXPONENT - 127;

OUT3 := SGN;

OUT4 := MANTISSA;



OUT1 := (1+ (MANTISSA * (2 ** -23))) * (2 ** OUT2);



IF SGN THEN OUT1 := OUT1 * -1; ENDIF;

============================================================


I hope that helps!