How to make the script all of the same name of the parts can follow this staps?

function onClicked()
script.Parent.Parent.B3.Transparency = 1
script.Parent.Parent.B3.CanCollide = false
script.Parent.Parent.B4.Transparency = 1
script.Parent.Parent.B4.CanCollide = false
script.Parent.Parent.L.Transparency = 0
wait(60)
script.Parent.Parent.B3.Transparency = 0
script.Parent.Parent.B3.CanCollide = Ture
script.Parent.Parent.B4.Transparency = 0.7
script.Parent.Parent.B4.CanCollide = Ture
script.Parent.Parent.L.Transparency = 0.9
script.Parent.Parent.L.PointLight.Range = 0

end
script.Parent.ClickDetector.MouseClick:connect (onClicked)