gai3.txt

本设计是在车辆通行繁忙的十字交叉路口设置的灯火控制系统

Z8279	EQU	0FF82H
D8279	EQU	0FF80H
LEDMOD	EQU	00H
LEDFEQ	EQU	2FH
LEDCLS	EQU	0C1H
LEDWR0	EQU	80H
READKB  EQU     40H
INIT8279:
	MOV	DPTR,#Z8279
	MOV	A,#LEDMOD
	MOVX	@DPTR,A
	MOV	A,#LEDFEQ
	MOVX	@DPTR,A
	MOV	A,#LEDCLS
	MOVX	@DPTR,A
	LCALL	DELAY
	RET
DISLED:
	PUSH	DPH
	PUSH	DPL
	PUSH	ACC
	MOV	A,#LEDWR0
	ADD	A,R4
	MOV	DPTR,#Z8279
	MOVX	@DPTR,A
	MOV	DPTR,#LEDSEG
	MOV	A,R5
	MOVC	A,@A+DPTR
	MOV	DPTR,#D8279
	MOVX	@DPTR,A
	POP	ACC
	POP	DPL
	POP	DPH
	RET
DELAY:
	PUSH	0
	PUSH	1
       PUSH     2
DELAY1:	MOV	1,#0H
DELAY2:MOV 0,#0B2H
	DJNZ	0,$
	DJNZ	1,DELAY2
        DJNZ    2,DELAY1  
        POP     2
	POP	1
	POP	0
	RET
DISPLAY:
	MOV R5,12H
	MOV R4,15H
	LCALL DISLED
	MOV R5,13H
	MOV R4,14H
	LCALL DISLED
	MOV R2,#10
	LCALL DELAY
	RET
LC:	MOV A, 11H
	MOV B,#0AH
	DIV AB
	MOV 12H,A
	MOV 13H,B
	RET
ERROR:	MOV R5,#10H
	MOV R4,#05H
	LCALL DISLED
	MOV R5,#11H
	MOV R4,#04H
	LCALL DISLED
	MOV R5,#12H
	MOV R4,#03H
	LCALL DISLED
	MOV R5,#13H
	MOV R4,#02H
	LCALL DISLED
	RET
LEDSEG: DB  3FH,06H,5BH,4FH,66H,6DH,7DH,07H;'0,1,2,3,4,5,6,7,'
        DB  7FH,6FH,77H,7CH,39H,5EH,79H,71H;'8,9,A,B,C,D,E,F,'
	DB  73H,40H,40H,73H;'P,-,-,P,'
	END