资源描述:
《单片机双机通讯(汇编).doc》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库。
1、甲机程序RSBITP3.5;RS为寄存器选择RWBITP3.4;RW为读写信号线EBITP3.3;E端为使能端ORG0HAJMPMAINORG30HMAIN:ACALLINIT_SCREENACALLINITIME;ACALLREADTABACALLREAD;ACALLSENDSJMP$READ:MOVA,#00HMOVR7,#15RED:MOVSBUF,APUSHACJNEA,#10,NEXTNEXT:JBCY,NEXT1ADDA,#7NEXT1:ADDA,#30H;ORLA,#30HACALLWR_DATAPOPAJNBTI,$CLRTIINCADJNZR
2、7,REDJMPREADREADTAB:PUSHAMOVR7,#16MOVR0,#60HMOVR6,#0MOVDPTR,#TABRREAD:MOVA,R6MOVCA,@A+DPTRMOV@R0,AINCR6INCR0DJNZR7,RREADPOPARETINITIME:MOVTMOD,#20H;T1初始化MOVTH1,#0FAHMOVTL1,#0FAHSETBTR1MOVSCON,#0C0H;串行口初始化MOVPCON,#0H;SMOD=0RETSEND:MOVR0,#60HMOVR7,#15TRS:MOVA,@R0MOVC,PMOVTB8,CMOVSBUF,
3、AACALLWR_DATAWAIT:JNBTI,$CLRTIINCR0DJNZR7,TRSRET;***********************************************************************;初始化屏幕子程序;***********************************************************************INIT_SCREEN:MOVP0,#01H;清屏并光标复位LCALLWR_CODE;调用写入命令子程序MOVP0,#02H;光标返回LCALLWR_CODE;调用
4、写入命令子程序MOVP0,#038H;5x7的点阵字符LCALLWR_CODE;调用写入命令子程序MOVP0,#06H;;输入方式,光标随字符右移LCALLWR_CODE;调用写入命令子程序MOVP0,#0FH;开显示,光标闪烁LCALLWR_CODE;调用写入命令子程序RET;;***********************************************************************;写数据子程序;***************************************************************
5、********WR_DATA:MOVP0,ASETBRS;RS=1CLRRW;RW=0;准备写入数据CLRE;E=0;执行显示命令LCALLBUSY;判断液晶模块是否忙?SETBE;E=1;显示完成,程序停车RET;***********************************************************************;写命令子程序;***********************************************************************WR_CODE:CLRRS;写入控制命令的子程序
6、CLRRWCLRELCALLBUSYSETBERET;***********************************************************************;判断忙碌子程序;***********************************************************************BUSY:MOVP0,#0FFH;判断液晶显示器是否忙的子程序CLRRSSETBRWCLRENOPSETBEJBP0.7,BUSY;如果P1.7为高电平表示忙就循环等待RETTAB:DB"0123456789A
7、BCDEF"END乙机程序RSBITP3.5;RS为寄存器选择RWBITP3.4;RW为读写信号线EBITP3.3;E端为使能端ORG0HAJMPMAINORG30HMAIN:ACALLINIT_SCREENACALLINITIME;ACALLRPTACALLMYSJMP$INITIME:MOVTMOD,#20H;T1初始化MOVTH1,#0FAHMOVTL1,#0FAHSETBTR1MOVSCON,#0C0H;串行口初始化MOVPCON,#00H;SMOD=0RETRPT:MOVR0,#60HMOVR7,#15SETBRENWAIT:JNBRI,$CLRRI
8、MOVA,SBUFMOVP1,AACA