单片机实训之蜂鸣器响由刀豆文库小编整理，希望给你工作、学习、生活带来方便，猜你可能喜欢“蜂鸣器实训报告心得”。
BEEP:
SETB P2.3;关喇叭
ACALLDELAY1;调用延时1
CLR P2.3;开喇叭
ACALLDELAY2
SETB P2.3
ACALLDELAY1
CLR P2.3
ACALLDELAY2
SETB P2.3
ACALLDELAY1
CLR P2.3
ACALLDELAY4
SETB P2.3
ACALL DELAY3
CLR P2.3
ACALLDELAY4
SETB P2.3
ACALLDELAY3
SJMP BEEP;跳转到BEEP
RET
DELAY1: MOV R1,#0AAH;延时子程序1
LP1: MOV R2,#0AAH
LP2: DJNZ R2,LP2
DJNZ R1,LP1
RET
DELAY2: MOV R1,#0EAH;延时子程序2LP3: MOV R2,#0EAH
LP4: DJNZ R2,LP4
DJNZ R1,LP3
RET
DELAY3: MOV R1,#07FH;延时子程序3LP5: MOV R2,#07FH
LP6: DJNZ R2,LP6
DJNZ R1,LP5
RET
延时 延时ms 延时ms
DELAY4:MOV R1,#082H;延时子程序4延时ms LP7: MOV R2,#082H
LP8: DJNZ R2,LP8
DJNZ R1,LP7
RET
