单片机蜂鸣程序 汇编

单片机蜂鸣程序 汇编 高手些帮我看看吧
在试验箱上只能一直发滴声，没有滴，滴，滴间隔的声音，哪里错了吗 谢谢各位了
悬赏分：30 - 解决时间：2009-12-21 00:19
==============================================
最佳答案：
;－－－－－－－－－－－－－－－－－－－
    ORG 0000H
START:
    JB    P1.0, $    ;p1.0作为开关 打开程序才能继续下去
    CALL DI             ;发音200ms
    CALL NO_DI      ;静音200ms
    CALL DI
    CALL NO_DI
    CALL DI
    CALL NO_DI
    SJMP STAR       ;继续从头执行程序
;－－－－－－－－－－－－－－－－－－－
DI:
    MOV R1,#100    ;发音200ms
D2:
    CLR P1.7
    CALL DEL       ;约1ms
    SETB P1.7
    CALL DEL       ;设置蜂鸣声音的频率高低
    DJNZ R1, D2
    RET
;－－－－－－－－－－－－－－－－－－－
NO_DI:
    MOV R1,#100    ;静音200ms
ND2:
;    CLR P1.7
    CALL DEL       ;约1ms
    SETB P1.7
    CALL DEL       ;设置蜂鸣声音的频率高低
    DJNZ R1, ND2
    RET
;－－－－－－－－－－－－－－－－－－－
DEL:               ;约1ms
    MOV R7, #5
    MOV R6, #100
    DJNZ R6, $
    DJNZ R7, $ - 4
    RET
;－－－－－－－－－－－－－－－－－－－
    END
==============================================
回答者：做而论道 - 十一级   2009-12-9 23:15
原题网址：http://zhidao.baidu.com/question/128730765.html