mirror of
https://github.com/moparisthebest/minetest
synced 2024-11-13 21:05:10 -05:00
133 lines
3.6 KiB
Lua
133 lines
3.6 KiB
Lua
--Minetest
|
|
--Copyright (C) 2014 sapier
|
|
--
|
|
--This program is free software; you can redistribute it and/or modify
|
|
--it under the terms of the GNU Lesser General Public License as published by
|
|
--the Free Software Foundation; either version 2.1 of the License, or
|
|
--(at your option) any later version.
|
|
--
|
|
--This program is distributed in the hope that it will be useful,
|
|
--but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
--MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
--GNU Lesser General Public License for more details.
|
|
--
|
|
--You should have received a copy of the GNU Lesser General Public License along
|
|
--with this program; if not, write to the Free Software Foundation, Inc.,
|
|
--51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
|
|
|
|
local function create_world_formspec(dialogdata)
|
|
local mapgens = {"v6", "v7", "singlenode"}
|
|
|
|
local current_seed = core.setting_get("fixed_map_seed") or ""
|
|
local current_mg = core.setting_get("mg_name")
|
|
|
|
local mglist = ""
|
|
local selindex = 1
|
|
local i = 1
|
|
for k,v in pairs(mapgens) do
|
|
if current_mg == v then
|
|
selindex = i
|
|
end
|
|
i = i + 1
|
|
mglist = mglist .. v .. ","
|
|
end
|
|
mglist = mglist:sub(1, -2)
|
|
|
|
local gameid = core.setting_get("menu_last_game")
|
|
|
|
local game, gameidx = nil , 0
|
|
if gameid ~= nil then
|
|
game, gameidx = gamemgr.find_by_gameid(gameid)
|
|
|
|
if gameidx == nil then
|
|
gameidx = 0
|
|
end
|
|
end
|
|
|
|
local retval =
|
|
"size[12,6,true]" ..
|
|
"label[2,0;" .. fgettext("World name") .. "]"..
|
|
"field[4.5,0.4;6,0.5;te_world_name;;]" ..
|
|
|
|
"label[2,1;" .. fgettext("Seed") .. "]"..
|
|
"field[4.5,1.4;6,0.5;te_seed;;".. current_seed .. "]" ..
|
|
|
|
"label[2,2;" .. fgettext("Mapgen") .. "]"..
|
|
"dropdown[4.2,2;6.3;dd_mapgen;" .. mglist .. ";" .. selindex .. "]" ..
|
|
|
|
"label[2,3;" .. fgettext("Game") .. "]"..
|
|
"textlist[4.2,3;5.8,2.3;games;" .. gamemgr.gamelist() ..
|
|
";" .. gameidx .. ";true]" ..
|
|
|
|
"button[5,5.5;2.6,0.5;world_create_confirm;" .. fgettext("Create") .. "]" ..
|
|
"button[7.5,5.5;2.8,0.5;world_create_cancel;" .. fgettext("Cancel") .. "]"
|
|
|
|
return retval
|
|
|
|
end
|
|
|
|
local function create_world_buttonhandler(this, fields)
|
|
|
|
if fields["world_create_confirm"] or
|
|
fields["key_enter"] then
|
|
|
|
local worldname = fields["te_world_name"]
|
|
local gameindex = core.get_textlist_index("games")
|
|
|
|
if gameindex ~= nil and
|
|
worldname ~= "" then
|
|
|
|
local message = nil
|
|
|
|
if not menudata.worldlist:uid_exists_raw(worldname) then
|
|
core.setting_set("mg_name",fields["dd_mapgen"])
|
|
message = core.create_world(worldname,gameindex)
|
|
else
|
|
message = fgettext("A world named \"$1\" already exists", worldname)
|
|
end
|
|
|
|
core.setting_set("fixed_map_seed", fields["te_seed"])
|
|
|
|
if message ~= nil then
|
|
gamedata.errormessage = message
|
|
else
|
|
core.setting_set("menu_last_game",gamemgr.games[gameindex].id)
|
|
if this.data.update_worldlist_filter then
|
|
menudata.worldlist:set_filtercriteria(gamemgr.games[gameindex].id)
|
|
mm_texture.update("singleplayer", gamemgr.games[gameindex].id)
|
|
end
|
|
menudata.worldlist:refresh()
|
|
core.setting_set("mainmenu_last_selected_world",
|
|
menudata.worldlist:raw_index_by_uid(worldname))
|
|
end
|
|
else
|
|
gamedata.errormessage =
|
|
fgettext("No worldname given or no game selected")
|
|
end
|
|
this:delete()
|
|
return true
|
|
end
|
|
|
|
if fields["games"] then
|
|
return true
|
|
end
|
|
|
|
if fields["world_create_cancel"] then
|
|
this:delete()
|
|
return true
|
|
end
|
|
|
|
return false
|
|
end
|
|
|
|
|
|
function create_create_world_dlg(update_worldlistfilter)
|
|
local retval = dialog_create("sp_create_world",
|
|
create_world_formspec,
|
|
create_world_buttonhandler,
|
|
nil)
|
|
retval.update_worldlist_filter = update_worldlistfilter
|
|
|
|
return retval
|
|
end
|