;串行口原理及應用	
;發送方
;單工
      ORG 0000H
	JMP MAIN
	ORG 0023H
	JMP CXZD
MAIN: MOV SP,#70H          ;抬高棧的位置
	MOV IE, #90H          ;打開串行口中斷
	MOV SCON,#80H     ;采用方式二串行通信
FASONG:MOV A,P1
	MOV SBUF,A     ;把要發送的數放到sbuf
     SJMP $
CXZD: CLR TI                     ;將發送中斷標志清零
         MOV A,P1
         MOV SBUF,A
         RETI
     	 END