שמרו על הכסף שלכם
שיעור 17 מתוך 18 בקורס משחק Roblox: טייקון מפעל של Coddy.
אף אחד לא משחק במשחק טייקון ששוכח אותו. DataStore שומר טבלה לכל שחקן, תחת ה־UserId שלו: את ה־Cash וה־Rebirths שלו, שנשמרים כשהוא עוזב ונטענים כשהוא מצטרף.
factoryStore:SetAsync(player.UserId, { Cash = 120, Rebirths = 1 })
local saved = factoryStore:GetAsync(player.UserId)
print(saved.Cash) --> 120קריאות ל־DataStore עלולות להיכשל, לכן כל אחת מהן עטופה ב־pcall. השמירה מתבצעת בעת PlayerRemoving, וגם עבור כולם בתוך game:BindToClose, שפועל כשהשרת נסגר.
כשהבעלים עוזב, גם המפעל מתפנה: מתאפס, משטח התביעה חוזר להיות ירוק, השלט חוזר להציג את ההודעה שלו, והכול מוכן לשחקן הבא. זהו השימוש השני ב־resetFactory, והסיבה לכך ש־startDropper מונעת ממנו לפעול פעמיים: תביעה חדשה מפעילה שוב את הטפטפת הראשונה בזמן שהלולאה הישנה שלה עדיין פועלת.
אתגר
קשהשמור את נתוני השחקן ופנה את המפעל:
- קבל את
DataStoreServiceואת מאגר הנתונים בשםFactory. - ב־PlayerAdded, אחרי יצירת leaderstats: טען את הטבלה שלהם באמצעות
GetAsync(player.UserId)בתוך pcall, ואם נמצאו נתונים, הגדר מהם את Cash ואת Rebirths. - כתוב את
saveFactory(player): הפעל אתSetAsync(player.UserId, { Cash = ..., Rebirths = ... })בתוך pcall. - בעת PlayerRemoving: שמור; ואם השחקן הוא הבעלים של המפעל, הגדר את owner ל־nil, אפס את המפעל, הפוך שוב את משטח התביעה לירוק ול־Neon, והחזר את הודעת התביעה לשלט. שמור גם את כולם בתוך
game:BindToClose.
לחץ על Play, הרוויח, לחץ על Stop ואז שוב על Play: ה־Cash שלך יחזור. לאחר מכן לחץ על Check.
נסו בעצמכם
local Players = game:GetService("Players")
local ServerStorage = game:GetService("ServerStorage")
local CollectionService = game:GetService("CollectionService")
local TweenService = game:GetService("TweenService")
local Debris = game:GetService("Debris")
local Settings = require(game.ReplicatedStorage.Settings)
local tycoon = workspace.Tycoon
local items = ServerStorage.TycoonItems
local rebirthPad = ServerStorage.RebirthPad
local owner = nil
local headline = "Step on the green pad to claim this factory"
local earned = 0
print("Ore is worth " .. Settings.OreValue .. " Cash")
-- כל שחקן מקבל Cash ו-Rebirths בטבלת המובילים
Players.PlayerAdded:Connect(function(player)
local leaderstats = Instance.new("Folder")
leaderstats.Name = "leaderstats"
leaderstats.Parent = player
local cash = Instance.new("IntValue")
cash.Name = "Cash"
cash.Parent = leaderstats
local rebirths = Instance.new("IntValue")
rebirths.Name = "Rebirths"
rebirths.Parent = leaderstats
end)
-- השלט שמעל המפעל
local gui = Instance.new("SurfaceGui")
gui.Parent = tycoon.Sign
local signLabel = Instance.new("TextLabel")
signLabel.Name = "Status"
signLabel.Size = UDim2.fromScale(1, 1)
signLabel.BackgroundColor3 = Color3.fromRGB(25, 25, 35)
signLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
signLabel.TextScaled = true
signLabel.Text = "Step on the green pad to claim this factory"
signLabel.Parent = gui
local function setSign(text)
signLabel.Text = text
end
-- עפרה: חלק קטן ששווה Cash, הנופל מתחת למתקן ההשלכה
local function dropOre(dropper)
local ore = Instance.new("Part")
ore.Name = "Ore"
ore.Size = Vector3.new(1, 1, 1)
ore.Color = Color3.fromRGB(150, 150, 160)
ore.Position = dropper.Position - Vector3.new(0, 2.5, 0)
ore:SetAttribute("Value", Settings.OreValue)
if math.random() < Settings.GoldChance then
ore.Color = Color3.fromRGB(255, 200, 40)
ore.Material = Enum.Material.Neon
ore:SetAttribute("Value", Settings.OreValue * 5)
end
ore.Parent = workspace
Debris:AddItem(ore, 20)
end
-- מתקן ההשלכה מפעיל לולאה אחת, לא משנה כמה פעמים מפעילים אותו
local function startDropper(dropper)
if dropper:GetAttribute("Running") then
return
end
dropper:SetAttribute("Running", true)
task.spawn(function()
while dropper:IsDescendantOf(workspace) do
dropOre(dropper)
task.wait(Settings.DropInterval)
end
dropper:SetAttribute("Running", nil)
end)
end
-- המסוע נושא כל מה שמונח עליו
tycoon.Conveyor.AssemblyLinearVelocity = Vector3.new(Settings.BeltSpeed, 0, 0)
-- האספן הופך עפרה ל-Cash
tycoon.Collector.Touched:Connect(function(hit)
if hit.Name == "Ore" then
local value = hit:GetAttribute("Value")
hit:Destroy()
if owner then
value = math.floor(value * (1 + owner.leaderstats.Rebirths.Value * Settings.RebirthBonus))
owner.leaderstats.Cash.Value += value
earned += value
end
end
end)
-- המשדרג מכפיל פעם אחת את הערך של כל עפרה שעוברת דרכו
items.Upgrader.Touched:Connect(function(hit)
if hit.Name == "Ore" and not hit:GetAttribute("Upgraded") then
hit:SetAttribute("Upgraded", true)
hit:SetAttribute("Value", hit:GetAttribute("Value") * 2)
hit.Color = Color3.fromRGB(155, 89, 182)
end
end)
-- משטחים שממתינים קודם לבניית פריט
local waiting = Instance.new("Folder")
waiting.Name = "WaitingPads"
waiting.Parent = ServerStorage
-- משטחים שכבר נקנו, ונשמרים ללידה מחדש הבאה
local bought = Instance.new("Folder")
bought.Name = "BoughtPads"
bought.Parent = ServerStorage
-- חלק חדש עולה למקומו
local function riseIn(part)
local goal = part.Position
local transparency = part.Transparency
part.Position = goal - Vector3.new(0, 8, 0)
part.Transparency = 1
TweenService:Create(part, TweenInfo.new(1), { Position = goal, Transparency = transparency }):Play()
end
local function checkComplete()
if #tycoon.Buttons:GetChildren() == 0 and #waiting:GetChildren() == 0 then
headline = "Factory complete! Step on the purple pad to rebirth"
setSign(headline)
rebirthPad.Parent = tycoon
end
end
-- הכנסת פריט שנקנה למפעל
local function build(item)
item.Parent = tycoon.Built
if item:IsA("BasePart") then
riseIn(item)
end
for _, part in item:GetDescendants() do
if part:IsA("BasePart") then
riseIn(part)
end
end
if item:HasTag("Dropper") then
-- להתחיל להפיל עפרות ברגע שהוא במקומו
task.delay(1, startDropper, item)
end
for _, pad in waiting:GetChildren() do
if pad:GetAttribute("After") == item.Name then
pad.Parent = tycoon.Buttons
end
end
checkComplete()
end
-- רכישה: המשטח נעלם והפריט שלו נבנה
local function buy(pad, player)
if player ~= owner or pad.Parent ~= tycoon.Buttons then
return
end
local cash = player.leaderstats.Cash
local price = pad:GetAttribute("Price")
if cash.Value < price then
return
end
cash.Value -= price
pad.Parent = bought
build(items:FindFirstChild(pad:GetAttribute("Item")))
end
for _, pad in tycoon.Buttons:GetChildren() do
pad.Touched:Connect(function(hit)
local player = Players:GetPlayerFromCharacter(hit.Parent)
if player then
buy(pad, player)
end
end)
end
-- תווית מחיר מרחפת מעל כל משטח
for _, pad in tycoon.Buttons:GetChildren() do
local tag = Instance.new("BillboardGui")
tag.Name = "PriceTag"
tag.Size = UDim2.fromOffset(160, 40)
tag.StudsOffset = Vector3.new(0, 3, 0)
tag.Parent = pad
local label = Instance.new("TextLabel")
label.Size = UDim2.fromScale(1, 1)
label.BackgroundColor3 = Color3.fromRGB(25, 25, 35)
label.BackgroundTransparency = 0.2
label.TextColor3 = Color3.fromRGB(255, 255, 255)
label.TextScaled = true
label.Text = pad:GetAttribute("Label") .. ": $" .. pad:GetAttribute("Price")
label.Parent = tag
end
-- בהתחלה מוצגים רק המשטחים הראשונים
for _, pad in tycoon.Buttons:GetChildren() do
if pad:GetAttribute("After") then
pad.Parent = waiting
end
end
-- חזרה למפעל ריק: הפריטים מועברים לאחסון, והמשטחים חוזרים למקומם המקורי
local function resetFactory()
rebirthPad.Parent = ServerStorage
for _, item in tycoon.Built:GetChildren() do
item.Parent = items
end
for _, pad in bought:GetChildren() do
if pad:GetAttribute("After") then
pad.Parent = waiting
else
pad.Parent = tycoon.Buttons
end
end
end
rebirthPad.Touched:Connect(function(hit)
local player = Players:GetPlayerFromCharacter(hit.Parent)
if player and player == owner and rebirthPad.Parent == tycoon then
resetFactory()
player.leaderstats.Rebirths.Value += 1
player.leaderstats.Cash.Value = 0
headline = player.Name .. "'s Factory"
setSign(headline)
end
end)
-- השלט מציג את ההכנסה של בעל המפעל כל 5 שניות
task.spawn(function()
while true do
task.wait(5)
if owner then
setSign(headline .. "\n$" .. math.floor(earned / 5) .. " a second")
end
earned = 0
end
end)
-- תפיסת בעלות: השחקן הראשון שדורך על המשטח הופך לבעל המפעל
local claimPad = tycoon.ClaimPad
claimPad.Touched:Connect(function(hit)
local player = Players:GetPlayerFromCharacter(hit.Parent)
if player and not owner then
owner = player
claimPad.Color = Color3.fromRGB(120, 120, 120)
claimPad.Material = Enum.Material.SmoothPlastic
headline = player.Name .. "'s Factory"
setSign(headline)
for _, dropper in CollectionService:GetTagged("Dropper") do
if dropper:IsDescendantOf(workspace) then
startDropper(dropper)
end
end
end
end)
השיעור הזה כולל חידון קצר. התחילו את השיעור כדי לענות עליו ולעקוב אחרי ההתקדמות.