Advertisement
Klemek

ComputerCraft Printer - Reconnaissance de dette Ayrobot

Jun 21st, 2014
551
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 1.39 KB | None | 0 0
  1. p = peripheral.wrap("right")
  2. if p.getPaperLevel()==0 then
  3. write("Pas assez de papier !")
  4. else
  5. write("Débiteur ? ")
  6. deb = io.read()
  7. write("Nombre de produits ? ")
  8. nb = io.read()
  9. nb = tonumber(nb)
  10. if nb > 13 then
  11. write("Trop de produits, redescendu à 13")
  12. nb = 13
  13. end
  14. prod = {}
  15. prix = {}
  16. quant = {}
  17. for i = 1, nb do
  18. write("Produit #"..tostring(i).." ? ")
  19. prod[i] = io.read()
  20. write("Prix unitaire ? ")
  21. pr = io.read()
  22. prix[i] = tonumber(pr)
  23. write("Quantité ? ")
  24. q = io.read()
  25. quant[i] = tonumber(q)
  26. end
  27. somme = 0
  28. for i = 1, nb do
  29. somme = somme + prix[i]*quant[i]
  30. end
  31. write("Date ? ")
  32. dat = io.read()
  33. write("Dette numero ? ")
  34. num = io.read()
  35. p.newPage()
  36. p.setPageTitle("Dette #"..num.." - "..deb)
  37. p.setCursorPos(9,1)
  38. p.write("Ayrobot")
  39. p.setCursorPos(2,2)
  40. p.write("Reconnaissance de dette")
  41. pos = 3
  42. for i = 1, nb do
  43. pos = pos+1
  44. p.setCursorPos(1,pos)
  45. p.write(tostring(quant[i]))
  46. p.setCursorPos(5,pos)
  47. p.write(prod[i])
  48. p.setCursorPos(22-math.modf(math.log10(prix[i])),pos)
  49. p.write(tostring(prix[i]))
  50. p.setCursorPos(24,pos)
  51. p.write("PC")
  52. end
  53. pos = pos+2
  54. p.setCursorPos(1,pos)
  55. p.write("TOTAL :")
  56. p.setCursorPos(22-math.modf(math.log10(somme)),pos)
  57. p.write(tostring(somme))
  58. p.setCursorPos(24,pos)
  59. p.write("PC")
  60. pos = pos+2
  61. p.setCursorPos(1,pos)
  62. p.write("Date : "..dat)
  63. pos = pos+1
  64. p.setCursorPos(1,pos)
  65. p.write("Debiteur : "..deb)
  66. p.endPage()
  67. write("Imprimé")
  68. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement