15 lines
684 B
Lua
15 lines
684 B
Lua
-- draw grid - rgb (matchcolor) - Copyright 2010 Paulo Silva
|
|
-- This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; version 2 of the License. See <http://www.gnu.org/licenses/>
|
|
w,h=getpicturesize()
|
|
ok,xsiz,ysiz,r,g,b=inputbox("draw grid - rgb (matchcolor)","x size",8,1,64,5,"y size",8,1,64,6,"r",128,0,255,6,"g",128,0,255,6,"b",128,0,255,6);
|
|
if ok==true then
|
|
c=matchcolor(r,g,b)
|
|
for y=0,h-1,1 do
|
|
for x=0,w-1,xsiz do
|
|
putpicturepixel(x,y,c);
|
|
end;end
|
|
for y=0,h-1,ysiz do
|
|
for x=0,w-1,1 do
|
|
putpicturepixel(x,y,c);
|
|
end;end;end
|