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
|
  |
| Joined: 19 Jul 2009 |
| Total Posts: 533 |
|
| |
|
monster07
|
  |
| Joined: 19 Jul 2009 |
| Total Posts: 533 |
|
|
| 02 Apr 2013 03:52 PM |
| And the interval is at the bottom |
|
|
| Report Abuse |
|
|
|
| 02 Apr 2013 03:53 PM |
| Please stop replying to this thread, it was born dead. |
|
|
| Report Abuse |
|
|
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
|
  |
| Joined: 19 Jul 2009 |
| Total Posts: 533 |
|
| |
|
MrChubbs
|
  |
| Joined: 14 Oct 2010 |
| Total Posts: 4969 |
|
| |
|
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
|
  |
| 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
|
  |
| Joined: 19 Jul 2009 |
| Total Posts: 533 |
|
| |
|
monster07
|
  |
| Joined: 19 Jul 2009 |
| Total Posts: 533 |
|
| |
|
|
| 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
|
  |
| 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
|
  |
| 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
|
  |
| 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
|
  |
| 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
|
  |
| 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
|
  |
| Joined: 19 Jul 2009 |
| Total Posts: 533 |
|
| |
|
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
|
  |
| 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 |
|
|
|
| 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
|
  |
| 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 |
|
|