0-9的秒表.txt

关于单片机中流水线处理,红绿灯转化等实验

	VAR_NUM		EQU	30H
	VAR_TIMER	EQU	31H

	org	0000H
	jmp	MAIN
;***********************************************
	org	0030H

MAIN:
	mov	p0,#0FFH
	mov	p1,#0FFH
	mov	p2,#0FFH
	mov	P3,#0FFH

	mov	VAR_NUM,#00H
	mov	VAR_TIMER,#00H

	mov	TMOD,#01H
	mov	TH0,#0B1H	;20ms,load number
	mov	TL0,#0E0H
	setb	TR0	;start T0

DISP_LOOP:
	mov	a,VAR_NUM	;get the value display
	mov	dptr,#TABLE
	movc	a,@a+dptr
	mov	p0,a		;display the number
	mov	p2,#11110111B

	call	DELAY

	mov	a,VAR_NUM
	inc	VAR_NUM
	cjne	a,#09,DISP_LOOP

	jmp	$

	ret
;***************************************************
DELAY:

DELAY_WAIT:
	jnb	TF0,$
	clr	TF0	;clear the tag of number
	mov	TH0,#0B1H
	mov	TL0,#0E0H

	inc	VAR_TIMER
	mov	a,VAR_TIMER
	cjne	a,#50,DELAY_WAIT
	mov	VAR_TIMER,#00H

	ret
;******************************************************
TABLE: DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H
;**********************************************************
	END