Nuestro sensor de color tcs230 (sin biblioteca)

El blog de hoy TCS color sensor Module Introducción.En el Centro de la placa de circuito hay un sensor fotoeléctrico de 64 diodos.Pixeles, 16 sin filtro y 16 con filtro rojo, azul o verde.Se utilizan cuatro diodos luminosos de 5 mm para iluminar los objetos que se han de escanear de la manera más uniforme y neutral posible.Consejos prácticos: las mediciones deben basarse en la luz ambiental oEvitar la dispersión, porque puede distorsionar los resultados.Según el campo de aplicación, a veces es útil proteger un pequeño tubo contra un sensor fotoeléctrico para obtener una constante.

La salida del circuito integrado es una señal rectangular proporcional a la longitud de onda respectiva.Frecuencia de salida reducida s0 y S1, S2 y S3 para la búsqueda de los valores R / B / G - y W - 1Activar actividad baja

Línea:

Código:

Constante Interior Página 0 = 8; / / / alfiler
Constante Interior Sección I = 9;
Constante Interior Tipo 2 = 12;
Constante Interior Número 3. = 11;
Constante Interior Afuera. = 10;

Interior Rojo = 0; - Sí.
Interior Verde = 0;
Interior Azul = 0;


Vacío. Configuración()

{

Transporte.Iniciar(115200);

Modo pinmode(Página 0, Salida); 

Modo pinmode(Sección I, Salida);

Modo pinmode(Tipo 2, Salida);

Modo pinmode(Número 3., Salida);

Modo pinmode(Afuera., Entrada);

Escritura digital(Página 0, Alto); Modo de configuración

Escritura digital(Sección I, Alto);

}


Vacío. Correr()

{

Color();

Transporte.Imprimir(¡Rojo =!);

Transporte.Imprimir(Rojo, Diciembre);

Transporte.Imprimir(¡Verde =!);

Transporte.Imprimir(Verde, Diciembre);

Transporte.Imprimir("Azul".);

Transporte.Imprimir(Azul, Diciembre);

Si (Rojo < Azul && Rojo < Verde && Rojo < 20) / / filtro rojo
{
Transporte.Imprimir(Rojo detectado.);
}
Hora prevista de despegue Si (Azul < Rojo && Azul < Verde) Filtro azul
{
Transporte.Imprimir("Detectado el azul.");
}
Hora prevista de despegue Si (Verde < Rojo && Verde < Azul) / / filtro verde
{
Transporte.Imprimir("Detectando el verde.");
}
Hora prevista de despegue
{
Transporte.Imprimir();
}
Retraso(400);
}


Vacío. Color()

{

Escritura digital(Tipo 2, Bajo);

Escritura digital(Número 3., Bajo);

Rojo = Pulso(Afuera., Lectura digital(Afuera.) == Alto ? Bajo : Alto);

Escritura digital(Número 3., Alto);

Azul = Pulso(Afuera., Lectura digital(Afuera.) == Alto ? Bajo : Alto);

Escritura digital(Tipo 2, Alto);

Verde = Pulso(Afuera., Lectura digital(Afuera.) == Alto ? Bajo : Alto);

}

Dependiendo de la ubicación de instalación del módulo, puede ser necesario ajustar el filtro de color.

Por lo tanto, su máquina de clasificación M & ms ya no está en camino.
Por cierto, nosotros también. Servicios & Motor paso a paso