ПР200 как использовать функциональные кнопки в программе?

[Dimensy]

... Как лучше генератор на 1 сек сделать?

По разному, например, вот так

    a1 := dt_to_udint(get_date_time());
    Q := not (SYS.compare_date_time(a1, a2, 1) = 0);
    a2 := a1;

[pahotnyh]

По разному, например, вот так

    a1 := dt_to_udint(get_date_time());
    Q := not (SYS.compare_date_time(a1, a2, 1) = 0);
    a2 := a1;

Я так сделал.

T:=TIME_TO_UDINT(GET_TIME())/1000;
IF T-T1 = 1 THEN Tic:=TRUE; ELSE Tic:=FALSE; END_IF;
IF Tic THEN T1:=T; END_IF;
IF Enab AND Tic THEN C_:=TRUE; ELSE C_:=FALSE; END_IF;

[pahotnyh]

По разному, например, вот так

    a1 := dt_to_udint(get_date_time());
    Q := not (SYS.compare_date_time(a1, a2, 1) = 0);
    a2 := a1;

С помощью SYS.compare наверное правильней будет..

[kondor3000]

Не соглашусь. Насос может быть заменен, заменен на не новый, поменяны местами и т.д. Учет серийного номера будет предусмотрен. В перспективе можно и сигнализацию на обслуживание реализовать.
P.S. Работаю в основном с генераторными контроллерами. Идеи черпаю оттуда. Там все это есть.

Вот вам переделанный таймер, с возможностью установки наработки по биту Запись 1 Переделка таймера.jpg

[Dimensy]

Я так сделал.

T:=TIME_TO_UDINT(GET_TIME())/1000;
IF T-T1 = 1 THEN Tic:=TRUE; ELSE Tic:=FALSE; END_IF;
IF Tic THEN T1:=T; END_IF;
IF Enab AND Tic THEN C_:=TRUE; ELSE C_:=FALSE; END_IF;

Тогда уж так

a1 := time_to_udint(get_time());
Q := a1 - a2 >= 1000;
if Q then a2 := a1; end_if

[pahotnyh]

Вот вам переделанный таймер, с возможностью установки наработки по биту Запись

Спасибо! Посмотрю.

[pahotnyh]

time_to_udint(get_time() таймер не сбрасывается?
Его переполнение произойдет через примерно 49 суток

[pahotnyh]

time_to_udint(get_time() таймер не сбрасывается?

Естественно нет.

[pahotnyh]

Сделал так.

[kondor3000]

Сделал так.

По моему не доделали, по отдельности вверху и внизу часы изменить не даёт, только вместе. Где задача наработки и задача времени не понятно.
Главное, чтобы работало как вам надо)