#define NOTE_B0  31
#define NOTE_C1  33
#define NOTE_CS1 35
#define NOTE_D1  37
#define NOTE_DS1 39
#define NOTE_E1  41
#define NOTE_F1  44
#define NOTE_FS1 46
#define NOTE_G1  49
#define NOTE_GS1 52
#define NOTE_A1  55
#define NOTE_AS1 58
#define NOTE_B1  62
#define NOTE_C2  65
#define NOTE_CS2 69
#define NOTE_D2  73
#define NOTE_DS2 78
#define NOTE_E2  82
#define NOTE_F2  87
#define NOTE_FS2 93
#define NOTE_G2  98
#define NOTE_GS2 104
#define NOTE_A2  110
#define NOTE_AS2 117
#define NOTE_B2  123
#define NOTE_C3  131
#define NOTE_CS3 139
#define NOTE_D3  147
#define NOTE_DS3 156
#define NOTE_E3  165
#define NOTE_F3  175
#define NOTE_FS3 185
#define NOTE_G3  196
#define NOTE_GS3 208
#define NOTE_A3  220
#define NOTE_AS3 233
#define NOTE_B3  247
#define NOTE_C4  262
#define NOTE_CS4 277
#define NOTE_D4  294
#define NOTE_DS4 311
#define NOTE_E4  330
#define NOTE_F4  349
#define NOTE_FS4 370
#define NOTE_G4  392
#define NOTE_GS4 415
#define NOTE_A4  440
#define NOTE_AS4 466
#define NOTE_B4  494
#define NOTE_C5  523
#define NOTE_CS5 554
#define NOTE_D5  587
#define NOTE_DS5 622
#define NOTE_E5  659
#define NOTE_F5  698
#define NOTE_FS5 740
#define NOTE_G5  784
#define NOTE_GS5 831
#define NOTE_A5  880
#define NOTE_AS5 932
#define NOTE_B5  988
#define NOTE_C6  1047
#define NOTE_CS6 1109
#define NOTE_D6  1175
#define NOTE_DS6 1245
#define NOTE_E6  1319
#define NOTE_F6  1397
#define NOTE_FS6 1480
#define NOTE_G6  1568
#define NOTE_GS6 1661
#define NOTE_A6  1760
#define NOTE_AS6 1865
#define NOTE_B6  1976
#define NOTE_C7  2093
#define NOTE_CS7 2217
#define NOTE_D7  2349
#define NOTE_DS7 2489
#define NOTE_E7  2637
#define NOTE_F7  2794
#define NOTE_FS7 2960
#define NOTE_G7  3136
#define NOTE_GS7 3322
#define NOTE_A7  3520
#define NOTE_AS7 3729
#define NOTE_B7  3951
#define NOTE_C8  4186
#define NOTE_CS8 4435
#define NOTE_D8  4699
#define NOTE_DS8 4978

#define REST 0
#define WHOLE      1600
#define HALF        800
#define QUARTER     400
#define EIGHTH      200
#define SIXTEENTH   100




#define BUZZER_PIN 9
#define MAX_QUEUE 128

struct ToneEvent {
  float frequency;
  int duration;
};

ToneEvent toneQueue[MAX_QUEUE];
int queueStart = 0;
int queueEnd = 0;
bool isPlaying = false;
unsigned long toneStartTime = 0;

void enqueueTone(float freq, int dur) {
  if ((queueEnd + 1) % MAX_QUEUE != queueStart) {
    toneQueue[queueEnd] = { freq, dur };
    queueEnd = (queueEnd + 1) % MAX_QUEUE;
  }
}

void updateToneManager() {
  unsigned long now = millis();
  if (!isPlaying && queueStart != queueEnd) {
    ToneEvent t = toneQueue[queueStart];
    tone(BUZZER_PIN, t.frequency);
    toneStartTime = now;
    isPlaying = true;
  } else if (isPlaying) {
    ToneEvent t = toneQueue[queueStart];
    if (now - toneStartTime >= t.duration) {
      noTone(BUZZER_PIN);
      queueStart = (queueStart + 1) % MAX_QUEUE;
      isPlaying = false;
    }
  }
}

void notifyRunning() {
  float notes[] = { NOTE_E4, NOTE_G4, NOTE_E4 };
  int durations[] = { EIGHTH, EIGHTH, QUARTER }; // bisa divariasikan

  for (int i = 0; i < 3; i++) {
    enqueueTone(notes[i], durations[i]);
  }
}

void notifyMessageReceived() {
  float notes[] = { NOTE_C5, NOTE_E5, NOTE_G5 };
  int durations[] = { EIGHTH, EIGHTH, QUARTER };
  
  for (int i = 0; i < 3; i++) {
    enqueueTone(notes[i], durations[i]);
  }
}


void playMarioTheme() {
  int melody[] = {
    NOTE_E7, NOTE_E7, REST, NOTE_E7, REST, NOTE_C7, NOTE_E7, REST,
    NOTE_G7, REST, REST, REST, NOTE_G6, REST, REST, REST,
    NOTE_C7, REST, REST, NOTE_G6, REST, REST, NOTE_E6, REST,
    REST, NOTE_A6, REST, NOTE_B6, REST, NOTE_AS6, NOTE_A6, REST,
    NOTE_G6, NOTE_E7, NOTE_G7, NOTE_A7, REST, NOTE_F7, NOTE_G7,
    REST, NOTE_E7, REST, NOTE_C7, NOTE_D7, NOTE_B6, REST, REST,
    NOTE_C7, REST, REST, NOTE_G6, REST, REST, NOTE_E6, REST,
    REST, NOTE_A6, REST, NOTE_B6, REST, NOTE_AS6, NOTE_A6, REST,
    NOTE_G6, NOTE_E7, NOTE_G7, NOTE_A7, REST, NOTE_F7, NOTE_G7,
    REST, NOTE_E7, REST, NOTE_C7, NOTE_D7, NOTE_B6, REST, REST
  };

  byte tempo[] = {
    12, 12, 12, 12, 12, 12, 12, 12,
    12, 12, 12, 12, 12, 12, 12, 12,
    12, 12, 12, 12, 12, 12, 12, 12,
    12, 12, 12, 12, 12, 12, 12, 12,
    9, 9, 9, 12, 12, 12, 12,
    12, 12, 12, 12, 12, 12, 12, 12,
    12, 12, 12, 12, 12, 12, 12, 12,
    12, 12, 12, 12, 12, 12, 12, 12,
    9, 9, 9, 12, 12, 12, 12,
    12, 12, 12, 12, 12, 12, 12, 12
  };

  const float factor = 1; // sesuai panduan: durasi + 30%
    for (int i = 0; i < sizeof(melody) / sizeof(int); i++) {
      int baseDuration = 1000 / tempo[i];
      int fullDuration = baseDuration * factor;
      enqueueTone(melody[i], fullDuration);
    }
}

void playUnderworldTheme() {
  int melody[] = {
    NOTE_C4, NOTE_C5, NOTE_A3, NOTE_A4, NOTE_AS3, NOTE_AS4, 0, 0,
    NOTE_C4, NOTE_C5, NOTE_A3, NOTE_A4, NOTE_AS3, NOTE_AS4, 0, 0,
    NOTE_F3, NOTE_F4, NOTE_D3, NOTE_D4, NOTE_DS3, NOTE_DS4, 0, 0,
    NOTE_F3, NOTE_F4, NOTE_D3, NOTE_D4, NOTE_DS3, NOTE_DS4, 0, 0,
    NOTE_DS4, NOTE_CS4, NOTE_D4, NOTE_CS4, NOTE_DS4,
    NOTE_DS4, NOTE_GS3, NOTE_G3, NOTE_CS4, NOTE_C4, NOTE_FS4, NOTE_F4, NOTE_E3,
    NOTE_AS4, NOTE_A4, NOTE_GS4, NOTE_DS4, NOTE_B3, NOTE_AS3, NOTE_A3, NOTE_GS3,
    0, 0, 0
  };

  byte tempo[] = {
    12, 12, 12, 12, 12, 12, 6, 3,
    12, 12, 12, 12, 12, 12, 6, 3,
    12, 12, 12, 12, 12, 12, 6, 3,
    12, 12, 12, 12, 12, 12, 6, 6,
    18, 18, 18, 6, 6,
    6, 6, 6, 6, 18, 18, 18, 18,
    18, 18, 10, 10, 10, 10, 10, 10,
    3, 3, 3
  };

  for (int i = 0; i < sizeof(melody) / sizeof(int); i++) {
    int duration = 1000 / tempo[i];
    enqueueTone(melody[i], duration);
  }
}

// #define WHOLE      1600
// #define HALF        800
// #define QUARTER     400
// #define EIGHTH      200
// #define SIXTEENTH   100


void notifyError() {
  enqueueTone(0, SIXTEENTH);            // jeda
  enqueueTone(NOTE_G3, QUARTER);     // nada rendah
  enqueueTone(0, SIXTEENTH); 
  enqueueTone(NOTE_G3, QUARTER);     // nada rendah
  enqueueTone(0, SIXTEENTH);            // jeda
  enqueueTone(NOTE_G3, QUARTER);     // nada rendah
  
}


void playHappyBirthday() {
  int melody[] = {
    NOTE_C4, NOTE_C4, NOTE_D4, NOTE_C4, NOTE_F4, NOTE_E4,
    NOTE_C4, NOTE_C4, NOTE_D4, NOTE_C4, NOTE_G4, NOTE_F4,
    NOTE_C4, NOTE_C4, NOTE_C5, NOTE_A4, NOTE_F4, NOTE_E4, NOTE_D4,
    NOTE_AS4, NOTE_AS4, NOTE_A4, NOTE_F4, NOTE_G4, NOTE_F4
  };

  byte tempo[] = {
    4, 8, 4, 4, 4, 2,
    4, 8, 4, 4, 4, 2,
    4, 8, 4, 4, 4, 4, 4,
    4, 8, 4, 4, 4, 2
  };

  for (int i = 0; i < sizeof(melody) / sizeof(int); i++) {
    int duration = 1000 / tempo[i];
    enqueueTone(melody[i], duration);
  }
}

void playTwinkle() {
  int melody[] = {
    NOTE_C4, NOTE_C4, NOTE_G4, NOTE_G4, NOTE_A4, NOTE_A4, NOTE_G4, REST,
    NOTE_F4, NOTE_F4, NOTE_E4, NOTE_E4, NOTE_D4, NOTE_D4, NOTE_C4, NOTE_C4
  };

  byte tempo[] = {
    4, 4, 4, 4, 4, 4, 2, 4,
    4, 4, 4, 4, 4, 4, 2, 2
  };

  for (int i = 0; i < sizeof(melody) / sizeof(int); i++) {
    int duration = 1000 / tempo[i];
    enqueueTone(melody[i], duration);
  }
}

void playNokia() {
  int melody[] = {
    NOTE_E5, NOTE_D5, NOTE_FS4, NOTE_GS4,
    NOTE_CS5, NOTE_B4, NOTE_D4, NOTE_E4,
    NOTE_B4, NOTE_A4, NOTE_CS4, NOTE_E4, NOTE_A4
  };

  byte tempo[] = {
    8, 8, 4, 4,
    8, 8, 4, 4,
    8, 8, 4, 4, 2
  };

  for (int i = 0; i < sizeof(melody) / sizeof(int); i++) {
    int duration = 1000 / tempo[i];
    enqueueTone(melody[i], duration);
  }
}

void playRickRoll() {
  int melody[] = {
    NOTE_G4, NOTE_A4, NOTE_C5, NOTE_A4, NOTE_E5, NOTE_E5, REST,
    NOTE_D5, REST,

    NOTE_G4, NOTE_A4, NOTE_C5, NOTE_A4, NOTE_D5, NOTE_D5, REST,
    NOTE_C5, REST, NOTE_B4, NOTE_A4, REST,

    NOTE_G4, NOTE_A4, NOTE_C5, NOTE_A4, NOTE_C5, NOTE_D5, REST,
    NOTE_B4, NOTE_A4, NOTE_G4, REST, NOTE_G4, REST, NOTE_D5, REST, NOTE_C5, REST,

    NOTE_G4, NOTE_A4, NOTE_C5, NOTE_A4, NOTE_E5, NOTE_E5, REST,
    NOTE_D5, REST,

    NOTE_G4, NOTE_A4, NOTE_C5, NOTE_A4, NOTE_G5, NOTE_B4, REST,
    NOTE_C5, REST, NOTE_B4, NOTE_A4, REST,

    NOTE_G4, NOTE_A4, NOTE_C5, NOTE_A4, NOTE_C5, NOTE_D5, REST,
    NOTE_B4, NOTE_A4, NOTE_G4, REST, NOTE_G4, REST, NOTE_D5, REST, NOTE_C5, REST,

    NOTE_C5, REST, NOTE_D5, REST, NOTE_G4, REST, NOTE_D5, REST, NOTE_E5, REST,
    NOTE_G5, NOTE_F5, NOTE_E5, REST,

    NOTE_C5, REST, NOTE_D5, REST, NOTE_G4, REST
    // (Potong sebagian supaya contoh tidak kepanjangan)
  };

  byte tempo[] = {
    8, 8, 8, 8, 2, 8, 8,
    2, 8,

    8, 8, 8, 8, 2, 8, 8,
    4, 8, 8, 8, 8,

    8, 8, 8, 8, 2, 8, 8,
    2, 8, 4, 8, 8, 8, 8, 8, 1, 4,

    8, 8, 8, 8, 2, 8, 8,
    2, 8,

    8, 8, 8, 8, 2, 8, 8,
    2, 8, 8, 8, 8,

    8, 8, 8, 8, 2, 8, 8,
    4, 8, 3, 8, 8, 8, 8, 8, 1, 4,

    2, 6, 2, 6, 4, 4, 2, 6, 2, 3,
    8, 8, 8, 8,

    2, 6, 2, 6, 2, 1
  };

  for (int i = 0; i < sizeof(melody) / sizeof(int); i++) {
    int duration = 1000 / tempo[i];
    enqueueTone(melody[i], duration);
  }
}



unsigned long lastEventTime = 0;
int eventState = 0;

void setup() {
  pinMode(BUZZER_PIN, OUTPUT);
}


const int activeCases[] = {0,8,7,5}; 
void loop() {
  unsigned long currentMillis = millis();

  if (currentMillis - lastEventTime >= 4000) {
    lastEventTime = currentMillis;
    switch (activeCases[eventState]) {
      case 0: playMarioTheme(); break;
      case 1: playUnderworldTheme(); break;
      case 2: notifyRunning(); break;
      case 3: notifyMessageReceived(); break;
      case 4: notifyError(); break;
      case 5: playRickRoll(); break;
      case 6: playHappyBirthday(); break;
      case 7: playTwinkle(); break;
      case 8: playNokia(); break;

    }
    eventState = (eventState + 1) % (sizeof(activeCases) / sizeof(int));
  }

  updateToneManager();
}