wl002.c

来自「周立功的51单片机试验例程,我当年就是靠这个学会单片机的」· C语言 代码 · 共 59 行

/*******************************************************************************
*                                                                              *
*    File       : wl002.c                                                      *
*    Date       : 2004-1-5                                                     *
*    Version    : 1.0                                                          *
*                                                                              *
*    Author     : Freeman          [e-mail]                          *
*    Company    : Willar           www.willar.com                              *
*                                                                              *
********************************************************************************
*    Descriptoon:                                                              *
*                报警声程序                                                    *
*                                                                              *
*                                                                              *
*                                                                              *
*                                                                              *
*                                                                              *
*******************************************************************************/
#include <reg51.h>
#include <intrins.h>

sbit	SPK = P3^7;

unsigned char frq; 

void delayms(unsigned char ms);

main()
{
	TMOD = 0x01;
	frq = 0x00;
	TH0 = 0x00;
	TL0 = 0xff;	
	TR0 = 1;
	IE = 0x82;
	
	while(1)
	{
		frq++;
		delayms(1);
	}
}

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++);
	}
}