Advertisement
Guest User

Untitled

a guest
Jul 1st, 2017
66
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.37 KB | None | 0 0
  1. -- PROGRAMME CAISSE --
  2.  
  3. -- PARTIE 1 --
  4. -- INSTALLATION DES APIS/HARDWARE --
  5.  
  6. local args = {...}
  7.  
  8. local monX, monY = term.getSize()
  9. local PASSWORD = 1234
  10. local USERNAME = nil
  11. local NAME = fghd
  12. local FIRSTNAME = dfgd
  13. local ADMIN = 0
  14. local DEVISE = EUROS
  15.  
  16. if not fs.exists("BSAPI") or args[1] == "true" then
  17. shell.run("pastebin get 1CFqeP11 BSAPI")
  18. end
  19.  
  20. if not fs.exists("json") or args[1] == "true" then
  21. shell.run("pastebin get 4nRg9CHU json")
  22. end
  23. os.loadAPI("BSAPI")
  24. os.loadAPI("json")
  25.  
  26. for a,b in pairs(rs.getSides()) do
  27. if peripheral.getType(b) == 'modem' then
  28. rednet.open(b)
  29. break
  30. end
  31. end
  32. for a,b in pairs(rs.getSides()) do
  33. if peripheral.getType(b) == 'printer' then
  34. printer = peripheral.wrap(b)
  35. break
  36. end
  37. end
  38.  
  39. -- PARTIE 2 --
  40. -- FENETRES --
  41.  
  42.  
  43. function window(monX, monY)
  44. local monX, monY = term.getSize()
  45. BSAPI.drawWindow("Caisse de "..FIRSTNAME.." "..NAME ,false)
  46.  
  47. BSAPI.drawLabel('vente1',2,3,PRODUCT1,colors.grey)
  48. BSAPI.drawTextbox('VENTE1',2,4,12 ,PRICE1)
  49.  
  50. BSAPI.drawLabel('modif1',30,3,PRODUCT2,colors.grey)
  51. BSAPI.drawTextbox('VENTE2',30,4,40,PRICE2)
  52.  
  53. BSAPI.drawLabel('vente3',2,6,PRODUCT3,colors.grey)
  54. BSAPI.drawTextbox('VENTE3',2,7,12 ,PRICE3)
  55.  
  56. BSAPI.drawLabel('vente4',30,6,PRODUCT4,colors.grey)
  57. BSAPI.drawTextbox('VENTE4',30,7,40,PRICE4)
  58.  
  59. BSAPI.drawLabel('vente5',2,9,PRODUCT5,colors.grey)
  60. BSAPI.drawTextbox('VENTE5',2,10,12 ,PRICE5)
  61.  
  62. BSAPI.drawLabel('vente6',30,9,PRODUCT6,colors.grey)
  63. BSAPI.drawTextbox('VENTE6',30,10,40,PRICE6)
  64.  
  65. BSAPI.drawLabel('vente7',2,12,PRODUCT7,colors.grey)
  66. BSAPI.drawTextbox('VENTE7',2,13,12 ,PRICE7)
  67.  
  68. BSAPI.drawLabel('vente8',30,12,PRODUCT8,colors.grey)
  69. BSAPI.drawTextbox('VENTE8',30,13,40,PRICE8)
  70.  
  71. BSAPI.drawLabel('vente9',2,15,PRODUCT9,colors.grey)
  72. BSAPI.drawTextbox('VENTE9',2,16,12 ,PRICE9)
  73.  
  74. BSAPI.drawLabel('modifvente',30,15,"Code Vendeur ?",colors.grey)
  75. BSAPI.drawTextbox('MODIFVENTE',30,16,40,"****")
  76.  
  77. BSAPI.drawButton("confirm_btn", 1, monY, monX, monY, colors.green, "Acheter")
  78. end
  79.  
  80. function window2()
  81. while true do
  82. event, a1, a2, a3 = os.pullEvent()
  83.  
  84. if a1 == "VENTE1" then
  85. if a2 == "" then
  86. --Do nothing
  87. elseif ADMIN == 1 then
  88. if not tonumber(a2) then
  89. PRODUCT1 = a2
  90. else
  91. PRICE1 = tonumber(a2)
  92. end
  93. else
  94.  
  95. end
  96.  
  97. elseif a1 == "MODIFVENTE" then
  98. if a2 == "" then
  99. --Do nothing
  100. elseif not tonumber(a2) then
  101. BSAPI.openDialog("PASSWORD_dialog", "Code invalide", " Le code doit être composé de chiffres !")
  102. BSAPI.redrawWindow("Caisse de "..FIRSTNAME.." "..NAME,false)
  103. BSAPI.changeValue("MODIFVENTE", "value", "")
  104. else
  105. if PASSWORD == a2 then
  106. BSAPI.openDialog("USERNAME_dialog", "ADMIN MODE", "Pour modifier un prix, rentrez un nombre - un nom, rentrez des lettres")
  107. BSAPI.redrawWindow("ADMIN - Caisse de "..FIRSTNAME.." "..NAME,false)
  108. BSAPI.changeValue("MODIFVENTE", "value", "")
  109. ADMIN = 1
  110. else
  111. BSAPI.openDialog("USERNAME_dialog", "Code invalide", " Veuillez réessayer")
  112. BSAPI.redrawWindow("Caisse de "..FIRSTNAME.." "..NAME,false)
  113. BSAPI.changeValue("MODIFVENTE", "value", "")
  114. end
  115. end
  116. end
  117. end
  118. end
  119.  
  120. parallel.waitForAll(window, window2, BSAPI.eventHandler)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement