Вопрос по разделу "Программы (Beta)

Внес изменения! Результат есть но это не финал!
Вложение 75933

var hh_sys, mim_sys, ss_sys, ms_sys: word;

procedure init; cdecl; export;
begin

end;

procedure UserFunction; cdecl; export;
begin
If (temp <= 14) then
pechka := word(1)
else
pechka := word(0);
begin
DecodeTime(Time, hh_sys, mim_sys, ss_sys, ms_sys);
If (hh_sys >= 12) and (mim_sys >= 6) and (hh_sys <= 20) and (mim_sys <= 10) then
on_nasos := word(1)
else
off_nasos := word(1);
end;
end;

у меня по прежнему сразу работает без остановок, даже с прибором который не подключен, может с типами данных что либо напутали Вложение 75937

Код:

---

var hh_sys, min_sys, ss_sys, ms_sys : word;

procedure Init; cdecl; export;
begin
end;

procedure UserFunction; cdecl; export;
begin
If (temp <= 14) then
                pechka := 1
else pechka := 0;
begin
        DecodeTime(Time, hh_sys, min_sys, ss_sys, ms_sys);
        if (hh_sys >= 9) and (hh_sys <= 17) then
        on_nasos := 1
        else
        off_nasos := 1;
end;
end;

---

PS вставил Ваш код, получил ошибку, сравнивайте

PSS я нашел в чем причина, не зря в шаблоне комментарии написаны

Может кто столкнулся: после обновления ПО owen Cloud в чт, перестали работать программы - после запуска вручную, программа через минуту останавливается системой. До этого программа отработала месяц (т.е. полностью работоспособна), по сути простая - пересылка с одного прибора 4 регистра в другой и обратно. Без преобразований и математики. в ТП написал сразу в пятницу, решения/ответа/комментария все нет. Пока обхожусь ручным перезапуском, но это не выход.

Журнал:

Вложение 77679

Программа:

Вложение 77680

Цитата:

---

Сообщение от kaftanati

Может кто столкнулся: после обновления ПО owen Cloud в чт, перестали работать программы ...

---

Проблема решена специалистами Owen: подробностей не знаю, но спасибо!

Обнаружилась интересная особенность: если входная переменная программы привязана к параметру, множитель которого отличается от единицы, то эта переменная в программе будет равна нулю. При этом в работе на вкладке "Программа" будет отображаться реальное значение переменной.
UPD: с выходными переменными еще веселее: если в привязанных к ним параметрам множитель не равен единице - получаем шикарный генератор случайных чисел!
Для примера: переменная со значением 2700 при множителе 0.001 самопроизвольно меняла свое значение с 2.7 на 13.0...