Details | Last modification | View Log | RSS feed
| Rev | Author | Line No. | Line |
|---|---|---|---|
| 6581 | leency | 1 | -- Test LUA inputbox |
| 2 | -- this script tests the inputbox |
||
| 3 | |||
| 4 | w, h = getbrushsize() |
||
| 5 | --[[ |
||
| 6 | messagebox( |
||
| 7 | "Forecolor: " .. getforecolor() .. "\n" .. |
||
| 8 | "Backcolor: " .. getbackcolor() .. "\n" .. |
||
| 9 | "Transparent color: " .. gettranscolor() .. "\n" .. |
||
| 10 | "Brush dimensions: " .. w .. "x" .. h |
||
| 11 | ) |
||
| 12 | ]] |
||
| 13 | |||
| 14 | |||
| 15 | ok, w, h = inputbox("Modify brush", |
||
| 16 | "RGB", 1, 0, 1, -1, |
||
| 17 | "HSV", 0, 0, 1, -1, |
||
| 18 | "HSL", 0, 0, 1, -1, |
||
| 19 | "Width", w, -900.0,900.0, 3, |
||
| 20 | "Height", h, -900.0,900.0, 4, |
||
| 21 | "X Flip", 0, 0, 1, 0, |
||
| 22 | "Y Flip", 0, 0, 1, 0, |
||
| 23 | "Degrees",1, 0, 1, -2, |
||
| 24 | "Radians",0, 0, 1, -2 |
||
| 25 | ); |
||
| 26 | if ok == true then |
||
| 27 | messagebox( |
||
| 28 | "w: " .. w .. "\n" .. |
||
| 29 | "h: " .. h .. "\n" |
||
| 30 | ) |
||
| 31 | end |
||
| 32 |