const int dit = 200;
const int dah = dit*3;
const int Pause_BU = dit*3;
const int Pause_SY = dit;
const int Pause_WO = dit*7;
const byte PIN=7;
const int HZ=262;

void H()
{
digitalWrite(13, HIGH);
delay(dit);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dit);
digitalWrite(13, HIGH);
delay(dit);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dit);
digitalWrite(13, HIGH);
delay(dit);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dit);
digitalWrite(13, HIGH);
delay(dit);
digitalWrite(13, LOW);
delay(Pause_BU);
tone(PIN, HZ, dit);
Serial.print("H"); Serial.print(" ");
Serial.println("....");
}

void A()
{
digitalWrite(13, HIGH);
delay(dit);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dit);
digitalWrite(13, HIGH);
delay(dah);
digitalWrite(13, LOW);
delay(Pause_BU);
tone(PIN, HZ, dah);
Serial.print("A"); Serial.print(" ");
Serial.println(".-");
}

void P()
{
digitalWrite(13, HIGH);
delay(dit);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dit);
digitalWrite(13, HIGH);
delay(dah);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dah);
digitalWrite(13, HIGH);
delay(dah);
digitalWrite(13, LOW);
delay(Pause_BU);
tone(PIN, HZ, dah);
Serial.print("P"); Serial.print(" ");
Serial.println(".--");
}

void R()
{
digitalWrite(13, HIGH);
delay(dit);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dit);
digitalWrite(13, HIGH);
delay(dah);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dah);
digitalWrite(13, HIGH);
delay(dit);
digitalWrite(13, LOW);
delay(Pause_BU);
tone(PIN, HZ, dit);
Serial.print("R"); Serial.print(" ");
Serial.println(".-.");
}

void O()
{
digitalWrite(13, HIGH);
delay(dah);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dah);
digitalWrite(13, HIGH);
delay(dah);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dah);
digitalWrite(13, HIGH);
delay(dah);
digitalWrite(13, LOW);
delay(Pause_BU);
tone(PIN, HZ, dah);
Serial.print("O"); Serial.print(" ");
Serial.println("---");
}

void G()
{
digitalWrite(13, HIGH);
delay(dah);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dah);
digitalWrite(13, HIGH);
delay(dah);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dah);
digitalWrite(13, HIGH);
delay(dit);
digitalWrite(13, LOW);
delay(Pause_BU);
tone(PIN, HZ, dit);
Serial.print("G"); Serial.print(" ");
Serial.println("--.");
}

void E()
{
digitalWrite(13, HIGH);
delay(dit);
digitalWrite(13, LOW);
delay(Pause_BU);
tone(PIN, HZ, dit);
Serial.print("E"); Serial.print(" ");
Serial.println(".");
}

void M()
{
digitalWrite(13, HIGH);
delay(dah);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dah);
digitalWrite(13, HIGH);
delay(dah);
digitalWrite(13, LOW);
delay(Pause_BU);
tone(PIN, HZ, dah);
Serial.print("M"); Serial.print(" ");
Serial.println("--");
}

void I()
{
digitalWrite(13, HIGH);
delay(dit);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dit);
digitalWrite(13, HIGH);
delay(dit);
digitalWrite(13, LOW);
delay(Pause_BU);
tone(PIN, HZ, dit);
Serial.print("I"); Serial.print(" ");
Serial.println("..");
}

void N()
{
digitalWrite(13, HIGH);
delay(dah);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dah);
digitalWrite(13, HIGH);
delay(dit);
digitalWrite(13, LOW);
delay(Pause_BU);
tone(PIN, HZ, dit);
Serial.print("N"); Serial.print(" ");
Serial.println("-.");
}

void S()
{
digitalWrite(13, HIGH);
delay(dit);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dit);
digitalWrite(13, HIGH);
delay(dit);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dit);
digitalWrite(13, HIGH);
delay(dit);
digitalWrite(13, LOW);
delay(Pause_BU);
tone(PIN, HZ, dit);
Serial.print("S"); Serial.print(" ");
Serial.println("...");
}

void T()
{
digitalWrite(13, HIGH);
delay(dah);
digitalWrite(13, LOW);
delay(Pause_BU);
tone(PIN, HZ, dah);
Serial.print("T"); Serial.print(" ");
Serial.println("-");
}

void W()
{
digitalWrite(13, HIGH);
delay(dit);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dit);
digitalWrite(13, HIGH);
delay(dah);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dah);
digitalWrite(13, HIGH);
delay(dah);
digitalWrite(13, LOW);
delay(Pause_BU);
tone(PIN, HZ, dah);
Serial.print("W"); Serial.print(" ");
Serial.println(".--");
}

void K()
{
digitalWrite(13, HIGH);
delay(dah);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dah);
digitalWrite(13, HIGH);
delay(dit);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dit);
digitalWrite(13, HIGH);
delay(dah);
digitalWrite(13, LOW);
delay(Pause_BU);
tone(PIN, HZ, dah);
Serial.print("K"); Serial.print(" ");
Serial.println("-.-");
}

void UE()
{
digitalWrite(13, HIGH);
delay(dit);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dit);
digitalWrite(13, HIGH);
delay(dit);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dit);
digitalWrite(13, HIGH);
delay(dah);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dah);
digitalWrite(13, HIGH);
delay(dah);
digitalWrite(13, LOW);
delay(Pause_BU);
tone(PIN, HZ, dah);
Serial.print("UE"); Serial.print(" ");
Serial.println("..--");
}

void D()
{
digitalWrite(13, HIGH);
delay(dah);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dah);
digitalWrite(13, HIGH);
delay(dit);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dit);
digitalWrite(13, HIGH);
delay(dit);
digitalWrite(13, LOW);
delay(Pause_BU);
tone(PIN, HZ, dit);
Serial.print("D"); Serial.print(" ");
Serial.println("-..");
}

void B()
{
digitalWrite(13, HIGH);
delay(dah);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dah);
digitalWrite(13, HIGH);
delay(dit);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dit);
digitalWrite(13, HIGH);
delay(dit);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dit);
digitalWrite(13, HIGH);
delay(dit);
digitalWrite(13, LOW);
delay(Pause_BU);
tone(PIN, HZ, dit);
Serial.print("B"); Serial.print(" ");
Serial.println("-...");
}

void CH()
{
digitalWrite(13, HIGH);
delay(dah);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dah);
digitalWrite(13, HIGH);
delay(dah);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dah);
digitalWrite(13, HIGH);
delay(dah);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dah);
digitalWrite(13, HIGH);
delay(dah);
digitalWrite(13, LOW);
delay(Pause_BU);
tone(PIN, HZ, dah);
Serial.print("CH"); Serial.print(" ");
Serial.println("----");
}

void U()
{
digitalWrite(13, HIGH);
delay(dit);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dit);
digitalWrite(13, HIGH);
delay(dit);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dit);
digitalWrite(13, HIGH);
delay(dah);
digitalWrite(13, LOW);
delay(Pause_BU);
tone(PIN, HZ, dah);
Serial.print("U"); Serial.print(" ");
Serial.println("..-");
}

void Komma()
{
digitalWrite(13, HIGH);
delay(dah);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dah);
digitalWrite(13, HIGH);
delay(dah);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dah);
digitalWrite(13, HIGH);
delay(dit);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dit);
digitalWrite(13, HIGH);
delay(dit);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dit);
digitalWrite(13, HIGH);
delay(dah);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dah);
digitalWrite(13, HIGH);
delay(dah);
digitalWrite(13, LOW);
delay(Pause_BU);
tone(PIN, HZ, dah);
Serial.print(","); Serial.print(" ");
Serial.println("-.-..--");
}

void Punkt()
{
digitalWrite(13, HIGH);
delay(dit);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dit);
digitalWrite(13, HIGH);
delay(dah);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dah);
digitalWrite(13, HIGH);
delay(dit);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dit);
digitalWrite(13, HIGH);
delay(dah);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dah);
digitalWrite(13, HIGH);
delay(dit);
digitalWrite(13, LOW);
delay(dit);
tone(PIN, HZ, dit);
digitalWrite(13, HIGH);
delay(dah);
digitalWrite(13, LOW);
delay(Pause_BU);
tone(PIN, HZ, dah);
Serial.print("."); Serial.print(" ");
Serial.println(".-.-.-");
}

void setup() 
{
Serial.begin(115200);
pinMode(13, OUTPUT);
pinMode(PIN, OUTPUT);
}

void loop() 
{
P();
R();
O();
G();
R();
A();
M();
M();
I();
E();
R();
E();
N();
delay(dit*4); Serial.println(" ");
I();
S();
T();
delay(dit*4); Serial.println(" ");
W();
I();
E();
delay(dit*4); Serial.println(" ");
K();
UE();
S();
S();
E();
N();
Punkt(); Serial.println(" ");
M();
A();
N();
delay(dit*4); Serial.println(" ");
K();
A();
N();
N();
delay(dit*4); Serial.println(" ");
D();
A();
R();
UE();
B();
E();
R();
delay(dit*4); Serial.println(" ");
R();
E();
D();
E();
N();
Komma(); Serial.println(" ");
M();
A();
N();
delay(dit*4); Serial.println(" ");
K();
A();
N();
N();
delay(dit*4); Serial.println(" ");
E();
S();
delay(dit*4); Serial.println(" ");
B();
S();
CH();
R();
E();
I();
B();
E();
N();
Komma(); Serial.println(" ");
A();
B();
E();
R();
delay(dit*4); Serial.println(" ");
M();
A();
N();
delay(dit*4); Serial.println(" ");
W();
E();
I();
S();
S();
delay(dit*4); Serial.println(" ");
E();
R();
S();
T();
delay(dit*4); Serial.println(" ");
W();
A();
S();
delay(dit*4); Serial.println(" ");
E();
S();
delay(dit*4); Serial.println(" ");
B();
E();
D();
E();
U();
T();
E();
T();
Komma(); Serial.println(" ");
W();
E();
N();
N();
delay(dit*4); Serial.println(" ");
M();
A();
N();
delay(dit*4); Serial.println(" ");
E();
S();
delay(dit*4); Serial.println(" ");
G();
E();
T();
A();
N();
delay(dit*4); Serial.println(" ");
H();
A();
T();
}