input = {...}

m = peripheral.wrap("back")

function RA(x)
 
 m.playNote(4,5)
 m.playNote(1,5)
 if x > 1 then
  m.playNote(0,5)
 elseif x == -1 then
  m.playNote(0,12)
  m.playNote(0,17)
  m.playNote(0,20)
 end
 sleep(0.3)
 m.playNote(4,5)
 sleep(0.1)
 m.playNote(1,5)
 sleep(0.2)
 m.playNote(4,5)
 if x > 1 then
  m.playNote(0,5)
 end
 sleep(0.2)
 m.playNote(1,5)
 sleep(0.1)
 m.playNote(4,3)
 sleep(0.1)
 m.playNote(4,5)
 if x > 1 then
  m.playNote(0,5)
 end
 sleep(0.2)
 m.playNote(4,5)
 m.playNote(1,5)
 sleep(0.2)
 if x == 1 or x == -1 then
  m.playNote(4,8)
 elseif x == 2 then
  m.playNote(4,8)
  m.playNote(0,5)
 elseif x == 3 then
  m.playNote(0,5)
 end
 sleep(0.2)
 
end

function RB(x)
 
 m.playNote(4,5)
 m.playNote(1,5)
 sleep(0.3)
 m.playNote(4,5)
 sleep(0.1)
 m.playNote(1,5)
 if x == 1 then
  m.playNote(0,5)
 elseif x == -1 then
  m.playNote(0,8)
  m.playNote(0,17)
 end
 sleep(0.2)
 m.playNote(4,5)
 if x == 1 then
  m.playNote(0,5)
 elseif x == -1 then
  m.playNote(0,8)
  m.playNote(0,17)
 end
 sleep(0.2)
 m.playNote(4,3)
 m.playNote(1,5)
 if x > 0 then
  m.playNote(0,8)
 elseif x == -1 then
  m.playNote(0,12)
  m.playNote(0,20)
 end
 sleep(0.2)
 m.playNote(4,3)
 if x > 0 then
  m.playNote(0,8)
 end
 sleep(0.2)
 m.playNote(4,1)
 m.playNote(1,5)
 if x > 0 then
  m.playNote(0,5)
 elseif x == -1 then
  m.playNote(0,12)
  m.playNote(0,20)
 end
 sleep(0.2)
 m.playNote(4,0)
 sleep(0.2)
 
end

function RC()
 
 for i = 1 , 2 do
  m.playNote(4,10)
  m.playNote(0,1)
  m.playNote(0,5)
  m.playNote(0,10)
  sleep(0.3)
 end
 m.playNote(4,10)
 m.playNote(0,1)
 m.playNote(0,5)
 m.playNote(0,10)
 sleep(0.2)
 m.playNote(4,12)
 m.playNote(1,7)
 m.playNote(0,3)
 m.playNote(0,7)
 m.playNote(0,12)
 sleep(0.3)
 m.playNote(4,12)
 m.playNote(2,7)
 m.playNote(0,3)
 m.playNote(0,7)
 m.playNote(0,12)
 sleep(0.1)
 m.playNote(2,7)
 sleep(0.2)
 m.playNote(4,12)
 m.playNote(1,7)
 m.playNote(0,3)
 m.playNote(0,7)
 m.playNote(0,12)
 sleep(0.2)
 
end

function RD()
 
 m.playNote(4,10)
 m.playNote(4,22)
 m.playNote(1,5)
 m.playNote(0,10)
 m.playNote(0,17)
 sleep(0.3)
 m.playNote(4,10)
 m.playNote(4,22)
 m.playNote(0,10)
 m.playNote(0,17)
 sleep(0.1)
 m.playNote(1,5)
 sleep(0.2)
 m.playNote(4,10)
 m.playNote(4,22)
 m.playNote(0,10)
 m.playNote(0,17)
 sleep(0.2)
 m.playNote(4,12)
 m.playNote(4,24)
 m.playNote(1,7)
 m.playNote(0,12)
 m.playNote(0,19)
 sleep(0.3)
 m.playNote(4,12)
 m.playNote(4,24)
 m.playNote(2,7)
 m.playNote(0,12)
 m.playNote(0,19)
 sleep(0.1)
 m.playNote(2,7)
 sleep(0.2)
 m.playNote(4,12)
 m.playNote(4,24)
 m.playNote(1,7)
 m.playNote(0,12)
 m.playNote(0,19)
 sleep(0.2)
 
end

function RE()
 
 m.playNote(4,10)
 m.playNote(4,22)
 m.playNote(1,5)
 m.playNote(0,8)
 m.playNote(0,17)
 sleep(0.3)
 m.playNote(4,10)
 m.playNote(4,22)
 m.playNote(0,8)
 m.playNote(0,17)
 sleep(0.1)
 m.playNote(1,5)
 sleep(0.2)
 m.playNote(4,10)
 m.playNote(4,22)
 m.playNote(0,8)
 m.playNote(0,17)
 sleep(0.2)
 m.playNote(4,12)
 m.playNote(4,24)
 m.playNote(1,7)
 m.playNote(0,8)
 m.playNote(0,17)
 sleep(0.3)
 m.playNote(4,12)
 m.playNote(4,24)
 m.playNote(2,7)
 m.playNote(0,8)
 m.playNote(0,17)
 sleep(0.1)
 m.playNote(2,7)
 sleep(0.2)
 m.playNote(4,12)
 m.playNote(4,24)
 m.playNote(1,7)
 m.playNote(0,8)
 m.playNote(0,17)
 sleep(0.2)
 
end

function C1A()
 
 --1
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,12)
 sleep(0.2)
 m.playNote(0,10)
 sleep(0.1)
 m.playNote(4,5)
 sleep(0.1)
 m.playNote(1,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(4,5)
 m.playNote(0,10)
 sleep(0.2)
 m.playNote(1,5)
 sleep(0.1)
 m.playNote(4,3)
 sleep(0.1)
 m.playNote(4,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(4,5)
 m.playNote(1,5)
 sleep(0.2)
 m.playNote(4,8)
 m.playNote(0,7)
 sleep(0.2)
 --2
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(0,7)
 sleep(0.1)
 m.playNote(4,5)
 sleep(0.1)
 m.playNote(1,5)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(4,5)
 m.playNote(0,3)
 sleep(0.2)
 m.playNote(4,3)
 m.playNote(1,5)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(4,3)
 m.playNote(0,0)
 sleep(0.2)
 m.playNote(4,1)
 m.playNote(1,5)
 sleep(0.2)
 m.playNote(4,0)
 m.playNote(0,7)
 sleep(0.2)
 --3
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(0,8)
 sleep(0.1)
 m.playNote(4,5)
 sleep(0.1)
 m.playNote(1,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(4,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(1,5)
 m.playNote(0,8)
 sleep(0.1)
 m.playNote(4,3)
 sleep(0.1)
 m.playNote(4,5)
 m.playNote(0,8)
 sleep(0.1)
 m.playNote(0,8)
 sleep(0.1)
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(4,8)
 m.playNote(0,8)
 sleep(0.2)
 --4
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(0,8)
 sleep(0.1)
 m.playNote(4,5)
 sleep(0.1)
 m.playNote(1,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(4,5)
 m.playNote(0,7)
 sleep(0.2)
 m.playNote(4,3)
 m.playNote(1,5)
 m.playNote(0,3)
 sleep(0.2)
 m.playNote(4,3)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(4,1)
 m.playNote(1,5)
 sleep(0.2)
 m.playNote(4,0)
 m.playNote(0,4)
 sleep(0.2)
 --5
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,4)
 sleep(0.2)
 m.playNote(0,5)
 sleep(0.1)
 m.playNote(4,5)
 sleep(0.1)
 m.playNote(1,5)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(4,5)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(1,5)
 m.playNote(0,5)
 sleep(0.1)
 m.playNote(4,3)
 sleep(0.1)
 m.playNote(4,5)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(4,8)
 m.playNote(0,5)
 sleep(0.2)
 --6
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(0,5)
 sleep(0.1)
 m.playNote(4,5)
 sleep(0.1)
 m.playNote(1,5)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(4,5)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(4,3)
 m.playNote(1,5)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(4,3)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(4,1)
 m.playNote(1,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(4,0)
 m.playNote(0,5)
 sleep(0.2)
 --7
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,8)
 sleep(0.3)
 m.playNote(4,5)
 sleep(0.1)
 m.playNote(1,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(4,5)
 sleep(0.2)
 m.playNote(1,5)
 m.playNote(0,10)
 sleep(0.1)
 m.playNote(4,3)
 sleep(0.1)
 m.playNote(4,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(0,12)
 sleep(0.2)
 --8
 m.playNote(4,10)
 m.playNote(4,13)
 m.playNote(4,17)
 m.playNote(1,5)
 sleep(0.3)
 m.playNote(4,10)
 m.playNote(4,13)
 m.playNote(4,17)
 sleep(0.1)
 m.playNote(1,5)
 sleep(0.2)
 m.playNote(4,10)
 m.playNote(4,13)
 m.playNote(4,17)
 sleep(0.2)
 m.playNote(4,12)
 m.playNote(4,15)
 m.playNote(4,19)
 m.playNote(1,7)
 sleep(0.3)
 m.playNote(4,12)
 m.playNote(4,15)
 m.playNote(4,19)
 m.playNote(2,7)
 sleep(0.1)
 m.playNote(2,7)
 m.playNote(0,11)
 sleep(0.2)
 m.playNote(4,12)
 m.playNote(4,15)
 m.playNote(4,19)
 m.playNote(1,5)
 m.playNote(0,11)
 sleep(0.2)
 
end

function C1BA(x)
 
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,12)
 sleep(0.2)
 m.playNote(0,12)
 sleep(0.1)
 m.playNote(4,5)
 sleep(0.1)
 m.playNote(1,5)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(4,5)
 sleep(0.2)
 m.playNote(1,5)
 if x == 12 then
  m.playNote(0,8)
 end
 sleep(0.1)
 m.playNote(4,3)
 sleep(0.1)
 m.playNote(4,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,x)
 sleep(0.2)
 if x == 8 then
  m.playNote(4,8)
 end
 m.playNote(0,x)
 sleep(0.2)
 
end

function C1BB(x)
 
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,x)
 sleep(0.2)
 m.playNote(0,8)
 sleep(0.1)
 m.playNote(4,5)
 sleep(0.1)
 m.playNote(1,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(4,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(4,3)
 m.playNote(1,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(4,3)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(4,1)
 m.playNote(1,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(4,0)
 m.playNote(0,8)
 sleep(0.2)
 
end

function C1BC()
 
 m.playNote(4,10)
 m.playNote(4,13)
 m.playNote(4,17)
 m.playNote(1,5)
 m.playNote(0,5)
 sleep(0.3)
 m.playNote(4,10)
 m.playNote(4,13)
 m.playNote(4,17)
 sleep(0.1)
 m.playNote(1,5)
 sleep(0.2)
 m.playNote(4,10)
 m.playNote(4,13)
 m.playNote(4,17)
 sleep(0.2)
 m.playNote(4,12)
 m.playNote(4,15)
 m.playNote(4,19)
 m.playNote(1,7)
 sleep(0.3)
 m.playNote(4,12)
 m.playNote(4,15)
 m.playNote(4,19)
 m.playNote(2,7)
 sleep(0.1)
 m.playNote(2,7)
 m.playNote(0,17)
 sleep(0.2)
 m.playNote(4,12)
 m.playNote(4,15)
 m.playNote(4,19)
 m.playNote(1,7)
 m.playNote(0,17)
 sleep(0.2)
 
end

function prerefrein()
 
 --1
 m.playNote(4,1)
 m.playNote(4,13)
 m.playNote(2,7)
 m.playNote(0,13)
 m.playNote(0,20)
 sleep(0.4)
 m.playNote(2,7)
 sleep(0.2)
 m.playNote(4,13)
 m.playNote(4,15)
 m.playNote(4,17)
 m.playNote(4,20)
 m.playNote(0,13)
 sleep(0.2)
 m.playNote(2,7)
 sleep(0.2)
 m.playNote(0,24)
 sleep(0.2)
 m.playNote(2,7)
 m.playNote(0,24)
 sleep(0.2)
 m.playNote(0,24)
 sleep(0.2)
 --2
 m.playNote(4,3)
 m.playNote(4,15)
 m.playNote(2,7)
 m.playNote(0,15)
 m.playNote(0,24)
 sleep(0.4)
 m.playNote(2,7)
 sleep(0.2)
 m.playNote(4,15)
 m.playNote(4,17)
 m.playNote(4,19)
 m.playNote(4,22)
 m.playNote(0,15)
 sleep(0.2)
 m.playNote(2,7)
 sleep(0.4)
 m.playNote(2,7)
 m.playNote(0,22)
 sleep(0.2)
 m.playNote(0,22)
 sleep(0.2)
 --3
 m.playNote(4,5)
 m.playNote(4,17)
 m.playNote(2,7)
 m.playNote(0,12)
 m.playNote(0,21)
 sleep(0.4)
 m.playNote(2,7)
 sleep(0.2)
 m.playNote(4,19)
 m.playNote(0,5)
 m.playNote(0,9)
 m.playNote(0,12)
 m.playNote(0,17)
 sleep(0.2)
 m.playNote(2,7)
 sleep(0.2)
 m.playNote(0,5)
 m.playNote(0,9)
 m.playNote(0,12)
 m.playNote(0,17)
 sleep(0.1)
 m.playNote(0,5)
 m.playNote(0,9)
 m.playNote(0,12)
 m.playNote(0,17)
 sleep(0.1)
 m.playNote(2,7)
 m.playNote(0,5)
 m.playNote(0,9)
 m.playNote(0,12)
 m.playNote(0,17)
 sleep(0.2)
 m.playNote(0,5)
 m.playNote(0,9)
 m.playNote(0,12)
 m.playNote(0,17)
 sleep(0.2)
 --4
 m.playNote(4,5)
 m.playNote(2,7)
 m.playNote(0,9)
 m.playNote(0,17)
 sleep(0.4)
 m.playNote(2,7)
 sleep(0.2)
 m.playNote(4,17)
 m.playNote(4,19)
 m.playNote(4,21)
 m.playNote(4,24)
 m.playNote(0,17)
 sleep(0.2)
 m.playNote(2,7)
 sleep(0.4)
 m.playNote(2,7)
 m.playNote(0,17)
 sleep(0.2)
 m.playNote(0,17)
 sleep(0.2)
 --5
 m.playNote(4,1)
 m.playNote(2,7)
 m.playNote(0,13)
 m.playNote(0,17)
 m.playNote(0,20)
 sleep(0.3)
 m.playNote(4,8)
 sleep(0.1)
 m.playNote(2,7)
 sleep(0.2)
 m.playNote(4,15)
 m.playNote(0,8)
 m.playNote(0,13)
 m.playNote(0,17)
 sleep(0.2)
 m.playNote(2,7)
 sleep(0.1)
 m.playNote(4,17)
 sleep(0.1)
 m.playNote(0,15)
 m.playNote(0,24)
 sleep(0.2)
 m.playNote(4,20)
 m.playNote(2,7)
 m.playNote(0,15)
 m.playNote(0,24)
 sleep(0.2)
 m.playNote(0,15)
 m.playNote(0,24)
 sleep(0.2)
 --6
 m.playNote(4,3)
 m.playNote(2,7)
 m.playNote(0,15)
 m.playNote(0,19)
 m.playNote(0,24)
 sleep(0.3)
 m.playNote(4,10)
 sleep(0.1)
 m.playNote(2,7)
 sleep(0.2)
 m.playNote(4,17)
 m.playNote(0,12)
 m.playNote(0,15)
 m.playNote(0,19)
 m.playNote(0,22)
 sleep(0.2)
 m.playNote(2,7)
 sleep(0.1)
 m.playNote(4,19)
 sleep(0.3)
 m.playNote(4,22)
 m.playNote(2,7)
 m.playNote(0,22)
 sleep(0.2)
 m.playNote(0,19)
 sleep(0.2)
 --7&8
 for i = 1 , 2 do
  
  m.playNote(4,0)
  m.playNote(4,12)
  m.playNote(2,7)
  m.playNote(0,16)
  m.playNote(0,24)
  sleep(0.3)
  m.playNote(4,0)
  m.playNote(4,12)
  sleep(0.1)
  m.playNote(2,7)
  sleep(0.2)
  m.playNote(4,0)
  m.playNote(4,12)
  m.playNote(0,4)
  m.playNote(0,12)
  sleep(0.2)
  m.playNote(2,7)
  sleep(0.1)
  m.playNote(4,0)
  m.playNote(4,12)
  sleep(0.1)
  if i == 1 then
   m.playNote(0,16)
   m.playNote(0,24)
  end
  sleep(0.1)
  if i == 1 then
   m.playNote(0,16)
   m.playNote(0,24)
  end
  sleep(0.1)
  m.playNote(4,0)
  m.playNote(4,12)
  m.playNote(2,7)
  m.playNote(0,16)
  m.playNote(0,24)
  sleep(0.2)
  m.playNote(4,0)
  m.playNote(4,12)
  m.playNote(0,16)
  m.playNote(0,24)
  sleep(0.2)
  
 end
 --9
 for i = 1 , 4 do
  
  for ia = 1 , 2 do
   
   m.playNote(4,0)
   m.playNote(4,12)
   if ia == 1 then
    m.playNote(2,7)
   end
   m.playNote(0,16)
   m.playNote(0,24)
   sleep(0.2)
   
  end
  
 end
 --10
 for i = 1 , 2 do
  
  for ia = -2 , -1 do
   
   m.playNote(4,0)
   m.playNote(4,12)
   m.playNote(2,7)
   m.playNote(0,12 * -ia - 8)
   m.playNote(0,12 * -ia)
   sleep(0.4)
   
  end
  
 end
 --11
 for i = 1 , 4 do
  
  for ia = 1 , 2 do
   
   m.playNote(4,0)
   if ia == 1 then
    m.playNote(2,7)
   end
   m.playNote(0,16)
   m.playNote(0,24)
   sleep(0.1)
   m.playNote(4,12)
   m.playNote(0,12)
   sleep(0.1)
   
  end
  
 end
 --12&13
 m.playNote(4,0)
 m.playNote(0,16)
 m.playNote(0,24)
 sleep(2)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(0,5)
 sleep(0.4)
 
end

function couplet2()
 
 --1
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,10)
 sleep(0.3)
 m.playNote(4,5)
 m.playNote(0,8)
 sleep(0.1)
 m.playNote(1,5)
 sleep(0.2)
 m.playNote(4,5)
 m.playNote(0,7)
 sleep(0.2)
 m.playNote(1,5)
 m.playNote(0,8)
 sleep(0.1)
 m.playNote(4,3)
 sleep(0.1)
 m.playNote(0,8)
 m.playNote(4,5)
 sleep(0.2)
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(4,8)
 m.playNote(0,5)
 sleep(0.2)
 --2
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(0,0)
 sleep(0.1)
 m.playNote(4,5)
 sleep(0.1)
 m.playNote(1,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(4,5)
 m.playNote(0,0)
 sleep(0.2)
 m.playNote(4,3)
 m.playNote(1,5)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(4,3)
 m.playNote(0,0)
 sleep(0.2)
 m.playNote(4,1)
 m.playNote(1,5)
 sleep(0.2)
 m.playNote(4,0)
 m.playNote(0,0)
 sleep(0.2)
 --3
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,10)
 sleep(0.2)
 m.playNote(0,10)
 sleep(0.1)
 m.playNote(4,5)
 sleep(0.1)
 m.playNote(1,5)
 m.playNote(0,9)
 sleep(0.2)
 m.playNote(4,5)
 m.playNote(0,9)
 sleep(0.2)
 m.playNote(1,5)
 m.playNote(0,8)
 sleep(0.1)
 m.playNote(4,3)
 sleep(0.1)
 m.playNote(4,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(4,8)
 m.playNote(0,0)
 sleep(0.2)
 --4
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(0,0)
 sleep(0.1)
 m.playNote(4,5)
 sleep(0.1)
 m.playNote(1,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(4,5)
 m.playNote(0,0)
 sleep(0.2)
 m.playNote(4,3)
 m.playNote(1,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(4,3)
 m.playNote(0,0)
 sleep(0.2)
 m.playNote(4,1)
 m.playNote(1,5)
 sleep(0.2)
 m.playNote(4,0)
 m.playNote(0,4)
 sleep(0.2)
 --5
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(0,5)
 sleep(0.1)
 m.playNote(4,5)
 sleep(0.1)
 m.playNote(1,5)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(4,5)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(1,5)
 m.playNote(0,5)
 sleep(0.1)
 m.playNote(4,3)
 m.playNote(0,5)
 sleep(0.1)
 m.playNote(4,5)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(4,8)
 m.playNote(0,5)
 sleep(0.2)
 --6
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(0,5)
 sleep(0.1)
 m.playNote(4,5)
 sleep(0.1)
 m.playNote(1,5)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(4,5)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(4,3)
 m.playNote(1,5)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(4,3)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(4,1)
 m.playNote(1,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(4,0)
 m.playNote(0,5)
 sleep(0.2)
 --7
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,5)
 sleep(0.3)
 m.playNote(4,5)
 sleep(0.1)
 m.playNote(1,5)
 m.playNote(0,5)
 m.playNote(0,12)
 m.playNote(0,17)
 sleep(0.2)
 m.playNote(4,5)
 sleep(0.2)
 m.playNote(1,5)
 m.playNote(0,8)
 sleep(0.1)
 m.playNote(4,3)
 sleep(0.1)
 m.playNote(4,5)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,10)
 sleep(0.2)
 m.playNote(4,8)
 m.playNote(0,12)
 sleep(0.2)
 --8
 m.playNote(4,10)
 m.playNote(4,13)
 m.playNote(4,17)
 m.playNote(1,5)
 sleep(0.3)
 m.playNote(4,10)
 m.playNote(4,13)
 m.playNote(4,17)
 sleep(0.1)
 m.playNote(1,5)
 sleep(0.2)
 m.playNote(4,10)
 m.playNote(4,13)
 m.playNote(4,17)
 sleep(0.2)
 m.playNote(4,12)
 m.playNote(4,15)
 m.playNote(4,19)
 m.playNote(1,5)
 sleep(0.3)
 m.playNote(4,12)
 m.playNote(4,15)
 m.playNote(4,19)
 sleep(0.1)
 m.playNote(1,5)
 m.playNote(0,11)
 sleep(0.2)
 m.playNote(4,12)
 m.playNote(4,15)
 m.playNote(4,19)
 m.playNote(0,11)
 sleep(0.2)
 --9
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,12)
 sleep(0.2)
 m.playNote(0,12)
 sleep(0.1)
 m.playNote(4,5)
 sleep(0.1)
 m.playNote(1,5)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(4,5)
 sleep(0.2)
 m.playNote(1,5)
 sleep(0.1)
 m.playNote(4,3)
 sleep(0.1)
 m.playNote(4,5)
 m.playNote(0,10)
 sleep(0.2)
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,10)
 sleep(0.2)
 m.playNote(4,8)
 m.playNote(0,8)
 sleep(0.2)
 --10
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,16)
 m.playNote(0,17)
 sleep(0.2)
 m.playNote(0,8)
 sleep(0.1)
 m.playNote(4,5)
 sleep(0.1)
 m.playNote(1,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(4,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(4,3)
 m.playNote(1,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(4,3)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(4,1)
 m.playNote(1,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(4,0)
 m.playNote(0,8)
 sleep(0.2)
 --11
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,12)
 sleep(0.2)
 m.playNote(0,12)
 sleep(0.1)
 m.playNote(4,5)
 sleep(0.1)
 m.playNote(1,5)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(4,5)
 sleep(0.2)
 m.playNote(1,5)
 m.playNote(0,8)
 sleep(0.1)
 m.playNote(4,3)
 sleep(0.1)
 m.playNote(4,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(4,8)
 m.playNote(0,8)
 sleep(0.2)
 --12
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,11)
 m.playNote(0,12)
 sleep(0.2)
 m.playNote(0,8)
 sleep(0.1)
 m.playNote(4,5)
 sleep(0.1)
 m.playNote(1,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(4,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(4,3)
 m.playNote(1,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(4,3)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(4,1)
 m.playNote(1,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(4,0)
 m.playNote(0,8)
 sleep(0.2)
 --13
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,12)
 sleep(0.2)
 m.playNote(0,12)
 sleep(0.1)
 m.playNote(4,5)
 sleep(0.1)
 m.playNote(1,5)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(4,5)
 sleep(0.2)
 m.playNote(1,5)
 m.playNote(0,4)
 sleep(0.1)
 m.playNote(4,3)
 sleep(0.1)
 m.playNote(4,5)
 m.playNote(0,4)
 sleep(0.2)
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(4,8)
 m.playNote(0,5)
 sleep(0.2)
 --14
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(0,5)
 sleep(0.1)
 m.playNote(4,5)
 sleep(0.1)
 m.playNote(1,5)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(4,5)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(4,3)
 m.playNote(1,5)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(4,3)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(4,1)
 m.playNote(1,5)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(4,0)
 m.playNote(0,5)
 sleep(0.2)
 --15
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,12)
 sleep(0.2)
 m.playNote(0,12)
 sleep(0.1)
 m.playNote(4,5)
 sleep(0.1)
 m.playNote(1,5)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(4,5)
 sleep(0.2)
 m.playNote(1,5)
 m.playNote(0,8)
 sleep(0.1)
 m.playNote(4,3)
 sleep(0.1)
 m.playNote(4,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,12)
 sleep(0.2)
 m.playNote(4,8)
 m.playNote(0,12)
 sleep(0.2)
 --16
 m.playNote(4,10)
 m.playNote(4,13)
 m.playNote(4,17)
 m.playNote(1,5)
 m.playNote(0,5)
 sleep(0.3)
 m.playNote(4,10)
 m.playNote(4,13)
 m.playNote(4,17)
 sleep(0.1)
 m.playNote(1,5)
 sleep(0.2)
 m.playNote(4,10)
 m.playNote(4,13)
 m.playNote(4,17)
 sleep(0.2)
 m.playNote(4,12)
 m.playNote(4,15)
 m.playNote(4,19)
 m.playNote(1,5)
 sleep(0.3)
 m.playNote(4,12)
 m.playNote(4,15)
 m.playNote(4,19)
 sleep(0.1)
 m.playNote(1,5)
 m.playNote(0,17)
 sleep(0.2)
 m.playNote(4,12)
 m.playNote(4,15)
 m.playNote(4,19)
 m.playNote(0,17)
 sleep(0.2)
 
end

function bridge()
 
 --1
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,12)
 sleep(0.2)
 m.playNote(0,0)
 sleep(0.1)
 m.playNote(4,5)
 sleep(0.1)
 m.playNote(1,5)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(4,5)
 sleep(0.2)
 m.playNote(1,5)
 sleep(0.1)
 m.playNote(4,3)
 sleep(0.1)
 m.playNote(4,5)
 m.playNote(0,11)
 sleep(0.2)
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,11)
 sleep(0.2)
 m.playNote(4,8)
 m.playNote(0,11)
 sleep(0.2)
 --2
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,12)
 sleep(0.2)
 m.playNote(0,0)
 sleep(0.1)
 m.playNote(4,5)
 sleep(0.1)
 m.playNote(1,5)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(4,5)
 sleep(0.2)
 m.playNote(4,3)
 m.playNote(1,5)
 sleep(0.2)
 m.playNote(4,3)
 sleep(0.2)
 m.playNote(4,1)
 m.playNote(1,5)
 m.playNote(0,11)
 sleep(0.2)
 m.playNote(4,0)
 m.playNote(0,11)
 sleep(0.2)
 --3
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,12)
 sleep(0.2)
 m.playNote(0,11)
 sleep(0.1)
 m.playNote(4,5)
 sleep(0.1)
 m.playNote(1,5)
 m.playNote(0,12)
 sleep(0.2)
 m.playNote(4,5)
 m.playNote(0,0)
 sleep(0.2)
 m.playNote(1,5)
 m.playNote(0,5)
 sleep(0.1)
 m.playNote(4,3)
 sleep(0.1)
 m.playNote(4,5)
 sleep(0.2)
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,11)
 sleep(0.2)
 m.playNote(4,8)
 sleep(0.2)
 --4
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,11)
 m.playNote(0,12)
 m.playNote(0,17)
 sleep(0.2)
 m.playNote(0,5)
 sleep(0.1)
 m.playNote(4,5)
 sleep(0.1)
 m.playNote(1,5)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(4,5)
 sleep(0.2)
 m.playNote(4,3)
 m.playNote(1,5)
 sleep(0.2)
 m.playNote(4,3)
 sleep(0.2)
 m.playNote(4,1)
 m.playNote(1,5)
 sleep(0.2)
 m.playNote(4,0)
 sleep(0.2)
 --5
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,12)
 m.playNote(0,24)
 sleep(0.2)
 m.playNote(0,17)
 sleep(0.1)
 m.playNote(4,5)
 sleep(0.1)
 m.playNote(1,5)
 m.playNote(0,8)
 m.playNote(0,20)
 sleep(0.2)
 m.playNote(4,5)
 sleep(0.2)
 m.playNote(1,5)
 sleep(0.1)
 m.playNote(4,3)
 sleep(0.1)
 m.playNote(4,5)
 m.playNote(0,11)
 m.playNote(0,23)
 sleep(0.2)
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,11)
 m.playNote(0,23)
 sleep(0.2)
 m.playNote(4,8)
 m.playNote(0,11)
 m.playNote(0,23)
 sleep(0.2)
 --6
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,12)
 m.playNote(0,24)
 sleep(0.2)
 m.playNote(0,17)
 sleep(0.1)
 m.playNote(4,5)
 sleep(0.1)
 m.playNote(1,5)
 m.playNote(0,8)
 m.playNote(0,20)
 sleep(0.2)
 m.playNote(4,5)
 sleep(0.2)
 m.playNote(4,3)
 m.playNote(1,5)
 sleep(0.2)
 m.playNote(4,3)
 sleep(0.2)
 m.playNote(4,1)
 m.playNote(1,5)
 m.playNote(0,11)
 m.playNote(0,23)
 sleep(0.2)
 m.playNote(4,0)
 m.playNote(0,11)
 m.playNote(0,23)
 sleep(0.2)
 --7
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,12)
 m.playNote(0,24)
 sleep(0.2)
 m.playNote(0,11)
 m.playNote(0,23)
 sleep(0.1)
 m.playNote(4,5)
 sleep(0.1)
 m.playNote(1,5)
 m.playNote(0,12)
 m.playNote(0,24)
 sleep(0.2)
 m.playNote(4,5)
 m.playNote(0,17)
 sleep(0.2)
 m.playNote(1,5)
 m.playNote(0,8)
 m.playNote(0,20)
 sleep(0.1)
 m.playNote(4,3)
 sleep(0.1)
 m.playNote(4,5)
 sleep(0.2)
 m.playNote(4,5)
 m.playNote(1,5)
 m.playNote(0,17)
 sleep(0.2)
 m.playNote(4,8)
 sleep(0.2)
 --8
 m.playNote(1,5)
 m.playNote(0,23)
 sleep(0.05)
 m.playNote(0,24)
 sleep(0.15)
 m.playNote(0,22)
 sleep(0.2)
 m.playNote(1,5)
 m.playNote(0,20)
 sleep(0.2)
 m.playNote(0,16)
 m.playNote(0,20)
 sleep(0.05)
 m.playNote(0,17)
 sleep(0.15)
 m.playNote(1,5)
 m.playNote(0,15)
 m.playNote(0,20)
 sleep(0.2)
 m.playNote(0,12)
 m.playNote(0,20)
 sleep(0.2)
 m.playNote(1,5)
 m.playNote(0,10)
 m.playNote(0,11)
 m.playNote(0,15)
 sleep(0.1)
 m.playNote(0,12)
 sleep(0.1)
 m.playNote(0,10)
 m.playNote(0,15)
 sleep(0.2)
 --9
 m.playNote(1,5)
 m.playNote(0,8)
 m.playNote(0,15)
 sleep(0.4)
 m.playNote(0,4)
 sleep(0.05)
 m.playNote(0,5)
 sleep(0.15)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(0,5)
 sleep(0.4)
 --10
 m.playNote(4,10)
 m.playNote(4,22)
 m.playNote(1,5)
 m.playNote(0,10)
 m.playNote(0,17)
 sleep(0.3)
 m.playNote(4,10)
 m.playNote(4,22)
 m.playNote(1,5)
 m.playNote(0,10)
 m.playNote(0,17)
 sleep(0.3)
 m.playNote(4,10)
 m.playNote(4,22)
 m.playNote(1,5)
 m.playNote(0,10)
 m.playNote(0,17)
 sleep(0.2)
 m.playNote(4,12)
 m.playNote(4,24)
 m.playNote(1,7)
 m.playNote(0,12)
 m.playNote(0,19)
 sleep(0.3)
 m.playNote(4,12)
 m.playNote(4,24)
 m.playNote(2,7)
 m.playNote(0,12)
 m.playNote(0,19)
 sleep(0.1)
 m.playNote(2,7)
 sleep(0.2)
 m.playNote(4,12)
 m.playNote(4,24)
 m.playNote(1,7)
 m.playNote(0,12)
 m.playNote(0,19)
 sleep(0.2)
 
end

function outro()
 
 sleep(0.4)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(0,5)
 sleep(0.2)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(0,8)
 sleep(0.2)
 m.playNote(0,5)
 sleep(0.3)
 m.playNote(4,5)
 m.playNote(4,12)
 sleep(0.05)
 m.playNote(4,17)
 sleep(0.05)
 m.playNote(4,5)
 m.playNote(4,12)
 sleep(6.4)
 
end

function intro()
 
 x = 0
 
 for i = 0 , 2 do
  RA(1)
  RB(i)
 end
 RA(1)
 RC()
 
end

function C1B()
 
 C1BA(8)
 C1BB(8)
 C1BA(8)
 C1BB(12)
 C1BA(8)
 C1BB(8)
 C1BA(12)
 C1BC()

end

function couplet1()
 
 C1A()
 C1B()
 
end

function refrein(hio)
 
 if hio == 0 then
  RA(1)
  RB(2)
  RA(2)
  RB(1)
  RA(1)
  RB(2)
  RA(3)
  RD()
 end
 RA(-1)
 RB(-1)
 RA(2)
 RB(1)
 RA(-1)
 RB(-1)
 RA(3)
 RE()
 
end

function playSong()
 
 intro()
 couplet1()
 prerefrein()
 refrein(0)
 couplet2()
 prerefrein()
 refrein(0)
 bridge()
 refrein(1)
 outro()
 
end

if tonumber(input[1]) == 0 then
 while true do
  playSong()
 end
else
 for i = 1 , tonumber(input[1]) do
  playSong()
 end
end