;P3.3警报器。
;***************************************************************************
;* (程序转载请著明出处 ，未声明可适应本站腾龙/isp开发套件/倚天版开发套件      *
;*  E-mail:sxj1974@163.com (51c51 test web)  51单片机学习网，自学单片机的网站            *
;* Create by :石学军 www.51c51.com   www.8951.com 更多例程请登陆网站                 *
;***************************************************************************
org 00h
ajmp dlv
org 0030h
dlv: mov r2,#08h ;赋循环初值
dlv1: mov r3,#0fah
dlv2: cpl p3.3 ;产生脉冲
lcall d5ms ;延时
djnz r3,dlv2
djnz r2,dlv1
mov r2,#10h ;改变循环初值
dlv3: mov r3,#0fah
dlv4: cpl p3.3
lcall d25ms
djnz r3,dlv4
djnz r2,dlv3
sjmp dlv
d5ms: mov r7,#0ffh ;延时5MS
loop:nop
nop
djnz r7,loop
ret
d25ms: mov r6,#0ffh
lin:djnz r6,lin ;延时2.5MS
ret
end