20 lines
690 B
Smalltalk
20 lines
690 B
Smalltalk
(*
|
|
===============================================================================
|
|
Project : PLC_Library
|
|
Device : -
|
|
Path : Преобразование значений
|
|
Name : DWORD_OF_2WORD
|
|
Type : FUNCTION
|
|
===============================================================================
|
|
*)
|
|
|
|
FUNCTION DWORD_OF_2WORD : DWORD
|
|
(* Сборка DWORD из двух WORD *)
|
|
VAR_INPUT
|
|
W1 : WORD; (* Старшее слово (биты 16..31 результата) *)
|
|
W0 : WORD; (* Младшее слово (биты 0..15 результата) *)
|
|
END_VAR
|
|
(*----- IMPLEMENTATION -----*)
|
|
DWORD_OF_2WORD := SHL(WORD_TO_DWORD(W1),16) OR WORD_TO_DWORD(W0);
|
|
END_FUNCTION
|