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
 | 
					-- 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
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					 | 
				
			||||||
 | 
				
			|||||||
@ -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
 | 
				
			||||||
 | 
				
			|||||||
@ -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
 | 
				
			||||||
 | 
				
			|||||||
@ -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
 | 
				
			||||||
 | 
				
			|||||||
@ -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
 | 
				
			||||||
 | 
				
			|||||||
@ -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
 | 
				
			||||||
 | 
				
			|||||||
@ -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
 | 
				
			||||||
 | 
				
			|||||||
@ -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
 | 
				
			||||||
 | 
				
			|||||||
@ -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
 | 
				
			||||||
 | 
				
			|||||||
@ -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
 | 
				
			||||||
 | 
				
			|||||||
		Loading…
	
	
			
			x
			
			
		
	
		Reference in New Issue
	
	Block a user