generic image
Processing...
  • Games
  • Catalog
  • Develop
  • Robux
  • Search in Players
  • Search in Games
  • Search in Catalog
  • Search in Groups
  • Search in Library
  • Log In
  • Sign Up
  • Games
  • Catalog
  • Develop
  • Robux
   
ROBLOX Forum » Game Creation and Development » Scripting Helpers
Home Search
 

Re: Hunger Games

Previous Thread :: Next Thread 
monster07 is not online. monster07
Joined: 19 Jul 2009
Total Posts: 533
02 Apr 2013 03:38 PM
In my script for my hunger games it wont spawn people in the arena, heres the script, ( Copy it if you want but give me credit ) So basically after the interval you wont spawn in the arena.

--SOUNDS--
local Cannon = Instance.new("Sound", game.Workspace)
Cannon.SoundId = "http://www.roblox.com/asset/?id=2920959"
Cannon.Volume,Cannon.Pitch = 1,.125
Cannon.Name = "CannonSound"
local Tick = Instance.new("Sound", game.Workspace)
Tick.SoundId = "http://www.roblox.com/asset/?id=11984254"
Tick.Volume = 1
Tick.Pitch = 2
local Tick2 = Instance.new("Sound", game.Workspace)
Tick2.SoundId = "http://www.roblox.com/asset/?id=11984254"
Tick2.Volume = 1
Tick2.Pitch = 1.6
local BEGIN = Instance.new("Sound", game.Workspace)
BEGIN.Name = "TestSound"
BEGIN.SoundId = "http://www.roblox.com/asset/?id=19344667"
BEGIN.Pitch = .07
BEGIN.Volume = 2
local ShowReap = Instance.new("Sound", game.Workspace)
ShowReap.SoundId = "http://www.roblox.com/asset/?id=11984254"
ShowReap.Volume = 1
ShowReap.Pitch = 1.2
local GameSound = Instance.new("Sound", game.Workspace)
GameSound.Volume = .15
local GameMusic = {
"http://www.roblox.com/asset/?id=11420933";
"http://www.roblox.com/asset?id=1372260";
"http://www.roblox.com/asset/?id=1034065";
"http://www.roblox.com/asset/?version=1&id=1015394";

}
--END SOUNDS--
local Vip = "http://www.roblox.com/asset/?id=83617809"
local TP = "http://www.roblox.com/asset/?id=83619342"

local Mess = game.Workspace.Mess
local Mess2 = game.Workspace.Mess2
local Mess3 = game.Workspace.Mess3

local Winner = {}
shared.Tributes = {}
shared.Broken = true
shared.GameMaker = {}
shared.Previous = "Player"

local Maps = game.Lighting.Maps:GetChildren()
local Map

local b = game:GetService("BadgeService")
local Victor = 84389845
local TributeID = 84390114
local GamemakerID = 84390306

local Sixt = false
local Ten = false
local Five = false
local Two = false



function resetGame()
if (Map) then Map:Remove() end
for q,w in pairs(game.Players:GetChildren()) do
if w == shared.GameMaker[1] then
w.Character.Torso.CFrame = game.Workspace.Lobby.SpawnLocation.CFrame + Vector3.new(0,5,0)
end
end
Winner = {}
shared.GameMaker = {}
shared.Tributes = {}
for _, v in pairs(game.Players:GetChildren()) do
v.Alive.Value = false
if v.PlayerGui:findFirstChild("Death") then
v.PlayerGui.Death:Remove()
end
if v.Alive.Value then
v.Character.Torso.CFrame = game.Workspace.Lobby.SpawnLocation.CFrame
for o,p in pairs(v.Character:GetChildren()) do
if game.Lighting.Tools:findFirstChild(p.Name) then
p:Remove()
end
end
for i,l in pairs(v.Backpack:GetChildren()) do
l:Remove()
end
end
wait(.1)
end
wait(1)
Begin()
end


function giveEveryone(Item)
for _, v in pairs(game.Players:GetChildren()) do
C = Item:Clone()
C.Parent = v.PlayerGui
C.Disabled = false
end
end


local Ali = 0


function Alive()
Ali = 0
for _, v in pairs(game.Players:GetChildren()) do
if v:findFirstChild("Alive") then
if v.Alive.Value == true then
Ali = Ali + 1
end
end
end
wait(.1)
return Ali
end local IsOk = 2239140

local POT = 0
function getAmount(Who)
POT = 25
if Who.Character.Torso.roblox.Texture == TP then
POT = 30
end
return POT
end

function Disaster()
game.Workspace.ChosenDis.Value = ""
game.Workspace.GMDisaster.Value = true
for i = 1, 30 do
wait(game.Lighting.Disasters:findFirstChild(game.Workspace.ChosenDis.Value) and 0.03 or 1)
Mess3.Value = "Gamemaker has ".. tostring(30-i) .." seconds left to create a disaster."
end
if not game.Lighting.Disasters:findFirstChild(game.Workspace.ChosenDis.Value) then
Di = game.Lighting.Disasters:GetChildren()[math.random(1,#game.Lighting.Disasters:GetChildren())]:Clone()
Mess3.Value = Di.Name.." is forecasted!"
wait(2.5)
if Di.Name == "Mutts" then
Di:MoveTo(Map.Spawns:GetModelCFrame().p + Vector3.new(0,20,0))
end
Di.Parent = Map
Mess3.Value = ""
elseif game.Lighting.Disasters:findFirstChild(game.Workspace.ChosenDis.Value) then
Dis = game.Lighting.Disasters:findFirstChild(game.Workspace.ChosenDis.Value):Clone()
Mess3.Value = shared.GameMaker[1].Name.." has created the disaster: "..Dis.Name.."!"
wait(2)
Mess3.Value = ""
if Dis.Name == "Mutts" then
Dis:MoveTo(Map.Spawns:GetModelCFrame().p + Vector3.new(0,20,0))
end
Dis.Parent = Map
Dis:MakeJoints()
end
game.Workspace.ChosenDis.Value = ""
game.Workspace.GMDisaster.Value = false
end

function countDown()
wait(.5)
Mess.Value = "The Hunger Games"
GameSound.SoundId = tostring(GameMusic[math.random(1,#GameMusic)])
for O,N in pairs(shared.Tributes) do
lop = script.CorntoPlayer:Clone()
lop.Parent = N.PlayerGui
lop.Disabled = false
end
for i = 1, 60 do
Tick:Play()
wait(.6)
Mess2.Value = tostring(60 - i)
end
wait(math.random(4,15)/5)
BEGIN:Play()
delay(0, function() wait(2) GameSound:Play() end)
Mess.Value = "The game has broke, please join another server. I am sorry for the inconvenience"
for _, v in pairs(shared.Tributes) do
if v:findFirstChild("TOOLS") then
for i,p in pairs(v.TOOLS:GetChildren()) do
RYT = p
RYT.Parent = v.Backpack
end
end
if v.Character.Torso:findFirstChild("roblox") then
v.Character.Humanoid.WalkSpeed = (v.Character.Torso.roblox.Texture == Vip and 18 or 16)
wait()
v.Character.Humanoid.WalkSpeed = (v.Character.Torso.roblox.Texture == TP and 20 or v.Character.Humanoid.WalkSpeed)
end
end
Sixt = false
Ten = false
Five = false
Two = false
Mess.Value = "The Hunger Games"
while (wait(.5)) and #shared.Tributes >= 2 do
Mess2.Value = "Tributes left: "..tostring(#shared.Tributes)
delay(0, function()
if #shared.Tributes == 17 then
if not Sixt then
Sixt = true
delay(0, function() Disaster() end)
end
end
if #shared.Tributes == 12 then
if not Ten then
Ten = true
delay(0, function() Disaster() end)
end
end
if #shared.Tributes == 7 then
if not Five then
Five = true
delay(0, function() Disaster() end)
end
end
if #shared.Tributes == 2 then
if not Two then
Two = true
delay(0, function() Disaster() end)
end
end
end)
end
wait(1.5)
if shared.Tributes[1] then
Winner = shared.Tributes[1]
Mess.Value = Winner.Name.." has won The Hunger Games! This person will be rewarded with 25 points."
shared.Previous = Winner.Name
b:AwardBadge(Winner.userId, Victor)
if Winner:findFirstChild("leaderstats") then
Winner.leaderstats.Points.Value = Winner.leaderstats.Points.Value + getAmount(Winner)
end
if Winner:findFirstChild("leaderstats") then
Winner.leaderstats.Points.Value = Winner.leaderstats.Points.Value + (Winner:findFirstChild("Kills") and Winner.Kills.Value*5 or 0)
end
for i = 1, #game.Players:GetChildren() do
C = game.Lighting.Dot:Clone()
C.Parent = game.Players:GetChildren()[i].PlayerGui
C.Frame.ImageLabel.Image = "http://www.roblox.com/Thumbs/Avatar.ashx?x=100&y=100&Format=Png&username="..Winner.Name
C.Frame.Subject.Text = "Victor of the hunger games"
C.Frame.One.Text = Winner.Name
C.Frame.Two.Text = (Winner:findFirstChild("Kills") and "Kills: "..Winner.Kills.Value or "Error")
C.Frame.Three.Text = ""
end
if Winner:findFirstChild("Kills") then Winner.Kills.Value = 0 end
else
Mess.Value = "Nobody won"
end
wait(3)
resetGame()
end

function POP()
delay(0, function()
Spawns = Map.Spawns:GetChildren()
for _, v in pairs(shared.Tributes) do
E = Spawns[math.random(1,#Spawns)]
v.Character.Humanoid.WalkSpeed = 0
if v:findFirstChild("Health") and v:findFirstChild("MaxHealth") and v.Character:findFirstChild("Torso") then
v.Health.Value = v.MaxHealth.Value
v.Character.Torso.CFrame = E.Part.CFrame + Vector3.new(0,3,0)
end
if v.Character:findFirstChild("Head") then
FH = v.Character.Head:Clone()
FH.Parent = v.Character
v.Character.Head.Transparency = 1
weld = Instance.new("Weld")
weld.Parent = v.Character.Head
weld.Part0 = v.Character.Head
weld.Part1 = FH
end
for i,o in pairs(v.Backpack:GetChildren()) do
o:Remove()
end
if v:findFirstChild("Alive") then
v.Alive.Value = true
end
for t,y in pairs(Spawns) do
if y == E then
table.remove(Spawns,t)
end
end
end
end)
end

function teleportTributes()
delay(0, function() POP() end)
wait(2.5)
Mess2.Value = ""
countDown()
end

local StuffSpaw = {}

function chooseMap()
game.Workspace.GMMap.Value = true
for i = 1, 30 do
Mess.Value = "Gamemaker has "..tostring(30-i).." seconds left to choose a map"
if game.Workspace:findFirstChild("ChosenMap") then
wait(game.Workspace.ChosenMap.Value == "" and 1 or 0.03)
else
wait()
end
end
Mess2.Value = "Preparing map"
if shared.GameMaker[1] then
if game.Workspace.ChosenMap.Value == "" then
Map = Maps[math.random(1,#Maps)]:Clone()
Mess.Value = shared.GameMaker[1].Name.." did not chose a map, so "..Map.Name.." is the map."
wait(3)
else
Map = game.Lighting.Maps:findFirstChild(game.Workspace.ChosenMap.Value):Clone()
Mess.Value = shared.GameMaker[1].Name.." has chosen "..Map.Name.." as the map."
wait(3)
end
else
Map = Maps[math.random(1,#Maps)]:Clone()
Mess.Value = "Gamemaker left, so "..Map.Name.." is the map."
wait(3)
end
Map.Parent = game.Workspace
game.Workspace.GMMap.Value = false
game.Workspace.ChosenMap.Value = ""
wait(2.5)
while not game.Lighting:findFirstChild("Tools") do wait(.1) end
Fg = game.Lighting.Tools:Clone()
Fg.Parent = Map
Fg.PrimaryPart = Fg.Middle
Fg:MoveTo(Map.Spawns:GetModelCFrame().p)
for u,y in pairs(Fg:GetChildren()) do
if y:IsA("Tool") then
wait()
for i = 1, #y:GetChildren() do
if y:GetChildren()[i]:IsA("Part") then
y:GetChildren()[i].Anchored = false
end
end
end
end
teleportTributes()
end
local Gh = {}
local AllT = {}
function getDT(District)
Gh = {}
for i,o in pairs(AllT) do
if o.District.Value == tostring(District) then
table.insert(Gh,o)
table.remove(AllT,i)
end
end
return Gh
end


local Sort = 0
local Ad = 1
function reapF()
Sort = #shared.Tributes
AllT = {}
for g,t in pairs(shared.Tributes) do
table.insert(AllT,t)
end
for dfr = 1, 12 do
if dfr*2 <= Sort then
Ad = dfr
game.Workspace.ReapDistrict.Value = Ad
TributesGot = getDT(Ad)
game.Workspace.Tribute1.Value = TributesGot[1].Name
if #TributesGot == 2 then
game.Workspace.Tribute2.Value = TributesGot[2].Name
else
game.Workspace.Tribute2.Value = ""
end
Tick2:Play()
wait(4)
end
end
if #shared.GameMaker == 1 then
game.Workspace.ReapDistrict.Value = "0"
game.Workspace.Tribute1.Value = "Gamemaker"
game.Workspace.Tribute2.Value = tostring(shared.GameMaker[1].Name)
wait(4)
end
game.Workspace.ReapDistrict.Value = ""
chooseMap()
end


local Eligible = {}

function Begin() function gameRunning() return IsOk == 2239140 end if not gameRunning() and not game.Players:findFirstChild("Player") then game.Workspace.Lobby:Remove() M = Instance.new("Message", game.Workspace) M.Text = "Sorry For The Inconvenience" script:Remove() end
wait(1)
game.Workspace.GMMap.Value = false
game.Workspace.GMDisaster.Value = false
game.Workspace.ChosenDis.Value = ""
game.Workspace.ChosenMap.Value = ""
game.Workspace.Mess2.Value = ""
game.Workspace.Mess3.Value = ""
shared.GameMaker = {}
Map = nil
shared.Tributes = {}
if game.Players.NumPlayers >= 3 or game.Players:findFirstChild("Player") then
for i = 1, 250 do
Mess.Value = "Interval [".. (4000-(i*16)) .."]"
wait(.5)
end
Eligible = {}

--INSERT ALL
for _,v in pairs(game.Players:GetChildren()) do
table.insert(Eligible,v)
end
--END INSERT ALL

--GAMEMAKER
F = math.random(1,#Eligible)
Chosen = Eligible[F]
Chosen.leaderstats.Points.Value = Chosen.leaderstats.Points.Value + 10
table.insert(shared.GameMaker,Chosen)
b:AwardBadge(Chosen.userId, GamemakerID)
if Chosen.Character:findFirstChild("Torso") then
Chosen.Character.Torso.CFrame = game.Workspace.Lobby.GMChair.Seat.CFrame + Vector3.new(0,1,0)
end
table.remove(Eligible,F)
--END GAMEMAKER

--NOT PICKED
if #Eligible >= 25 then
for i = 1, (#Eligible - 24) do
C = math.random(1,#Eligible)
table.remove(Eligible, C)
end
end
--END NOT PICKED

--TRIBUTES
for f = 1, #Eligible do
i = math.random(1,#Eligible)
Eligible[i].Alive.Value = true
Eligible[i].District.Value = tostring(math.ceil(f/2))
b:AwardBadge(Eligible[i].userId, TributeID)
GH = script.Death:Clone()
GH.Parent = Eligible[i].PlayerGui
GH.Disabled = false
table.remove(Eligible, i)
wait(.1)
end
--END TRIBUTES

reapF()
else
game.Workspace.Mess.Value = " Three Players required for the reaping to begin"
end
Begin()
end

for _, v in pairs(game.Workspace:GetChildren()) do
if game.Lighting.Maps:findFirstChild(v.Name) then
v:Remove()
end
end

Begin()
Report Abuse
monster07 is not online. monster07
Joined: 19 Jul 2009
Total Posts: 533
02 Apr 2013 03:48 PM
The Maps are in lighting,
Report Abuse
monster07 is not online. monster07
Joined: 19 Jul 2009
Total Posts: 533
02 Apr 2013 03:52 PM
And the interval is at the bottom
Report Abuse
tehepicford is not online. tehepicford
Joined: 26 Aug 2011
Total Posts: 1486
02 Apr 2013 03:53 PM
Please stop replying to this thread, it was born dead.
Report Abuse
monster07 is not online. monster07
Joined: 19 Jul 2009
Total Posts: 533
02 Apr 2013 04:21 PM
Please can someone try and find the issue, I spent 2 months making this game and this is the only error,
Report Abuse
monster07 is not online. monster07
Joined: 19 Jul 2009
Total Posts: 533
02 Apr 2013 05:08 PM
BUMB
Report Abuse
MrChubbs is not online. MrChubbs
Joined: 14 Oct 2010
Total Posts: 4969
02 Apr 2013 05:10 PM
What is the output.
Report Abuse
monster07 is not online. monster07
Joined: 19 Jul 2009
Total Posts: 533
02 Apr 2013 05:22 PM
logging probability 0.32923368022706
not logging
23:20:25.218 - DataModel Loading http://www.roblox.com/asset/?id=14285476
Report Abuse
monster07 is not online. monster07
Joined: 19 Jul 2009
Total Posts: 533
02 Apr 2013 05:50 PM
Please get back to me as I don't want my ad to be a complete waste
Report Abuse
monster07 is not online. monster07
Joined: 19 Jul 2009
Total Posts: 533
02 Apr 2013 05:53 PM
BUMPA
Report Abuse
monster07 is not online. monster07
Joined: 19 Jul 2009
Total Posts: 533
02 Apr 2013 06:46 PM
Bump
Report Abuse
theuntimelydoctor is not online. theuntimelydoctor
Joined: 30 Jun 2011
Total Posts: 718
02 Apr 2013 07:16 PM
You need to try find the part of code where you are trying to teleport the players, not a whole thing of code. No one is going to read all of that (or at least a very small amount of people)
Report Abuse
monster07 is not online. monster07
Joined: 19 Jul 2009
Total Posts: 533
03 Apr 2013 05:35 AM
function POP()
delay(0, function()
Spawns = Map.Spawns:GetChildren()
for _, v in pairs(shared.Tributes) do
E = Spawns[math.random(1,#Spawns)]
v.Character.Humanoid.WalkSpeed = 0
if v:findFirstChild("Health") and v:findFirstChild("MaxHealth") and v.Character:findFirstChild("Torso") then
v.Health.Value = v.MaxHealth.Value
v.Character.Torso.CFrame = E.Part.CFrame + Vector3.new(0,3,0)
end
if v.Character:findFirstChild("Head") then
FH = v.Character.Head:Clone()
FH.Parent = v.Character
v.Character.Head.Transparency = 1
weld = Instance.new("Weld")
weld.Parent = v.Character.Head
weld.Part0 = v.Character.Head
weld.Part1 = FH
end
for i,o in pairs(v.Backpack:GetChildren()) do
o:Remove()
end
if v:findFirstChild("Alive") then
v.Alive.Value = true
end
for t,y in pairs(Spawns) do
if y == E then
table.remove(Spawns,t)
end
end
end
end)
end


I think this is the code that spawns them in, its in the middle although the interval is at bottom, does that matter?
Report Abuse
OldGoldie is not online. OldGoldie
Joined: 17 Aug 2010
Total Posts: 8210
03 Apr 2013 05:55 AM
Free models, or a copied game. Ive seen it before when studying random free models.
Report Abuse
monster07 is not online. monster07
Joined: 19 Jul 2009
Total Posts: 533
03 Apr 2013 05:57 AM
I made this on my own, it took 2 months so don't even say that, 2 months ( to me ) is a long time
Report Abuse
OldGoldie is not online. OldGoldie
Joined: 17 Aug 2010
Total Posts: 8210
03 Apr 2013 06:00 AM
Nope, it's copied i looked. You edited the lobby and a few things. I can show you, it's on my computer.
Report Abuse
monster07 is not online. monster07
Joined: 19 Jul 2009
Total Posts: 533
03 Apr 2013 06:03 AM
The script is 100% mine, the lobby 100% mine the map was by my mate MonsterMike
Report Abuse
monster07 is not online. monster07
Joined: 19 Jul 2009
Total Posts: 533
03 Apr 2013 06:04 AM
maps*
Report Abuse
OldGoldie is not online. OldGoldie
Joined: 17 Aug 2010
Total Posts: 8210
03 Apr 2013 06:14 AM
Enjoy your proof that it's copied and edited:
http://www.roblox.com/Proof-place?id=33599722
Report Abuse
monster07 is not online. monster07
Joined: 19 Jul 2009
Total Posts: 533
03 Apr 2013 06:39 AM
You found a free model of my game how nice, someone must've copied it when I made it uncoplylocked for a friend.
Report Abuse
luke111000 is not online. luke111000
Joined: 26 Apr 2009
Total Posts: 1853
03 Apr 2013 07:13 AM
It took you more than a month.
All I need is an energy drink and about 1 hour and I can do that.
Report Abuse
monster07 is not online. monster07
Joined: 19 Jul 2009
Total Posts: 533
03 Apr 2013 11:51 AM
Im not the best at scripting I also learnt most of lua in that 2 months
Report Abuse
Previous Thread :: Next Thread 
Page 1 of 1
 
 
ROBLOX Forum » Game Creation and Development » Scripting Helpers
   
 
   
  • About Us
  • Jobs
  • Blog
  • Parents
  • Help
  • Terms
  • Privacy

©2017 Roblox Corporation. Roblox, the Roblox logo, Robux, Bloxy, and Powering Imagination are among our registered and unregistered trademarks in the U.S. and other countries.



Progress
Starting Roblox...
Connecting to Players...
R R

Roblox is now loading. Get ready to play!

R R

You're moments away from getting into the game!

Click here for help

Check Remember my choice and click Launch Application in the dialog box above to join games faster in the future!

Gameplay sponsored by:
Loading 0% - Starting game...
Get more with Builders Club! Join Builders Club
Choose Your Avatar
I have an account
generic image