GPL license on Nitrofurano's Lua scripts. thanks!

git-svn-id: svn://pulkomandy.tk/GrafX2/trunk@1393 416bcca6-2ee7-4201-b75f-2eb2f807beb1
This commit is contained in:
Yves Rizoud 2010-03-21 21:46:03 +00:00
parent 8962e18362
commit 5f06caaf58
10 changed files with 84 additions and 10 deletions

View File

@ -1,5 +1,5 @@
-- Test LUA inputbox -- Test LUA inputbox
-- this script only resizes the brush -- this script tests the inputbox
w, h = getbrushsize() w, h = getbrushsize()
--[[ --[[
@ -16,16 +16,18 @@ ok, w, h = inputbox("Modify brush",
"Width", w, -900.0,900.0, 3, "Width", w, -900.0,900.0, 3,
"Height", h, -900.0,900.0, 4, "Height", h, -900.0,900.0, 4,
"X Flip", 0, 0, 1, 0, "X Flip", 0, 0, 1, 0,
"Y Flip", 0, 0, 1, 0 "Y Flip", 0, 0, 1, 0,
"RGB", 1, 0, 1, -1,
"HSV", 0, 0, 1, -1,
"HSL", 0, 0, 1, -1,
"Degrees",1, 0, 1, -2,
"Radians",0, 0, 1, -2
); );
if ok == true then if ok == true then
setbrushsize(w,h) messagebox(
for y = 0, h-1, 1 do "w: " .. w .. "\n" ..
for x = 0, w-1, 1 do "h: " .. h .. "\n"
putbrushpixel(x,y,1); )
end
end
end end

View File

@ -1,5 +1,13 @@
-- 12bit colour space from palette -- 12bit colour space from palette
-- --
-- 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(); w,h=getpicturesize();
for y1=0,3,1 do for y1=0,3,1 do
for x1=0,3,1 do for x1=0,3,1 do

View File

@ -1,5 +1,13 @@
-- 15bit colour space from palette -- 15bit colour space from palette
-- --
-- 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(); w,h=getpicturesize();
for y1=0,3,1 do for y1=0,3,1 do
for x1=0,7,1 do for x1=0,7,1 do

View File

@ -1,5 +1,13 @@
-- 18bit colour space from palette -- 18bit colour space from palette
-- --
-- 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(); w,h=getpicturesize();
for y1=0,7,1 do for y1=0,7,1 do
for x1=0,7,1 do for x1=0,7,1 do

View File

@ -1,4 +1,12 @@
-- ? -- Glass grid filter
-- 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(); w,h=getpicturesize();
for y1=0,h-1,8 do for y1=0,h-1,8 do
for x1=0,w-1,8 do for x1=0,w-1,8 do

View File

@ -1,4 +1,12 @@
-- Draw 8x8 grid -- Draw 8x8 grid
-- 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(); w,h=getpicturesize();
for y=0,h-1,1 do for y=0,h-1,1 do
for x=0,w-1,8 do for x=0,w-1,8 do

View File

@ -1,4 +1,12 @@
-- Draw red 8x8 grid -- Draw red 8x8 grid
-- 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(); w,h=getpicturesize();
c=matchcolor(0xFF,0x00,0x00) c=matchcolor(0xFF,0x00,0x00)
for y=0,h-1,1 do for y=0,h-1,1 do

View File

@ -1,4 +1,12 @@
-- Draw isometric grid -- Draw isometric grid
-- 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(); w,h=getpicturesize();
for y=0,h-1,8 do for y=0,h-1,8 do
for x=0,w-1,1 do for x=0,w-1,1 do

View File

@ -1,4 +1,12 @@
-- x1 palette to picture -- x1 palette to picture
-- 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(); w,h=getpicturesize();
for y1=0,7,1 do for y1=0,7,1 do
for x1=0,31,1 do for x1=0,31,1 do

View File

@ -1,4 +1,12 @@
-- x8 palette to picture -- x8 palette to picture
-- 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/>
setpicturesize(256,64); setpicturesize(256,64);
for y1=0,7,1 do for y1=0,7,1 do
for x1=0,31,1 do for x1=0,31,1 do