PIC单片机控制风扇马达

用PIC单片机控制风扇马达，一个晶闸管控制，可以输出三档，

#include
#define uchar unsigned char
#define uint unsigned int 
__CONFIG（0x3B31）;
void delay（uint x）;
void init（）;

void main（）
{
	init（）;
	while（1）
	{
		if（RB0==0）
		{
			delay（1）;
			RC0=1;
			delay（1）;
			RC0=0;
		}
	}
}

void init（）
{
	TRISB=0xff;
	TRISC=0;
	RC0=0;	
}

void delay（uint x）
{
	uint ab;
	for（a=x;a>0;a--）
		for（b=11;b>0;b--）;
}

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     目录           0  2010-09-21 14:38  Dian ji tiao su\
     文件         389  2010-09-09 23:26  Dian ji tiao su\Dian ji tiao su-2.c
     文件         908  2010-09-13 21:49  Dian ji tiao su\Dian ji tiao su-2.lst
     文件       10096  2010-09-13 21:49  Dian ji tiao su\Dian ji tiao su-2.sdb
     文件         515  2010-09-09 18:36  Dian ji tiao su\Dian ji tiao su-3.c
     文件        1644  2010-09-09 18:36  Dian ji tiao su\Dian ji tiao su-3.lst
     文件       10053  2010-09-09 18:36  Dian ji tiao su\Dian ji tiao su-3.sdb
     文件         985  2010-09-21 14:17  Dian ji tiao su\Dian ji tiao su-4.c
     文件           0  2010-09-21 14:24  Dian ji tiao su\Dian ji tiao su-4.cce
     文件        2517  2010-09-21 14:24  Dian ji tiao su\Dian ji tiao su-4.lst
     文件        3313  2010-09-21 14:24  Dian ji tiao su\Dian ji tiao su-4.obj
     文件       10373  2010-09-21 14:24  Dian ji tiao su\Dian ji tiao su-4.sdb
     文件         766  2010-09-14 22:07  Dian ji tiao su\Dian ji tiao su-5.c
     文件        2070  2010-09-21 14:04  Dian ji tiao su\Dian ji tiao su-5.lst
     文件       10141  2010-09-21 14:04  Dian ji tiao su\Dian ji tiao su-5.sdb
     文件         378  2010-09-09 18:16  Dian ji tiao su\Dian ji tiao su.c
     文件        5120  2010-09-21 14:24  Dian ji tiao su\Dian ji tiao su.cod
     文件        4269  2010-09-21 14:24  Dian ji tiao su\Dian ji tiao su.cof
     文件         886  2010-09-21 14:24  Dian ji tiao su\Dian ji tiao su.hex
     文件           0  2010-09-21 14:24  Dian ji tiao su\Dian ji tiao su.lde
     文件         897  2010-09-09 18:16  Dian ji tiao su\Dian ji tiao su.lst
     文件         667  2010-09-21 14:04  Dian ji tiao su\Dian ji tiao su.mcp
     文件         432  2010-09-21 14:38  Dian ji tiao su\Dian ji tiao su.mcs
     文件       81408  2010-09-21 14:38  Dian ji tiao su\Dian ji tiao su.mcw
     文件        1451  2010-09-20 08:45  Dian ji tiao su\Dian ji tiao su.mptags
     文件        4082  2010-09-21 14:24  Dian ji tiao su\Dian ji tiao su.sym
     文件          58  2010-09-20 08:45  Dian ji tiao su\Dian ji tiao su.tagsrc
     文件        3584  2010-09-13 20:27  Dian ji tiao su\untitled.mcw