;///////////////////////////////////////////
;本程序源代碼由單片機培訓網提供.
;單片機培訓網,讓更多人學習單片機更容易.
;第一網址----www.mcuedu.com
;第二網址----http://51_train.nease.net
;創辦人------劉永忠
;熱線電話----(0755)27529998
;email-------aa815@163.com
;程序難易等級--------稍難
;99秒馬表
;///////////////////////////////////////////
         org        00h
start:   anl        p2,#00h       ;顯示00
         jb         p3.5,$        ;t1=0?有鍵按下?
         call       delay1        ;消除抖動
         jnb        p3.5,$        ;t1=1?放開?
         mov        r0,#00        ;計時指針初值
l1:      mov        a,r0          ;計時指針載入acc
         mov        p2,a          ;輸出至p2顯示
         mov        r5,#10        ;延時1秒
a1:      mov        r6,#200
         call       delay
         djnz       r5,a1
         mov        a,r0          ;計時指針加1
         add        a,#01h        
         da         a             ;做十時位調整
         mov        r0,a          ;存回計時指針寄存器
         jmp        l1            ;重復計時
l2:      call       delay1        ;第2次按消除抖動
         jb         p3.5,l3       ;放開了?是則跳至l3停止計時
         jmp        l2
l3:      jb         p3.5,$        ;第3次按t1?
         call       delay1        ;消除抖動
l4:      jb         p3.5,start    ;放開了?是則跳至start歸零
         jmp        l4
delay:
d1:      mov        r7,#248       ;0.5毫秒
         jnb        p3.5,l2       ;第2次按t1?
         djnz       r7,$
         djnz       r6,d1
         ret
delay1:  mov        r6,#60        ;30毫秒
d2L:     mov        r7,#248
         djnz       r7,$
         djnz       r6,d2
         ret
         end