Download PStruments Portable Guitare

efond = Image.load("image/edite.png")
eselect = Image.load("image/select.png")

corde1 = 1
corde2 = 1
corde3 = 1
corde4 = 1
corde5 = 1
corde6 = 1
tabcorde = {-40,0,30,70,110,147,180}
a = 1
b = 1
tabcox = {0,28,65,105,140,175}
tabcoy = {65,87,106,127,149,170}
confic = {}
accordaff = {vide,vide,vide,vide,vide,vide}
oldpad = Controls.read()

function meme()
der = 1
combi = Image.load("image/combi.png")
selcombi = Image.load("image/selcombi.png")
tabder = {15,128,240,349}
  while true do
  screen:clear()
  screen:blit(0,0,combi)
  screen:blit(tabder[der],126,selcombi)
  pad = Controls.read()
if pad ~= oldpad then
  if pad:left() then
  der = der - 1
  if der == 0 then der = 4 end
  end
  if pad:right() then
  der = der + 1
  if der == 5 then der = 1 end
  end
  if pad:cross() then
  fichier = io.open("save.txt","r")
  for i = 1,24 do
  confic[i] =  fichier:read()
  end
  fichier:close()
  if der == 1 then
  corde1 = confic[1]
  corde2 = confic[2]
  corde3 = confic[3]
  corde4 = confic[4]
  corde5 = confic[5]
  corde6 = confic[6]
  end
  if der == 2 then
  corde1 = confic[7]
  corde2 = confic[8]
  corde3 = confic[9]
  corde4 = confic[10]
  corde5 = confic[11]
  corde6 = confic[12]
  end
  if der == 3 then
  corde1 = confic[13]
  corde2 = confic[14]
  corde3 = confic[15]
  corde4 = confic[16]
  corde5 = confic[17]
  corde6 = confic[18]
  end
  if der == 4 then
  corde1 = confic[19]
  corde2 = confic[20]
  corde3 = confic[21]
  corde4 = confic[22]
  corde5 = confic[23]
  corde6 = confic[24]
  end
  
  oldpad = pad
  
  corde1 = corde1 + 0
  corde2 = corde2 + 0
  corde3 = corde3 + 0
  corde4 = corde4 + 0
  corde5 = corde5 + 0
  corde6 = corde6 + 0
  accordaff[1] = acc1[corde1]
  accordaff[2] = acc2[corde2]
  accordaff[3] = acc3[corde3]
  accordaff[4] = acc4[corde4]
  accordaff[5] = acc5[corde5]
  accordaff[6] = acc6[corde6]
  break
  end
end
  screen.waitVblankStart()
  screen.flip()
  oldpad = pad
  end
end

function vidange()
efond = nil
eselect = nil
combi = nil
selcombi = nil
end

meme()
while true do
screen:clear()
screen:blit(0,0,efond)

screen:blit(tabcorde[corde1],65,doigt)
screen:blit(tabcorde[corde2],86,doigt)
screen:blit(tabcorde[corde3],107,doigt)
screen:blit(tabcorde[corde4],128,doigt)
screen:blit(tabcorde[corde5],149,doigt)
screen:blit(tabcorde[corde6],170,doigt)
screen:blit(tabcox[a],tabcoy[b],eselect)
pad = Controls.read()
if pad ~= oldpad then
  if pad:left() then
  a = a - 1
  if a == 0 then a = 6 end
  end
  if pad:right() then
  a = a + 1
  if a == 7 then a = 1 end
  end
  if pad:up() then
  b = b - 1
  if b == 0 then b = 6 end
  end
  if pad:down() then
  b = b + 1
  if b == 7 then b = 1 end
  end

  if pad:cross() then
  if b == 1 then
  corde1 = a + 1
  accordaff[1] = acc1[a+1]
  end
  if b == 2 then
  corde2 = a + 1
  accordaff[2] = acc2[a+1]
  end
  if b == 3 then
  corde3 = a + 1
  accordaff[3] = acc3[a+1]
  end
  if b == 4 then
  corde4 = a + 1
  accordaff[4] = acc4[a+1]
  end
  if b == 5 then
  corde5 = a + 1
  accordaff[5] = acc5[a+1]
  end
  if b == 6 then
  corde6 = a + 1
  accordaff[6] = acc6[a+1]
  end
  end

if pad:circle() then
  if b == 1 then
  corde1 =  1
  accordaff[1] = viv[1]
  end
  if b == 2 then
  corde2 =  1
  accordaff[2] = viv[1]
  end
  if b == 3 then
  corde3 =  1
  accordaff[3] = viv[1]
  end
  if b == 4 then
  corde4 =  1
  accordaff[4] = viv[1]
  end
  if b == 5 then
  corde5 =  1
  accordaff[5] = viv[1]
  end
  if b == 6 then
  corde6 =  1
  accordaff[6] = viv[1]
  end
end

if pad:square() then
accordaff[6]:play()
screen.waitVblankStart(5)
accordaff[5]:play()
screen.waitVblankStart(5)
accordaff[4]:play()
screen.waitVblankStart(5)
accordaff[3]:play()
screen.waitVblankStart(5)
accordaff[2]:play()
screen.waitVblankStart(5)
accordaff[1]:play()
screen.waitVblankStart(5)
end

if pad:triangle() then
vidange()
break
end

if pad:start() then
if der == 1 then
  confic[1] = corde1
  confic[2] = corde2
  confic[3] = corde3
  confic[4] = corde4
  confic[5] = corde5
  confic[6] = corde6
  end
  if der == 2 then
  confic[7] = corde1
  confic[8] = corde2
  confic[9] = corde3
  confic[10] = corde4
  confic[11] = corde5
  confic[12] = corde6
  end
  if der == 3 then
  confic[13] = corde1
  confic[14] = corde2
  confic[15] = corde3
  confic[16] = corde4
  confic[17] = corde5
  confic[18] = corde6
  end
  if der == 4 then
  confic[19] = corde1
  confic[20] = corde2
  confic[21] = corde3
  confic[22] = corde4
  confic[23] = corde5
  confic[24] = corde6
  end
  fichier = io.open("save.txt","w")
  for i = 1,24 do
  fichier:write(confic[i].."\n")
  end
  fichier:close()
  vidange()
  break
end

end
oldpad = pad

screen.waitVblankStart()
  screen.flip()
end