Float to INT16

[Sayland]

Наткнулся на макрос по конвертации float в int16 от Влад12.
0001.jpg
https://owen.ru/forum/showthread.php?t=35375

У меня получилось более компактно.
Может, кому-то пригодится.
Макрос.JPG
На ST.
Функция.JPG
И обратно
м.JPG

Ф.JPG

Fl_TO_INT_TO_Fl.owle

[kondor3000]

Наткнулся на макрос по конвертации float в int16 от Влад12.

У меня получилось более компактно.

А так ещё компактней

function FLOAT_TO_INT: udint; //имя функции и тип данных выхода
    VAR_INPUT
      in : REAL;
    END_VAR
   
    if In >= 0 then
       FLOAT_TO_INT := real_to_udint(In);
    else
       FLOAT_TO_INT:= 65536 - real_to_udint(-In);   // Для   INT
    end_if
             
end_function

Функции FLOAT_TO_INT (DINT) и (DINT) INT_TO_FLOAT на ST____ https://owen.ru/forum/showthread.php...821#post429821

[Sayland]

А так ещё компактней

function FLOAT_TO_INT: udint; //имя функции и тип данных выхода
    VAR_INPUT
      in : REAL;
    END_VAR
   
    if In >= 0 then
       FLOAT_TO_INT := real_to_udint(In);
    else
       FLOAT_TO_INT:= 65536 - real_to_udint(-In);   // Для   INT
    end_if
             
end_function

Функции FLOAT_TO_INT (DINT) и (DINT) INT_TO_FLOAT на ST____ https://owen.ru/forum/showthread.php...821#post429821

Да!!! Согласен... Но, если 0>in>-1, то включен 16бит на выходе.

[kondor3000]

Да!!! Согласен... Но, если 0>in>-1, то включен 16бит на выходе.

В переменной INT c 0 с 15 бит, 16 бит уже DINT

[Sayland]

А так ещё компактней
Функции FLOAT_TO_INT (DINT) и (DINT) INT_TO_FLOAT на ST____ https://owen.ru/forum/showthread.php...821#post429821

Вот что получилось.
Как то так.JPG

[kondor3000]

Вот что получилось.
Как то так.JPG

Вы забываете, что мы работаем со знаковыми целочисленными, типа INT. Перевод во Float, нужен только для задания знака целочисленной, так как данного типа нет в Лоджике.
А у целочисленных как известно нет дробей. По факту ФБ должен называться INT_TO_WORD, а не FLOAT_TO_INT.
Если же нужна дробь, то умножаете на 10, передаёте и по получении делите на 10. Только это уже не имеет отношения к ФБ, а только к уму применяющего данный блок.
А уж если с защитой от дурака делать, то будет например так

    VAR_INPUT
      in : REAL;
    END_VAR
    VAR   
      K : udint;
      X: REAL;         
    END_VAR
    
     K:=dc32(15);
     x:=Round(fLimit((In),udint_to_real(K)*-1,udint_to_real(K-1)),0);
     FLOAT_TO_INT:=Sel(abs(x)>x,real_to_udint(abs(x)), K-real_to_udint(abs(x))+K);   
    
end_function

[Sayland]

Вы забываете, что мы работаем со знаковыми целочисленными, типа INT. Перевод во Float, нужен только для задания знака целочисленной, так как данного типа нет в Лоджике.
А у целочисленных как известно нет дробей. По факту ФБ должен называться INT_TO_WORD, а не FLOAT_TO_INT.
Если же нужна дробь, то умножаете на 10, передаёте и по получении делите на 10. Только это уже не имеет отношения к ФБ, а только к уму применяющего данный блок.
А уж если с защитой от дурака делать, то будет например так

    VAR_INPUT
      in : REAL;
    END_VAR
    VAR   
      K : udint;
      X: REAL;         
    END_VAR
    
     K:=dc32(15);
     x:=Round(fLimit((In),udint_to_real(K)*-1,udint_to_real(K-1)),0);
     FLOAT_TO_INT:=Sel(abs(x)>x,real_to_udint(abs(x)), K-real_to_udint(abs(x))+K);   
    
end_function

Интересно... Как термометру сопротивления объяснить что он должен показывать только целые числа.
У нас на входе переменная типа float (совсем не целочисленная), а на выходе типа UDINT, которя бинарно эметирует переменную типа int16. Я не где не ошибся?
Если я не ошибся, значит блок называется правильно?

function FLOAT_TO_INT: udint; //имя функции и тип данных выхода
    VAR_INPUT
      in : REAL;
    END_VAR
        FLOAT_TO_INT := real_to_udint(In);
    if In < 0 then
       FLOAT_TO_INT:= SHR (SHL (65536 - real_to_udint(-In), 16), 16) ;   // Для   INT
    end_if
end_function

Короче не получется.

[kondor3000]

Интересно... Как термометру сопротивления объяснить что он должен показывать только целые числа.
У нас на входе переменная типа float (совсем не целочисленная), а на выходе типа UDINT, которя бинарно эметирует переменную типа int16. Я не где не ошибся?
Если я не ошибся, значит блок называется правильно.

Спор бестолковый, не термометр виноват, а программист, не понимающий для чего нужен этот блок.

[Sayland]

Спор бестолковый, не термометр виноват, а программист, не понимающий для чего нужен этот блок.

Это не спор, а поиск лучшего решения и устранения недочетов. А функция мне нужна для того, чтобы преобразовать переменную типа float к типу int16(В шапке так и написанно). У ПРок мало регистров для передачи, вот и приходится экономить.

[Сергей0308]

Это не спор, а поиск лучшего решения и устранения недочетов. А функция мне нужна для того, чтобы преобразовать переменную типа float к типу int16(В шапке так и написанно). У ПРок мало регистров для передачи, вот и приходится экономить.

Для этого даже знаковый тип данных не нужен, в смысле, можно передавать в виде: (Х+100) х10, после передачи обратное преобразование, получится отрицательные значения передавать с точностью до десятых долей градуса, это же сотни раз обсуждалось, даже повторять как-то неудобно уже!