camera(-64,-64)
pal({8,9,10,11,12,13,14})
fillp(~░)
function _draw()
	cls()
	ba=t()/5
	for y=-64,64 do
		local a=ba+sin(y/128)*.25
		local na=a%.25+.125
		rect(cos(na)*64,y,cos(na+.25)*64,y,a*4%7+1)
		rect(cos(na)*64,y,cos(na-.25)*64,y,(a*4+1)%7+1)
	end
end