Void setup()

{ pinMode(pin1, OUTPUT);

pinMode(pin2, OUTPUT);

pinMode(pin3, OUTPUT);

pinMode(pin4, OUTPUT);

}

Void loop()

{

digitalWrite(pin1, HIGH);

digitalWrite(pin2, LOW);

digitalWrite(pin3, LOW);

delay(5000); //Горит красный

digitalWrite(pin3, LOW);

digitalWrite(pin2, LOW);

for (int pin = 1; pin <= 10; ++pin) {

digitalWrite(pin1, HIGH);

for (int i = 0; i <= 20; i++) {

digitalWrite(pin4, HIGH);

delay(5);

digitalWrite(pin4, LOW);

delay(5); }

digitalWrite(pin1, LOW);

delay(200); //Мигает красный

}

digitalWrite(pin1, LOW);

digitalWrite(pin2, HIGH);

digitalWrite(pin3, LOW);

delay(2000); //Горит желтый

digitalWrite(pin1, LOW);

digitalWrite(pin2, LOW);

digitalWrite(pin3, HIGH);

for (int i = 0; i <= 2500; i++) {

digitalWrite(pin4, HIGH);

delay(1);

digitalWrite(pin4, LOW);

delay(1); }

//Горит зеленый

digitalWrite(pin3, LOW);

digitalWrite(pin2, LOW);

for (int pin = 1; pin <= 10; ++pin) {

digitalWrite(pin3, HIGH);

for (int i = 0; i <= 20; i++) {

digitalWrite(pin4, HIGH);

delay(5);

digitalWrite(pin4, LOW);

delay(5); }

digitalWrite(pin3, LOW);

delay(200); //Мигает зеленый

}

digitalWrite(pin1, LOW);

digitalWrite(pin2, HIGH);

digitalWrite(pin3, LOW);

delay(2000); //Горит желтый

}

Азбука Морзе

int ledPin = 13; // Номер пина со светодиодом

int dotDelay = 200; // Время длительности «точки»

char theword[] = "Kiss my shinny metall ass";

// Точка

void dot()

{

digitalWrite(ledPin, HIGH);

delay(dotDelay);

digitalWrite(ledPin, LOW);

delay(dotDelay);

}

// Тире

void dash()

{

digitalWrite(ledPin, HIGH);

delay(3 * dotDelay);

digitalWrite(ledPin, LOW);

delay(dotDelay);

}

// Окончание буквы

void letterEnd()

{

delay(2 * dotDelay);

}

// Окончание слова

void wordEnd()

{

delay(6 * dotDelay);

}

// Слово

void morseWord(char theword[])

{

int len = strlen(theword);

for(int i = 0; i < len; ++i)

morseLetter(theword[i]);

wordEnd();

}

// Буква

void morseLetter(char c)

{

switch(c) {

case 'a':

dot();dash();

break;

case 'b':

dash();dot();dot();dot();

break;

case 'c':

dash();dot();dash();dot();

break;

case 'd':

dash();dot();dot();

break;

case 'e':

dot();

break;

case 'f':

dot();dot();dash();dot();

break;

case 'g':

dash();dash();dot();

break;

case 'h':

dot();dot();dot();

break;

case 'i':

dot();dot();

break;

case 'j':

dot();dash();dash();dash();

break;

case 'k':

dash();dot();dash();

break;

case 'l':

dot();dash();dot();dot();

break;

case 'm':

dash();dash();

break;

case 'n':

dash();dot();

break;

case 'o':

dash();dash();dash();

break;

case 'p':

dot();dash();dash();dot();

break;

case 'q':

dash();dash();dot();dash();

break;

case 'r':

dot();dash();dot();

break;

case 's':

dot();dot();dot();

break;

case 't':

dash();

break;

case 'u':

dot();dot();dash();

break;

case 'v':

dot();dot();dot();dash();

break;

case 'w':

dot();dash();dash();

break;

case 'x':

dash();dot();dot();dash();

break;

case 'y':

dash();dot();dash();dash();

break;

case 'z':

dash();dash();dot();dot();

break;

case ' ':

wordEnd();

break;

}

letterEnd();

}