28 lines
726 B
Smalltalk
28 lines
726 B
Smalltalk
(*
|
|
===============================================================================
|
|
Project : PLC_Library
|
|
Device : -
|
|
Path : Общие
|
|
Name : Norm_real
|
|
Type : FUNCTION
|
|
Exported : 2026-07-31 11:16:16
|
|
===============================================================================
|
|
*)
|
|
|
|
FUNCTION Norm_real : REAL
|
|
(*
|
|
Нормирует значение аналогового входа X по двум заданным граничным точкам нормировки (X1,Y1) (X2,Y2)
|
|
*)
|
|
VAR_INPUT
|
|
X: REAL;
|
|
X1: REAL;
|
|
Y1: REAL;
|
|
X2: REAL;
|
|
Y2: REAL;
|
|
END_VAR
|
|
|
|
(*----- IMPLEMENTATION -----*)
|
|
IF (X2-X1 = 0) THEN Norm_real:=Y1; RETURN; END_IF;
|
|
Norm_real:=(X-X1)*(Y2-Y1)/(X2-X1)+Y1;
|
|
END_FUNCTION
|