[ Unsolved ] Admin GUI Script Commands Run Over And Over, Any Help or Advice?

I am making a Admin GUI, but whenever I try testing the Message and Hint commands I keep having problems. They seem to execute at the same time when you go to use the commands again (I know this may sound confusing, I'll explain it).

For instance;

• I run the message command at first, the message shows, then I use the hint command, and both the message and the hint shows.

• I run the message command at first, message shows. I use the message command again, and there are two and they overlap. (Same goes for Hints)

If you still don't understand, I have a demo ready at my Test Site

It just resets and does the same thing after you reset as well.

Here's the script I have for trying to run the code;

for _,button in pairs(corclone.Frame.Data.Commands:children()) do
	button.MouseButton1Click:connect(function()
		CommandClicked(button.Text, corclone)
	end)
end

"corclone" is the clone of the CoreGUI which is in the PlayerGUI.

This is the function for "CommandClicked";

function CommandClicked(button, host)
	local data=host.Frame.Data
	local info=host.Frame.Info.Frame
	if button == "Message" then
		data.Commands:TweenPosition(UDim2.new(1, 35, 0, 20), "Out", "Linear", 3/4)
		wait()
		data.TextInput.Visible = true
		data.TextInput:TweenPosition(UDim2.new(0, 35, 0, 20), "Out", "Linear", 3/4)
		wait()
		info.TextLabel.Text = "M:Message"
		info:TweenPosition(UDim2.new(0, 0, 0, -10), "Out", "Linear", 1)
		data.TextInput.Confirm.MouseButton1Click:connect(function()
		if script:FindFirstChild("Message") then
			for _,v in pairs(game:GetService("Players"):GetChildren()) do
				coroutine.resume(coroutine.create(function()
				local m = script.Message:Clone()
				m.Frame.Body.Msg.Text = data.TextInput.TextBox.Text
				m.Frame.Header.Head.Text = host.Parent.Parent.Name
				m.Parent = v:WaitForChild("PlayerGui")
				wait()
				m.Frame.Script.Disabled = false
				end))
			end
		else
			local m = Instance.new("Message",game:GetService("Workspace"))
			m.Text = host.Parent.Parent.Name .. ": " .. data.TextInput.TextBox.Text
			game:GetService("Debris"):AddItem(m, wait((m.Text:len()/13)+1))
		end
		table.insert(logs, 1, GetTime() .. " - " .. host.Parent.Parent.Name .. " messaged, ".. data.TextInput.TextBox.Text)
		data.Commands.Position = UDim2.new(-1, 35, 0, 20)
		data.TextInput:TweenPosition(UDim2.new(1, 35, 0, 20), "Out", "Linear", 3/4)
		wait()
		data.Commands:TweenPosition(UDim2.new(0, 35, 0, 20), "Out", "Linear", 3/4)
		wait()
		info:TweenPosition(UDim2.new(0, 0, -1, -10), "Out", "Linear", 1/2)
		coroutine.resume(coroutine.create(function() wait(1) data.TextInput.Position = UDim2.new(-1, 35, 0, 20) data.TextInput.Visible = false end))
		end)
	elseif button == "Hint" then
		data.Commands:TweenPosition(UDim2.new(1, 35, 0, 20), "Out", "Linear", 3/4)
		wait()
		data.TextInput.Visible = true
		data.TextInput:TweenPosition(UDim2.new(0, 35, 0, 20), "Out", "Linear", 3/4)
		wait()
		info.TextLabel.Text = "H:Message"
		info:TweenPosition(UDim2.new(0, 0, 0, -10), "Out", "Linear", 1)
		data.TextInput.Confirm.MouseButton1Click:connect(function()
		if script:FindFirstChild("Hint") then
			for _,v in pairs(game:GetService("Players"):GetChildren()) do
				coroutine.resume(coroutine.create(function()
				local m = script.Hint:Clone()
				m.Frame.Msg.Text = host.Parent.Parent.Name .. ": " .. data.TextInput.TextBox.Text
				m.Parent = v:WaitForChild("PlayerGui")
				wait()
				m.Frame.Script.Disabled = false
				end))
			end
		else
			local m = Instance.new("Hint",game:GetService("Workspace"))
			m.Text = host.Parent.Parent.Name .. ": " .. data.TextInput.TextBox.Text
			game:GetService("Debris"):AddItem(m, wait((m.Text:len()/13)+1))
		end
		table.insert(logs, 1, GetTime() .. " - " .. host.Parent.Parent.Name .. " hinted, ".. data.TextInput.TextBox.Text)
		data.Commands.Position = UDim2.new(-1, 35, 0, 20)
		data.TextInput:TweenPosition(UDim2.new(1, 35, 0, 20), "Out", "Linear", 3/4)
		wait()
		data.Commands:TweenPosition(UDim2.new(0, 35, 0, 20), "Out", "Linear", 3/4)
		wait()
		info:TweenPosition(UDim2.new(0, 0, -1, -10), "Out", "Linear", 1/2)
		coroutine.resume(coroutine.create(function() wait(1) data.TextInput.Position = UDim2.new(-1, 35, 0, 20) data.TextInput.Visible = false end))
		end)
	end
end

Gosh there should be a spoiler tag.

I just don't get why the Message Command or the Hint Commands keep re-running, if any body has any advice please leave a comment or if you think you know how to fix the problem, answer it. Thank you in advanced. If you wish to see the GUI and check out the problem for yourself then you can go to my Test Site, the Script should automatically give you admin.

Try to do mousebutton1down for Message and mousebutton2down for Hint.