test.lua

Wed, 04 Nov 2009 01:54:45 +0000

author
Matthew Wild <mwild1@gmail.com>
date
Wed, 04 Nov 2009 01:54:45 +0000
changeset 1
8724d7c9318e
permissions
-rw-r--r--

Add test

local xpm = require "xpm"

image = xpm.new(100, 100);

for i=1,100 do
	local colour = "#"..tostring(i, 16):rep(3);
	for x=i,image.width-i+1 do
		image:setpixel(x, i, colour);
		image:setpixel(x, image.height-i+1, colour);
	end
	for y=i,image.height-i+1 do
		image:setpixel(i, y, colour);
		image:setpixel(image.width-i+1, y, colour);
	end
end
image:render(io.stdout);

mercurial