;******************************************************************************
;*标题: 东哥单片机学习网 http://www.picavr.com
;*文件: 单片机串口驱动74LS164
;*版本: 1.0
;*作者: 东哥开发网 - 东哥
;*邮箱: picavr@163.com
;*****************************************************************************
//-------------------------------------库函数声明，管脚定义--------------
#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;
}