单片机双机通讯(汇编).docVIP

甲机程序 RS BIT P3.5 ;RS为寄存器选择 RW BIT P3.4 ;RW为读写信号线 E BIT P3.3 ;E端为使能端 ORG 0H AJMP MAIN ORG 30H MAIN: ACALL INIT_SCREEN ACALL INITIME ; ACALL READTAB ACALL READ ; ACALL SEND SJMP $ READ: MOV A,#00H MOV R7,#15 RED: MOV SBUF,A PUSH A CJNE A,#10,NEXT NEXT:JB CY,NEXT1 ADD A,#7 NEXT1: ADD A,#30H ; ORL A,#30H ACALL WR_DATA POP A JNB TI,$ CLR TI INC A DJNZ R7,RED JMP READ READTAB: PUSH A MOV R7,#16 MOV R0,#60H MOV R6,#0 MOV DPTR,#TAB RREAD: MOV A,R6 MOVC A,@A+DPTR MOV @R0,A INC R6 INC R0 DJNZ R7,RREAD POP A RET INITIME: MOV TMOD,#20H ;T1初始化 MOV TH1,#0FAH MOV TL1,#0FAH SETB TR1 MOV SCON,#0C0H ;串行口初始化 MOV PCON,#0H ;SMOD=0 RET SEND: MOV R0,#60H MOV R7,#15 TRS: MOV A,@R0 MOV C,P MOV TB8,C MOV SBUF,A ACALL WR_DATA WAIT: JNB TI,$ CLR TI INC R0 DJNZ R7,TRS RET ;*********************************************************************** ; 初始化屏幕子程序 ;*********************************************************************** INIT_SCREEN: MOV P0,#01H ;清屏并光标复位 LCALL WR_CODE ;调用写入命令子程序 MOV P0,#02H ;光标返回 LCALL WR_CODE ;调用写入命令子程序 MOV P0,#038H ;5x7的点阵字符 LCALL WR_CODE ;调用写入命令子程序 MOV P0,#06H; ；输入方式,光标随字符右移 LCALL WR_CODE ;调用写入命令子程序 MOV P0,#0FH ;开显示，光标闪烁 LCALL WR_CODE ;调用写入命令子程序 RET ;;*********************************************************************** ; 写数据子程序 ;*********************************************************************** WR_DATA: MOV P0,A SETB RS ;RS=1 CLR RW ;RW=0 ;准备写入数据 CLR E ;E=0 ;执行显示命令 LCALL BUSY ;判断液晶模块是否忙? SETB E ;E=1 ;显示完成,程序停车 RET ;*********************************************************************** ; 写命令