A Better way to switch morpsh?

I'm working on a RP game and I want the gui I have to work differently than before. This gui I have allows one to switch skins/forms based on the character they're playing as (Example: Samus, Zero Suit Samus; Zelda, Sheik)

The problem I have with the gui is that the player has to use a button to remove the morph as apposed to clicking on the other skin and have the skins swap automatically.

Here's the script I have for the Morphing:

Speed = 25 -- This is the character's speed! 16 is normal walkspeed.

debounce = false
script.Parent.MouseButton1Click:connect(function()
if debounce == false then
	local player = script.Parent.Parent.Parent.Parent.Parent
	local c = player.Character:GetChildren()
	if player ~= nil then
		debounce = true
		for i = 1, #c do 
			if (c[i].ClassName == "Hat") then 
				c[i]:Destroy()
			end
			wait()
		end

		player.Character.Torso.Transparency = 1
		player.Character.Head.Transparency = .99
		if(player.Character.Head:FindFirstChild("face"))then
			player.Character.Head.face.Parent = player.Character
		end
		player.Character:FindFirstChild("Left Arm").Transparency = 1
		player.Character:FindFirstChild("Left Leg").Transparency = 1
		player.Character:FindFirstChild("Right Arm").Transparency = 1
		player.Character:FindFirstChild("Right Leg").Transparency = 1
		player.Character.Humanoid.WalkSpeed = Speed

		local p = game.Lighting:FindFirstChild("Peach"):Clone()
		p.Parent = player.Character
		p.CFrame = CFrame.new(player.Character.Torso.Position)
		p.Anchored = false

		local Y = Instance.new("Weld")
		Y.Part0 = player.Character.Torso
		Y.Part1 = p
		Y.Parent = Y.Part0

		itemlist = script.Parent:FindFirstChild("StartTools"):GetChildren()

		if #itemlist ~= 0 then
			for i= 1, #itemlist do
				local itemc = itemlist[i]:Clone()
				itemc.Parent = player.Backpack
				wait()
			end
		end
		wait(1)
		debounce = false
	end
end

end)

and here's the remove button:

   script.Parent.MouseButton1Click:connect(function()
local player = script.Parent.Parent.Parent.Parent
player.Character.Torso.Transparency = 1
player.Character:FindFirstChild("Left Arm").Transparency = 1
player.Character:FindFirstChild("Left Leg").Transparency = 1
player.Character:FindFirstChild("Right Arm").Transparency = 1
player.Character:FindFirstChild("Right Leg").Transparency = 1
player.Character.Head.Transparency = 0.99
if(player.Character:FindFirstChild("fac") ~= nil)then
	player.Character.face.Parent = player.Character.Head
end


g = player.Character:GetChildren()
for i = 1,#g do
	if(g[i].ClassName == "Part")then
		if(g[i].Size == Vector3.new(1, 1, 1))then
			g[i]:Destroy()
		end
	end
end

end)