roboforum.ru

#include <tiny2313.h>
#include <delay.h>

// Declare your global variables here

// Таблица задержек
flash unsigned int tabz[] =  {32,64,128,256,512,1024,2048};

// Таблица коэффициентов деления
flash unsigned int tabkd[] = {0,4748,4480,4228,3992,3768,3556,3356,3168,2990,2822,
        2664,2514,2374,2240,2114,1996,1884,1778,1678,1584,1495,1411,1332,1257,
        1187,1120,1057, 998,942,889,839,792};
// Таблицы мелодий
// В траве сидел кузнечик
flash unsigned char mel1[] = {109,104,109,104,109,108,108,96,108,104,108,104,108,
        109,109,96,109,104,109,104,109,108,108,96,108,104,108,104,108,141,96,109,
        111, 79, 79,111,111,112,80,80,112,112,112,111,109,108,109,109, 96,109,111,
        79,79,111,111,112,80,80,112,112,112,111,109,108,141,128,96,255};
// Песенка крокодила Гены
flash unsigned char mel2[] = {109,110,141,102,104,105,102,109,110,141,104,105,107, 
        104,109,110,141,104,105,139,109,110,173,96,114,115,146,109,110,112,109, 
        114,115,146,107,109,110,114,112,110,146,109,105,136,107,105,134,128,128,102,
        105,137,136,128,104,107,139,137,128,105,109,141,139,128,110,109,176,112,108,
        109,112,144,142,128,107,110,142,141,128,105,109,139,128,173,134,128,128,109,
       112,144,142,128,107,110,142,141,128,105,109,139,128,173,146,128,255};  
// В лесу родилась елочка
flash unsigned char mel3[] = {132,141,141,139,141,137,132,132,132,141,141,142,139,
        176,128,144,146,146,154,154,153,151,149,144,153,153,151,153,181,128,96,255};
// Happy births day to you
flash unsigned char mel4[] = {107,107,141,139,144,143,128,107,107,141,139,146,144,
        128,107,107,151,148,146,112,111,149,117,117,148,144,146,144,128,255};
// С чего начинается родина
flash unsigned char mel5[] = {99,175,109,107,106,102,99,144,111,175,96,99,107,107,
        107,107,102,104,170,96,99,109,109,109,109,107,106,143,109,141,99,109,109,109,
        109,104,106,171,96,99,111,109,107,106,102,99,144,111,143,104,114,114,114,114,
        109,111,176, 96,104,116,112,109,107,106,64,73,143,107,131,99,144,80,80,112,
        111,64,75,173,128,255};
// Из кинофильма "Веселые ребята"
flash unsigned char mel6[] = {105,109,112,149,116,64,80,148,114,64,78,146,112,96,105,
        105,109,144,111,64,80,145,112,64,81,178,96,117,117,117,149,116,64,82,146,112,
        64,79,146,144,96,105,105,107,141,108,109,112,110,102,104,137,128,96,105,105,
        105,137,102,64,73,142,105,107,109,64,75,137,96,105,105,105,137,102,105,142,112,
        64,82,180,96,116,116,116,148,114,112,142,109,64,78,146,144,96,105,105,107,141,
        108,109,112,110,102,104,169,96,96,255};
// Улыбка
flash unsigned char mel7[] = {107,104,141,139,102,105,104,102,164,128,104,107,109,109,
        109,111,114,112,111,109,144,139,128,109,111,144, 96,111,109,104,107,105,173,128,
        111,109,112,107,111,109,109,107,102,104,134,132,128,100,103,107,107,107,107,139,
        112,100,103,102,102,102,134,102,103,107,105,107,108,108,108,108,107,105,107,108,
        144,142,128,112,107,110,140,112,105,108,107,107,107,105,140,139,139,112,103,102,
        103,105,108,107,105,103,128,112,107,110,108,108,108,140,112,105,108,107,107,107,
        139,112,103,102,103,105,108,107,105,103,105,139,132,128,96,96,96,255};       

// Таблица начал всех мелодий
flash unsigned char *tabm[] = {mel1, mel2, mel3, mel4, mel5, mel6, mel7};


void main(void)
{
unsigned char count;    // Определяем переменную count
unsigned char temp;     // Определяем переменную temp
unsigned char fnota;    // Код тона ноты
unsigned char dnota;    // Код длительности ноты
flash unsigned char *nota;  // Ссылка на текущую ноту

PORTB=0x08;  // Игициализация порта PB
DDRB=0x08;

PORTD=0x7F;  // Игициализация порта PB
DDRD=0x00;

TCCR1A=0x00;   // Инициализация таймера счетчика T1
TCCR1B=0x09;

ACSR=0x80;   // Инициализация аналогового компаратора

while (1)
    {
      // Сканирование клавиатуры
m1:   temp=PIND;                        // Чтение кода с клавиатуры
      for (count=0; count<7; count++)   // Цикл сканирования
       {
         if ((temp&1)==0) goto m3;      // Если кнопка нажата, выходим
         temp >>= 1;                    // Сдвиг считанного кода
       }
m2:   TCCR1A=0x00;  // Выключаем звук
      goto m1;
      
      // Воспроизведение мелодии
m3:   nota = tabm[count];           // Устанавливаем указатель на первую ноту
m4:   if (PIND==0x7F) goto m2;      // Если ни одна кнопка не нажата, закончить
      if (*nota==0xFF) goto m3;     // Проверка на конец мелодии
      fnota = (*nota)&0x1F;         // Определяем код тона
      dnota = ((*nota)>>5)&0x07;    // Определяем код длительности
      if (fnota==0) goto m5;        // Если пауза не воспроизводим звук
      OCR1A=tabkd[fnota];           // Программируем частоту звука
      TCCR1A=0x40;                  // Включаем звук
m5:   delay_ms (tabz[dnota]);       // Формируем задержку
      TCCR1A=0x00;                  // Выключаем звук
      delay_ms (tabz[0]);           // Задержка между нотами
      nota++;                       // Перемещаем указатель на следующую ноту
      goto m4;                      // К началу цикла
    };
}