Reorganized source code and directory tree.

git-svn-id: svn://pulkomandy.tk/GrafX2/trunk@1375 416bcca6-2ee7-4201-b75f-2eb2f807beb1

share/grafx2/scripts/_tst_Settings.lua

@@ -0,0 +1,31 @@
+-- Test LUA inputbox
+--  this script only resizes the brush
+
+w, h = getbrushsize()
+--[[
+messagebox(
+  "Forecolor: " .. getforecolor() .. "\n" ..
+  "Backcolor: " .. getbackcolor() .. "\n" ..
+  "Transparent color: " .. gettranscolor() .. "\n" ..
+  "Brush dimensions: " .. w .. "x" .. h
+)
+]]
+
+
+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
+);
+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
+end
+
+
+