-- default GUI page stargate.default_page = "main" stargate_network["players"]={} stargate.current_page={} local function table_empty(tab) for key in pairs(tab) do return false end return true end stargate.save_data = function(table_pointer) if table_empty(stargate_network[table_pointer]) then return end local data = minetest.serialize( stargate_network[table_pointer] ) local path = minetest.get_worldpath().."/stargate_"..table_pointer..".data" local file = io.open( path, "w" ) if( file ) then file:write( data ) file:close() return true else return nil end end stargate.restore_data = function(table_pointer) local path = minetest.get_worldpath().."/stargate_"..table_pointer..".data" local file = io.open( path, "r" ) if( file ) then local data = file:read("*all") stargate_network[table_pointer] = minetest.deserialize( data ) file:close() if table_empty(stargate_network[table_pointer]) then os.remove(path) end return true else return nil end end -- load Stargates network data if stargate.restore_data("registered_players") ~= nil then for __,tab in ipairs(stargate_network["registered_players"]) do if stargate.restore_data(tab["player_name"]) == nil then --print ("[stargate] Error loading data!") stargate_network[tab["player_name"]] = {} end end else print ("[stargate] Error loading data! Creating new file.") stargate_network["registered_players"]={} stargate.save_data("registered_players") end -- register_on_joinplayer minetest.register_on_joinplayer(function(player) local player_name = player:get_player_name() local registered=nil for __,tab in ipairs(stargate_network["registered_players"]) do if tab["player_name"] == player_name then registered = true break end end if registered == nil then local new={} new["player_name"]=player_name table.insert(stargate_network["registered_players"],new) stargate_network[player_name]={} stargate.save_data("registered_players") stargate.save_data(player_name) end stargate_network["players"][player_name]={ formspec = "", current_page = stargate.default_page, own_gates ={}, own_gates_count =0, public_gates ={}, public_gates_count =0, current_index =0, temp_gate ={}, } end) stargate.registerGate = function(player_name,pos,dir) if stargate_network[player_name]==nil then stargate_network[player_name]={} end local new_gate ={} new_gate["pos"]=pos new_gate["type"]="private" new_gate["description"]="" new_gate["dir"]=dir new_gate["owner"]=player_name table.insert(stargate_network[player_name],new_gate) if stargate.save_data(player_name)==nil then print ("[stargate] Couldnt update network file!") end end stargate.unregisterGate = function(player_name,pos) for __,gates in ipairs(stargate_network[player_name]) do if gates["pos"].x==pos.x and gates["pos"].y==pos.y and gates["pos"].z==pos.z then table.remove(stargate_network[player_name], __) break end end if stargate.save_data(player_name)==nil then print ("[stargate] Couldnt update network file!") end end stargate.findGate = function(pos) for _,tab in pairs(stargate_network.registered_players) do local player_name=tab.player_name if type(stargate_network[player_name])=="table" then for _,gates in pairs(stargate_network[player_name]) do if gates and vector.equals(gates.pos, pos) then return gates end end end end return nil end --show formspec to player stargate.gateFormspecHandler = function(pos, node, clicker, itemstack) local player_name = clicker:get_player_name() local meta = minetest.get_meta(pos) local owner=meta:get_string("owner") if player_name~=owner then return end local current_gate=nil stargate_network["players"][player_name]["own_gates"]={} stargate_network["players"][player_name]["public_gates"]={} local own_gates_count=0 local public_gates_count=0 for __,gates in ipairs(stargate_network[player_name]) do if gates["pos"].x==pos.x and gates["pos"].y==pos.y and gates["pos"].z==pos.z then current_gate=gates else own_gates_count=own_gates_count+1 table.insert(stargate_network["players"][player_name]["own_gates"],gates) end end stargate_network["players"][player_name]["own_gates_count"]=own_gates_count -- get all public gates for __,tab in ipairs(stargate_network["registered_players"]) do local temp=tab["player_name"] if type(stargate_network[temp])=="table" and temp~=player_name then for __,gates in ipairs(stargate_network[temp]) do if gates["type"]=="public" then public_gates_count=public_gates_count+1 table.insert(stargate_network["players"][player_name]["public_gates"],gates) end end end end -- print(dump(stargate_network["players"][player_name]["public_gates"])) if current_gate == nil then print ("Gate not registered in network! Please remove it and place once again.") return nil end stargate_network["players"][player_name]["current_index"]=0 stargate_network["players"][player_name]["temp_gate"]["type"]=current_gate["type"] stargate_network["players"][player_name]["temp_gate"]["description"]=current_gate["description"] stargate_network["players"][player_name]["temp_gate"]["pos"]={} stargate_network["players"][player_name]["temp_gate"]["pos"].x=current_gate["pos"].x stargate_network["players"][player_name]["temp_gate"]["pos"].y=current_gate["pos"].y stargate_network["players"][player_name]["temp_gate"]["pos"].z=current_gate["pos"].z if current_gate["destination"] then stargate_network["players"][player_name]["temp_gate"]["destination_description"]=current_gate["destination_description"] stargate_network["players"][player_name]["temp_gate"]["destination_dir"]=current_gate["destination_dir"] stargate_network["players"][player_name]["temp_gate"]["destination"]={} stargate_network["players"][player_name]["temp_gate"]["destination"].x=current_gate["destination"].x stargate_network["players"][player_name]["temp_gate"]["destination"].y=current_gate["destination"].y stargate_network["players"][player_name]["temp_gate"]["destination"].z=current_gate["destination"].z else stargate_network["players"][player_name]["temp_gate"]["destination"]=nil end stargate_network["players"][player_name]["current_gate"]=current_gate stargate_network["players"][player_name]["dest_type"]="own" local formspec=stargate.get_formspec(player_name,"main") stargate_network["players"][player_name]["formspec"]=formspec if formspec ~=nil then minetest.show_formspec(player_name, "stargate_main", formspec) end end -- get_formspec stargate.get_formspec = function(player_name,page) if player_name==nil then return nil end stargate_network["players"][player_name]["current_page"]=page local temp_gate=stargate_network["players"][player_name]["temp_gate"] local formspec = "size[14,10]" --background formspec = formspec .."background[-0.19,-0.2;14.38,10.55;ui_form_bg.png]" formspec = formspec.."label[0,0.0;Stargate DHD]" formspec = formspec.."label[0,.5;Position: ("..temp_gate["pos"].x..","..temp_gate["pos"].y..","..temp_gate["pos"].z..")]" formspec = formspec.."image_button[3.5,.6;.6,.6;toggle_icon.png;toggle_type;]" formspec = formspec.."label[4,.5;Type: "..temp_gate["type"].."]" formspec = formspec.."image_button[6.5,.6;.6,.6;pencil_icon.png;edit_desc;]" formspec = formspec.."label[0,1.1;Destination: ]" if temp_gate["destination"] then formspec = formspec.."label[2.5,1.1;("..temp_gate["destination"].x.."," ..temp_gate["destination"].y.."," ..temp_gate["destination"].z..") " ..temp_gate["destination_description"].."]" formspec = formspec.."image_button[2,1.2;.6,.6;cancel_icon.png;remove_dest;]" else formspec = formspec.."label[2,1.1;Not connected]" end formspec = formspec.."label[0,1.7;Aviable destinations:]" formspec = formspec.."image_button[3.5,1.8;.6,.6;toggle_icon.png;toggle_dest_type;]" formspec = formspec.."label[4,1.7;Filter: "..stargate_network["players"][player_name]["dest_type"].."]" if page=="main" then formspec = formspec.."image_button[6.5,.6;.6,.6;pencil_icon.png;edit_desc;]" formspec = formspec.."label[7,.5;Description: "..temp_gate["description"].."]" end if page=="edit_desc" then formspec = formspec.."image_button[6.5,.6;.6,.6;ok_icon.png;save_desc;]" formspec = formspec.."field[7.3,.7;5,1;desc_box;Edit gate description:;"..temp_gate["description"].."]" end local list_index=stargate_network["players"][player_name]["current_index"] local page=math.floor(list_index / 24 + 1) local pagemax if stargate_network["players"][player_name]["dest_type"] == "own" then pagemax = math.floor((stargate_network["players"][player_name]["own_gates_count"] / 24) + 1) local x,y for y=0,7,1 do for x=0,2,1 do local gate_temp=stargate_network["players"][player_name]["own_gates"][list_index+1] if gate_temp then formspec = formspec.."image_button["..(x*4.5)..","..(2.5+y*.87)..";.6,.6;stargate_icon.png;list_button"..list_index..";]" formspec = formspec.."label["..(x*4.5+.5)..","..(2.3+y*.87)..";("..gate_temp["pos"].x..","..gate_temp["pos"].y..","..gate_temp["pos"].z..") "..gate_temp["type"].."]" formspec = formspec.."label["..(x*4.5+.5)..","..(2.7+y*.87)..";"..gate_temp["description"].."]" end list_index=list_index+1 end end else pagemax = math.floor((stargate_network["players"][player_name]["public_gates_count"] / 24) + 1) local x,y for y=0,7,1 do for x=0,2,1 do local gate_temp=stargate_network["players"][player_name]["public_gates"][list_index+1] if gate_temp then formspec = formspec.."image_button["..(x*4.5)..","..(2.5+y*.87)..";.6,.6;stargate_icon.png;list_button"..list_index..";]" formspec = formspec.."label["..(x*4.5+.5)..","..(2.3+y*.87)..";("..gate_temp["pos"].x..","..gate_temp["pos"].y..","..gate_temp["pos"].z..") "..gate_temp["owner"].."]" formspec = formspec.."label["..(x*4.5+.5)..","..(2.7+y*.87)..";"..gate_temp["description"].."]" end list_index=list_index+1 end end end formspec=formspec.."label[7.5,1.7;Page: "..page.." of "..pagemax.."]" formspec = formspec.."image_button[6.5,1.8;.6,.6;left_icon.png;page_left;]" formspec = formspec.."image_button[6.9,1.8;.6,.6;right_icon.png;page_right;]" formspec = formspec.."image_button_exit[6.1,9.3;.8,.8;ok_icon.png;save_changes;]" formspec = formspec.."image_button_exit[7.1,9.3;.8,.8;cancel_icon.png;discard_changes;]" return formspec end -- register_on_player_receive_fields minetest.register_on_player_receive_fields(function(player, formname, fields) if not formname == "stargate_main" then return "" end local player_name = player:get_player_name() local temp_gate=stargate_network["players"][player_name]["temp_gate"] local current_gate=stargate_network["players"][player_name]["current_gate"] local formspec if fields.toggle_type then if temp_gate["type"] == "private" then temp_gate["type"] = "public" else temp_gate["type"] = "private" end stargate_network["players"][player_name]["current_index"]=0 formspec= stargate.get_formspec(player_name,"main") stargate_network["players"][player_name]["formspec"] = formspec minetest.show_formspec(player_name, "stargate_main", formspec) minetest.sound_play("click", {to_player=player_name, gain = 0.5}) return end if fields.toggle_dest_type then if stargate_network["players"][player_name]["dest_type"] == "own" then stargate_network["players"][player_name]["dest_type"] = "all public" else stargate_network["players"][player_name]["dest_type"] = "own" end stargate_network["players"][player_name]["current_index"] = 0 formspec = stargate.get_formspec(player_name,"main") stargate_network["players"][player_name]["formspec"] = formspec minetest.show_formspec(player_name, "stargate_main", formspec) minetest.sound_play("click", {to_player=player_name, gain = 0.5}) return end if fields.edit_desc then formspec= stargate.get_formspec(player_name,"edit_desc") stargate_network["players"][player_name]["formspec"]=formspec minetest.show_formspec(player_name, "stargate_main", formspec) minetest.sound_play("click", {to_player=player_name, gain = 0.5}) return end if fields.save_desc then temp_gate["description"]=fields.desc_box formspec= stargate.get_formspec(player_name,"main") stargate_network["players"][player_name]["formspec"]=formspec minetest.show_formspec(player_name, "stargate_main", formspec) minetest.sound_play("click", {to_player=player_name, gain = 0.5}) return end -- page controls local start=math.floor(stargate_network["players"][player_name]["current_index"]/24 +1 ) local start_i=start local pagemax = math.floor(((stargate_network["players"][player_name]["own_gates_count"]-1) / 24) + 1) if fields.page_left then minetest.sound_play("paperflip2", {to_player=player_name, gain = 1.0}) start_i = start_i - 1 if start_i < 1 then start_i = 1 end if not (start_i == start) then stargate_network["players"][player_name]["current_index"] = (start_i-1)*24 formspec = stargate.get_formspec(player_name,"main") stargate_network["players"][player_name]["formspec"] = formspec minetest.show_formspec(player_name, "stargate_main", formspec) end end if fields.page_right then minetest.sound_play("paperflip2", {to_player=player_name, gain = 1.0}) start_i = start_i + 1 if start_i > pagemax then start_i = pagemax end if not (start_i == start) then stargate_network["players"][player_name]["current_index"] = (start_i-1)*24 formspec = stargate.get_formspec(player_name,"main") stargate_network["players"][player_name]["formspec"] = formspec minetest.show_formspec(player_name, "stargate_main", formspec) end end if fields.remove_dest then minetest.sound_play("click", {to_player=player_name, gain = 0.5}) temp_gate["destination"]=nil temp_gate["destination_description"]=nil formspec = stargate.get_formspec(player_name,"main") stargate_network["players"][player_name]["formspec"] = formspec minetest.show_formspec(player_name, "stargate_main", formspec) end if fields.save_changes then minetest.sound_play("click", {to_player=player_name, gain = 0.5}) local meta = minetest.get_meta(temp_gate["pos"]) local infotext="" current_gate["type"]=temp_gate["type"] current_gate["description"]=temp_gate["description"] current_gate["pos"]={} current_gate["pos"].x=temp_gate["pos"].x current_gate["pos"].y=temp_gate["pos"].y current_gate["pos"].z=temp_gate["pos"].z current_gate["dest"]=temp_gate["dest"] if temp_gate["destination"] then current_gate["destination"]={} current_gate["destination"].x=temp_gate["destination"].x current_gate["destination"].y=temp_gate["destination"].y current_gate["destination"].z=temp_gate["destination"].z current_gate["destination_description"]=temp_gate["destination_description"] current_gate["destination_dir"]=temp_gate["destination_dir"] else current_gate["destination"]=nil end if current_gate["destination"] then stargate.activateGate (current_gate.pos) --stargate.activateGate (current_gate.destination) else stargate.deactivateGate (current_gate["pos"]) end if current_gate["type"]=="private" then infotext="Private" else infotext="Public" end infotext=infotext.." Gate: "..current_gate["description"].."\n" infotext=infotext.."Owned by "..player_name.."\n" if current_gate["destination"] then infotext=infotext.."Destination: ("..current_gate["destination"].x..","..current_gate["destination"].y..","..current_gate["destination"].z..") " infotext=infotext..current_gate["destination_description"] end meta:set_string("infotext",infotext) if stargate.save_data(player_name)==nil then print ("[stargate] Couldnt update network file!") end end if fields.discard_changes then minetest.sound_play("click", {to_player=player_name, gain = 0.5}) end local list_index=stargate_network["players"][player_name]["current_index"] local i for i=0,23,1 do local button="list_button"..i+list_index if fields[button] then minetest.sound_play("click", {to_player=player_name, gain = 1.0}) local gate=stargate_network["players"][player_name]["temp_gate"] local dest_gate if stargate_network["players"][player_name]["dest_type"] == "own" then dest_gate=stargate_network["players"][player_name]["own_gates"][list_index+i+1] else dest_gate=stargate_network["players"][player_name]["public_gates"][list_index+i+1] end gate["destination"]={} gate["destination"].x=dest_gate["pos"].x gate["destination"].y=dest_gate["pos"].y gate["destination"].z=dest_gate["pos"].z gate["destination_description"]=dest_gate["description"] gate["destination_dir"]=dest_gate["dir"] formspec = stargate.get_formspec(player_name,"main") stargate_network["players"][player_name]["formspec"] = formspec minetest.show_formspec(player_name, "stargate_main", formspec) end end end)