Пример 2

 Контроль радиационного фона

Скрипт: 

1:;
if($ptime=30){2};

2:$S0=$X0;
$X0=0;
if($S0>40)trans{3};
trans{1};

3:M(Level=$S0);
trans{1};

------------- конец скрипта ----------

Измерение радиации производится на основе приема импульсов от дозиметра Белла 

Импульсы от дозиметра Белла поступают на D0.

скетч Bort-X обладает  свойством автоматически считать импульсы на D0  и записывать их в переменную $X0, к которой есть доступ со стороны скрипта. За 30 секунд набирается число импульсов, которое и соответствует интенсивности излучения в микрорентген в час. Период сканирования в панели управления устанавливается на 30 секунд. И по истечении 30 секунд сосчитанные импульсы поступают в переменную панели $S0, которой присвоено имя Level (Уровень). А если уровень превышает 40, то шлется письмо с указание уровня на адрес Email, указанный в конфигурации. В начале следующего цикла счетчик $X0 обнуляется. Итого только 7 строк скрипта понадобилось для решения задачи по измерению радиации. Естественно, панель управления защищена в данном случае паролем.   

Страница дозиметра 

 

Контакты:

Telegram - @citorubot

Email - admin@bortx.ru

+7(903)530-22-40 Whatsapp

Блог - https://bort-x.blogspot.com/2019/03/bortx.html#comment-form

Copyright © 2022 BortX
GS RU