基于SPI總線單片機開關量的輸入程序設計

//該程序用于開關量的輸入，并顯示在與D口相連的LED上，S1~S8分別控制Q1~Q8
//開關量采用SPI方式通過74HC165輸入，在調試程序時必須把8位的
//拔碼開關拔向相應的位置，即把8個LED接到PORTD口上

#include"p18f458.h"
volatile unsigned char data;

/*系統(tǒng)初始化子程序*/
voidinitial()
{
PIR1=0;/*清除SSPIF標志*/
SSPCON1=0x30;/* SSPEN=1;CKP=0，F(xiàn)OSC/4 */
SSPSTAT=0xC0;
TRISC=0x10;/*SDI引腳為輸入，SCK引腳為輸出*/
TRISA=0x00;/*A口為輸出方式，用RA4作控制信號*/
TRISD=0x00;/*D口為輸出方式*/
INTCON=0x00;/*關閉所有中斷*/
}

/*SPI接收子程序*/
char SPIIN()
{
PORTAbits.RA4=0;/*74HC165并行置數使能，將8位開關量置入器件*/
/*(LOAD為低電平時8位并行數據置入74HC165)*/
PORTAbits.RA4=1;/*74HC165移位置數使能(LOAD為高電平時芯*/
/*片才能串行工作)*/
SSPBUF=0;/*啟動SPI，此操作只用于清除SSPSTAT的*/
/*BF位，因此W中的實際數據無關緊要*/
do{
;
}while(PIR1bits.SSPIF==0);/*查詢數據接收完畢否？*/
PIR1bits.SSPIF=0;/*清除SSPIF標志*/
data=SSPBUF;
return(data);/*返回接收到的數據*/
}

/*把SPI接收的數據通過D口顯示在8個發(fā)光二極管上的子程序*/
voidSPIOUT(char data)
{
PORTD=~data;/*因為LED與D口連接方式的要求，需把D口的*/
/*輸入量取反后才送出*/
}

/*pic單片機主程序*/
main( )
{
initial();/*系統(tǒng)初始化*/
while(1)
{
SPIIN();/*SPI接收外部數據*/
SPIOUT(data);/*送出數據顯示*/
}
}

------------------匯編語言版本的SPI總線單片機開關量的輸入程序設計------------------
;該程序用于開關量的輸入，并顯示在與D口相連的LED上，S1~S8分別控制Q1~Q8
;該代碼由http://www.51hei.com 單片機網調試并運行成功
;開關量采用SPI方式通過74HC165輸入，在調試程序時必須把8位的
;拔碼開關拔向相應的位置，即把8個LED接到PORTD口上

LISTP=18F458
INCLUDE"P18F458.INC"

ORG0X00
GOTOMAIN
ORG0X30
;*****************單片機初始化子程序*****************
INITIAL
BCFTRISA，4 ;置RA4為輸出方式，以輸出開關量輸入的鎖存信號
BSFTRISC，4;設置SDI引腳為輸入
BCFTRISC，3;設置SCK引腳為輸出
CLRF TRISD ;設置D口為輸出方式
BCFINTCON，GIE;關閉所有中斷
MOVLW0XC0
MOVWFSSPSTAT;設置SSPSTAT寄存器
MOVLW0X30
MOVWFSSPCON1;設置SPI的控制方式，允許SSP方式，
RETURN;返回
;*********該子程序將通過SPI方式接收外部的一組串行信號********
SPIIN
BCFPORTA，4 ;74HC165并行置數使能，將8位開關量置入器件
;(LOAD為低電平時8位并行數據置入74HC165)
NOP
NOP
BSFPORTA，4;74HC165移位使能(LOAD為高時芯片才能串行工作)
NOP
NOP
MOVWFSSPBUF;啟動SPI，此操作只用于清除SSPSTAT的BF位，因
;此W中的實際數據無關緊要
LOOP15BTFSSSSPSTAT，BF;查詢數據接收完畢否？
GOTOLOOP15
BCFPIR1，SSPIF;清SPI中斷標志
MOVF SSPBUF，0;SSPBUF中內容送W單元
RETURN;子程序返回
;****************************************
MAINNOP
CALLINITIAL ;初始化
LOOPCALLSPIIN;通過SPI方式把開關量存入W寄存器
XORLW0XFF;因為LED與D口連接方式的要求，需把D口的
;輸入量取反后才送出
MOVWFPORTD;送D口顯示在LED上
NOP
GOTOLOOP;反復輸入開關量
END