;參考程序C: 文件名：WRS485T.ASM發送ASCII碼<abcd>.LCD顯示:T>abcd
;實驗儀通過UART1實現RS-485通信，運行前應將TX1和P00 短 接，RX1和P01短接.
$include (c8051f020.inc)          ;SFR declarations
SYSCLK		EQU	11059200   ; SYSCLK frequency in Hz
BAUDRATE	EQU     9600       ;Baud rate of UART in bps
BUZ		EQU		P3.5
P32		EQU		P3.2 ;接收/發送控制
TIMER1		EQU		SYSCLK/BAUDRATE/16
ReceiveBit	EQU		20H.0
        ORG		0
	AJMP	main
	ORG	0100H
main:
	MOV	WDTCN,#0deH	;關看門狗
	MOV	WDTCN,#0adH
	CLR	ReceiveBit
	LCALL	SYSCLK_Init	;初始化晶體
	LCALL	PORT_Init	;初始化交叉開關和I/O口
	LCALL	UART1_Init	;初始化UART0
	SETB	P32		    ;發送模式
  MOV  	P7,#54H     ;顯示T>
	MOV  	P6,#0CH
	MOV  	P6,#0DH
	LCALL	Delay
	MOV  	P7,#3EH
	MOV  	P6,#0CH
	MOV  	P6,#0DH
	LCALL	Delay
	MOV	SBUF1,#61H  ;發送字符a
TINT:
	MOV	A,SCON1
	ANL	A,#02H
	CJNE	A,#02H,TINT	;送中斷模式是否產生
	MOV	A,SCON1
	ANL	A,#0FDH
	MOV	SCON1,A		;清發送中斷標志
    MOV  	P7,#61H   ;顯示發送的字符a
	MOV  	P6,#0CH
	MOV  	P6,#0DH
	LCALL	Delay		;延時
	MOV	SBUF1,#62H  ;發送字符b
TINT1:
	MOV	A,SCON1
	ANL	A,#02H
	CJNE	A,#02H,TINT1	;送中斷模式是否產生
	MOV	A,SCON1
	ANL	A,#0FDH
	MOV	SCON1,A		;清發送中斷標志
  MOV  	P7,#62H   ;顯示發送的字符b
	MOV  	P6,#0CH
	MOV  	P6,#0DH
	LCALL	Delay		;延時
MOV	SBUF1,#63H  ;發送字符c
TINT2:
	MOV	A,SCON1
	ANL	A,#02H
	CJNE	A,#02H,TINT2	;送中斷模式是否產生
	MOV	A,SCON1
	ANL	A,#0FDH
	MOV	SCON1,A		;清發送中斷標志
  MOV  	P7,#63H   ;顯示發送的字符c
	MOV  	P6,#0CH
	MOV  	P6,#0DH
	LCALL	Delay		;延時
MOV	SBUF1,#64H  ;發送字符d
TINT3:
	MOV	A,SCON1
	ANL	A,#02H
	CJNE	A,#02H,TINT3	;送中斷模式是否產生
	MOV	A,SCON1
	ANL	A,#0FDH
	MOV	SCON1,A		;清發送中斷標志
  MOV  	P7,#64H   ;顯示發送的字符d
	MOV  	P6,#0CH
	MOV  	P6,#0DH
	LCALL	Delay		;延時
  sjmp $
	RET
;使能外部11.0592MHz晶體作為系統時鐘
SYSCLK_Init:
	MOV   OSCXCN, #67h            ;使能外部晶體
        CLR   A                       ;等待最少1ms 
        DJNZ  acc, $                  ;等待512us
        DJNZ  acc, $                  ;等待512us
osc_wait:                             ;查詢XTLVLD-->1
        MOV   a, OSCXCN
        JNB   acc.7, osc_wait
        ORL   OSCICN, #08h            ;選擇外部晶體作為系統時鐘 
        RET
;初始化I/O口
PORT_Init:
	ORL	XBR2,#44H	;使能UART1,交叉開關和弱上拉 
	ORL	P0MDOUT,#01H	;使能TX1作為推挽輸出
	ORL	P1MDOUT,#40H	;使能LED作為推挽輸出
	ORL	P3MDOUT,#0dfH
	RET
UART1_Init:
	MOV	SCON1,#50H	;SCON1: 模式1, 8位UART,使能RX
	MOV	TMOD,#20H	;TMOD: 定時器1, 模式2, 8位重載
        MOV	TH1,#0B8H	;設置作為波特率定時器1的重載值
				              ;TH1=256-11059200/9600/16=256-72=184=0B8H
	SETB	TR1		;開定定時器1
	ORL	CKCON,#10H	;定時器1用系統時鐘作為時基
	ORL	PCON,#10H	;SMOD1 = 1
	RET

;延時子程序
Delay:  MOV   R7, #08h			
Delay1: MOV   R6, #80h
Delay0: MOV   R5, #00h
        DJNZ  R5, $
        DJNZ  R6, Delay0
        DJNZ  R7, Delay1
	RET
	END