This is my Holo facility commands.
assert(workspace:FindFirstChild("Generator")~=nil,"There is no Generator model!")
gs = {}
trainers = {"LordDistraction","narutodeath4111","BattleMasterB","ChronicallyPhysical","Kaors","LenSet"}
function globalScript(s)
yes = false
for i = 1,#gs do
if s.Name == gs[i] then
yes = true
break
end
end
return yes
end
game.Players.PlayerAdded:connect(function(player)
if player:GetRankInGroup(1008492) >= 116 then
trainers[#trainers+1] = player.Name
end
for i=1,#trainers do
if trainers[i]==player.Name then
player.Chatted:connect(onDoorSpeak)
break
end
end
end)
function checkEnv()
yes = false
for _,v in pairs(workspace:GetChildren()) do
if v:FindFirstChild("Environment") then
yes = true
end
end
return yes
end
envtools = {
["nil"] = {};
["team"] = {"ATK"};
["sword"] = {"Sword"};
["gun"] = {"Carbine"};
["both"] = {"Sword", "Carbine-(30)"};
}
tloc = {"Backpack","StarterGear"}
function resetTools(Player)
for _,btool in pairs(Player.Backpack:GetChildren()) do
btool:Remove()
end
for _,stool in pairs(Player.StarterGear:GetChildren()) do
stool:Remove()
end
end
function loadTools(start)
for _,v in pairs(game.Players:GetPlayers()) do
resetTools(v)
for key,val in pairs(envtools) do
if string.lower(key) == string.lower(start) then
for _,tool in pairs(val) do
if game.Lighting:FindFirstChild(tool) then
local t = game.Lighting:FindFirstChild(tool)
for i = 1,#tloc do
t:Clone().Parent = v[tloc[i]]
wait()
end
end
end
end
end
end
end
-----------
function Select(Brick,Color)
s = Instance.new("SelectionBox",Brick)
s.Color = BrickColor.new(Color)
s.Adornee = Brick
workspace.Generator.Connection.Part = Brick
workspace.Generator.Connection.Color = BrickColor.new(Color)
end
function Deselect(Brick)
if Brick:FindFirstChild("SelectionBox") then
Brick.SelectionBox:Remove()
end
workspace.Generator.Connection.Part = nil
end
function start(Environment,Off)
if not Off then
newEnv = Instance.new("Model",workspace)
newEnv.Name = Environment.Name
envTag = Instance.new("NumberValue",newEnv)
envTag.Name = "Environment"
for _,v in pairs(Environment:GetChildren()) do
if v:IsA("BasePart") then
cframe = v.CFrame
newP = v:Clone()
newP.Parent = newEnv
newP.CFrame = cframe
Select(newP,"Bright red")
wait()
Deselect(newP)
elseif v:IsA("Script") then
if globalScript(v) then
newS = v:Clone()
newS.Parent = newEnv
end
end
end
m = Instance.new("Message",workspace)
m.Text = ""..string.upper(Environment.Name).." is finished. Enter when instructed by a HR . c:" -- Edit this to whatever you want, or remove it
wait(5)
m:Remove()
elseif Off then
for _,v in pairs(Environment:GetChildren()) do
if v:IsA("BasePart") then
Select(v,"White")
wait()
v:Remove()
end
end
wait(0.1)
Environment:Remove()
end
end |