第九届彩灯控制系统.rar

第九届彩灯控制系统的代码，主要为PWM控制灯的亮度，有一种呼吸灯的效果

#include
#include“LED.h“
#include“ADC0x03.h“
#include“display.h“

 

unsigned char flag_modelflag_ledicL1countpwm_duty;

void Close_equipment（）
{
	P2 = 0xa0;
	P0 = 0x00;
	P2&= 0x1f;
	P2 = 0x80; 				 //关闭LED灯
	P0 = 0xff;
}

void Init0_timer（）
{
	TMOD=0x01;
	TH0=（65535-50000）/256;
	TL0=（65535-50000）%256;
	EA=1;
	ET0=1;
//	TR0=1;
}

void Int0_Init（）
{
	IT1=1;
	EX1=1;
	EA=1;
}
void main（）
{
	Close_equipment（）;
	ADC_Init（0x03）;
	Init0_timer（）;
	Int0_Init（）;
	while（1）
	{
		value=ReadByte_AT24C02（0x01）;
		display_form（）;
		c=ADC_Read（）;	
		c=（c*3/255）+1;
		
		pwm_duty=c*25;
		
		if（s6==0）
		{
			delayms（100）;
			if（s6==0）
			{
					EA=0;
					flag_model++;
				  if（flag_model==3）
					{
					  flag_model=0;
						EA=1;
					}
					
			}
		}
		
		if（flag_model==1）    //调模式
		{
		if（s4==0）
		{
			delayms（100）;
			if（s4==0）
			{
				model++;
			}
		}
		
		if（s5==0）
		{
			delayms（100）;
			if（s5==0）
			{
				model--;
			}
		}
		
		if（model==5）
			model=1;
		if（model==0）
			model=4;
		}
		
		if（flag_model==2）   //调流转间隔
		{
			if（s4==0）
		{
			delayms（100）;
			if（s4==0）
			{
				value++;
			}
		}
		
		if（s5==0）
		{
			delayms（100）;
			if（s5==0）
			{
				value--;
			}
		}
		
	if（value==13）
		value=4;
	if（value==3）
		value=12;
		}
		
		if（model==1）
		{
			WriteByte_AT24C02（0x01value）;
		}
		
		if（model==2）
		{
			WriteByte_AT24C02（0x02value）;
		}
		
		if（model==3）
		{
			WriteByte_AT24C02（0x03value）;
		}
		
		if（model==4）
		{
			WriteByte_AT24C02（0x04value）;
		}
		
		if（s7==0）
		{
			delayms（100）;
			if（s7==0）
			{
			while（1）
			{

					P2 = 0x80;
					P0 = 0xfe;
					for（i=0;i<8;i++）
					{
					P2 = 0x80;	
					P0 = （P0<<1）;
					P2 = 0x1f;
						if（s7==0）
						{
							delayms（100）;
							if（s7==0）
							{
							break;
							break;
							}
						}
					delayms（value*100）;
					}
					P0 = 0xfe;
					P2 = 0x80;
					for（i=0;i<8;i++）
					{
						P2 = 0x80;
						P0 = （P0>>1）;
						P2 = 0x1f;
						if（s7==0）
						{
							delayms（100）;
							if（s7==0）
							{
							break;
							break;
							}
						}
						delayms（value*100）;
					}
					P0 = 0x7e;
					P2 = 0x80;
					P2 &= 0x1f;
					delayms（value*100）;
					P0 = 0xbd;
					P2 = 0x80;
					P2 &= 0x1f;
					delayms（value*100）;
					P0 = 0xdb;
					P2 = 0x80;
					P2 &= 0x1f;
					delayms（value*100）;
					P0 = 0xe7;
					P2 = 0x80;
					P2 &= 0x1f;
					delayms（value*100）;
					P0 = 0xe7;
					P2 = 0x80;
					P2 &= 0x1f;
					
					P0 = 0xe7;
					P2 = 0x80;
					P2 &= 0x1f;
					delayms（value*100）;
					P0 = 0xdb;
					P2 = 0x80;
					P2 &= 0x1f;
					delayms（value*100）;
					P0 = 0xbd;
					P2 = 0x80;
					P2 &= 0x1f;
					delayms（value*100）;
					P0 = 0x7e;
					P2 = 0x80;
					P2 &= 0x1f;
					delayms（value*100）;
						if（s7==0）
						{
							delayms（100）;

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件       2609  2019-03-07 12:25  第九届彩灯控制系统\ADC0x03.h

     文件       1892  2019-03-05 23:49  第九届彩灯控制系统\display.h

     文件        156  2019-03-05 20:08  第九届彩灯控制系统\key.h

     文件       1260  2019-03-05 21:22  第九届彩灯控制系统\LED.h

     文件       9278  2019-03-07 12:48  第九届彩灯控制系统\Listings\main.lst

     文件      14150  2019-03-07 12:48  第九届彩灯控制系统\Listings\STARTUP.lst

     文件      37039  2019-03-07 12:48  第九届彩灯控制系统\Listings\彩灯系统.m51

     文件       3477  2019-03-07 12:48  第九届彩灯控制系统\main.c

     文件      27169  2019-03-07 12:48  第九届彩灯控制系统\objects\main.obj

     文件        819  2019-03-07 12:48  第九届彩灯控制系统\objects\STARTUP.obj

     文件      24195  2019-03-07 12:48  第九届彩灯控制系统\objects\彩灯系统

     文件       1519  2019-03-07 12:48  第九届彩灯控制系统\objects\彩灯系统.build_log.htm

     文件       5279  2019-03-07 12:48  第九届彩灯控制系统\objects\彩灯系统.hex

     文件        107  2019-03-07 12:48  第九届彩灯控制系统\objects\彩灯系统.lnp

     文件       6376  2015-05-29 12:09  第九届彩灯控制系统\STARTUP.A51

     文件     140134  2019-03-07 23:30  第九届彩灯控制系统\彩灯系统.uvgui.chenbing

     文件       6799  2019-03-07 23:30  第九届彩灯控制系统\彩灯系统.uvopt

     文件      13966  2019-03-05 23:29  第九届彩灯控制系统\彩灯系统.uvproj

     目录          0  2019-05-21 12:51  第九届彩灯控制系统\Listings

     目录          0  2019-05-21 12:51  第九届彩灯控制系统\objects

     目录          0  2019-05-21 12:51  第九届彩灯控制系统

----------- ---------  ---------- -----  ----

               296224                    21