14laba.asm

单片机的程序

;小喇叭警报器试验,烧写后P3.3喇叭输出报警声音
;********************************************************************************
;*  日期:  2007-3-25                                                            *
;*  版本:  3.0                                                                  *
;*  作者:  深圳学林电子有限公司     专业8051单片机教学站                        *
;*  邮箱: [e-mail]                                                       *
;*  网站： http://www.51c51.com     http://www.8951.com    更多例程请登陆网站   *
;********************************************************************************
;*  硬件：此程序在本公司xlisp系列单片机实验仪运行通过                           *
;********************************************************************************
;* 【版权】 Copyright(C)深圳学林电子有限公司 www.51c51.com  All Rights Reserved *
;* 【声明】 此程序仅用于学习与参考，引用请注明版权和作者信息！                  *
;********************************************************************************
dlv: 	mov r2,#08h		;1kz持续时间
dlv1:	mov r3,#0fah
dlv2:	cpl p3.3		;输出1khz方波
    	lcall d5ms		;调用延时程序1
    	djnz r3,dlv2		;持续1秒
    	djnz r2,dlv1
    	mov r2,#10h		;2khz持续时间
dlv3:	mov r3,#0fah
dlv4:	cpl p3.3		;输出2khz方波
    	lcall d25ms		;调用延时程序2
    	djnz r3,dlv4
    	djnz r2,dlv3
    	sjmp dlv		;反复循环
d5ms:	mov r7,#0ffh		;延时子程序1
loop:	nop
    	nop
    	djnz r7,loop
    	ret
d25ms:	mov r6,#0ffh		;延时子程序2
	lin:djnz r6,lin
    	ret
    	end