第六章串口通信例题程序部分.ppt

1、ORG 0000H LJMP main ORG 0030H main: MOV SCON, #00H MOV A, #80H CLR P1.1 OUT0: MOV SBUF, A OUT1: JNB TI, OUT1 CLR TI SETB P1.1 LCALL delay RR A CLRP1.1 SJMP OUT0 delay: END,流水灯程序,ORG 0000H LJMP main ORG 0023H LJMP SEND ORG 0030H main:MOV TMOD, #20H MOV SCON, #50H MOV TH1, #0FDH MOV TL1, #0FDH SETB EA

2、 SETB ES SETB TR1,点对点通信 单片机1程序,INT:MOV SBUF, #55H MOV R1, #0FFH LOOP:NOP DJNZ R1, LOOP JNB F0, INT MOV R0, #30H MOV SBUF, R0 SJMP $,SEND:JB F0, LAB1 MOV A, SBUF CJNE A, #55H, LAB0 SETB F0 LAB0: CLR RI RETI LAB1:MOV SBUF, R0 INC R0 CJNE R0, #35H，LAB2 CLR ES LAB2:CLR TI RETI END,ORG 0000H LJMP main OR

3、G 0023H LJMP INPUT ORG 0030H main:MOV TMOD, #20H MOV SCON, #50H MOV TH1, #0FDH MOV TL1, #0FDH MOV R0, #50H SETB EA SETB ES SETB TR1 SJMP $,点对点通信 单片机2程序,INPUT:JB F0, LAB1 MOV A, SBUF CJNE A, #55H, LAB0 SETB F0 MOV SBUF, #55H LAB0: CLR RI RETI LAB1:MOV R0 , SBUF INC R0 CJNE R0, #55H，LAB2 CLR ES LAB2:C

4、LR RI RETI END,ORG 0000H LJMP main ORG 0023H LJMP SEND ORG 0030H main:MOV TMOD, #20H MOV SCON, #0F8H MOV TH1, #0FDH MOV TL1, #0FDH SETB EA SETB ES SETB TR1,主机通信程序,INT:MOV SBUF, #02H MOV R0, #40H SJMP $ SEND:CLR TB8 MOV SBUF, R0 INC R0 CJNE R0, #44H, LAB CLR ES LAB:CLR TI RETI END,ORG 0000H LJMP main ORG 0023H LJMP INPUT NAME EQU #2 ORG 0030H main:MOV TMOD, #20H MOV SCON, #0F8H MOV TH1, #0FDH MOV TL1, #0FDH MOV R0, #50H SETB EA SETB ES SETB TR1 SJMP $,从机2通信程序,INPUT:JNB RB8, LAB1 MOV A, SBUF CJNE A, NAME, LAB0 CLR SM2 LAB0: CLR RI RETI LAB1:M