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

FUNCTION WORD_OF_DWORD : WORD
(* Извлечение одного из двух 16-битных слов DWORD *)
VAR_INPUT
	in : DWORD; (* Исходное значение *)
	N : BYTE; (* Номер извлекаемого слова: 0 - младшее (биты 0..15), 1 - старшее (биты 16..31) *)
END_VAR
(*----- IMPLEMENTATION -----*)
WORD_OF_DWORD := DWORD_TO_WORD(SHR(in,SHL(n,4)));
END_FUNCTION