# Jesus, joy of man's desiring meets MIU!!!!
use_bpm 80
#use_transpose  note_shift (semitone number)

#Original melody:
notes = [:G3, :A3, :B3, :D4, :C4, :C4, :E4, :D4, :D4, :G4, :Fs4, :G4, :D4, :B3, :G3, :A3, :B3, :C4, :D4, :E4, :D4, :C4, :B3, :A3, :B3, :G3, :Fs3, :G3, :A3, :D3, :Fs3, :A3, :C4, :B3, :A3, :B3, :G3, :A3, :B3, :D4, :C4, :C4, :E4, :D4, :D4, :G4, :Fs4, :G4, :D4, :B3, :G3, :A3, :B3, :E3, :D4, :C4, :B3, :A3, :G3, :D3, :G3, :Fs3, :G3, :B3, :D4, :G4, :D4, :B3, :G3, :B3, :D4, :B3]
times = [0.3]
notes_short = [:G3, :A3, :B3, :D4, :C4, :C4, :E4, :D4, :D4, :G4, :Fs4, :G4, :D4, :B3, :G3, :A3, :B3, :C4, :D4, :E4, :D4, :C4, :B3, :A3, :B3]

miuString = "MIU"
itCounter = 0
transposeValue = 0
while itCounter < miuString.length do

    if (miuString[itCounter] == "M")
      #Toca la melodia original

      play_pattern_timed(notes, times)
    elsif(miuString[itCounter] == "I")
      #I transpone una tercera mayor e invierte la melodia

      transposeValue = transposeValue + 4
      use_transpose  transposeValue

      notes = notes.reverse #Reverses note order
      play_pattern_timed(notes, times)
    elsif(miuString[itCounter] == "U")
      #U transpone una octava e invierte la melodia

      transposeValue = transposeValue + 12
      use_transpose  transposeValue
      notes = notes.reverse #Reverses note order
      play_pattern_timed(notes, times)
    else

    end

    itCounter = itCounter + 1
  end