Generating Polygons/finding Points On Circumfrence Of A Circle

local function getPointOnCirc(r, ang, x, y)
	local x2 = x + r * math.cos(ang)
	local y2 = y + r * math.sin(ang)
	return {math.ceil(x2), math.ceil(y2)}
end

local function genPoly(ps, r, x, y)
	local poly = {}
	local tot = 0
	for i=1,ps do
		local rot = 360-tot
		if rot <= 0 then rot = 1 end
		if i == 1 then rot = rot/2 end
		tot = tot + math.random(rot)
		if tot > 360 then tot = 360 end
		local np = getPointOnCirc(r, tot, x, y)
		print(tot..","..np[1]..","..np[2])
		--sleep(0.5)
		poly[#poly + 1] = np
	end
	return poly
end

local function drawLine(x1, y1, x2, y2)
		local pixs = {}
	  
		x1 = math.floor(x1)
		y1 = math.floor(y1)
		x2 = math.floor(x2)
		y2 = math.floor(y2)
	  
		if x1 == x2 and y1 == y2 then
			pixs[#pixs + 1] = {x1, y1}
			return pixs
		end
	  
		local minX = math.min( x1, x2 )
		if minX == x1 then
				minY = y1
				maxX = x2
				maxY = y2
		else
				minY = y2
				maxX = x1
				maxY = y1
		end
			  
		local xDiff = maxX - minX
		local yDiff = maxY - minY
					  
		if xDiff > math.abs(yDiff) then
				local y = minY
				local dy = yDiff / xDiff
				for x=minX,maxX do
						if #pixs > 0 then
							if pixs[#pixs][1] == x and pixs[#pixs][2] == math.floor(y + 0.5) then else
								pixs[#pixs + 1] = {x, math.floor(y + 0.5)}
							end
						else
							pixs[#pixs + 1] = {x, math.floor(y + 0.5)}
						end
						y = y + dy
				end
		else
				local x = minX
				local dx = xDiff / yDiff
				if maxY >= minY then
						for y=minY,maxY do
								if #pixs > 0 then
									if pixs[#pixs][1] == math.floor(x+0.5) and pixs[#pixs][2] == y then else
										pixs[#pixs + 1] = {math.floor(x+0.5), y}
									end
								else
									pixs[#pixs + 1] = {math.floor(x+0.5), y}
								end
								x = x + dx
						end
				else
						for y=minY,maxY,-1 do
								if #pixs > 0 then
									if pixs[#pixs][1] == math.floor(x+0.5) and pixs[#pixs][2] == y then else
										pixs[#pixs + 1] = {math.floor(x+0.5), y}
									end
								else
									pixs[#pixs + 1] = {math.floor(x+0.5), y}
								end
								x = x - dx
						end
				end
		end
		--if pixs[1][1] == x2 and pixs[1][2] == y2 then pixs = flipTable(pixs) end
		return pixs
end
local sw, sh = term.getSize()
local function createShape(poly)
	local shape = {}
	local l = ""
	for i=1,#poly do
		local p1 = poly[i]
		local p2 = poly[i+1]
		if i == #poly then p2 = poly[1] end
		local line = drawLine(p1[1], p1[2], p2[1], p2[2])
		for j=1,#line do
			shape[#shape + 1] = line[j]
		end
		l = l..p1[1]..","..p1[2].." "
	end
	shape.det = l
	shape.poly = poly
	shape.draw = function(self, back, text, char)
		for i=1,#self do
			local p = self[i]
			term.setCursorPos(p[1], p[2])
			term.setBackgroundColor(back)
			term.setTextColor(text)
			term.write(char)
		end
		for i=1,#self.poly do
			local p = self.poly[i]
			term.setCursorPos(p[1], p[2])
			term.setBackgroundColor(back)
			term.setTextColor(text)
			term.write(tostring(i))
		end
		term.setCursorPos(1, sh-1)
		term.write(self.det)
	end
	return shape
end

term.setBackgroundColor(colors.black)
term.clear()
term.setCursorPos(1,1)
local mid = {math.floor(sw/2), math.floor(sh/2)}
local shape = createShape(genPoly(math.random(5, 8), math.random(5, 8), mid[1], mid[2]))
shape:draw(colors.red, colors.white, " ")
--sleep(2)
term.setCursorPos(1, sh)