Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Не получили письмо с кодом активации?

Официальный форум Simple-Scada.

Просмотр сообщений

В этом разделе можно просмотреть все сообщения, сделанные этим пользователем.


Сообщения - Игорь32

Страницы: [1]
1
Посмотрел Ваш проект, очень много для себя открыл , особенно работу с шаблонами . Спасибо большое

2
Здравствуйте pan2000

мне  помогло дописать

Код
 if TimerGetState(vrTime) <> 1 then TimerStart(vrTime, vrTime.AsDateTime); 

В результате  сбросы после 3 переключения исчезли  и время останавливается.

Осталась вторая проблема -  это  откат времени после работы  2 или 3  одновременно вентилятора и переход в обычный режим. нашол один интересный факт если сделать тайм аут  приходяшего сигнала   Допустим приходит 2 потом 7  и между ними сделать 0 то все работает корректно (Возможно стоит поставить задержку на приходящий сигнал в 1 секунду да и всё или можно реализовать как то в скаде межу переключениями ?

Спасибо за помощь

Цитировать
Во вложении пример с шаблоном для вентилятора и просто группой объектов.

Я так понимаю это мне нужно закинуть в корень папки Siple Scada 2 что бы открыть проэкт или как то по другому ?


Вообще операторы жалуются на сброс таймеров после рестарта пк или проекта . Я думал может  есть вариант  забирать время из контролера  и передавать на скаду, или поставить бд удаленно или забирать время из бд . Правда не знаю как реализовать вытягивание битов  с 3 воздуходувок  через 1 тег . На контролере время работы  каждого вентилятора  прописано и выведено на дисплей Думал реализовать что бы операторы не бегали к ящику дабы вписывать и высчитывать время работы (единственный минус контролер не учитывает секунды ) (Контролер Zelio SR3B102BD c модбасом SR3NET01). Пока  сидим тестем на демоверсии (планирую рекомендовать купить стандарт на 500 тегов для  автоматизации цеха) Пока разбираюсь делаю мелкие проекты. (К сожалению не программист но модернизивувать нужно).

P/s. Хотелось бы конечно что бы разработчики исправили это неприятную вещь со сбросом таймеров при перезагрузке клиента или пк  хотя бы в платных версиях .

3
 Добрый день . Такая проблема  . Есть 3 Воздуходувки  они работают по очереди и если  не хватает мощности включается 2 или 3 сразу (в зависимости что показывает датчик )  на все 3 сдедал 3 переменых  от одного источника и написал скрипты
для 1 вентилятора
Код
begin
       if FileOpen('SaveFile.ssf', '') then
    vrTime.Value := FileReadDateTime
  else
    vrTime.Value := 0;

     if FileRecreate('SaveFile.ssf', '') then
    FileWriteDateTime(vrTime.AsDateTime);


  with (Sender as TM_Object) do
 case AsInt of
      1: TimerStart (vrTime , vrTime.AsDateTime);
      3: TimerStart (vrTime , vrTime.AsDateTime);
      7: TimerStart (vrTime , vrTime.AsDateTime);

else
      TimerPause (vrTime );
    end;
end.
       

Для 2 вентилятора
Код
begin
       if FileOpen('SaveFile.ssf', '') then
    vrTime_1.Value := FileReadDateTime
  else
    vrTime_1.Value := 0;

     if FileRecreate('SaveFile.ssf', '') then
    FileWriteDateTime(vrTime_1.AsDateTime);





  with (Sender as TM_Object) do
 case AsInt of
      2: TimerStart (vrTime_1 , vrTime_1.AsDateTime);
      3: TimerStart (vrTime_1 , vrTime_1.AsDateTime);
      7: TimerStart (vrTime_1 , vrTime_1.AsDateTime);

else
      TimerPause (vrTime_1 );
    end;
end.                 
для 3 вентилятора
Код
begin
       if FileOpen('SaveFile.ssf', '') then
    vrTime_2.Value := FileReadDateTime
  else
    vrTime_2.Value := 0;

     if FileRecreate('SaveFile.ssf', '') then
    FileWriteDateTime(vrTime_2.AsDateTime);





  with (Sender as TM_Object) do
 case AsInt of

      4: TimerStart (vrTime_2 , vrTime_2.AsDateTime);
      7: TimerStart (vrTime_2 , vrTime_2.AsDateTime);

else
      TimerPause (vrTime_2 );
    end;
end.             
Переменных тоже 3

Суть проблемы : https://www.youtube.com/watch?v=ABV-kJAzTYo

Так вот, скачет время  после работы 2-3 вентиляторов одновременно и после работы на 3 вентиляторе поочерёдно  вместо паузы сброс.

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

Страницы: [1]