Advertisement
Cassimus

gra

Apr 28th, 2024 (edited)
34
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.05 KB | None | 0 0
  1. local rs = game:GetService("ReplicatedStorage")
  2. local aktualnaFala = rs:WaitForChild("AktualnaFala")
  3. local aktywnaGra = rs:WaitForChild("AktywnaGra")
  4. local czasDoGry = rs:WaitForChild("CzasDoGry")
  5. local czasPoGrze = rs:WaitForChild("CzasPoGrze")
  6. local czasPrzerwy = rs:WaitForChild("CzasPrzerwy")
  7. local czasRundy = rs:WaitForChild("CzasRundy")
  8. local finalnaFala = rs:WaitForChild("FinalnaFala")
  9. local komunikatGry = rs:WaitForChild("KomunikatGry")
  10. local licznik = rs:WaitForChild("Licznik")
  11. local zombieDoPokonania = rs:WaitForChild("ZombieDoPokonania")
  12. local zombieDoWygenerowania = rs:WaitForChild("ZombieDoWygenerowania")
  13. local boss = rs:WaitForChild("Boss")
  14.  
  15. local folderZombiaki = workspace.Zombiaki
  16.  
  17. while true do
  18. for i = czasDoGry.Value, 0 ,-1 do
  19. komunikatGry.Value = "Rozpoczęcie gry za: " .. i
  20. wait(1)
  21. end
  22.  
  23. local zombieNaFale = 10
  24. licznik.Value = czasRundy.Value
  25. zombieDoWygenerowania.Value = zombieNaFale
  26. zombieDoPokonania.Value = zombieDoWygenerowania.Value
  27. aktualnaFala.Value = 1
  28. aktywnaGra.Value = true
  29.  
  30. repeat
  31. if licznik.Value > 0 then
  32. komunikatGry.Value = "Pozostały czas: " .. licznik.Value
  33. wait(1)
  34. licznik.Value -= 1
  35. else
  36. komunikatGry.Value = "Przegrana!"
  37. folderZombiaki:ClearAllChildren()
  38. aktywnaGra.Value = false
  39. end
  40.  
  41. if zombieDoPokonania.Value == 0 then
  42. aktualnaFala += 1
  43.  
  44. if aktualnaFala.Value < finalnaFala.Value + 1 then
  45. for i = czasPrzerwy.Value, 0, -1 do
  46. komunikatGry.Value = "Następna fala za: " .. 1
  47. wait(1)
  48. end
  49.  
  50. licznik.Value = czasRundy.Value
  51. zombieDoWygenerowania.Value = zombieNaFale * aktualnaFala.Value
  52. zombieDoPokonania.Value = zombieDoWygenerowania.Value
  53.  
  54. if aktualnaFala.Value == finalnaFala.Value then
  55. local nowyBoss = boss:Clone()
  56. nowyBoss.Parent = folderZombiaki
  57. zombieDoPokonania.Value +=1
  58. end
  59.  
  60. else
  61. komunikatGry.Value ="Gratulacje, pojedynek wygrany!!!"
  62. aktywnaGra.Value = false
  63. end
  64.  
  65. end
  66.  
  67. until aktywnaGra == false
  68. wait(czasPoGrze.Value)
  69. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement