Bebaskan Pabrik
Pelajaran 20 dari 22 dalam kursus Game Roblox: Tycoon Pabrik di Coddy.
Saat pemiliknya pergi, pabriknya harus siap untuk pemain berikutnya: reset, alas klaim kembali hijau, dan papan kembali menampilkan pesannya. Itulah kegunaan kedua resetFactory.
Ada satu hal yang bermasalah saat klaim berikutnya. Dropper pertama tidak pernah meninggalkan workspace, jadi perulangan lamanya masih berjalan, dan klaim tersebut menjalankannya lagi: dua perulangan, dua bijih per detik. Solusinya adalah menandai dropper dengan atribut yang menunjukkan bahwa sebuah perulangan sedang berjalan:
if dropper:GetAttribute("Running") then
return
end
dropper:SetAttribute("Running", true)Hapus penanda itu dengan SetAttribute("Running", nil) saat perulangan berakhir, supaya dropper yang nanti dipindahkan kembali ke dunia dapat berjalan lagi.
Tantangan
SulitBebaskan pabrik saat pemiliknya pergi.
- Di
PlayerRemoving, setelah menyimpan, jika pemain adalahowner:owner = nil,resetFactory(), ubahtycoon.ClaimPadmenjadi hijau Neon (Color3.fromRGB(46, 204, 113)), lalu tampilkan kembali pesan klaim pada papan. - Di
startDropper, kembalikan fungsi jika atributRunningpada dropper sudah ditetapkan; jika belum, tetapkan atribut itu dan hapus setelah perulangan.
Tekan tombol “Main” lalu klaim: setiap dropper tetap menjatuhkan satu ore per detik. Lalu tekan tombol “Periksa”.
Coba sendiri
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 DataStoreService = game:GetService("DataStoreService")
local Settings = require(game.ReplicatedStorage.Settings)
local tycoon = workspace.Tycoon
local items = ServerStorage.TycoonItems
local rebirthPad = ServerStorage.RebirthPad
local factoryStore = DataStoreService:GetDataStore("Factory")
local owner = nil
local headline = "Step on the green pad to claim this factory"
local earned = 0
print("Ore is worth " .. Settings.OreValue .. " Cash")
-- Setiap pemain mendapat Cash dan Rebirths di papan peringkat
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
-- yang dimiliki pemain ini sebelumnya
local ok, saved = pcall(function()
return factoryStore:GetAsync(player.UserId)
end)
if ok and saved then
cash.Value = saved.Cash or 0
rebirths.Value = saved.Rebirths or 0
end
end)
-- Papan tanda di atas pabrik
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
-- Ore: part kecil bernilai Cash, dijatuhkan di bawah dropper
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)
task.spawn(function()
while dropper:IsDescendantOf(workspace) do
dropOre(dropper)
task.wait(Settings.DropInterval)
end
end)
end
-- Konveyor mengangkut apa pun yang ada di atasnya
tycoon.Conveyor.AssemblyLinearVelocity = Vector3.new(Settings.BeltSpeed, 0, 0)
-- Pengumpul mengubah ore menjadi 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)
-- Peningkat menggandakan nilai setiap ore yang melewatinya, satu kali
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)
-- Pad yang menunggu item dibangun terlebih dahulu
local waiting = Instance.new("Folder")
waiting.Name = "WaitingPads"
waiting.Parent = ServerStorage
-- Pad yang sudah dibeli, disimpan untuk rebirth berikutnya
local bought = Instance.new("Folder")
bought.Name = "BoughtPads"
bought.Parent = ServerStorage
-- Part baru naik ke tempatnya
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
-- Tempatkan item yang dibeli di pabrik
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
-- mulai menjatuhkan ore setelah berada di tempatnya
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
-- Pembelian: pad menghilang dan itemnya dibangun
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
-- Label harga melayang di atas setiap pad
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
-- Hanya pad awal yang muncul saat permainan dimulai
for _, pad in tycoon.Buttons:GetChildren() do
if pad:GetAttribute("After") then
pad.Parent = waiting
end
end
-- Kembali ke pabrik kosong: item masuk ke penyimpanan, pad kembali ke posisi semula
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)
-- Penyimpanan: Cash dan Rebirths
local function saveFactory(player)
local data = {
Cash = player.leaderstats.Cash.Value,
Rebirths = player.leaderstats.Rebirths.Value,
}
pcall(function()
factoryStore:SetAsync(player.UserId, data)
end)
end
-- Cash dan Rebirths pemain disimpan saat mereka keluar
Players.PlayerRemoving:Connect(function(player)
saveFactory(player)
-- Pelajaran 20: Free the Factory ditambahkan di sini
end)
game:BindToClose(function()
for _, player in Players:GetPlayers() do
saveFactory(player)
end
end)
-- Papan menampilkan pendapatan pemilik setiap 5 detik
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)
-- Klaim: pemain pertama yang menginjak pad menjadi pemilik pabrik
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)
Semua pelajaran di Game Roblox: Tycoon Pabrik
Latihan sendiri: Playground Roblox