builtin/mainmenu/dlg_create_world.lua

   1 --Minetest
   2 --Copyright (C) 2014 sapier
   3 --
   4 --This program is free software; you can redistribute it and/or modify
   5 --it under the terms of the GNU Lesser General Public License as published by
   6 --the Free Software Foundation; either version 2.1 of the License, or
   7 --(at your option) any later version.
   8 --
   9 --This program is distributed in the hope that it will be useful,
  10 --but WITHOUT ANY WARRANTY; without even the implied warranty of
  11 --MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12 --GNU Lesser General Public License for more details.
  13 --
  14 --You should have received a copy of the GNU Lesser General Public License along
  15 --with this program; if not, write to the Free Software Foundation, Inc.,
  16 --51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  17
  18 local function create_world_formspec(dialogdata)
  19         local mapgens = {"v6", "v7", "singlenode"}
  20
  21         local current_seed = core.setting_get("fixed_map_seed") or ""
  22         local current_mg   = core.setting_get("mg_name")
  23
  24         local mglist = ""
  25         local selindex = 1
  26         local i = 1
  27         for k,v in pairs(mapgens) do
  28                 if current_mg == v then
  29                         selindex = i
  30                 end
  31                 i = i + 1
  32                 mglist = mglist .. v .. ","
  33         end
  34         mglist = mglist:sub(1, -2)
  35
  36         local gameid = core.setting_get("menu_last_game")
  37
  38         local game, gameidx = nil , 0
  39         if gameid ~= nil then
  40                 game, gameidx = gamemgr.find_by_gameid(gameid)
  41
  42                 if gameidx == nil then
  43                         gameidx = 0
  44                 end
  45         end
  46
  47         current_seed = core.formspec_escape(current_seed)
  48         local retval =
  49                 "size[12,6,true]" ..
  50                 "label[2,0;" .. fgettext("World name") .. "]"..
  51                 "field[4.5,0.4;6,0.5;te_world_name;;]" ..
  52
  53                 "label[2,1;" .. fgettext("Seed") .. "]"..
  54                 "field[4.5,1.4;6,0.5;te_seed;;".. current_seed .. "]" ..
  55
  56                 "label[2,2;" .. fgettext("Mapgen") .. "]"..
  57                 "dropdown[4.2,2;6.3;dd_mapgen;" .. mglist .. ";" .. selindex .. "]" ..
  58
  59                 "label[2,3;" .. fgettext("Game") .. "]"..
  60                 "textlist[4.2,3;5.8,2.3;games;" .. gamemgr.gamelist() ..
  61                 ";" .. gameidx .. ";true]" ..
  62
  63                 "button[5,5.5;2.6,0.5;world_create_confirm;" .. fgettext("Create") .. "]" ..
  64                 "button[7.5,5.5;2.8,0.5;world_create_cancel;" .. fgettext("Cancel") .. "]"
  65
  66         return retval
  67
  68 end
  69
  70 local function create_world_buttonhandler(this, fields)
  71
  72         if fields["world_create_confirm"] or
  73                 fields["key_enter"] then
  74
  75                 local worldname = fields["te_world_name"]
  76                 local gameindex = core.get_textlist_index("games")
  77
  78                 if gameindex ~= nil and
  79                         worldname ~= "" then
  80
  81                         local message = nil
  82
  83                         if not menudata.worldlist:uid_exists_raw(worldname) then
  84                                 core.setting_set("mg_name",fields["dd_mapgen"])
  85                                 message = core.create_world(worldname,gameindex)
  86                         else
  87                                 message = fgettext("A world named \"$1\" already exists", worldname)
  88                         end
  89
  90                         core.setting_set("fixed_map_seed", fields["te_seed"])
  91
  92                         if message ~= nil then
  93                                 gamedata.errormessage = message
  94                         else
  95                                 core.setting_set("menu_last_game",gamemgr.games[gameindex].id)
  96                                 if this.data.update_worldlist_filter then
  97                                         menudata.worldlist:set_filtercriteria(gamemgr.games[gameindex].id)
  98                                         mm_texture.update("singleplayer", gamemgr.games[gameindex].id)
  99                                 end
 100                                 menudata.worldlist:refresh()
 101                                 core.setting_set("mainmenu_last_selected_world",
 102                                                                         menudata.worldlist:raw_index_by_uid(worldname))
 103                         end
 104                 else
 105                         gamedata.errormessage =
 106                                 fgettext("No worldname given or no game selected")
 107                 end
 108                 this:delete()
 109                 return true
 110         end
 111
 112         if fields["games"] then
 113                 return true
 114         end
 115
 116         if fields["world_create_cancel"] then
 117                 this:delete()
 118                 return true
 119         end
 120
 121         return false
 122 end
 123
 124
 125 function create_create_world_dlg(update_worldlistfilter)
 126         local retval = dialog_create("sp_create_world",
 127                                         create_world_formspec,
 128                                         create_world_buttonhandler,
 129                                         nil)
 130         retval.update_worldlist_filter = update_worldlistfilter
 131
 132         return retval
 133 end