Контролер стеклоочистителя

[Chip]

Вот набросал код для ИК приемника на 38кГц
по позже допишу , чтобы была помехозащищенность

//http://compcar.ru
byte tsop = 11;   //ИК приемник
byte irLed = 10;  //ик-светодиод 
byte Led = 13;   //осветодиод(L) на плате
byte i;     // счётчик
byte num=16; //число периодов несущей 38кГц в посылаемом пакете
byte impulse=8;  // длительность полупериода
byte val=1;   //переменная для хранения сигнала с ИК приемника

void setup() 
{
  pinMode (irLed, OUTPUT); // разъём 10 на вывод
  pinMode(Led, OUTPUT);   //разъём 13 на вывод
  pinMode(tsop, INPUT);   // разъём 11 на ввод
  Serial.begin(115200);
}

void loop()
{
 cli(); //запретить все прерывания
  for(i=0; i<num; i++) //цикл несущей
  {
    digitalWrite(irLed, HIGH); //зажигаем ик-диод
    delayMicroseconds(impulse); //положительный полупериод
    digitalWrite(irLed, LOW); //гасим ик-диод
    delayMicroseconds(impulse-1); //выравниваем скважность периода
  }
  
  digitalWrite(Led,(digitalRead(tsop)==LOW) ? HIGH:LOW); //если сигнал низкий то зажигаем светодиод

   sei();  //разрешить прерывания

  delayMicroseconds(impulse*3*num); //пауза между пакетами.
}