Показано с 1 по 10 из 30

Тема: Счетчик моточасов в ПЛК 110

Древовидный режим

Предыдущее сообщение Предыдущее сообщение   Следующее сообщение Следующее сообщение
  1. #20
    Пользователь
    Регистрация
    11.01.2009
    Адрес
    Кострома
    Сообщений
    3,144

    По умолчанию

    есть такой ФБ RTC в бибках.
    На нем и стройте.
    Пример кода, только свои условия для запуска-остановки сброса вставьте.
    Преобразования показаны:
    FUNCTION_BLOCK Ychet_narabotki
    VAR
    RTC1: RTC; (*Âðåìÿ íàðàáîòê&# 232;*)
    R_TRIG_Ust: R_TRIG; (*Êîìàíäà çàïóñêà*)
    Tek_schet_p: DWORD; (*Ñèãíàë ïóñêà*)
    M1: BOOL;
    F_TRIG_S: R_TRIG; (*Êîìàíäà îñòàíîâê&# 232;*)
    TON_S: TON; (*òàéìåð çàäåðæê&#232 ; îñòàíîâê&# 232;*)
    RS1: RS; (*Ðåëå ïóñêà -îñòàíîâê&# 232; íàðàáîòê&# 232;*)
    Tek_schet_p1: DWORD;
    M2: BOOL;
    R_TRIG_Sch: R_TRIG;
    Tim: DT;
    Narabotka_p: TIME;
    Narabotka_Chas_pWORD;
    Narabotka_Chas_p1: DWORD;
    Narabotka_Min_p: DWORD;
    Narabotka_min_p1: DWORD;
    Nt: BOOL;
    TP1: TP;
    F_TRIG22: F_TRIG;
    M_sch: BOOL;
    BLINK1: BLINK;
    M22: BOOL;
    END_VAR
    VAR_INPUT
    Tek_schet: DWORD; (*ñ÷åò÷èê *)
    In_Time: INT; (*àñòðîíîì è÷åñêîå âðåìÿ(÷à&#24 1; äí&#255*)
    END_VAR
    VAR RETAIN
    Narabotka: DT;
    END_VAR
    M1:=Tek_schet<>Tek_schet_p;

    M_sch:=Tek_schet=Tek_schet_p;

    TON_S(IN:=M_sch
    , PT:=T#30s , Q=> , ET=> ); (*&#197;&#241;&#235;&#232; &#231;&#237;&#224;&#247;&#229;&#237;&#232;&#229 ; &#237;&#229; &#236;&#229;&#237;&#255;&#229;&#242;&#241;&#255 ; &#226; &#242;&#229;&#247;&#229;&#237;&#232;&#232; 30 &#241;&#229;&#234;, &#242;&#238; &#241;&#243;&#248;&#232;&#235;&#234;&#224; &#237;&#229; &#240;&#224;&#225;&#238;&#242;&#224;&#229;&#242 ;*)

    RS1(SET:=M1 , RESET1:=TON_S.Q , Q1=> );

    M2:= In_Time=7 OR In_Time=19; (*&#209;&#225;&#240;&#238;&#241; &#247;&#224;&#241;&#238;&#226;*)

    R_TRIG_Sch(CLK:=M2 , Q=> ); (*&#210;&#240;&#232;&#227;&#229;&#240; &#241;&#225;&#240;&#238;&#241;&#224; &#247;&#224;&#241;&#238;&#226;*)

    RTC1(EN:=RS1.Q1 AND NOT R_TRIG_Sch.Q ,
    PDT:=Tim , Q=> , CDT=>Narabotka );

    IF R_TRIG_Sch.Q THEN
    Tim:=DT#1970-01-01-00:00:00;
    Narabotka:=DT#1970-01-01-00:00:00;
    END_IF;

    IF RS1.Q1 AND NOT R_TRIG_Sch.Q THEN
    Tim:=Narabotka;
    END_IF;

    Narabotka_p:=DT_TO_TIME(Tim);
    Narabotka_Chas_p:=TIME_TO_DWORD(Narabotka_p);
    Narabotka_Chas_p1:=Narabotka_Chas_p/3600000;
    Narabotka_Chas:=DWORD_TO_WORD(Narabotka_Chas_p1);

    Narabotka_Min_p:=Narabotka_Chas_p-Narabotka_Chas_p1*3600000;
    Narabotka_min_p1:=Narabotka_Min_p/60000;
    Narabotka_Min:=DWORD_TO_WORD(Narabotka_Min_p1);

    ЗЫ. если не разберете, пишите в личку. Скину в виде программы, а то коменты шрифты коверкают
    Последний раз редактировалось lara197a; 08.10.2016 в 22:56.

Похожие темы

  1. Наработка моточасов в ПЛК
    от desperadoes в разделе ПЛК1хх
    Ответов: 11
    Последнее сообщение: 23.10.2013, 20:30
  2. Продам ПЛК 150, БП04-24, МБ 110, МК 110
    от dll в разделе Трёп (Курилка)
    Ответов: 1
    Последнее сообщение: 14.08.2013, 08:54
  3. Плк 63 + МУ 110-8И + МВ 110-8АС HELP
    от KIPiA_Krg в разделе ПЛК63/73
    Ответов: 15
    Последнее сообщение: 11.01.2012, 12:26
  4. Счетчик моточасов
    от Petrak<OFF> в разделе ПЛК1хх
    Ответов: 5
    Последнее сообщение: 11.08.2011, 12:11
  5. Счетчик моточасов на основе СИ8
    от MURAvei в разделе Подбор Оборудования
    Ответов: 1
    Последнее сообщение: 16.05.2008, 16:29

Ваши права

  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения
  •