//-------------------------------------庫函數聲明，管腳定義--------------------------------------------
#include <reg52.h>
sbit   CLR=P1^7;		    //用P1^7控制CLR
//-------------------------------------------------------------------------------------------------------
//  函數名稱：UART_init()
//  功能說明：串口初始化，設定串口工作在方式0
//--------------------------------------------------------------------------------------------------------
void UART_init(void)
{
SCON =0x00；              //沒串行口方式0，允許發送，啟動發送過程
ES=0；                    // 禁止串口中斷 
}
//-------------------------------------------------------------------------------------------------------
//  函數名稱：PA_out()
//  輸入參數：PA_data，需要從74LS164并行口輸出的數據
//  輸出參數：無
//  功能說明：發送八位串行數據至并口
//--------------------------------------------------------------------------------------------------------
void  PA_out(unsigned char)
{CLR =0;                    //并口輸出清零
CLR =1;                     //開始串行移位
UART_init();                //74LS165工作在時鐘控制下的串行移位狀態
While(TI＝＝0);             //循環等待
TI＝0;
SBUF＝PA_data;
}