Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- -- Licznik pozwala na odliczanie czasu
- -- Czas rundy określa ile sekund będzie trwała dana runda (fala)
- -- Ilość zombie do wygenerowania,
- -- pozwoli generatorowi wygenerować odpowiednią ilość zombiaków
- -- Ilość zombie do pokonania,
- -- pozwoli na sprawdzanie czy dana fala została pokonana
- -- Finalna fala określa rundę z bossem
- -- Zmienna logiczna aktywna gra, będzie określać,
- -- czy gra jest aktywna lub nie
- -- Aktualna fala określa jaki obecnie jest numer fali
- -- Komunikat gry pozwoli na przekazywanie informacji dla gracza
- -- Ilość czasu w sekundach do rozpoczęcia gry
- -- Ilość czasu w sekundach przerwy pomiędzy falami
- -- Ilość czasu w sekundach po rozgrywce
- -- Odwołanie do folderu Zombiaki, w którym będą umieszczane wygenerowane zombie
- -- Odwołanie do modelu bossa
- -- Pętla nieskończona
- while true do
- -- Startowe odliczanie
- for i = czasDoGry.Value, 0, -1 do
- komunikatGry.Value = "Rozpoczęcie gry za: " .. i
- wait(1)
- end
- -- Ustawienie licznika na wartość czasu rundy
- licznik.Value = czasRundy.Value
- -- Ustawienie ilości zombiaków do wygenerowania
- zombieDoWygenerowania.Value = 10
- -- Ustawienie ilości zombiaków do pokonania
- zombieDoPokonania.Value = 10
- -- Ustawienie numeru aktualnej fali
- aktualnaFala.Value = 1
- -- Aktywacja gry
- aktywnaGra.Value = true
- -- Powtarzaj (aż do momentu kiedy gra zostanie zakończona)
- repeat
- -- Jeżeli wartość licznika jest większa od 0
- if licznik.Value > 0 then
- -- Wyświetlanie informacji na temat aktualnego czasu rozgrywki
- komunikatGry.Value = "Pozostały czas: " .. licznik.Value
- -- Czekaj sekundę
- wait(1)
- -- Zmniejsz licznik o jeden
- licznik.Value -= 1
- else -- W przeciwnym razie
- -- Ustaw komunikat przegrana
- komunikatGry.Value = "Przegrana!"
- -- Usuń wszystkie zombiaki w folderze Zombiaki
- game.Workspace.Zombiaki:ClearAllChildren()
- -- Dezaktywacja gry
- aktywnaGra.Value = false
- end
- -- jeżeli wszystkie zombiaki zostają pokonane
- if zombieDoPokonania.Value == 0 then
- -- wartość aktualnej fali zostaje zwiększona
- aktualnaFala.Value += 1
- if aktualnaFala.Value < finalnaFala.Value + 1 then
- for i = czasPrzerwy.Value, 0, -1 do
- komunikatGry.Value = "Następna fala za: " .. i
- wait(1)
- end
- -- ustawienie licznika na wartość czasu rundy
- licznik.Value = czasRundy.Value
- -- ustawienie ilości zombiaków do wygenerowania
- zombieDoWygenerowania.Value = 10 * aktualnaFala.Value
- -- ustawienie ilości zombiaków do pokonania
- zombieDoPokonania.Value = 10 * aktualnaFala.Value
- -- jeżeli fala jest falą finałową,
- if aktualnaFala.Value == finalnaFala.Value then
- -- sklonuj bossa
- local nowyBoss = boss:Clone()
- -- przypisz go do folderu z zombiakami (czyli do świata gry)
- nowyBoss.Parent = game.Workspace.Zombiaki
- -- zwiększ ilość zombiaków do pokonania o jeden
- zombieDoPokonania.Value += 1
- end
- else -- jeżeli wartość fali jest większa o jeden od finałowej wygrywamy grę.
- komunikatGry.Value = "Gratulacje, pojedynek wygrany!!!"
- aktywnaGra.Value = false
- end
- end
- until aktywnaGra.Value == false -- aż do momentu kiedy gra zostanie zakończona
- -- chwila przerwy, odczekanie do następnej gry
- wait(czasPoGrze.Value)
- end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement