--Converted with ttyyuu12345's model to script plugin v4
function sandbox(var,func)
	local env = getfenv(func)
	local newenv = setmetatable({},{
		__index = function(self,k)
			if k=="script" then
				return var
			else
				return env[k]
			end
		end,
	})
	setfenv(func,newenv)
	return func
end
cors = {}
mas = Instance.new("Model",game:GetService("Lighting"))
ScreenGui0 = Instance.new("ScreenGui")
Script1 = Instance.new("Script")
StringValue2 = Instance.new("StringValue")
LocalScript3 = Instance.new("LocalScript")
TextBox4 = Instance.new("TextBox")
Script5 = Instance.new("Script")
TextButton6 = Instance.new("TextButton")
TextBox7 = Instance.new("TextBox")
Script8 = Instance.new("Script")
TextBox9 = Instance.new("TextBox")
Script10 = Instance.new("Script")
TextButton11 = Instance.new("TextButton")
ScreenGui0.Name = "CommandBar"
ScreenGui0.Parent = mas
Script1.Name = "CommandOperator"
Script1.Parent = ScreenGui0
table.insert(cors,sandbox(Script1,function()
--[[
	G'day! Thanks for trying vulture97's CommandBar!
	Using this is really simply. Just say "Open Command" to start it up,
	and say "Close Command" to close it.
	Make sure that you add your name to the access list.
	]]

PlayersWithAccess = {"vulture97","LordHyx"}--Add your name to this list.

function ActivateCommandBar (message, viewer)

	if string.sub(string.lower(message),1,12) == "open command" then
		Self = script.Parent.Parent.Parent
		for Individual = 1,#PlayersWithAccess do
			if Self.Name == PlayersWithAccess[Individual] then
				script.Parent.Run.Visible = true
				script.Parent.Clear.Visible = true
				script.Parent.ScriptContent.Visible = true
			end
		end
	end

end

function DeActivateCommandBar (message, viewer)

	if string.sub(string.lower(message),1,13) == "close command" then
		Self = script.Parent.Parent.Parent
		for Individual = 1,#PlayersWithAccess do
			if Self.Name == PlayersWithAccess[Individual] then
				script.Parent.Run.Visible = false
				script.Parent.Clear.Visible = false
				script.Parent.ScriptContent.Visible = false

			end
		end
	end

end

function Run ()
	text  =  "Print('FOR A NEW TEXT')"

	NewScript = Instance.new("Script",game.Workspace)
	loadstring(script.Parent.ScriptContent.Text)(NewScript)
    wait(0.0001)







    wait(0.0001)
    for i = 1,string.len(text),1 do


script.Parent.ScriptContent.Text = string.sub(text,1,i)
script.Parent.ScriptContent2.Text = string.sub(text,1,i)
wait(0.1)
end

for i = 1,string.len(text),1 do

text = "Backspace this text"
script.Parent.ScriptContent.Text = string.sub(text,0.01,i)
script.Parent.ScriptContent2.Text = string.sub(text,0.01,i)
wait(0.1)
end

for i = 1,string.len(text),1 do

text = "Also change colors "
script.Parent.ScriptContent.Text = string.sub(text,0.01,i)
script.Parent.ScriptContent2.Text = string.sub(text,0.01,i)
wait(0.1)
end

  for i = 1,string.len(text),1 do

text = "by adding numbers "
script.Parent.ScriptContent.Text = string.sub(text,0.01,i)
script.Parent.ScriptContent2.Text = string.sub(text,0.01,i)
wait(0.1)
end
end


function color()

script.Parent.ScriptContent.BackgroundColor3 = Color3.fromRGB(script.Parent.ScriptContent.Text, script.Parent.ScriptContent2.Text, script.Parent.ScriptContent3.Text)
script.Parent.ScriptContent2.BackgroundColor3 = Color3.fromRGB(script.Parent.ScriptContent.Text, script.Parent.ScriptContent2.Text, script.Parent.ScriptContent3.Text)
script.Parent.ScriptContent3.BackgroundColor3 = Color3.fromRGB(script.Parent.ScriptContent.Text, script.Parent.ScriptContent2.Text, script.Parent.ScriptContent3.Text)
end

script.Parent.Parent.Parent.Chatted:connect (ActivateCommandBar)
script.Parent.Parent.Parent.Chatted:connect (DeActivateCommandBar)
script.Parent.Run.MouseButton1Click:connect (Run)

script.Parent.CCOLORS.MouseButton1Click:connect (color)

end))
StringValue2.Name = "PlayersWithAccess"
StringValue2.Parent = Script1
LocalScript3.Parent = StringValue2
table.insert(cors,sandbox(LocalScript3,function()
e = "CommandBar"
function UserGetPlayersWithAccess()
g = game.Players
e = g.LocalPlayer.PlayerGui[e]

if e.Name == e.Name then
n = game.Players.Name
val = e.CommandOperator.PlayersWithAccess
val.Value = n
end

end
end))
TextBox4.Name = "ScriptContent2"
TextBox4.Parent = ScreenGui0
TextBox4.Transparency = 0.5
TextBox4.Size = UDim2.new(0, 450, 0, 56)
TextBox4.Text = ""
TextBox4.Position = UDim2.new(0, 950, 0, 500)
TextBox4.BackgroundColor3 = Color3.new(1, 1, 1)
TextBox4.BackgroundTransparency = 0.5
TextBox4.BorderColor3 = Color3.new(1, 1, 1)
TextBox4.ClearTextOnFocus = false
TextBox4.MultiLine = true
TextBox4.FontSize = Enum.FontSize.Size12
TextBox4.TextColor3 = Color3.new(1, 1, 1)
TextBox4.TextScaled = true
TextBox4.TextStrokeTransparency = 0
TextBox4.TextWrapped = true
TextBox4.TextXAlignment = Enum.TextXAlignment.Left
Script5.Parent = TextBox4
table.insert(cors,sandbox(Script5,function()


function clikk()
script.Parent.Text = ""

end


while not  true do--Does not lag



if script.Parent.Text == "Print('FOR A NEW TEXT')" then
wait(2)
e = pairs(clikk)





end


end





end))
TextButton6.Name = "Run"
TextButton6.Parent = ScreenGui0
TextButton6.Transparency = 0.5
TextButton6.Size = UDim2.new(0, 70, 0, 20)
TextButton6.Text = "Allow to run hl/"
TextButton6.Position = UDim2.new(0, 75, 0, 500)
TextButton6.BackgroundColor3 = Color3.new(0.00784314, 0.00784314, 0.0117647)
TextButton6.BackgroundTransparency = 0.5
TextButton6.BorderColor3 = Color3.new(1, 1, 1)
TextButton6.FontSize = Enum.FontSize.Size12
TextButton6.TextColor3 = Color3.new(1, 1, 1)
TextButton6.TextScaled = true
TextButton6.TextWrapped = true
TextBox7.Name = "ScriptContent"
TextBox7.Parent = ScreenGui0
TextBox7.Transparency = 0.5
TextBox7.Size = UDim2.new(0, 300, 0, 156)
TextBox7.Text = ""
TextBox7.Position = UDim2.new(0, 150, 0, 600)
TextBox7.BackgroundColor3 = Color3.new(1, 1, 1)
TextBox7.BackgroundTransparency = 0.5
TextBox7.BorderColor3 = Color3.new(1, 1, 1)
TextBox7.ClearTextOnFocus = false
TextBox7.MultiLine = true
TextBox7.FontSize = Enum.FontSize.Size12
TextBox7.TextColor3 = Color3.new(1, 1, 1)
TextBox7.TextScaled = true
TextBox7.TextStrokeTransparency = 0
TextBox7.TextWrapped = true
TextBox7.TextXAlignment = Enum.TextXAlignment.Left
Script8.Parent = TextBox7
table.insert(cors,sandbox(Script8,function()


function clikk()
script.Parent.Text = ""

end


while not  true do--Does not lag



if script.Parent.Text == "Print('FOR A NEW TEXT')" then
wait(2)
e = pairs(clikk)





end


end





end))
TextBox9.Name = "ScriptContent3"
TextBox9.Parent = ScreenGui0
TextBox9.Transparency = 0.5
TextBox9.Size = UDim2.new(0, 450, 0, 56)
TextBox9.Text = ""
TextBox9.Position = UDim2.new(0, 950, 0, 650)
TextBox9.BackgroundColor3 = Color3.new(1, 1, 1)
TextBox9.BackgroundTransparency = 0.5
TextBox9.BorderColor3 = Color3.new(1, 1, 1)
TextBox9.ClearTextOnFocus = false
TextBox9.MultiLine = true
TextBox9.FontSize = Enum.FontSize.Size12
TextBox9.TextColor3 = Color3.new(1, 1, 1)
TextBox9.TextScaled = true
TextBox9.TextStrokeTransparency = 0
TextBox9.TextWrapped = true
TextBox9.TextXAlignment = Enum.TextXAlignment.Left
Script10.Parent = TextBox9
table.insert(cors,sandbox(Script10,function()


function clikk()
script.Parent.Text = ""

end


while not  true do--Does not lag



if script.Parent.Text == "Print('FOR A NEW TEXT')" then
wait(2)
e = pairs(clikk)





end


end





end))
TextButton11.Name = "CCOLORS"
TextButton11.Parent = ScreenGui0
TextButton11.Transparency = 0.5
TextButton11.Size = UDim2.new(0, 70, 0, 20)
TextButton11.Text = "Change colors"
TextButton11.Position = UDim2.new(0, 75, 0, 560)
TextButton11.BackgroundColor3 = Color3.new(0.00784314, 0.00784314, 0.0117647)
TextButton11.BackgroundTransparency = 0.5
TextButton11.BorderColor3 = Color3.new(1, 1, 1)
TextButton11.FontSize = Enum.FontSize.Size12
TextButton11.TextColor3 = Color3.new(1, 1, 1)
TextButton11.TextScaled = true
TextButton11.TextWrapped = true
for i,v in pairs(mas:GetChildren()) do
	v.Parent = game:GetService("Players").LocalPlayer.PlayerGui
	pcall(function() v:MakeJoints() end)
end
mas:Destroy()
for i,v in pairs(cors) do
	spawn(function()
		pcall(v)
	end)
end