#include <avr/io.h>
#define IN PIND      
#define LED PD6 // светодиод

//------------------------------------------------------------------------------
// Задержка t х 10ms
//------------------------------------------------------------------------------
#define K_DELAY_10ms    F_CPU/600   // для F_CPU=8000000
void Delay_10ms(unsigned char t) {
       if (t==0) return;
       unsigned int i;
       while (t--) for(i=0;i<K_DELAY_10ms; i++);
}

//------------------------------------------------------------------------------
// Главная программа
//------------------------------------------------------------------------------
int main(void)
{

       DDRD  = 0x40;  // назначаем все линии порта D на вход, кроме PD6
       PORTD = 0xbf;  // подключаем внутренние нагрузочные резисторы, кроме PD6
            
       while(1) {   // запускаем бесконечный цикл
         cbi(PORTD, LED); // Зажигаем LED
         Delay_10ms(100);  // пауза
         sbi(PORTD, LED); // гасим LED
         Delay_10ms(100);  // пауза
         }
}

$regfile = "m32def.dat" 'используем ATmega32 (MRC40 с универсальным модулем)
$crystal = 16000000  'частота установленного кварца 16 mHz

Config Portb.2 = Output 'конфигурируем вывод 2 порта B на выход - подключаем к нему светодиод
Portb.2 = 0 'устанавливаем по умолчанию на ножке порта лог 0
Do  'начало цикла программы
Portb.2 = 1  'устанавливаем на ножке порта лог 1 - светодиод горит
Waitms 500 'задержка в миллисекундах 500мс = 0,5 секунды
Portb.2 = 0   'устанавливаем на ножке порта лог 0 - светодиод гаснет
Waitms 500   'задержка в миллисекундах 500мс = 0,5 секунды
Loop
End