TCS3200颜色传感器51单片机例程颜色识别程序带RGB值

ID:280979 · 发表于 2019-11-13 00:25

TCS3200颜色传感器51例程
//==============LCD1602接口连接方法=====================
/*-----------------------------------------------------
   |DB0-----P0.0 | DB4-----P0.4 | RW-------P2.3 |
   |DB1-----P0.1 | DB5-----P0.5 | RS-------P2.4 |
   |DB2-----P0.2 | DB6-----P0.6 | E--------P2.2 |
   |DB3-----P0.3 | DB7-----P0.7 |
---------------------------------------------------*/
//================================================*/
#define LCM_Data    P0 //LCD1602数据接口
#define Busy       0x80 //用于检测LCM状态字中的Busy标识
sbit LCM_RW    = P2^3;  //读写控制输入端，LCD1602的第五脚
sbit LCM_RS    = P2^4;  //寄存器选择输入端，LCD1602的第四脚
sbit LCM_E    = P2^2;  //使能信号输入端,LCD1602的第6脚

//=================颜色传感模块连接=====================
/*-----------------------------------------------------
   |EO-----GND
   |S0-----VCC | S2-----P2.0 | OUT-------P3.5
   |S1-----VCC | S3-----P2.1 |
  ---------------------------------------------------*/
sbit tcs230_s2=P2^0;//TCS230 S2接单片机P2.0
sbit tcs230_s3=P2^1;//TCS230 S3接单片机P2.1
sbit tcs230_en=P3^0; //TCS230 EN(E0)接GND
//**************函数声明***************************************
void WriteDataLCM             (uchar WDLCM);//LCD模块写数据
void WriteCommandLCM       (uchar WCLCM,BuysC); //LCD模块写指令
uchar ReadStatusLCM(void);//读LCD模块的忙标
void DisplayOneChar(uchar X,uchar Y,uchar ASCII);//在第X+1行的第Y+1位置显示一个字符
void LCMInit(void);//LCD初始
void DelayMs(uint Ms);//1MS基准延时程序
void baipingheng();//白平衡子程序
void celiang();//实际颜色程序
uint ryz,gyz,byz;//分别定义红色因子绿色因子蓝色因子
uint rb,gb,bb;//RGB值
uchar tab1[]={'0','1','2','3','4','5','6','7','8','9','A','B','C','D','E','F'};
//***********************主程序******************************
main()
{
TMOD=0x51;//设定T0以工作方式1定时10毫秒
LCMInit();//LCD初始
baipingheng();//上电时先白平衡一次
while(1)
{
   celiang();//颜色测试
   DisplayOneChar(0, 0,'R');//以十进制显示RGB中红色的分值
   DisplayOneChar(0, 1, rb/100+0x30); //显示百位数据
   DisplayOneChar(0, 2, rb/10%10+0x30);//显示十位数据
   DisplayOneChar(0, 3, rb%10+0x30);//显示个位数据
   DisplayOneChar(0, 5,'G');//以十进制显示RGB中绿色的分值
   DisplayOneChar(0, 6, gb/100+0x30); //显示百位数据
   DisplayOneChar(0, 7, gb/10%10+0x30);
   DisplayOneChar(0, 8, gb%10+0x30);
   DisplayOneChar(0, 10,'B');//以十进制显示RGB中蓝色的分值
   DisplayOneChar(0, 11, bb/100+0x30);
   DisplayOneChar(0, 12, bb/10%10+0x30);
   DisplayOneChar(0, 13, bb%10+0x30);
   //*****在LCD1602的第二行以16进制显示RGB*******************
   DisplayOneChar(1, 1, tab1[rb/16]);
   DisplayOneChar(1, 2, tab1[rb%16]);
   DisplayOneChar(1, 3, 'H');
   DisplayOneChar(1, 6, tab1[gb/16]);
   DisplayOneChar(1, 7, tab1[rb%16]);
   DisplayOneChar(1, 8, 'H');
   DisplayOneChar(1, 11,tab1[bb/16]);
   DisplayOneChar(1, 12,tab1[bb%16]);
   DisplayOneChar(1, 13,'H');
   DelayMs(250);//每隔0.25秒测试一次颜色
}
}
//******************************************************
//白平衡子程序
void celiang()
{
   //*********求R值************************************
   TH0=(65536-10000)/256;
         TL0=(65536-10000)%256;
   TH1=0;
   TL1=0;
   tcs230_s2=0;
   tcs230_s3=0;//选择红色滤光器
   tcs230_en=0;
   TR0=1;//10毫秒开始计时
   TR1=1;//开始计数
   while(TF0==0);//等待定时器溢出
   TF0=0;//清楚定时器0溢出标志
   TR0=0;//关闭定时0
   TR1=0;
   rb=(unsigned long)(TH1*256+TL1)*255/ryz;
   if(rb>255)rb=255;//判断RGB值是否合法
   //***********求B值**************************************
   TH0=(65536-10000)/256;
         TL0=(65536-10000)%256;
   TH1=0;
   TL1=0;
   tcs230_s2=0;
   tcs230_s3=1;//选择蓝色滤光器
   TR0=1;//10毫秒开始计时
   TR1=1;//开始计数
   while(TF0==0);//等待定时器溢出
   TF0=0;//清楚定时器0溢出标志
   TR0=0;//关闭定时0
   TR1=0;
   bb=(unsigned long)(TH1*256+TL1)*255/byz;
   if(bb>255)bb=255;//判断RGB值是否合法
   //***********求G值**************************************
   TH0=(65536-10000)/256;
         TL0=(65536-10000)%256;
   TH1=0;
   TL1=0;
   tcs230_s2=1;
   tcs230_s3=1;//选择绿色滤光器
   TR0=1;//10毫秒开始计时
   TR1=1;//开始计数
   while(TF0==0);//等待定时器溢出
   TF0=0;//清楚定时器0溢出标志
   TR0=0;//关闭定时0
   TR1=0;
   tcs230_en=1;
   gb=(unsigned long)(TH1*256+TL1)*255/gyz;
   if(gb>255)gb=255;//判断RGB值是否合法
}
//******************************************************
//白平衡子程序
void baipingheng()
{
   //**************求取红色因子***********************
   TH0=(65536-10000)/256;
         TL0=(65536-10000)%256;
   TH1=0;
   TL1=0;
   tcs230_s2=0;
   tcs230_s3=0;//选择红色滤光器
   tcs230_en=0;
   TR0=1;//10毫秒开始计时
   TR1=1;//开始计数
   while(TF0==0);//等待定时器溢出
   TF0=0;//清楚定时器0溢出标志
   TR0=0;//关闭定时0
   TR1=0;
   ryz=TH1*256+TL1;//其实这里的比例因子应该为255/(TH1*256+TL1)
   //**************求取蓝色因子***********************
   TH0=(65536-10000)/256;
         TL0=(65536-10000)%256;
   TH1=0;
   TL1=0;
   tcs230_s2=0;
   tcs230_s3=1;//选择蓝色滤光器
   TR0=1;//10毫秒开始计时
   TR1=1;//开始计数
   while(TF0==0);//等待定时器溢出
   TF0=0;//清楚定时器0溢出标志
   TR0=0;//关闭定时0
   TR1=0;
   byz=TH1*256+TL1;//其实这里的比例因子应该为255/(TH1*256+TL1)
   //**************求绿红色因子***********************
   TH0=(65536-10000)/256;
         TL0=(65536-10000)%256;
   TH1=0;
   TL1=0;
   tcs230_s2=1;
   tcs230_s3=1;//选择绿色滤光器
   TR0=1;//10毫秒开始计时
   TR1=1;//开始计数
   while(TF0==0);//等待定时器溢出
   TF0=0;//清楚定时器0溢出标志
   TR0=0;//关闭定时0
   TR1=0;
   tcs230_en=1;
   gyz=TH1*256+TL1;//其实这里的比例因子应该为255/(TH1*256+TL1)
}
/*======================================================================
LCM初始化
======================================================================*/
void LCMInit(void)
{
LCM_Data = 0;
WriteCommandLCM(0x38,0); //三次显示模式设置，不检测忙信号
DelayMs(5);
WriteCommandLCM(0x38,0);
DelayMs(5);
WriteCommandLCM(0x38,0);
DelayMs(5);
WriteCommandLCM(0x38,1); //显示模式设置,开始要求每次检测忙信号
WriteCommandLCM(0x08,1); //关闭显示
WriteCommandLCM(0x01,1); //显示清屏
WriteCommandLCM(0x06,1); // 显示光标移动设置
WriteCommandLCM(0x0C,1); // 显示开及光标设置
DelayMs(100);
}
//==============================LCD1602显示子程序================================================
// 写数据函数: E =高脉冲 RS=1 RW=0
//======================================================================*/
void WriteDataLCM(uchar WDLCM)
{
ReadStatusLCM(); //检测忙
LCM_Data = WDLCM;
LCM_RS = 1;
LCM_RW = 0;
LCM_E = 0; //若晶振速度太高可以在这后加小的延时
LCM_E = 0; //延时
LCM_E = 1;
}
/*====================================================================
  写指令函数: E=高脉冲 RS=0 RW=0
======================================================================*/
void WriteCommandLCM(uchar WCLCM,BuysC) //BuysC为0时忽略忙检测
{
if (BuysC) ReadStatusLCM(); //根据需要检测忙
LCM_Data = WCLCM;
LCM_RS = 0;
LCM_RW = 0;
LCM_E = 0;
LCM_E = 0;
LCM_E = 1;
}
/*====================================================================
  正常读写操作之前必须检测LCD控制器状态:E=1 RS=0 RW=1;
  DB7: 0 LCD控制器空闲，1 LCD控制器忙。
  读状态
======================================================================*/
uchar ReadStatusLCM(void)
{
LCM_Data = 0xFF;
LCM_RS = 0;
LCM_RW = 1;
LCM_E = 0;
LCM_E = 0;
LCM_E = 1;
while (LCM_Data & Busy); //检测忙信号
return(LCM_Data);
}
/*======================================================================
功能:    在1602 指定位置显示一个字符:第一行位置0~15,第二行16~31
说明:    第 X 行,第 y 列  注意:字符串不能长于16个字符
======================================================================*/
void DisplayOneChar( uchar X, uchar Y, uchar ASCII)
{
  X &= 0x1;
  Y &= 0xF; //限制Y不能大于15，X不能大于1
  if (X) Y |= 0x40; //当要显示第二行时地址码+0x40;
  Y |= 0x80; // 算出指令码
  WriteCommandLCM(Y, 0); //这里不检测忙信号，发送地址码
  WriteDataLCM(ASCII);
}
/*====================================================================
  设定延时时间:x*1ms
====================================================================*/
void DelayMs(uint Ms)
{
  uint i,TempCyc;
  for(i=0;i<Ms;i++)
  {
TempCyc = 250;
while(TempCyc--);
  }
}

ID:644473 · 发表于 2019-11-20 18:16

学习了。LCD1602接口连接方法如果是直接安插在单片机上的还需要单独设置吗？

ID:480232 · 发表于 2019-12-19 08:52

有上位机程序吗

ID:323454 · 发表于 2020-3-22 10:02

大家不要下载第一个文件就1K打开之后啥都没有是个空的文本

帐号		自动登录	找回密码
密码			立即注册

TCS3200颜色传感器51单片机例程 颜色识别程序带RGB值

TCS3200颜色传感器51单片机例程颜色识别程序带RGB值