(*
===============================================================================
 Project    : PLC_Library
 Device     : -
 Path       : Преобразование значений
 Name       : REAL_TO_DW
 Type       : FUNCTION
===============================================================================
*)

FUNCTION REAL_TO_DW : DWORD
(* Побитовое переинтерпретирование REAL как DWORD (без преобразования значения) *)
VAR_INPUT
	X : REAL; (* Значение для переинтерпретации *)
END_VAR
VAR
	pt : POINTER TO DWORD;
END_VAR

(*----- IMPLEMENTATION -----*)
pt := ADR(X);
REAL_TO_DW := pt^;
END_FUNCTION