why dose it parent it dose char when i do it a 2 time?

local plr = game.Players.LocalPlayer
local chr = plr.Character

local ref = game.Workspace.Part
local hum = chr:WaitForChild("Humanoid")
local InputService = game:GetService("UserInputService")
InputService.InputBegan:Connect(function(input)
local val = script.Parent.Transfrombodything.OFFORON


-- on 
    local key = input.KeyCode 
    if key == Enum.KeyCode.R then

	
	
	for _,body in pairs(chr:GetChildren()) do
		if body:IsA("BasePart") then
			body.BrickColor = BrickColor.new("Gold")
			body.Material = "Neon"
		end
		for _,size in pairs(hum:GetChildren())do
			if size:IsA("NumberValue") then
				size.Value = 5
			
							
		
			end
	
			-- "BodyDepthScale" or "BodyWidthScale" or "HeadScale" then
					--resize.Value = 7
		hum:WaitForChild("BodyDepthScale").Value = 10
		hum:WaitForChild("BodyWidthScale").Value = 7.89
		hum:WaitForChild("HeadScale").Value = 6

				val.Value = "ON"
		
	end
end
    end
end)
-----



--off

InputService.InputBegan:Connect(function(input)
	local val = script.Parent.Transfrombodything.OFFORON
	local plr = game.Players.LocalPlayer
local chr = plr.Character
local hum = chr.Humanoid
    local key = input.KeyCode 

    if key == Enum.KeyCode.E then
	if val.Value == "ON" then
	for _,size in pairs(hum:GetChildren())do
			if size:IsA("NumberValue") then
				size:Destroy()
			end
			
	
		end
				
		for _,cl in pairs(script.Parent.Transfrombodything:GetChildren()) do
	if cl:IsA("NumberValue") then
		cl:Clone()
		cl.Parent = hum
	end
		
end
end
end

val = "OFF"
end)