;一位計數器，按p3.2數碼管加1，到9后回0,同時小喇叭響一下報警，該程序是在一位計數器的基礎上改進過來的

;***************************************************************************
;*  sxj1974@163.com		     (51c51 test web)     www.8951.com     *
;*  Create by :石學軍      www.51c51.com 更多例程請登陸網站        	   *
;***************************************************************************

org 00h					;開始
jmp start;跳到主程序
org 0030h
start:mov 30h,#0ffh          		;30h送ff即-1
main:INC 30H
        mov a,30h
        setb p3.2                	;把鍵盤口送高電平
        mm: jnb p3.2,tt          	;如果p3.2按下則執行tt
ljmp mm                          	;如果沒有按下則反復監測鍵盤
tt:     MOV	DPTR,#TAB
        MOVC	A,@A+DPTR
	    CLR	P2.6		       ;開數碼管
	    MOV	P0,A		       ;送顯示
        lcall delay          		;延時一段時間
        cjne a,#60h,main     		;如果是最后一個數據重新開始
		  cjne a,#20h,BB   	;如果是數字9到小喇叭響的程序
        ljmp start   		   	;否則30H 清除
        ret
TAB:	DB 28H,7EH,0A2H,62H,74H,61H,21H,7AH,20H,60H	
					;數據表，0--9（如果反向排列則為倒計數
BB: 
mov r1,#255				;小喇叭響的次數
ppp:cpl p3.3				; 小喇叭響
call deL				;小喇叭響的速率
djnz r1,ppp				;小喇叭響255次。
jmp start
delay: mov r5,#20			;延時子程序1閃爍燈調用
d1:mov r6,#20
d2: mov r7,#255
djnz r7,$
djnz r6,d2
djnz r5,d1
ret
del:  			 		;延時子程序2小喇叭調用
mov r4,#255
djnz r4,$
ret
end