c_demo.c

是用51单片机检测色度色差的算法和具体实现的代码

	{
		dis1616(*(next+i), 2+2*i, 5);
	}
}

/***************************************************************************
*	函数原型：void dis_samples(uchar i);
*	函数功能：显示“请放入1＃2＃样品”。
***************************************************************************/
void dis_samples(uchar num)
{
	uchar i;
	clslcd();
	for (i=0; i<3; i++)
	{
		dis1616(*(sample+i), 2+2*i, 2);
	}
	dis816(*(number+num), 8, 2);
	dis816(sharp, 9, 2);
	for (i=7; i<9; i++)
	{
		dis1616(*(sample+i), 2*i-4, 2);
	}
	for (i=0; i<6; i++)
	{
		dis1616(*(next+i), 2+2*i, 5);
	}
}

/***************************************************************************
*	函数原型：void dis_wait(void);
*	函数功能：显示“信号处理中”。
***************************************************************************/
void dis_wait(void)
{
	uchar i;
	clslcd();
	for (i=0; i<5; i++)
	{
		dis1616(*(waiting+i), 3+2*i, 2);
	}
	for (i=0; i<12; i++)
	{
		dis816(rim, 2+i, 4);
	}
}

/***************************************************************************
*	函数原型：void dis_result(void);
*	函数功能：显示“测量结果”。
***************************************************************************/
void dis_result(void)
{
	uchar i;
	
	clslcd();
	dis1616(*(option), 5, 0);
	dis1616(*(option+1), 9, 0);
	for (i=0; i<4; i++)
	{
		dis1616(*(tris+i), 4+2*i, 2);
	}
	dis1616(*title, 4, 4);
	for (i=0; i<3; i++)
	{
		dis1616(*(cpoint+i), 6+2*i, 4);
	}
	for (i=0; i<3; i++)
	{
		dis1616(*(mwl+i), 4+3*i, 6);
	}
}

/***************************************************************************
*	函数原型：void dis_clock(uchar *pclk);
*	函数功能：显示时间。
***************************************************************************/
void dis_clock(uchar *pclk)
{
	clslcd();
	dis816(*(number+2), 1, 2);
	dis816(*(number), 2, 2);
	dis816(*(number_dark+(*(pclk+6)>>4)), 3, 2);
	dis816(*(number_dark+(*(pclk+6)&0x0f)), 4, 2);
	dis1616(*(calendar), 5, 2);
	dis816(*(number+(*(pclk+4)>>4)), 7, 2);
	dis816(*(number+(*(pclk+4)&0x0f)), 8, 2);
	dis1616(*(calendar+1), 9, 2);
	dis816(*(number+(*(pclk+3)>>4)), 11, 2);
	dis816(*(number+(*(pclk+3)&0x0f)), 12, 2);
	dis1616(*(calendar+2), 13, 2);
	dis816(*(number+(*(pclk+2)>>4)), 4, 4);
	dis816(*(number+(*(pclk+2)&0x0f)), 5, 4);
	dis816(colon, 6, 4);
	dis816(*(number+(*(pclk+1)>>4)), 7, 4);
	dis816(*(number+(*(pclk+1)&0x0f)), 8, 4);
	dis816(colon, 9, 4);
	dis816(*(number+(*pclk>>4)), 10, 4);
	dis816(*(number+(*pclk&0x0f)), 11, 4);
}

/***** DS1302 *****/
/***************************************************************************
*	函数原型：void WrByte(uchar val);
*	函数功能：向DS1302写一个字节数据。
***************************************************************************/
void WrByte(uchar val)
{
	uchar i;
	uchar temp = 0x01;
	for (i=0; i<8; i++)
	{
		T_CLK = 0;
    if ((val & temp) == 0)
		{
			T_IO = 0;
		}
		else
		{
			T_IO = 1;
		}
		temp <<= 0x01;
		T_CLK = 1;
	}
}

/***************************************************************************
*	函数原型：uchar RdByte(void);
*	函数功能：从DS1302读一个字节数据。
***************************************************************************/
uchar RdByte(void)
{
	uchar val = 0;
	uchar i;
	
	for (i=0; i<8; i++)
	{
		T_CLK = 0;
		if (T_IO)
		{
			val >>= 1;
			val |= 0x80;
		}
		else
		{
			val >>=1;
		}
		T_CLK = 1;
	}
	return val;
}

/***************************************************************************
*	函数原型：void WrData(uchar addr, uchar value);
*	函数功能：向DS1302中的一个寄存器写数据。
***************************************************************************/
void WrData(uchar addr, uchar value)
{
	T_RST = 0;
	T_CLK = 0;
	T_RST = 1;
	WrByte(addr);
	WrByte(value);	
	T_RST = 0;
}

/***************************************************************************
*	函数原型：uchar RdData(uchar addr);
*	函数功能：从DS1302中的一个寄存器读数据。
***************************************************************************/
uchar RdData(uchar addr)
{
	uchar value;
	
	T_RST = 0;
	T_CLK = 0;
	T_RST = 1;	
	WrByte(addr);
	value = RdByte();	
	T_RST = 0;
	return value;
}

/***************************************************************************
*	函数原型：void SetClk(uchar *pClk);
*	函数功能：设置时间。
***************************************************************************/
void SetClk(uchar *pClk) 
{
	uchar i;
	uchar addr = 0x80;
	
	WrData(0x8e, 0x00); 
	for (i=0; i<7; i++)
	{ 
		WrData(addr, *pClk);
		pClk++;
		addr += 2;
	}
	WrData(0x8e, 0x80);
}

/***************************************************************************
*	函数原型：void GetClk(uchar *pClk);
*	函数功能：读取时间。
***************************************************************************/
void GetClk(uchar *pClk)
{
	uchar i;
	uchar addr = 0x81;
	
	for (i=0; i<7; i++)
	{
		*pClk = RdData(addr);
		pClk++;
		addr += 2;
	}
}

/***************************************************************************
*	函数原型：void init(void);
*	函数功能：程序初始化。
***************************************************************************/
void init(void)
{
	LIGHT_R = 0;
	LIGHT_G = 0;
	LIGHT_B = 0;
	initlcd();
	clslcd();
	dis_cover();
	delay(100);
	dis_menu();
	dis816(arrow, 2, 2);
}

/***************************************************************************
*	函数原型：uchar B_BCD(uchar val);
*	函数功能：将一个0到99的正整数由二进制转换成BCD码。
***************************************************************************/
uchar B_BCD(uchar val)
{
	uchar temp;
	temp = val%10;
	val /= 10;
	val <<= 4;
	temp |=	val;
	return temp;
}

/***************************************************************************
*	函数原型：uchar BCD_B(uchar val);
*	函数功能：将一个0到99的正整数由BCD码转换成二进制。
***************************************************************************/
uchar BCD_B(uchar val)
{
	uchar temp;
	temp = (val >> 4)*10 + (val & 0x0f);
	return temp;
}

/***************************************************************************
*	函数原型：void MeaC(void);
*	函数功能：测量色度开始。
***************************************************************************/
void MeaC(void)
{
	uchar status = 0;
	
	uchar key;
	dis_blank();
	while (1)
	{
		key = getkey();
		if (key == Enter)
		{
			if(status < 3)
			{
				status++;
				if (status == 1)
				{
					MeaC1();
				}
				else
				{
					MeaC2();
					break;
				}
			}

		}
		if (key == Esc)
		{
			dis_menu();
			dis_arrow(0);
			break;
		}
	}
}

/***************************************************************************
*	函数原型：void MeaC1(void);
*	函数功能：测量色度步骤1。
***************************************************************************/
void MeaC1(void)
{
	dis_wait();
	Ir0 = measure(RED) - I0;
	Ig0 = measure(GREEN) - I0;
	Ib0 = measure(BLUE) - I0;
	dis_sample();
}

/***************************************************************************
*	函数原型：void MeaC2(void);
*	函数功能：测量色度步骤2。
***************************************************************************/
void MeaC2(void)
{
	float Ar1, Ag1, Ab1;
	
	dis_wait();
	Ar1 = (measure(RED)-I0)/(float)Ir0;
	Ag1 = (measure(GREEN)-I0)/(float)Ig0;
	Ab1 = (measure(BLUE)-I0)/(float)Ib0;
	color(Ar1, Ag1, Ab1, 0);
	MeaC3();
}

/***************************************************************************
*	函数原型：void MeaC3(void);
*	函数功能：测量色度步骤3。
***************************************************************************/
void MeaC3(void)
{
	uchar i;
	uchar key;
	
	i = 0;
	dis_result();
	dis816(arrow, 2, 2);
	while (1)
	{
		key =getkey();
		if (key == Up)
		{
			if (i == 0)
			{
				i = 2;	
			}
			else if (i == 1)
				{
					i = 0;
				}
				else if (i == 2)
				{
					i = 1;
				}
			dis_arrow(i);
		}
		if (key == Down)
		{
			if (i == 0)
			{
				i = 1;
			}
			else if (i == 1)
				{
					i = 2;
				}
				else if (i == 2)
				{
					i = 0;
				}
			dis_arrow(i);
		}
		if (key == Enter)
		{
			all_result(i);
		}
		if (key == Esc)
		{
			dis_menu();
			dis_arrow(0);
			break;
		}
	}	
}

/***************************************************************************
*	函数原型：void all_result(uchar i);
*	函数功能：色度结果。
***************************************************************************/
void all_result(uchar i)
{
	if (i == 0)
	{
		C_result();
	}
	if (i == 1)
	{
		Cp_result();
	}
	if (i == 2)
	{
		Wl_result();
	}
	while (1)
	{
		if (getkey() == Esc)
		{
			clslcd();
			dis_result();
			dis_arrow(i);
			break;
		}
	}
}

/***************************************************************************
*	函数原型：void C_result(void);
*	函数功能：色度结果。
***************************************************************************/
void C_result(void)
{
	uchar i;
	clslcd();
	for (i=0; i<4; i++)
	{
		dis1616(*(tris+i), 4+2*i, 0);
	}
	dis816(*xyz, 3, 2);
	dis816(blank, 4, 2);
	dis816(equal, 5, 2);
	dis816(blank, 6, 2);
	dis_float(X[0], 7, 2);
	dis816(*(xyz+1), 3, 4);
	dis816(blank, 4, 4);
	dis816(equal, 5, 4);
	dis816(blank, 6, 4);
	dis_float(Y[0], 7, 4);
	dis816(*(xyz+2), 3, 6);
	dis816(blank, 4, 6);
	dis816(equal, 5, 6);
	dis816(blank, 6, 6);
	dis_float(Z[0], 7, 6);
}

/***************************************************************************
*	函数原型：void Cp_result(void);
*	函数功能：色品座标结果。
***************************************************************************/
void Cp_result(void)
{
	float _x_, _y_;
	uchar i;
	
	_x_ = X[0]/(X[0] + Y[0] + Z[0]);
	_y_ = Y[0]/(X[0] + Y[0] + Z[0]);
	clslcd();
	dis1616(*title, 4, 0);
	for (i=0; i<3; i++)
	{
		dis1616(*(cpoint+i), 6+2*i, 0);
	}
	dis816(*(xyz+3), 3, 3);
	dis816(blank, 4, 3);
	dis816(equal, 5, 3);
	dis816(blank, 6, 3);
	dis_float(_x_, 7, 3);
	dis816(*(xyz+4), 3, 5);
	dis816(blank, 4, 5);
	dis816(equal, 5, 5);
	dis816(blank, 6, 5);
	dis_float(_y_, 7, 5);
}

/***************************************************************************
*	函数原型：void WL_result(void);
*	函数功能：主波长结果。
***************************************************************************/
void WL_result(void)
{
	float _x_, _y_;