Страница 2 из 2 ПерваяПервая 12
Показано с 11 по 16 из 16

Тема: Помогите начинающему пользователю среды програмированния CoDeSys 2.3

  1. #11
    Пользователь Аватар для Fudz
    Регистрация
    03.04.2012
    Адрес
    Харьков
    Сообщений
    63

    По умолчанию

    О, ну да как я мог забыть. СПС буду пробовать.

  2. #12
    Пользователь Аватар для Fudz
    Регистрация
    03.04.2012
    Адрес
    Харьков
    Сообщений
    63

    По умолчанию

    Появился новый вопрос. В данный момент осваиваю работу с датой и временем. Не могли бы вы подсказать как преобразовать например минуты в байт? Пользуюсь библиотекой SysLibTime.

  3. #13

    По умолчанию

    Если я правильно понял то вот:

    SYST:SystemTimeDate; *Объявляем экземпляр ФБ системного времени*
    X:BYTE;
    _________________________________

    X:=UINT_TO_BYTE(SYST.Minute);
    Чтобы понять рекурсию нужно понять рекурсию

  4. #14
    Пользователь Аватар для Fudz
    Регистрация
    03.04.2012
    Адрес
    Харьков
    Сообщений
    63

    По умолчанию

    Да правильно но я так уже пробовал результат X=0;
    Последний раз редактировалось Fudz; 06.08.2012 в 15:56.

  5. #15
    Пользователь Аватар для Fudz
    Регистрация
    03.04.2012
    Адрес
    Харьков
    Сообщений
    63

    По умолчанию

    ПРИМЕР ПРОГРАММЫ

    PROGRAM TIME_PLC
    VAR
    GetTime: CurTimeEx;
    TimeAndDate: SystemTimeDate;
    Sys_Time: SysTime64;
    set_time: BOOL;
    set_date: BOOL;
    MM: UINT;
    SS: UINT;
    HH: UINT;
    D: UINT;
    M: UINT;
    Y: UINT;

    X:BYTE;
    END_VAR

    (*Текущее время*)
    TimeAndDate.Day :=0;

    TimeAndDate.DayOfWeek :=0;
    TimeAndDate.dwHighMsec :=0;
    TimeAndDate.dwLowMSecs :=0;
    TimeAndDate.Milliseconds :=0;
    TimeAndDate.Minute:=0;


    X:=UINT_TO_BYTE(TimeAndDate.Minute);

    TimeAndDate.Second :=0;

    TimeAndDate.Hour :=0;

    TimeAndDate.Year :=0;

    TimeAndDate.Month :=0;

    Sys_time.ulHigh :=0;

    Sys_time.ulLow :=0;

    GetTime (SystemTime:=Sys_Time , TimeDate:= TimeAndDate);

    (*Если set_time - истина, то можно менять время*)

    IF set_time THEN

    TimeAndDate.Minute:=MM;
    TimeAndDate.Second:=SS;
    TimeAndDate.Hour:=HH;
    GetTime (SystemTime:=Sys_Time , TimeDate:= TimeAndDate);

    END_IF

    (*Если set_date - истина, то можно менять дату*)

    IF set_date THEN

    TimeAndDate.Day:=D;
    TimeAndDate.Month:=M;
    TimeAndDate.Year:=Y;
    GetTime (SystemTime:=Sys_Time , TimeDate:= TimeAndDate);

    END_IF

  6. #16
    Пользователь Аватар для Fudz
    Регистрация
    03.04.2012
    Адрес
    Харьков
    Сообщений
    63

    По умолчанию

    все проблему решил ........)))

Страница 2 из 2 ПерваяПервая 12

Похожие темы

  1. Помогите начинающему!!!
    от mihej в разделе Трёп (Курилка)
    Ответов: 2
    Последнее сообщение: 25.01.2011, 11:03
  2. помогите начинающему!
    от PASA2010 в разделе ПЛК1хх
    Ответов: 8
    Последнее сообщение: 17.01.2011, 22:02
  3. помогите начинающему
    от Литрович в разделе ПЛК1хх
    Ответов: 3
    Последнее сообщение: 03.03.2010, 15:16
  4. Помогите начинающему!!!
    от Юрий Андреевич в разделе ПЛК1хх
    Ответов: 32
    Последнее сообщение: 14.08.2008, 18:00
  5. помогите начинающему
    от Evghenii в разделе ПЛК1хх
    Ответов: 8
    Последнее сообщение: 12.03.2007, 14:45

Ваши права

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