diff options
Diffstat (limited to 'games/minimal/mods')
-rw-r--r-- | games/minimal/mods/test/formspec.lua | 195 | ||||
-rw-r--r-- | games/minimal/mods/test/init.lua | 123 | ||||
-rw-r--r-- | games/minimal/mods/test/player.lua | 124 |
3 files changed, 322 insertions, 120 deletions
diff --git a/games/minimal/mods/test/formspec.lua b/games/minimal/mods/test/formspec.lua new file mode 100644 index 000000000..a4d120b41 --- /dev/null +++ b/games/minimal/mods/test/formspec.lua @@ -0,0 +1,195 @@ +local clip_fs = [[
+ style_type[label;noclip=%c]
+ style_type[button;noclip=%c]
+ style_type[image_button;noclip=%c]
+ style_type[item_image_button;noclip=%c]
+ style_type[tabheader;noclip=%c]
+ style_type[field;noclip=%c]
+ style_type[textarea;noclip=%c]
+ style_type[checkbox;noclip=%c]
+ style_type[dropdown;noclip=%c]
+ style_type[scrollbar;noclip=%c]
+ style_type[table;noclip=%c]
+
+ label[0,0;A clipping test]
+ button[0,1;3,0.8;x;A clipping test]
+ image_button[0,2;3,0.8;bubble.png;x2;A clipping test]
+ item_image_button[0,3;3,0.8;default:sword_steel;x3;A clipping test]
+ tabheader[0,4.7;3,0.63;x4;Clip,Test,Text,Tabs;1;false;false]
+ field[0,5;3,0.8;x5;Title;]
+ textarea[0,6;3,1;x6;Title;]
+ checkbox[0,7.5;x7;This is a test;true]
+ dropdown[0,8;3,0.8;x8;Select An Item,One,Two,Three,Four,Five;1]
+ scrollbar[0,9;3,0.8;horizontal;x9;3]
+ tablecolumns[text;text]
+ table[0,10;3,1;x10;one,two,three,four;1]
+]]
+
+
+local style_fs = [[
+ style[one_btn1;bgcolor=red;textcolor=yellow]
+ button[0,0;2.5,0.8;one_btn1;Button]
+
+ style[one_btn2;border=false;textcolor=cyan]
+ button[0,1.05;2.5,0.8;one_btn2;Text Button]
+
+ style[one_btn3;bgimg=bubble.png;bgimg_pressed=heart.png]
+ button[0,2.1;1,1;one_btn3;Bor]
+
+ style[one_btn4;bgimg=bubble.png;bgimg_pressed=heart.png;border=false]
+ button[1.25,2.1;1,1;one_btn4;Bub]
+
+ style[one_btn5;bgimg=bubble.png;bgimg_pressed=heart.png;border=false;alpha=false]
+ button[0,3.35;1,1;one_btn5;Alph]
+
+ style[one_btn6;border=true]
+ image_button[0,4.6;1,1;bubble.png;one_btn6;Border]
+
+ style[one_btn7;border=false]
+ image_button[1.25,4.6;1,1;bubble.png;one_btn7;NoBor]
+
+ style[one_btn8;border=false]
+ image_button[0,5.85;1,1;bubble.png;one_btn8;Border;false;true;heart.png]
+
+ style[one_btn9;border=true]
+ image_button[1.25,5.85;1,1;bubble.png;one_btn9;NoBor;false;false;heart.png]
+
+ style[one_btn10;alpha=false]
+ image_button[0,7.1;1,1;bubble.png;one_btn10;NoAlpha]
+
+ style[one_btn11;alpha=true]
+ image_button[1.25,7.1;1,1;bubble.png;one_btn11;Alpha]
+
+ style[one_btn12;border=true]
+ item_image_button[0,8.35;1,1;default:sword_steel;one_btn12;Border]
+
+ style[one_btn13;border=false]
+ item_image_button[1.25,8.35;1,1;default:sword_steel;one_btn13;NoBor]
+
+
+ container[2.75,0]
+
+ style[one_tb1;textcolor=Yellow]
+ tabheader[0,3;2.5,0.63;one_tb1;Yellow,Text,Tabs;1;false;false]
+
+ style[one_f1;textcolor=yellow]
+ field[0,4.25;2.5,0.8;one_f1;Field One;Yellow Text]
+
+ style[one_f2;border=false;textcolor=cyan]
+ field[0,5.75;2.5,0.8;one_f2;Field Two;Borderless Cyan Text]
+
+ style[one_f3;textcolor=yellow]
+ textarea[0,7.025;2.5,0.8;one_f3;Label;]] ..
+ minetest.formspec_escape("Yellow Text\nLine two") .. [[ ]
+
+ style[one_f4;border=false;textcolor=cyan]
+ textarea[0,8.324999999999999;2.5,0.8;one_f4;Label;]] ..
+ minetest.formspec_escape("Borderless Cyan Text\nLine two") .. [[ ]
+
+ container_end[]
+]]
+
+--style_type[label;textcolor=green]
+--label[0,0;Green]
+--style_type[label;textcolor=blue]
+--label[0,1;Blue]
+--style_type[label;textcolor=;border=true]
+--label[1.2,0;Border]
+--style_type[label;border=true;bgcolor=red]
+--label[1.2,1;Background]
+--style_type[label;border=;bgcolor=]
+--label[0.75,2;Reset]
+
+
+local pages = {
+ [[
+ size[12,12]
+ real_coordinates[true]
+ image_button[0,0;1,1;logo.png;;1x1]
+ image_button[1,0;2,2;logo.png;;2x2]
+ button[0,2;1,1;;1x1]
+ button[1,2;2,2;;2x2]
+ item_image[0,4;1,1;air]
+ item_image[1,4;2,2;air]
+ item_image_button[0,6;1,1;test:node;;1x1]
+ item_image_button[1,6;2,2;test:node;;2x2]
+ field[3,.5;3,.5;name;Field;text]
+ pwdfield[6,.5;3,1;name;Password Field]
+ field[3,1;3,1;;Read-Only Field;text]
+ textarea[3,2;3,.5;name;Textarea;text]
+ textarea[6,2;3,2;name;Textarea;text\nmore text]
+ textarea[3,3;3,1;;Read-Only Textarea;text\nmore text]
+ textlist[3,4;3,2;name;Textlist,Perfect Coordinates;1;false]
+ tableoptions[highlight=#ABCDEF75;background=#00000055;border=false]
+ table[6,4;3,2;name;Table,Cool Stuff,Foo,Bar;2]
+ dropdown[3,6;3,1;name;This,is,a,dropdown;1]
+ dropdown[6,6;3,2;name;I,am,a,bigger,dropdown;5]
+ image[0,8;3,2;ignore.png]
+ box[3,7;3,1;#00A3FF]
+ checkbox[3,8;name;Check me!;false]
+ checkbox[3,9;name;Uncheck me now!;true]
+ scrollbar[0,11.5;11.5,.5;horizontal;name;500]
+ scrollbar[11.5,0;.5,11.5;vertical;name;0]
+ list[current_player;main;6,8;3,2;1]
+ button[9,0;2.5,1;name;]
+ button[9,1;2.5,1;name;]
+ button[9,2;2.5,1;name;]
+ label[9,0;This is a label.\nLine\nLine\nLine\nEnd]
+ button[9,3;1,1;name;]
+ vertlabel[9,4;VERT]
+ label[10,3;HORIZ]
+ tabheader[6.5,0;6,0.65;name;Tab 1,Tab 2,Tab 3,Secrets;1;false;false]
+ ]],
+
+ "size[12,12]real_coordinates[true]" ..
+ "label[0.375,0.375;Styled]" ..
+ "label[6.375,0.375;Unstyled]" ..
+ "box[0,0.75;12,0.1;#999]" ..
+ "box[6,0.85;0.1,11.15;#999]" ..
+ "container[0.375,1.225]" ..
+ style_fs ..
+ "container_end[]container[6.375,1.225]" ..
+ style_fs:gsub("one_", "two_"):gsub("style%[[^%]]+%]", ""):gsub("style_type%[[^%]]+%]", "") ..
+ "container_end[]",
+
+ "size[12,12]real_coordinates[true]" ..
+ "label[0.1,0.5;Clip]" ..
+ "container[-2.5,1]" .. clip_fs:gsub("%%c", "false") .. "container_end[]" ..
+ "label[11,0.5;Noclip]" ..
+ "container[11.5,1]" .. clip_fs:gsub("%%c", "true") .. "container_end[]",
+}
+
+local function show_test_formspec(pname, page_id)
+ page_id = page_id or 2
+
+ local fs = pages[page_id] .. "tabheader[0,0;6,0.65;maintabs;Real Coord,Styles,Noclip;" .. page_id .. ";false;false]"
+
+ minetest.show_formspec(pname, "test:formspec", fs)
+end
+
+minetest.register_on_player_receive_fields(function(player, formname, fields)
+ if formname ~= "test:formspec" then
+ return false
+ end
+
+ if fields.maintabs then
+ show_test_formspec(player:get_player_name(), tonumber(fields.maintabs))
+ return true
+ end
+
+end)
+
+minetest.register_node("test:node", {
+ tiles = { "air.png" }
+})
+
+minetest.register_chatcommand("formspec", {
+ func = function(name)
+ if not minetest.get_player_by_name(name) then
+ return false, "You need to be online!"
+ end
+
+ show_test_formspec(name)
+ return true, "Opened formspec"
+ end,
+})
diff --git a/games/minimal/mods/test/init.lua b/games/minimal/mods/test/init.lua index 72ca6e692..73fb6e6b5 100644 --- a/games/minimal/mods/test/init.lua +++ b/games/minimal/mods/test/init.lua @@ -3,128 +3,11 @@ -- Mod: test -- + -- Try out PseudoRandom pseudo = PseudoRandom(13) assert(pseudo:next() == 22290) assert(pseudo:next() == 13854) - --- --- HP Change Reasons --- -local expect = nil -local function run_hpchangereason_tests(player) - expect = { type = "set_hp", from = "mod" } - player:set_hp(3) - assert(expect == nil) - - expect = { a = 234, type = "set_hp", from = "mod" } - player:set_hp(7, { a= 234 }) - assert(expect == nil) - - expect = { df = 3458973454, type = "fall", from = "mod" } - player:set_hp(10, { type = "fall", df = 3458973454 }) - assert(expect == nil) -end -minetest.register_on_player_hpchange(function(player, hp, reason) - if not expect then - return - end - - for key, value in pairs(reason) do - assert(expect[key] == value) - end - - for key, value in pairs(expect) do - assert(reason[key] == value) - end - - expect = nil -end) - - -local function run_player_meta_tests(player) - local meta = player:get_meta() - meta:set_string("foo", "bar") - assert(meta:contains("foo")) - assert(meta:get_string("foo") == "bar") - assert(meta:get("foo") == "bar") - - local meta2 = player:get_meta() - assert(meta2:get_string("foo") == "bar") - assert(meta2:get("foo") == "bar") - assert(meta:equals(meta2)) - assert(player:get_attribute("foo") == "bar") - - meta:set_string("bob", "dillan") - assert(meta:get_string("foo") == "bar") - assert(meta:get_string("bob") == "dillan") - assert(meta:get("bob") == "dillan") - assert(meta2:get_string("foo") == "bar") - assert(meta2:get_string("bob") == "dillan") - assert(meta2:get("bob") == "dillan") - assert(meta:equals(meta2)) - assert(player:get_attribute("foo") == "bar") - assert(player:get_attribute("bob") == "dillan") - - meta:set_string("foo", "") - assert(not meta:contains("foo")) - assert(meta:get("foo") == nil) - assert(meta:get_string("foo") == "") - assert(meta:equals(meta2)) -end - -local function run_player_tests(player) - run_hpchangereason_tests(player) - run_player_meta_tests(player) - minetest.chat_send_all("All tests pass!") -end -minetest.register_on_joinplayer(run_player_tests) - - -local function test_get_craft_result() - minetest.log("info", "test_get_craft_result()") - -- normal - local input = { - method = "normal", - width = 2, - items = {"", "default:coal_lump", "", "default:stick"} - } - minetest.log("info", "torch crafting input: "..dump(input)) - local output, decremented_input = minetest.get_craft_result(input) - minetest.log("info", "torch crafting output: "..dump(output)) - minetest.log("info", "torch crafting decremented input: "..dump(decremented_input)) - assert(output.item) - minetest.log("info", "torch crafting output.item:to_table(): "..dump(output.item:to_table())) - assert(output.item:get_name() == "default:torch") - assert(output.item:get_count() == 4) - -- fuel - local input = { - method = "fuel", - width = 1, - items = {"default:coal_lump"} - } - minetest.log("info", "coal fuel input: "..dump(input)) - local output, decremented_input = minetest.get_craft_result(input) - minetest.log("info", "coal fuel output: "..dump(output)) - minetest.log("info", "coal fuel decremented input: "..dump(decremented_input)) - assert(output.time) - assert(output.time > 0) - -- cook - local input = { - method = "cooking", - width = 1, - items = {"default:cobble"} - } - minetest.log("info", "cobble cooking input: "..dump(output)) - local output, decremented_input = minetest.get_craft_result(input) - minetest.log("info", "cobble cooking output: "..dump(output)) - minetest.log("info", "cobble cooking decremented input: "..dump(decremented_input)) - assert(output.time) - assert(output.time > 0) - assert(output.item) - minetest.log("info", "cobble cooking output.item:to_table(): "..dump(output.item:to_table())) - assert(output.item:get_name() == "default:stone") - assert(output.item:get_count() == 1) -end -test_get_craft_result() +dofile(minetest.get_modpath("test") .. "/player.lua") +dofile(minetest.get_modpath("test") .. "/formspec.lua") diff --git a/games/minimal/mods/test/player.lua b/games/minimal/mods/test/player.lua new file mode 100644 index 000000000..e66539eac --- /dev/null +++ b/games/minimal/mods/test/player.lua @@ -0,0 +1,124 @@ +-- +-- Minimal Development Test +-- Mod: test +-- + +-- +-- HP Change Reasons +-- +local expect = nil +local function run_hpchangereason_tests(player) + expect = { type = "set_hp", from = "mod" } + player:set_hp(3) + assert(expect == nil) + + expect = { a = 234, type = "set_hp", from = "mod" } + player:set_hp(7, { a= 234 }) + assert(expect == nil) + + expect = { df = 3458973454, type = "fall", from = "mod" } + player:set_hp(10, { type = "fall", df = 3458973454 }) + assert(expect == nil) +end +minetest.register_on_player_hpchange(function(player, hp, reason) + if not expect then + return + end + + for key, value in pairs(reason) do + assert(expect[key] == value) + end + + for key, value in pairs(expect) do + assert(reason[key] == value) + end + + expect = nil +end) + + +local function run_player_meta_tests(player) + local meta = player:get_meta() + meta:set_string("foo", "bar") + assert(meta:contains("foo")) + assert(meta:get_string("foo") == "bar") + assert(meta:get("foo") == "bar") + + local meta2 = player:get_meta() + assert(meta2:get_string("foo") == "bar") + assert(meta2:get("foo") == "bar") + assert(meta:equals(meta2)) + assert(player:get_attribute("foo") == "bar") + + meta:set_string("bob", "dillan") + assert(meta:get_string("foo") == "bar") + assert(meta:get_string("bob") == "dillan") + assert(meta:get("bob") == "dillan") + assert(meta2:get_string("foo") == "bar") + assert(meta2:get_string("bob") == "dillan") + assert(meta2:get("bob") == "dillan") + assert(meta:equals(meta2)) + assert(player:get_attribute("foo") == "bar") + assert(player:get_attribute("bob") == "dillan") + + meta:set_string("foo", "") + assert(not meta:contains("foo")) + assert(meta:get("foo") == nil) + assert(meta:get_string("foo") == "") + assert(meta:equals(meta2)) +end + +local function run_player_tests(player) + run_hpchangereason_tests(player) + run_player_meta_tests(player) + minetest.chat_send_all("All tests pass!") +end +minetest.register_on_joinplayer(run_player_tests) + + +local function test_get_craft_result() + minetest.log("info", "test_get_craft_result()") + -- normal + local input = { + method = "normal", + width = 2, + items = {"", "default:coal_lump", "", "default:stick"} + } + minetest.log("info", "torch crafting input: "..dump(input)) + local output, decremented_input = minetest.get_craft_result(input) + minetest.log("info", "torch crafting output: "..dump(output)) + minetest.log("info", "torch crafting decremented input: "..dump(decremented_input)) + assert(output.item) + minetest.log("info", "torch crafting output.item:to_table(): "..dump(output.item:to_table())) + assert(output.item:get_name() == "default:torch") + assert(output.item:get_count() == 4) + -- fuel + local input = { + method = "fuel", + width = 1, + items = {"default:coal_lump"} + } + minetest.log("info", "coal fuel input: "..dump(input)) + local output, decremented_input = minetest.get_craft_result(input) + minetest.log("info", "coal fuel output: "..dump(output)) + minetest.log("info", "coal fuel decremented input: "..dump(decremented_input)) + assert(output.time) + assert(output.time > 0) + -- cook + local input = { + method = "cooking", + width = 1, + items = {"default:cobble"} + } + minetest.log("info", "cobble cooking input: "..dump(output)) + local output, decremented_input = minetest.get_craft_result(input) + minetest.log("info", "cobble cooking output: "..dump(output)) + minetest.log("info", "cobble cooking decremented input: "..dump(decremented_input)) + assert(output.time) + assert(output.time > 0) + assert(output.item) + minetest.log("info", "cobble cooking output.item:to_table(): "..dump(output.item:to_table())) + assert(output.item:get_name() == "default:stone") + assert(output.item:get_count() == 1) +end +test_get_craft_result() |