מטר מטאורים
שיעור 11 מתוך 18 בקורס משחק Roblox: הישרדות באסונות של Coddy.
באסון השני, מטאור בוער נופל מדי חצי שנייה במשך כל הסיבוב. לולאה שממתינה תעכב את הספירה לאחור של הסיבוב, לכן היא פועלת במקביל אליה באמצעות task.spawn:
task.spawn(function()
while map.Parent do
-- הפל מטאור
task.wait(0.5)
end
end)while map.Parent do נעצרת מעצמה: כשהסיבוב משמיד את המפה, ה-Parent שלה הופך ל-nil. כל מטאור נוחת בנקודה אקראית, במרחק math.random(-15, 15) studs ממרכז האי, ו-Debris:AddItem(meteor, 4) מסיר אותו כעבור 4 שניות כדי שלא יצטברו מטאורים.
כשיש שני אסונות, הסיבוב צריך לבחור. אפשר לאחזר פונקציה בטבלה לפי שמה כמחרוזת, Disasters["Meteors"], כך שהסיבוב יוכל להפעיל כל אסון ששמו מופיע ב-Settings.Disaster. בהגדרות של השיעור הזה מוגדרים המטאורים.
אתגר
בינוניהוסיפו את מטר המטאורים:
- קבלו את שירות
Debrisבתחילת הקוד. - כתבו
Disasters.Meteors(map): בתוךtask.spawn, כל עוד המפה נמצאת במשחק, צרו חלק כדורי בשםMeteor(בגודל 3 על 3 על 3, כתום, Neon) בקואורדינטות X ו-Z אקראיות בטווח של 15 studs מ־map.Base, בגובה 40 studs, בתוך המפה. נגיעה בו תביס את השחקן; Debris יסיר אותו אחרי 4 שניות; המתינו 0.5 שניות לפני יצירת המטאור הבא. - החליפו את
Disasters.Flood(map)ב־Disasters[Settings.Disaster](map).
לחצו על Play והתחמקו, ואז לחצו על Check.
נסו בעצמכם
local Players = game:GetService("Players")
local ServerStorage = game:GetService("ServerStorage")
local TweenService = game:GetService("TweenService")
local Settings = require(game.ReplicatedStorage.Settings)
local lobbySpawn = workspace.LobbySpawn
print("Rounds last " .. Settings.RoundLength .. " seconds")
-- כל שחקן מקבל Wins בטבלת המובילים
Players.PlayerAdded:Connect(function(player)
local leaderstats = Instance.new("Folder")
leaderstats.Name = "leaderstats"
leaderstats.Parent = player
local wins = Instance.new("IntValue")
wins.Name = "Wins"
wins.Parent = leaderstats
end)
-- לוח הסטטוס בלובי
local gui = Instance.new("SurfaceGui")
gui.Parent = workspace.StatusBoard
local status = Instance.new("TextLabel")
status.Name = "Status"
status.Size = UDim2.fromScale(1, 1)
status.BackgroundColor3 = Color3.fromRGB(25, 25, 35)
status.TextColor3 = Color3.fromRGB(255, 255, 255)
status.TextScaled = true
status.Text = "Welcome to Disaster Survival!"
status.Parent = gui
local function setStatus(text)
status.Text = text
end
local function teleport(player, target)
local character = player.Character
if character then
character:PivotTo(target.CFrame + Vector3.new(0, 4, 0))
end
end
local function defeat(hit)
local humanoid = hit.Parent:FindFirstChild("Humanoid")
if humanoid then
humanoid.Health = 0
end
end
-- האסונות, לפי שם
local Disasters = {}
function Disasters.Flood(map)
local base = map.Base
local water = Instance.new("Part")
water.Name = "Water"
water.Anchored = true
water.CanCollide = false
water.Transparency = 0.3
water.Color = Color3.fromRGB(40, 120, 255)
water.Size = Vector3.new(base.Size.X + 10, 1, base.Size.Z + 10)
water.Position = base.Position - Vector3.new(0, 2, 0)
water.Parent = map
water.Touched:Connect(defeat)
local rise = TweenInfo.new(Settings.RoundLength * 0.8, Enum.EasingStyle.Linear)
TweenService:Create(water, rise, { Position = water.Position + Vector3.new(0, 8, 0) }):Play()
end
-- לולאת הסיבובים
while true do
for seconds = Settings.Intermission, 1, -1 do
setStatus("Intermission: " .. seconds)
task.wait(1)
end
local map = ServerStorage.Maps.Island:Clone()
map.Name = "Map"
map.Parent = workspace
local survivors = {}
for _, player in Players:GetPlayers() do
local character = player.Character
if character and character.Humanoid.Health > 0 then
teleport(player, map.Spawn)
survivors[player] = true
character.Humanoid.Died:Connect(function()
survivors[player] = nil
end)
end
end
Disasters.Flood(map)
for seconds = Settings.RoundLength, 1, -1 do
setStatus("Time left: " .. seconds)
task.wait(1)
end
local names = {}
for player in survivors do
player.leaderstats.Wins.Value += 1
teleport(player, lobbySpawn)
table.insert(names, player.Name)
end
map:Destroy()
if #names > 0 then
setStatus("Winners: " .. table.concat(names, ", "))
else
setStatus("Nobody survived!")
end
task.wait(3)
end
השיעור הזה כולל חידון קצר. התחילו את השיעור כדי לענות עליו ולעקוב אחרי ההתקדמות.