local function w(w,r,e)local b=Soundbar[tostring(w)].Size.Y.Scale if r>b then Set(w,b+(r-b)/3,e)end end function Set(r,e,b)Quad(Soundbar[tostring(r)],e,"\079\117\116",.1)if r>0 and b~=1 then w(r-1,e,-1)end if r<nBars and b~=-1 then w(r+1,e,1)end end

local function CheckSet(N,S,D) -- Number, Scale, Direction
	local nS = Soundbar[tostring(N)].Size.Y.Scale
	if S>nS then
		Set(N,nS+(S-nS)/3,D)
	end
end

function Set(N,S,D) -- Number, Scale, Direction
	Quad(Soundbar[tostring(N)],S,'Out',.1) -- Grabs the bar and tweens
	if N>0 and D~=1 then -- Checks left for smaller bars to manipulate
		CheckSet(N-1,S,-1)
	end
	if N<nBars and D~=-1 then -- Checks right...
		CheckSet(N+1,S,1)
	end
end
