giganciprogramowania

Lekcja 9. System script-bez komentarzy

Nov 10th, 2022 (edited)
1,088
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.66 KB | None | 0 0
  1. local przyciski = script.Parent.Przyciski
  2. local zakupy = script.Parent.Zakupy
  3.  
  4. local magazyn = {}
  5.  
  6. local function ukryjPrzycisk(przycisk)
  7. przycisk.CanTouch = false
  8. przycisk.Transparency = 1
  9. end
  10.  
  11. local function odkryjPrzycisk(przycisk)
  12. przycisk.CanTouch = true
  13. przycisk.Transparency = 0
  14. end
  15.  
  16. local function nowyPrzycisk(przycisk)
  17. local zakup
  18. local nazwa = przycisk.Name
  19.  
  20. if zakupy:FindFirstChild(nazwa) then
  21. zakup = zakupy[nazwa]
  22. magazyn[nazwa] = zakup:Clone()
  23. zakup:Destroy()
  24. else
  25. warn("Brakuje zakupu: " .. nazwa)
  26. end
  27.  
  28. if not (nazwa == "1") then
  29. ukryjPrzycisk(przycisk)
  30. end
  31.  
  32. przycisk.Touched:Connect(function(hit)
  33. local player = game.Players:FindFirstChild(hit.Parent.Name)
  34.  
  35. if player then
  36.  
  37. local zakup = magazyn[nazwa]
  38.  
  39. if zakup then
  40. zakup.Parent = zakupy
  41. end
  42.  
  43. for i, element in pairs(przycisk:GetChildren()) do
  44. if element.Name == "Kolejny" then
  45.  
  46. local przyciskDoOdkrycia = przyciski:FindFirstChild(element.Value)
  47.  
  48. if przyciskDoOdkrycia then
  49. odkryjPrzycisk(przyciskDoOdkrycia)
  50. else
  51. warn("Brakuje przycisku: " .. element.Value)
  52. end
  53.  
  54. end
  55. end
  56.  
  57. przycisk:Destroy()
  58.  
  59. end
  60. end)
  61. end
  62.  
  63.  
  64. game.Players.PlayerAdded:Connect(function(gracz)
  65. for i, przycisk in pairs(przyciski:GetChildren()) do
  66. nowyPrzycisk(przycisk)
  67. end
  68. end)
Add Comment
Please, Sign In to add comment