Subversion Repositories Kolibri OS

Rev

Blame | Last modification | View Log | Download | RSS feed

  1. -- draw grid - indexed colour - Copyright 2010 Paulo Silva
  2. -- 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/>
  3. w,h=getpicturesize();
  4. ok,xsiz,ysiz,c=inputbox("draw grid - indexed colour)","x size",8,1,64,5,"y size",8,1,64,6,"colour id",0,0,255,6);
  5. if ok==true then
  6.   for y=0,h-1,1 do
  7.     for x=0,w-1,xsiz do
  8.       putpicturepixel(x,y,c);end;end
  9.   for y=0,h-1,ysiz do
  10.     for x=0,w-1,1 do
  11.       putpicturepixel(x,y,c);end;end;end
  12.