报警器发生

基于51单片机蜂鸣器，设计的报警声音，来学习51单片机

/*------------------------------------------------
              蜂鸣器模仿报警声
    作者: 党R
      QQ: 806899919
  工作于：光汇开发板
--------------------------------------------------*/
#include 
#include 
sbit	SPK = P2^7;
unsigned char frq; 
unsigned int flag;			
void delayms（unsigned char ms）;
void main（）
{
	TMOD = 0x01;
	frq = 0x00;
	TH0 = 0x00;
	TL0 = 0xff;	
	TR0 = 1;
	IE = 0x82;
	flag=0;
	while（1）
	{
		switch（flag）
		{	case 0:frq++;break;			 //flag标志置0时frq递增
			case 1:frq--;break;			 //flag标志置1时frq递减
		}
		if （!（frq^0xff）） flag=1;		 //当frq增加到FFH时flag置1准备frq递减	
		if （!（frq^0x00）） flag=0;		 //当frq递减到00H时flag置0准备frq递增
		delayms（15）;	
	}
}		
void timer0（） interrupt 1 using 1
{
	TH0 = 0xfe;
	TL0 = frq;
	SPK = ~SPK;	
}

void delayms（unsigned char ms）	
// 延时子程序
{						
	unsigned char i;
	while（ms--）
	{
		for（i = 0; i < 120; i++）;
	}
}

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     目录           0  2014-04-10 21:57  25 蜂鸣器模仿报警声\
     文件        1014  2013-04-20 12:59  25 蜂鸣器模仿报警声\蜂鸣器模仿报警声
     文件        2897  2013-04-20 12:59  25 蜂鸣器模仿报警声\蜂鸣器模仿报警声.LST
     文件        4122  2013-04-20 12:59  25 蜂鸣器模仿报警声\蜂鸣器模仿报警声.M51
     文件        1328  2013-04-20 12:59  25 蜂鸣器模仿报警声\蜂鸣器模仿报警声.OBJ
     文件        1027  2014-04-10 21:57  25 蜂鸣器模仿报警声\蜂鸣器模仿报警声.Opt
     文件        2136  2014-04-10 21:57  25 蜂鸣器模仿报警声\蜂鸣器模仿报警声.Uv2
     文件         960  2013-04-20 12:59  25 蜂鸣器模仿报警声\蜂鸣器模仿报警声.c
     文件         372  2013-04-20 12:59  25 蜂鸣器模仿报警声\蜂鸣器模仿报警声.hex
     文件          64  2013-04-20 12:59  25 蜂鸣器模仿报警声\蜂鸣器模仿报警声.lnp
     文件         218  2014-04-10 21:57  25 蜂鸣器模仿报警声\蜂鸣器模仿报警声.plg
     文件        7305  2012-06-30 21:12  25 蜂鸣器模仿报警声\蜂鸣器模仿报警声.rar
     文件         980  2013-04-20 12:59  25 蜂鸣器模仿报警声\蜂鸣器模仿报警声_Opt.Bak
     文件        1698  2012-06-30 21:12  25 蜂鸣器模仿报警声\蜂鸣器模仿报警声_Uv2.Bak
     文件        9216  2013-04-20 13:01  25 蜂鸣器模仿报警声\连线指南.doc