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:
parent
8962e18362
commit
5f06caaf58
@ -1,5 +1,5 @@
|
||||
-- Test LUA inputbox
|
||||
-- this script only resizes the brush
|
||||
-- this script tests the inputbox
|
||||
|
||||
w, h = getbrushsize()
|
||||
--[[
|
||||
@ -16,16 +16,18 @@ ok, w, h = inputbox("Modify brush",
|
||||
"Width", w, -900.0,900.0, 3,
|
||||
"Height", h, -900.0,900.0, 4,
|
||||
"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
|
||||
setbrushsize(w,h)
|
||||
for y = 0, h-1, 1 do
|
||||
for x = 0, w-1, 1 do
|
||||
putbrushpixel(x,y,1);
|
||||
end
|
||||
end
|
||||
messagebox(
|
||||
"w: " .. w .. "\n" ..
|
||||
"h: " .. h .. "\n"
|
||||
)
|
||||
end
|
||||
|
||||
|
||||
|
||||
|
||||
@ -1,5 +1,13 @@
|
||||
-- 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();
|
||||
for y1=0,3,1 do
|
||||
for x1=0,3,1 do
|
||||
|
||||
@ -1,5 +1,13 @@
|
||||
-- 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();
|
||||
for y1=0,3,1 do
|
||||
for x1=0,7,1 do
|
||||
|
||||
@ -1,5 +1,13 @@
|
||||
-- 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();
|
||||
for y1=0,7,1 do
|
||||
for x1=0,7,1 do
|
||||
|
||||
@ -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();
|
||||
for y1=0,h-1,8 do
|
||||
for x1=0,w-1,8 do
|
||||
|
||||
@ -1,4 +1,12 @@
|
||||
-- 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();
|
||||
for y=0,h-1,1 do
|
||||
for x=0,w-1,8 do
|
||||
|
||||
@ -1,4 +1,12 @@
|
||||
-- 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();
|
||||
c=matchcolor(0xFF,0x00,0x00)
|
||||
for y=0,h-1,1 do
|
||||
|
||||
@ -1,4 +1,12 @@
|
||||
-- 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();
|
||||
for y=0,h-1,8 do
|
||||
for x=0,w-1,1 do
|
||||
|
||||
@ -1,4 +1,12 @@
|
||||
-- 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();
|
||||
for y1=0,7,1 do
|
||||
for x1=0,31,1 do
|
||||
|
||||
@ -1,4 +1,12 @@
|
||||
-- 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);
|
||||
for y1=0,7,1 do
|
||||
for x1=0,31,1 do
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user