用LUA写的绘图函数

function DrawLine(x1,y1,x2,y2,r,g,b)
	
	if math.abs(x2-x1)>math.abs(y2-y1) then
		steps=math.abs(x2-x1);
	else
		steps=math.abs(y2-y1);
	end
		increx=(x2-x1)/steps;
		increy=(y2-y1)/steps;
		x=x1;
		y=y1;
	for i=1,steps do
		DrawPixel(x,y,r,g,b);
		x=x+increx;
		y=y+increy;
	end
	
end


function DrawRectFull(x,y,w,h,r,g,b)
	for i=0,w do
		for o=0,h do
			DrawPixel(x+i,y+o,r,g,b)
		end
	end
end
function DrawRect(x,y,w,h,r,g,b)
	DrawLine(x,y,x+w,y,r,g,b)
	DrawLine(x,y,x,y+h,r,g,b)
	DrawLine(x+w,y,x+w,y+h,r,g,b)
	DrawLine(x,y+h,x+w,y+h,r,g,b)
end

function DrawPutdot(x0,y0,x,y,r,g,b)
	DrawPixel(x0+x,y0+y,r,g,b)
	DrawPixel(x0+x,y0-y,r,g,b)
	DrawPixel(x0-x,y0+y,r,g,b)
	DrawPixel(x0-x,y0-y,r,g,b)
	DrawPixel(x0+y,y0+x,r,g,b)
	DrawPixel(x0+y,y0-x,r,g,b)
	DrawPixel(x0-y,y0+x,r,g,b)
	DrawPixel(x0-y,y0-x,r,g,b)
end
--[[
function DrawCirc