Scripting Helpers is winding down operations and is now read-only. More info→
Ad
Log in to vote
0

Disaster Script Giving Points?

Asked by 9 years ago

I am trying to get this script so it gives points upon surviving the round. Here's the code:

disasters = {"Truss World","Truss World: MEGA WAVE!!!"} -- This is where you list the names models that you want to use for disasters.
-- Disaster names are case-sensitive and all disaster models must be in the lighting

countdownTime = 30 -- Time between disasters.
disasterTime = 45 -- The ammount of time that the disaster will be in the game before it is removed.

countdownMessage = "Next Round In: %s" -- The message displayed between disasters. %s will be replaced with the number of seconds left.
disasterMessage = "%s" -- The message displayed when a disaster occurs. %s will be replaced with the disaster name. Set to nil if you do not want a message

-- Unless you know what you are doing, please leave the below code alone.
items = {}
leaderboard = game.Workspace:findFirstChild("leaderboard") -- Dont need to use with AjediĀ“s BTS leaderboard, but if you want...
local w = game.Workspace:getChildren()
for i=1,#w do
    if w[i].Name == "leaderboard" and w[i]:findFirstChild("running") ~= nil and w[i]:findFirstChild("points") ~= ni then
        leaderboard = w[i]
    end
end

for i=1,#disasters do
    local item = game.Lighting:findFirstChild(disasters[i])
    if item ~= nil then
        item.Parent = nil
        table.insert(items, item)
    else
        print("Error! ", disasters[i], " was not found!")
    end
end

function chooseDisaster()
    return items[math.random(#items)]
end

function sethint(text)
    local hint = game.Workspace:findFirstChild("hint")
    if (hint ~= nil) then
        hint.Text = text
    else
        print("Hint does not exist, creating...")
        h = Instance.new("Hint")
        h.Name = "hint"
        h.Text = text
        h.Parent = game.Workspace
    end
    --print("Hint set to: ", text)
end

function removeHint()
    hint = game.Workspace:findFirstChild("hint")
    if (hint ~= nil) then hint:remove() end
end

function countdown(time)
    sethint(string.format(countdownMessage, tostring(time)))
    while (time > 0) do
        wait(1)
        time = time - 1
        sethint(string.format(countdownMessage, tostring(time)))
    end
    removeHint()
    return true
end

while true do
    countdown(countdownTime)

    if leaderboard ~= nil and leaderboard:findFirstChild("running") and leaderboard:findFirstChild("points") then 
        leaderboard.points.Value = 10
        leaderboard.running.Value = true
    end

    local m = chooseDisaster():clone()

    if disasterMessage ~= nil then
        local msg = Instance.new("Message")
        msg.Name = "DisasterMsg"
        msg.Text = string.format(disasterMessage, m.Name)
        msg.Parent = game.Workspace
        wait(3)
        msg.Parent = nil
        local player = game.Players:GetPlayers()
for i = 1, #player do
    player[i].Character:MoveTo(Vector3.new(-583.999, 25.8, 43))
end

    end

    m.Parent = game.Workspace
    m:makeJoints()
    wait(disasterTime)
    m:remove()

    if leaderboard ~= nil then  
        leaderboard.running.Value = false
    end
end



Answer this question