list    p=16F877A
    #include    <p16F877A.inc>
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
cycle_1    equ    0x20
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;Prepare;;;;;;;;;;;;;;;;;;;;
    clrf    PORTA
    clrf    PORTC
    clrf    PORTD
    bcf    STATUS,RP0    
       movlw    0x00
    movwf    INTCON
    movlw    b'11010011'
    movwf    PORTC
    movlw    b'00000100'
    movwf    PORTD
    movlw    b'11111110'
    movwf    PORTA
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;Initial;;;;;;;;;;;;;;;;;;;
SPI_Initial
    bsf    STATUS,RP0    
    bsf TRISC,3
    bsf    TRISC,5
    bcf TRISC,2          ;;cs low
    bcf    SSPSTAT,SMP    
    bcf    SSPSTAT,CKE         
    bcf    STATUS,RP0       ;; 0
    bcf    SSPCON,0       ;ведущий режим SPI,
    bcf SSPCON,1       ;тактовый сигнал
    bcf    SSPCON,2       ; =Focs/4
    bcf SSPCON,3
    bsf SSPCON,4
    bsf SSPCON,5

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;Power cycle;;;;;;;;;;;;;;
    bsf    STATUS,RP0
    bsf TRISC,2          ;;cs high
    bcf    STATUS,RP0    

loop
    movlw    0xFF
    movwf    SSPBUF
    goto    loop
    end

   ANSEL=   0b00000000;    // все выводы как цифровые
   ANSELH=  0b00000000;    // все выводы как цифровые
   CM1CON0= 0b00000000;    // отключаем компаратор
   CM2CON0= 0b00000000;    
   ADCON0=  0b00000000;    // отключаем АЦП

   TRISA= 0b00001000;  
   TRISB= 0b00010000;   // RB6= SCK RB4= SDI/SDA
   TRISC= 0b00000000;   // RC7= SDO RC6= SS
   RC6=   1;

   GIE=   1;  
   PEIE=  1;  
   SSPIE= 1;
  
   IRCF0= 1;  // 111 = 8MHz
   IRCF1= 1;  
   IRCF2= 1;

   SMP= 0;
   CKE= 1;
   CKP=   1;  
   SSPM0= 0;   // 0000 = SPI Master mode, clock = FOSC/4
   SSPM1= 0;  
   SSPM2= 0;
   SSPM3= 0;
   SSPEN= 1;

char SPI_RW(char DATA_OUT)   // вывод в SPI
{  
    SSPBUF= DATA_OUT;
    while (!SPI_FLAG);
    SPI_FLAG = 0;
    return SSPBUF;
}

void interrupt isr(void)  
{
   if ((SSPIE) && (SSPIF))
   {
        SPI_FLAG= 1;
        SSPIF= 0;
   }
}