Внес изменения! Результат есть но это не финал!
Безымянный.png
Внес изменения! Результат есть но это не финал!
Безымянный.png
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;
Последний раз редактировалось Сергей Борисович Ш; 22.05.2024 в 12:19.
у меня по прежнему сразу работает без остановок, даже с прибором который не подключен, может с типами данных что либо напутали Screenshot 2024-05-22 123925.png
PS вставил Ваш код, получил ошибку, сравнивайтеКод: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;
PSS я нашел в чем причина, не зря в шаблоне комментарии написаны
Последний раз редактировалось capzap; 22.05.2024 в 13:04.
Bad programmers worry about the code. Good programmers worry about data structures and their relationships
среди успешных людей я не встречала нытиков
Барбара Коркоран
Может кто столкнулся: после обновления ПО owen Cloud в чт, перестали работать программы - после запуска вручную, программа через минуту останавливается системой. До этого программа отработала месяц (т.е. полностью работоспособна), по сути простая - пересылка с одного прибора 4 регистра в другой и обратно. Без преобразований и математики. в ТП написал сразу в пятницу, решения/ответа/комментария все нет. Пока обхожусь ручным перезапуском, но это не выход.
Журнал:
Программа:
Обнаружилась интересная особенность: если входная переменная программы привязана к параметру, множитель которого отличается от единицы, то эта переменная в программе будет равна нулю. При этом в работе на вкладке "Программа" будет отображаться реальное значение переменной.
UPD: с выходными переменными еще веселее: если в привязанных к ним параметрам множитель не равен единице - получаем шикарный генератор случайных чисел!
Для примера: переменная со значением 2700 при множителе 0.001 самопроизвольно меняла свое значение с 2.7 на 13.0...
Последний раз редактировалось krmts.ru; 24.11.2024 в 17:55.