int LED1 = 4; //variable for LED pin
int LED2 = 3; 
int LED3 = 2; 
int LED4 = 1; 
int buzzer = 5; //variable for buzzer pin

int unit = 200; //variable for delay of 1 unit in milliseconds
int tonefreq = 262; //freq in Hertz
//this note has 262 vibrations per second, also know as "middle C"

void setup() {
  // put your setup code here, to run once:
  pinMode(LED1, OUTPUT);
  pinMode(buzzer, OUTPUT);
}

void loop() {
  // put your main code here, to run repeatedly:
  //Glory
// G: --.
    //dash
    digitalWrite(LED1, HIGH);
    tone(buzzer, tonefreq);
    delay(unit * 3);
    digitalWrite(LED1, LOW);
    noTone(buzzer);
    delay(unit);

    //dash
    digitalWrite(LED1, HIGH);
    tone(buzzer, tonefreq);
    delay(unit * 3);
    digitalWrite(LED1, LOW);
    noTone(buzzer);
    delay(unit);

    //dot
    digitalWrite(LED1, HIGH);
    tone(buzzer, tonefreq);
    delay(unit);
    digitalWrite(LED1, LOW);
    noTone(buzzer);
    delay(unit);

// L: .-..
    //dot
    digitalWrite(LED1, HIGH);
    tone(buzzer, tonefreq);
    delay(unit);
    digitalWrite(LED1, LOW);
    noTone(buzzer);
    delay(unit);

    //dash
    digitalWrite(LED1, HIGH);
    tone(buzzer, tonefreq);
    delay(unit * 3);
    digitalWrite(LED1, LOW);
    noTone(buzzer);
    delay(unit);

    //dot
    digitalWrite(LED1, HIGH);
    tone(buzzer, tonefreq);
    delay(unit);
    digitalWrite(LED1, LOW);
    noTone(buzzer);
    delay(unit);

    //dot
    digitalWrite(LED1, HIGH);
    tone(buzzer, tonefreq);
    delay(unit);
    digitalWrite(LED1, LOW);
    noTone(buzzer);
    delay(unit);

// O: ---
    //dash
    digitalWrite(LED1, HIGH);
    tone(buzzer, tonefreq);
    delay(unit * 3);
    digitalWrite(LED1, LOW);
    noTone(buzzer);
    delay(unit);

    //dash
    digitalWrite(LED1, HIGH);
    tone(buzzer, tonefreq);
    delay(unit * 3);
    digitalWrite(LED1, LOW);
    noTone(buzzer);
    delay(unit);

    //dash
    digitalWrite(LED1, HIGH);
    tone(buzzer, tonefreq);
    delay(unit * 3);
    digitalWrite(LED1, LOW);
    noTone(buzzer);
    delay(unit);

// R: .-.
    //dot
    digitalWrite(LED1, HIGH);
    tone(buzzer, tonefreq);
    delay(unit);
    digitalWrite(LED1, LOW);
    noTone(buzzer);
    delay(unit);

    //dash
    digitalWrite(LED1, HIGH);
    tone(buzzer, tonefreq);
    delay(unit * 3);
    digitalWrite(LED1, LOW);
    noTone(buzzer);
    delay(unit);

    //dot
    digitalWrite(LED1, HIGH);
    tone(buzzer, tonefreq);
    delay(unit);
    digitalWrite(LED1, LOW);
    noTone(buzzer);
    delay(unit);

// Y: -.--
    //dash
    digitalWrite(LED1, HIGH);
    tone(buzzer, tonefreq);
    delay(unit * 3);
    digitalWrite(LED1, LOW);
    noTone(buzzer);
    delay(unit);

    //dot
    digitalWrite(LED1, HIGH);
    tone(buzzer, tonefreq);
    delay(unit);
    digitalWrite(LED1, LOW);
    noTone(buzzer);
    delay(unit);

    //dash
    digitalWrite(LED1, HIGH);
    tone(buzzer, tonefreq);
    delay(unit * 3);
    digitalWrite(LED1, LOW);
    noTone(buzzer);
    delay(unit);

    //dash
    digitalWrite(LED1, HIGH);
    tone(buzzer, tonefreq);
    delay(unit * 3);
    digitalWrite(LED1, LOW);
    noTone(buzzer);
    delay(unit);
    
// Morse code for '/': -..-.

// dash
digitalWrite(LED1, HIGH);
tone(buzzer, tonefreq);
delay(unit * 3);
digitalWrite(LED1, LOW);
noTone(buzzer);
delay(unit);

// dot
digitalWrite(LED1, HIGH);
tone(buzzer, tonefreq);
delay(unit);
digitalWrite(LED1, LOW);
noTone(buzzer);
delay(unit);

// dot
digitalWrite(LED1, HIGH);
tone(buzzer, tonefreq);
delay(unit);
digitalWrite(LED1, LOW);
noTone(buzzer);
delay(unit);

// dash
digitalWrite(LED1, HIGH);
tone(buzzer, tonefreq);
delay(unit * 3);
digitalWrite(LED1, LOW);
noTone(buzzer);
delay(unit);

// dot
digitalWrite(LED1, HIGH);
tone(buzzer, tonefreq);
delay(unit);
digitalWrite(LED1, LOW);
noTone(buzzer);
delay(unit);

// Morse code for 'GEO': --. . ---

// G: --.
    //dash
    digitalWrite(LED2, HIGH);
    tone(buzzer, tonefreq);
    delay(unit * 3);
    digitalWrite(LED2, LOW);
    noTone(buzzer);
    delay(unit);

    //dash
    digitalWrite(LED2, HIGH);
    tone(buzzer, tonefreq);
    delay(unit * 3);
    digitalWrite(LED2, LOW);
    noTone(buzzer);
    delay(unit);

    //dot
    digitalWrite(LED2, HIGH);
    tone(buzzer, tonefreq);
    delay(unit);
    digitalWrite(LED2, LOW);
    noTone(buzzer);
    delay(unit);

// E: .
    //dot
    digitalWrite(LED2, HIGH);
    tone(buzzer, tonefreq);
    delay(unit);
    digitalWrite(LED2, LOW);
    noTone(buzzer);
    delay(unit);

// O: ---
    //dash
    digitalWrite(LED2, HIGH);
    tone(buzzer, tonefreq);
    delay(unit * 3);
    digitalWrite(LED2, LOW);
    noTone(buzzer);
    delay(unit);

    //dash
    digitalWrite(LED2, HIGH);
    tone(buzzer, tonefreq);
    delay(unit * 3);
    digitalWrite(LED2, LOW);
    noTone(buzzer);
    delay(unit);

    //dash
    digitalWrite(LED2, HIGH);
    tone(buzzer, tonefreq);
    delay(unit * 3);
    digitalWrite(LED2, LOW);
    noTone(buzzer);
    delay(unit);

// Morse code for '/': -..-.

// dash
digitalWrite(LED1, HIGH);
tone(buzzer, tonefreq);
delay(unit * 3);
digitalWrite(LED1, LOW);
noTone(buzzer);
delay(unit);

// dot
digitalWrite(LED1, HIGH);
tone(buzzer, tonefreq);
delay(unit);
digitalWrite(LED1, LOW);
noTone(buzzer);
delay(unit);

// dot
digitalWrite(LED1, HIGH);
tone(buzzer, tonefreq);
delay(unit);
digitalWrite(LED1, LOW);
noTone(buzzer);
delay(unit);

// dash
digitalWrite(LED1, HIGH);
tone(buzzer, tonefreq);
delay(unit * 3);
digitalWrite(LED1, LOW);
noTone(buzzer);
delay(unit);

// dot
digitalWrite(LED1, HIGH);
tone(buzzer, tonefreq);
delay(unit);
digitalWrite(LED1, LOW);
noTone(buzzer);
delay(unit);

// Morse code for 'SEMESTA': ... . -- . ... - .-

// S: ...
    //dot
    digitalWrite(LED3, HIGH);
    tone(buzzer, tonefreq);
    delay(unit);
    digitalWrite(LED3, LOW);
    noTone(buzzer);
    delay(unit);

    //dot
    digitalWrite(LED3, HIGH);
    tone(buzzer, tonefreq);
    delay(unit);
    digitalWrite(LED3, LOW);
    noTone(buzzer);
    delay(unit);

    //dot
    digitalWrite(LED3, HIGH);
    tone(buzzer, tonefreq);
    delay(unit);
    digitalWrite(LED3, LOW);
    noTone(buzzer);
    delay(unit);

// E: .
    //dot
    digitalWrite(LED3, HIGH);
    tone(buzzer, tonefreq);
    delay(unit);
    digitalWrite(LED3, LOW);
    noTone(buzzer);
    delay(unit);

// M: --
    //dash
    digitalWrite(LED3, HIGH);
    tone(buzzer, tonefreq);
    delay(unit * 3);
    digitalWrite(LED3, LOW);
    noTone(buzzer);
    delay(unit);

    //dash
    digitalWrite(LED3, HIGH);
    tone(buzzer, tonefreq);
    delay(unit * 3);
    digitalWrite(LED3, LOW);
    noTone(buzzer);
    delay(unit);

// E: .
    //dot
    digitalWrite(LED3, HIGH);
    tone(buzzer, tonefreq);
    delay(unit);
    digitalWrite(LED3, LOW);
    noTone(buzzer);
    delay(unit);

// S: ...
    //dot
    digitalWrite(LED3, HIGH);
    tone(buzzer, tonefreq);
    delay(unit);
    digitalWrite(LED3, LOW);
    noTone(buzzer);
    delay(unit);

    //dot
    digitalWrite(LED3, HIGH);
    tone(buzzer, tonefreq);
    delay(unit);
    digitalWrite(LED3, LOW);
    noTone(buzzer);
    delay(unit);

    //dot
    digitalWrite(LED3, HIGH);
    tone(buzzer, tonefreq);
    delay(unit);
    digitalWrite(LED3, LOW);
    noTone(buzzer);
    delay(unit);

// T: -
    //dash
    digitalWrite(LED3, HIGH);
    tone(buzzer, tonefreq);
    delay(unit * 3);
    digitalWrite(LED3, LOW);
    noTone(buzzer);
    delay(unit);

// A: .-
    //dot
    digitalWrite(LED3, HIGH);
    tone(buzzer, tonefreq);
    delay(unit);
    digitalWrite(LED3, LOW);
    noTone(buzzer);
    delay(unit);

    //dash
    digitalWrite(LED3, HIGH);
    tone(buzzer, tonefreq);
    delay(unit * 3);
    digitalWrite(LED3, LOW);
    noTone(buzzer);
    delay(unit);

// Morse code for '/': -..-.

// dash
digitalWrite(LED1, HIGH);
tone(buzzer, tonefreq);
delay(unit * 3);
digitalWrite(LED1, LOW);
noTone(buzzer);
delay(unit);

// dot
digitalWrite(LED1, HIGH);
tone(buzzer, tonefreq);
delay(unit);
digitalWrite(LED1, LOW);
noTone(buzzer);
delay(unit);

// dot
digitalWrite(LED1, HIGH);
tone(buzzer, tonefreq);
delay(unit);
digitalWrite(LED1, LOW);
noTone(buzzer);
delay(unit);

// dash
digitalWrite(LED1, HIGH);
tone(buzzer, tonefreq);
delay(unit * 3);
digitalWrite(LED1, LOW);
noTone(buzzer);
delay(unit);

// dot
digitalWrite(LED1, HIGH);
tone(buzzer, tonefreq);
delay(unit);
digitalWrite(LED1, LOW);
noTone(buzzer);
delay(unit);

// Morse code for 'WIBOWO': .-- .. -... --- .-- ---

// W: .--
    //dot
    digitalWrite(LED4, HIGH);
    tone(buzzer, tonefreq);
    delay(unit);
    digitalWrite(LED4, LOW);
    noTone(buzzer);
    delay(unit);

    //dash
    digitalWrite(LED4, HIGH);
    tone(buzzer, tonefreq);
    delay(unit * 3);
    digitalWrite(LED4, LOW);
    noTone(buzzer);
    delay(unit);

    //dash
    digitalWrite(LED4, HIGH);
    tone(buzzer, tonefreq);
    delay(unit * 3);
    digitalWrite(LED4, LOW);
    noTone(buzzer);
    delay(unit);

// I: ..
    //dot
    digitalWrite(LED4, HIGH);
    tone(buzzer, tonefreq);
    delay(unit);
    digitalWrite(LED4, LOW);
    noTone(buzzer);
    delay(unit);

    //dot
    digitalWrite(LED4, HIGH);
    tone(buzzer, tonefreq);
    delay(unit);
    digitalWrite(LED4, LOW);
    noTone(buzzer);
    delay(unit);

// B: -...
    //dash
    digitalWrite(LED4, HIGH);
    tone(buzzer, tonefreq);
    delay(unit * 3);
    digitalWrite(LED4, LOW);
    noTone(buzzer);
    delay(unit);

    //dot
    digitalWrite(LED4, HIGH);
    tone(buzzer, tonefreq);
    delay(unit);
    digitalWrite(LED4, LOW);
    noTone(buzzer);
    delay(unit);

    //dot
    digitalWrite(LED4, HIGH);
    tone(buzzer, tonefreq);
    delay(unit);
    digitalWrite(LED4, LOW);
    noTone(buzzer);
    delay(unit);

    //dot
    digitalWrite(LED4, HIGH);
    tone(buzzer, tonefreq);
    delay(unit);
    digitalWrite(LED4, LOW);
    noTone(buzzer);
    delay(unit);

// O: ---
    //dash
    digitalWrite(LED4, HIGH);
    tone(buzzer, tonefreq);
    delay(unit * 3);
    digitalWrite(LED4, LOW);
    noTone(buzzer);
    delay(unit);

    //dash
    digitalWrite(LED4, HIGH);
    tone(buzzer, tonefreq);
    delay(unit * 3);
    digitalWrite(LED4, LOW);
    noTone(buzzer);
    delay(unit);

    //dash
    digitalWrite(LED4, HIGH);
    tone(buzzer, tonefreq);
    delay(unit * 3);
    digitalWrite(LED4, LOW);
    noTone(buzzer);
    delay(unit);

// W: .--
    //dot
    digitalWrite(LED4, HIGH);
    tone(buzzer, tonefreq);
    delay(unit);
    digitalWrite(LED4, LOW);
    noTone(buzzer);
    delay(unit);

    //dash
    digitalWrite(LED4, HIGH);
    tone(buzzer, tonefreq);
    delay(unit * 3);
    digitalWrite(LED4, LOW);
    noTone(buzzer);
    delay(unit);

    //dash
    digitalWrite(LED4, HIGH);
    tone(buzzer, tonefreq);
    delay(unit * 3);
    digitalWrite(LED4, LOW);
    noTone(buzzer);
    delay(unit);

// O: ---
    //dash
    digitalWrite(LED4, HIGH);
    tone(buzzer, tonefreq);
    delay(unit * 3);
    digitalWrite(LED4, LOW);
    noTone(buzzer);
    delay(unit);

    //dash
    digitalWrite(LED4, HIGH);
    tone(buzzer, tonefreq);
    delay(unit * 3);
    digitalWrite(LED4, LOW);
    noTone(buzzer);
    delay(unit);

    //dash
    digitalWrite(LED4, HIGH);
    tone(buzzer, tonefreq);
    delay(unit * 3);
    digitalWrite(LED4, LOW);
    noTone(buzzer);
    delay(unit);

}