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