ex5115.asm

启东计算机厂实验程序

;系统晶振是 6.0 MHz

	ORG	0000H
START:
	MOV	SP,#60H
	mov	A,#02H
	MOV	R0,#79H
	MOV	@R0,A
	INC	R0
	MOV	A,#10H
	MOV	@R0,A
	INC	R0
	MOV	A,#01H
	MOV	@R0,A
	INC	R0
	MOV	A,#03H
	MOV	@R0,A
	INC	R0
	MOV	A,#00H
	MOV	@R0,A
	INC	R0
	MOV	A,#08H
	MOV	@R0,A
	MOV	A,#7EH
	MOV	DPTR,#1FFFH
	MOVX	@DPTR,A
        MOV     87H,#80H
	MOV	SCON,#50H	;串口 方式 1
	MOV	TMOD,#20H	;T1 方式 2
	MOV	TL1,#0F3H       ;波特率2400 的常数
	MOV	TH1,#0F3H
	SETB	TR1		;开中断
	CLR	ET1
	CLR	ES
WAIT:
	JBC	RI,DIS_REC	;是否接收到数据
	LCALL	DISP		;
	SJMP	WAIT		;
DIS_REC:
	MOV	A,SBUF		;读串口接收到的数据
	LCALL	DATAKEY 	;显示输入的数字(0-F)
	DB 79H,7EH
	AJMP	WAIT

DATAKEY:MOV R4,A
	MOV DPTR,#1FFFH
	MOVX A,@DPTR
	MOV R1,A
	MOV A,R4
	MOV @R1,A
	CLR A
	POP 83H
	POP 82H
	MOVC A,@A+DPTR
	INC DPTR
	CJNE A,01H,DATAKEY2
	DEC R1
	CLR A
	MOVC A,@A+DPTR
DATAKEY1:PUSH 82H
	 PUSH 83H
	 MOV DPTR,#1FFFH
	 MOVX @DPTR,A
	 POP 83H
	 POP 82H
	 INC DPTR
	 PUSH 82H
	 PUSH 83H
	 RET
DATAKEY2:DEC R1
	 MOV A,R1
	 SJMP DATAKEY1

DISP:	SETB 0D4H
	MOV R1,#7EH
	MOV R2,#20H
	MOV R3,#00H
DISP1:
	MOV DPTR,#DATACO
	MOV A,@R1
	MOVC A,@A+DPTR
	MOV DPTR,#0FF22H
	MOVX @DPTR,A
        MOV DPTR,#0FF21H
	MOV A,R2
	MOVX @DPTR,A
        LCALL DELAY
	DEC R1
	CLR C
	MOV A,R2
	RRC A
	MOV R2,A
	JNZ DISP1
 	CLR 0D4H
	RET
DELAY:	MOV R7,#03H
DELAY0: MOV R6,#0FFH
DELAY1: DJNZ R6,DELAY1
        DJNZ R7,DELAY0
        RET
DATACO: DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H
	DB 88H,83H,0C6H,0A1H,86H,8EH,0BFH,0CH,89H,0DEH
	END