Subversion Repositories Kolibri OS

--BRUSH: Halfsize with smoothscaling

--by Richard Fhager

--http://hem.fyristorg.com/dawnbringer/

-- Copyright 2010 Richard Fhager

--

-- 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 

w, h = getbrushsize()

setbrushsize(math.floor(w/2),math.floor(h/2))

for x = 0, w - 1, 2 do

 for y = 0, h - 1, 2 do

   r1,g1,b1 = getcolor(getbrushbackuppixel(x,y));

   r2,g2,b2 = getcolor(getbrushbackuppixel(x+1,y));

   r3,g3,b3 = getcolor(getbrushbackuppixel(x,y+1));

   r4,g4,b4 = getcolor(getbrushbackuppixel(x+1,y+1));

   r = (r1 + r2 + r3 + r4 ) / 4;

   g = (g1 + g2 + g3 + g4 ) / 4;

   b = (b1 + b2 + b3 + b4 ) / 4;

   c = matchcolor(r,g,b);

   putbrushpixel(x/2, y/2, c);

 end

end