// Internal SPI
.equ spi_ddr = DDRB //
.equ spi_port = PORTB //
.equ spi_p = PINB //
.equ ss = PB0 //
.equ sck = PB1 //
.equ mosi = PB2 //
.equ miso = PB3 //

// SPI Master Init // Set MOSI and SCK output, all others input
ldi tmp,(0<<SPIE)|(1<<SPE)|(0<<DORD)|(1<<MSTR)|(0<<CPOL)|(0<<CPHA)|(0<<SPR1)|(0<<SPR0)
// DORD=1 lsb first DORD=0 msb first
// MSTR=1 SPI master mode MSTR=0 SPI slave mode
// CPOL=1 SCK по спаду CPOL=0 SCK по фронту
// SPR1 SPR0 0 0 (F/4) 0 1 (F/16) 1 0 (F/64) 1 1 (F/128)
out SPCR,tmp // Enable SPI, Master, set clock rate fck/16
ldi tmp,(1<<SPI2X) // SPI freq * 2
out SPSR,tmp //



;Запись байта в регистр с помощью апаратного SPI

74HC595:
sbi d_port,EN //
out SPDR,xh // OUT anod_m
wt_stx1: // Wait for transmission complete
in tmp1,SPSR //
sbrs tmp1,SPIF //
rjmp wt_stx1 //
cbi d_port,EN //
ret

;Запись байта в регистр с помощью програмного SPI




74HC595:
sbi d_port,en // Переводим выходы регистров в третье состояние
rcall out_byte //
cbi d_port,en // Включаем выходы 74НС595
ret

out_byte: // Вывод байта в 74HC595
ldi loop,8 // Счетчик битов
otd: // Cycle
clc // Очищаем CARY Flag
rol data // Сдвигаем данные в лево на 1 (data<<1)
brcc d_z // Если CARY Flag сброшен , идем сюда -----|
sbi d_port,dat // Если CARY Flag установлен то DATA=1 |
rjmp d_ok // |
d_z : // Data zero <----|
cbi d_port,dat // Если CARY Flag сброшен то DATA=0
d_ok: // Импульс CLK
sbi d_port,clk // CLK -> 1
cbi d_port,clk // CLK -> 0
dec loop // Счетчик битов - 1
brne otd // Если счетчик не равен 0 то переходим кциклу otd
ret // Выход из подпрограммы

    call out_byte

rol     data

out_byte:              // Вывод байта в 74HC595
ldi     loop,8         // Счетчик битов
otd:                   // Cycle
clc                    // Очищаем CARY Flag
rol     data           // Сдвигаем данные в лево на 1 (data<<1)

#include <mega16.h>
#include <delay.h>

unsigned char dig;
unsigned char bin_digits[10]=
                             {
                                 0b10000000,    //0
                                 0b00000000,    //1
                                 0b10010000,    //2
                                 0b00010000,    //3
                                 0b11100000,    //4
                                 0b01100000,    //5
                                 0b10100000,    //6
                                 0b00100000,    //7
                                 0b11000000,    //8
                                 0b01000000,    //9
                             };

void HC595_write(unsigned char dig)             //функция записи данных в регистр 74HC595 (используя PORTD.0=DS, PORTD.1=SH_CP, PORTD.2=ST_CP)
{
    unsigned int i;
    for(i=0; i<7; i++)                          //цикл для последовательного вывода 8 бит данных из массива
    {
        PORTD.0=bin_digits[dig] & (1<<i);       //выводим "текущий бит" в линию DS
        PORTD.1=1;                              //выводим "0" в линию SH_CP
        PORTD.1=0;                              //выводим "1" в линию SH_CP - считываем бит на входе регистра (считывание происходит по переднему фронту импульса на SH_CP)
    }
    PORTD.2=1;                                  //выводим "1" в линию ST_CP - "защелкиваем данные" ("защелкивание" происходит по переднему фронту импульса на ST_CP)
    PORTD.2=0;                                  //выводим "0" в линию ST_CP
}

void main(void)
{
    DDRD=0xFF;                                  //конфигурируем порт "D" на вывод
    DDRC=0xFF;
    while(1)
    {
        for(dig=0; dig<10; dig++)                //цикл для чередования числел (0-9) записываемых в регистр 74HC595
        {
            PORTC=bin_digits[dig];              //подключаю К155ИД1 напрямую к порту C в обход регистра последовательного сдвига
            //HC595_write(dig);                   //функция записи данных в регистр 74HC595
            delay_ms(400);
        }
    }
}

PORTD.0=bin_digits[dig] & 1<<i;

PORTD.0=bin_digits[dig] & (1<<i) ? 1 : 0;