grafX2/scripts/nitrofurano9.lua
Yves Rizoud b0a700850f Lua factory: More room for file names (34 chars instead of 18), and a preview of the script's first lines of comments.
git-svn-id: svn://pulkomandy.tk/GrafX2/trunk@1326 416bcca6-2ee7-4201-b75f-2eb2f807beb1
2010-02-07 20:13:54 +00:00

12 lines
299 B
Lua

-- ?
w,h=getpicturesize();
for y1=0,h-1,8 do
for x1=0,w-1,8 do
for y2=0,3,1 do
for x2=0,7,1 do
c1=getpicturepixel(x1+x2,y1+y2)
c2=getpicturepixel(x1+7-x2,y1+7-y2)
putpicturepixel(x1+x2,y1+y2,c2)
putpicturepixel(x1+7-x2,y1+7-y2,c1)
end;end;end;end