MOVLW 0x00 MOVWF SSPSTAT MOVLW 0x22 MOVWF SSPCON1 CLRF TRISC BSF TRISC,SDI BSF PORTC,RC2 CALL SDELAY MOVLW 0x8F CALL SPI MOVLW 0x00 CALL SPI BCF PORTC,RC2 CALL SDELAY BSF PORTC,RC2 MOVLW 0x80 CALL SPI MOVLW 0x55 CALL SPI MOVLW 0x58 CALL SPI MOVLW 0x16 CALL SPI BCF PORTC,RC2 SPI MOVWF SSPBUF WAIT BTFSS SSPSTAT,BF BRA WAIT MOVF SSPBUF,W RETURN END