local function R(R)if armsvisible then local p=not R for R,s in ipairs(armparts)do s.LocalTransparencyModifier=armtransparency s.CanCollide=false s.CastShadow=p end end end
-- loop through all the arm parts and make them visible in first person
local function visiblearms(bool)
	if armsvisible then
		local castshadow = not bool
		for i, part in ipairs(armparts) do
			part.LocalTransparencyModifier = armtransparency
			part.CanCollide = false
			part.CastShadow = castshadow
		end
	end
end
