Menu
CoddyTech

Buka secara Berurutan

Pelajaran 13 dari 18 dalam kursus Game Roblox: Tycoon Pabrik di Coddy.

Sebuah tycoon menampakkan dirinya sedikit demi sedikit: awalnya hanya pad termurah yang dijual, lalu setiap pembelian memunculkan pad berikutnya. Setiap pad setelah yang pertama memiliki atribut After yang menyebutkan item yang ditunggunya.

Di awal, pad yang menunggu dipindahkan ke folder di ServerStorage, WaitingPads. Setiap kali build menambahkan item ke pabrik, fungsi ini memunculkan semua pad yang menunggu dan atribut After-nya sama dengan nama item tersebut:

for _, pad in waiting:GetChildren() do
	if pad:GetAttribute("After") == item.Name then
		pad.Parent = tycoon.Buttons
	end
end

Pad-pad tersebut sudah memiliki koneksi Touched dan label harga, jadi pad langsung berfungsi begitu muncul kembali.

challenge icon

Tantangan

Sedang

Buka pad secara berurutan:

  1. Buat Folder bernama WaitingPads di ServerStorage, dengan nama waiting.
  2. Setelah koneksi Touched dan label harga pad disiapkan, pindahkan setiap pad yang memiliki atribut After ke dalamnya.
  3. Di build, kembalikan setiap pad yang menunggu dan memiliki After yang sama dengan Name item tersebut.

Tekan Play dan buka kunci factory selangkah demi selangkah, lalu tekan Check.

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 Settings = require(game.ReplicatedStorage.Settings)

local tycoon = workspace.Tycoon
local items = ServerStorage.TycoonItems
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 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
end)

-- Papan 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 yang 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

-- Dropper menjalankan satu perulangan, berapa kali pun dimulai
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

-- Konveyor membawa apa pun yang berada 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
			owner.leaderstats.Cash.Value += value
			earned += value
		end
	end
end)

-- Upgrader 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)

-- Part baru naik ke posisinya
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

-- 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 posisinya
		task.delay(1, startDropper, item)
	end
end

-- Pembelian: pad menghilang dan item-nya 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 = ServerStorage
	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

-- 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 bantalan 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)
quiz iconUji dirimu

Pelajaran ini berisi kuis singkat. Mulai pelajarannya untuk menjawab kuis dan melacak progresmu.

Semua pelajaran di Game Roblox: Tycoon Pabrik

Latihan sendiri: Playground Roblox