Часы-термометр-будильник 12LED(mega8/88+DS1307+DS18x20*2)

[TovsCat]

Спасибо что откликнулись, но после вашего ответа ,я понял что программировать у меня пока не сложилось, и похоже с математикой тоже.... .
С вызовом функции вы наверное дали исчерпывающий ответ, кто в курсе наверное сразу всё понял, но не я, мне так и непонято , зачем эту функцию вызывать.
Но дело не в ней, если ее можно упростить, я все равно не могу сложить формулу в работающий вид.
Вот так в моем понимании она должна вычислять день недели

Спойлер

Код:

/*****************************************************
CodeWizardAVR V2.04.4a Advanced
Chip type               : ATmega8
AVR Core Clock frequency: 4,000000 MHz
*****************************************************/
#include <mega8.h>

#asm
   .equ __lcd_port=0x12 ;PORTD
#endasm
#include <lcd.h>
#asm
   .equ __ds1302_port=0x15 ;PORTC
   .equ __ds1302_io=5
   .equ __ds1302_sclk=4
   .equ __ds1302_rst=3
#endasm
#include <ds1302.h>
unsigned char hour=1,min=1,sek=1;   //часы, минуты, секунды
unsigned char day=18,month=11,year=12;   //день, месяц, год
unsigned char   myday=0;           // день недели
unsigned int y=0, m=0;


void main(void)
{

ACSR=0x80;
SFIOR=0x00;

// DS1302 Real Time Clock initialization
// Trickle charger: Off
rtc_init(0,0,0);
lcd_init(16);

while (1)
      {
              rtc_get_time(&hour,&min,&sek);   //считать время
           rtc_get_date(&day,&month,&year);  //считать дату   
// ---------- вычислить день недели по дате ----------
   y = year+2000;
   m=month;
   if (m > 2) { m -= 2;       }
   else       { m += 10; y--; }
   myday = (((day) + y + (y>>2) + ((31 * m) / 12)) % 7);
   
   if (myday == 0) myday = 7;
 //-
                         lcd_gotoxy(0,0);                               
                          lcd_putchar(hour/10+0x30);
                          lcd_putchar(hour%10+0x30);
                          lcd_putchar(':');
                          lcd_putchar(min/10+0x30);
                          lcd_putchar(min%10+0x30);
                          lcd_putchar('.');
                          lcd_putchar(sek/10+0x30);
                          lcd_putchar(sek%10+0x30); 
                         
                    lcd_gotoxy(0,1);                               
                          lcd_putchar(day/10+0x30);
                          lcd_putchar(day%10+0x30); 
                          lcd_putchar('.');
                          lcd_putchar(month/10+0x30);
                          lcd_putchar(month%10+0x30);
                          lcd_putchar('.');
                          lcd_putsf("20");
                          lcd_putchar((year/10)%10+0x30);
                          lcd_putchar(year%10+0x30); 
                            lcd_putchar(' ');   
                          lcd_putchar(myday%10+0x30);
                       

      };
}

Но, моя математика пока стабильную ошибку на 1 день недели, и как тут проверить если год высокосный и не высоксный?, поправьте если можно код, пожалуйста.

[Danko]

У меня формула упрощенная (урезанная).

Первоисточником была эта формула.

А вот примеры на разных языках.

Я для экономии памяти МК формулу упростил, но у Вас если в этом проблемы нет попробуйте пойти от первоисточника так сказать.

[TovsCat]

Не знаю почему у меня по по формуле (урезаной) получился сдвиг недели на плюс один день, я просто в код который я показал выше, добавил условие

Код:

   New_myday=myday-1;
      if (New_myday == 0) New_myday = 7;
//и вывод на дисплей
   lcd_putchar(New_myday%10+0x30);

Проверил 2112 -2013 год и выбочно до 2099.
Показывает, день недели точно....

СПАСИБО Danko это таки с помощью вашей формулы все получилось

Вложения

smayl6.gif

(54 KiB) Скачиваний: 4105

[O-LED]

Не знаю почему у меня по по формуле (урезаной) получился сдвиг недели на плюс один день

потому что по этой формуле неделя начинается с воскресенья.

[NickNI]

Не знаю почему у меня по по формуле (урезаной) получился сдвиг недели на плюс один день,

Просто на заметку: Учтите, что в модели протеуса при некотором стечении исходного кода получается 8 дней в недели

[santy]

M169 писал
Доброго времени суток.
У меня к вам просьба, посмотрите, пожалуйста, на секундное двоеточие несколько минут внимательно, что Вы видите?


простите что стаким опозданием отвечаю на ваш вопрос.
эти часы я собрал для своих друзей по работе.
если посмотреть на точки то они, как маятник
тридцать секунд в одну сторону потом не большая
заминка и в обратную сторону.

с уважением Валерий

Можно узнать что там с точками? вопрос решили или нет? у меня такая же беда...
только два раза по 10 сек. и один 15 сек.

Последний раз редактировалось santy Чт дек 27, 2012 07:53:02, всего редактировалось 2 раз(а).

[santy]

Еще небольшая подсветка сегментов идет, правда днем не заметно, только ночью, из-за чего интересно?

[m169]

Еще небольшая подсветка сегментов идет, правда днем не заметно, только ночью, из-за чего интересно?

Понизьте напряжение питания на индикаторах. С помощью подстроичных резисторов, в цепи DC-DC преобразователей.

[santy]

Понизьте напряжение питания на индикаторах. С помощью подстроичных резисторов, в цепи DC-DC преобразователей.

спасибо m169, попробую понизить.

[os1125]

респект автору
большое спасибо за труд.

Вложения

IMG_3968.jpg

(188.43 KiB) Скачиваний: 1253

IMG_3965.jpg

(144.08 KiB) Скачиваний: 1133

IMG_3964.jpg

(163.37 KiB) Скачиваний: 1031

IMG_3966.jpg

(149.06 KiB) Скачиваний: 1189

[svinuk]

os1125, очь красиво. Мне нравится. Расскажите, пожалуйста, подробней о корпусе и светофильтрах.

И печатку выложите, если не сложно

Последний раз редактировалось svinuk Ср май 08, 2013 12:30:16, всего редактировалось 1 раз.

[svinuk]

Подскажите, пожалуйста, откуда взять +5В и +9В для питания индикаторов, ведь основное питание у нас 15В.

[NickNI]

...откуда взять +5В и +9В для питания индикаторов, ведь основное питание у нас 15В.

Посмотреть схему в первом посте... Два линейных стабилизатора в каскаде. После первого 9В, после второго 5В... Или вопрос в другом?

[Welten]

Эх, жаль автор крайней печатки не заходит на форум(

[os1125]

печатка тут, только сегменты индикаторов неправильно обозначены.

корпус делал из мелкой вагонки,стекло тонировал пленкой, оконтовка из мебельной фурнетуры.

Вложения

часы 15_03_2013.rar

(61.19 KiB) Скачиваний: 555

[Welten]

Преогромное спасибо)

[svinuk]

Приветствую всех. Выложите кто-нибудь фьюзы, а то в первом посте все ссылки мертвы. Спасибо.

[NickNI]

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

Нашел среди архивов Danko

Fuse.zip

(81.54 KiB) Скачиваний: 322

[svinuk]

Премного благодарствую:)

[tony_art]

...откуда взять +5В и +9В для питания индикаторов, ведь основное питание у нас 15В.

Посмотреть схему в первом посте...

Я конечно глубоко извиняюсь, но в первом посту - все ссылки мёртвые! Возможно-ли их обновить? Или выложить схему?