программа на ST

[Gans]

Здравствуйте, Ронни008.

Мне непонятно как реализовать полную выгрузку из бункера по достижению 500 кг.

Во время выгрузки каждые 2-10 сек проверяйте массу бункера, если текущая масса бункера отличается от предыдущей менее чем на 5% значит бункер пуст)
Само собой подбираем время и выше указанный процент по месту на реальном объекте.

[Sulfur]

IF Бункер=>499.9кг AND Задвижка=FALSE THEN 
                   Остановить загрузку бункера; 
                   Выдержать паузу; 
                   Открыть задвижку выгрузки; 
                   Задвижка:=TRUE;
END_IF;
IF Бункер=<0.1кг AND Задвижка=TRUE THEN  
                  Закрыть задвижку выгрузки; 
                  Выдержать паузу;
                  Включить загрузку бункера;
                  Задвижка:=FALSE;
END_IF;

Как-то так.

[Эдуард_Н]

Подскажите как это: Вложение 35976 выразить в ST.

[lara197a]

Подскажите как это: Вложение 35976 выразить в ST.

искользуйте функцию SEL или IF или CASE

[Евгений Кислов]

Можно и дословно перенести:

TH:=MUX(SELECT, T#1s, T#1m, T#1h, T#1d);

[Эдуард_Н]

искользуйте функцию SEL или IF или CASE

Как с IF сделать?
Пробовал так:
IF SELECT: = 0 THEN TH: = T#1s;
IF SELECT: = 1 THEN TH: = T#1m;
IF SELECT: = 2 THEN TH: = T#1h;
IF SELECT: = 3 THEN TH: = T#1d;

[ASo]

Можно и так, но для ускорения работы (исключения заведомо не используемых условий) сделайте через IF ... ELSE

[lara197a]

IF SELECT=0 THEN
TH:= T#1s;
ELSIF SELECT=1 THEN
TH:= T#1m;
ELSIF SELECT=2 THEN
TH:= T#1h;
ELSIF SELECT =3
THEN TH:= T#1d;
END_IF

лучше через CASE
А вообще в справке КДС есть примеры

[Эдуард_Н]

Спасибо, все примеры интересны. Будем пробовать.

[Эдуард_Н]

IF SELECT: = 0 THEN
TH: = T#1s;
ELSIF SELECT: = 1 THEN
TH: = T#1m;
ELSIF SELECT: = 2 THEN
TH: = T#1h;
ELSIF SELECT: = 3 THEN
TH: = T#1d;
END_IF

лучше через CASE
А вообще в справке КДС есть примеры

Пишет ошибки:
Для "IF" или "ELSIF" в качестве условия необходимо логическое выражение
Должно быть THEN перед ";"