builtin/mainmenu.lua

   1 print = engine.debug
   2 math.randomseed(os.time())
   3 os.setlocale("C", "numeric")
   4
   5 local scriptpath = engine.get_scriptdir()
   6
   7 mt_color_grey  = "#AAAAAA"
   8 mt_color_blue  = "#0000DD"
   9 mt_color_green = "#00DD00"
  10 mt_color_dark_green = "#003300"
  11
  12 --for all other colors ask sfan5 to complete his worK!
  13
  14 dofile(scriptpath .. DIR_DELIM .. "misc_helpers.lua")
  15 dofile(scriptpath .. DIR_DELIM .. "filterlist.lua")
  16 dofile(scriptpath .. DIR_DELIM .. "modmgr.lua")
  17 dofile(scriptpath .. DIR_DELIM .. "modstore.lua")
  18 dofile(scriptpath .. DIR_DELIM .. "gamemgr.lua")
  19 dofile(scriptpath .. DIR_DELIM .. "mm_textures.lua")
  20 dofile(scriptpath .. DIR_DELIM .. "mm_menubar.lua")
  21
  22 menu = {}
  23 local tabbuilder = {}
  24 local worldlist = nil
  25
  26 --------------------------------------------------------------------------------
  27 local function filter_texture_pack_list(list)
  28         retval = {"None"}
  29         for _,i in ipairs(list) do
  30                 if i~="base" then
  31                         table.insert(retval, i)
  32                 end
  33         end
  34         return retval
  35 end
  36
  37 --------------------------------------------------------------------------------
  38 function menu.render_favorite(spec,render_details)
  39         local text = ""
  40
  41         if spec.name ~= nil then
  42                 text = text .. engine.formspec_escape(spec.name:trim())
  43
  44 --              if spec.description ~= nil and
  45 --                      engine.formspec_escape(spec.description):trim() ~= "" then
  46 --                      text = text .. " (" .. engine.formspec_escape(spec.description) .. ")"
  47 --              end
  48         else
  49                 if spec.address ~= nil then
  50                         text = text .. spec.address:trim()
  51
  52                         if spec.port ~= nil then
  53                                 text = text .. ":" .. spec.port
  54                         end
  55                 end
  56         end
  57
  58         if not render_details then
  59                 return text
  60         end
  61
  62         local details = ""
  63         if spec.password == true then
  64                 details = details .. "*"
  65         else
  66                 details = details .. "_"
  67         end
  68
  69         if spec.creative then
  70                 details = details .. "C"
  71         else
  72                 details = details .. "_"
  73         end
  74
  75         if spec.damage then
  76                 details = details .. "D"
  77         else
  78                 details = details .. "_"
  79         end
  80
  81         if spec.pvp then
  82                 details = details .. "P"
  83         else
  84                 details = details .. "_"
  85         end
  86         details = details .. " "
  87
  88         local playercount = ""
  89
  90         if spec.clients ~= nil and
  91                 spec.clients_max ~= nil then
  92                 playercount = string.format("%03d",spec.clients) .. "/" ..
  93                                                 string.format("%03d",spec.clients_max) .. " "
  94         end
  95
  96         return playercount .. engine.formspec_escape(details) ..  text
  97 end
  98
  99 --------------------------------------------------------------------------------
 100 os.tempfolder = function()
 101         local filetocheck = os.tmpname()
 102         os.remove(filetocheck)
 103
 104         local randname = "MTTempModFolder_" .. math.random(0,10000)
 105         if DIR_DELIM == "\\" then
 106                 local tempfolder = os.getenv("TEMP")
 107                 return tempfolder .. filetocheck
 108         else
 109                 local backstring = filetocheck:reverse()
 110                 return filetocheck:sub(0,filetocheck:len()-backstring:find(DIR_DELIM)+1) ..randname
 111         end
 112
 113 end
 114
 115 --------------------------------------------------------------------------------
 116 function init_globals()
 117         --init gamedata
 118         gamedata.worldindex = 0
 119
 120         worldlist = filterlist.create(
 121                                         engine.get_worlds,
 122                                         compare_worlds,
 123                                         function(element,uid)
 124                                                 if element.name == uid then
 125                                                         return true
 126                                                 end
 127                                                 return false
 128                                         end, --unique id compare fct
 129                                         function(element,gameid)
 130                                                 if element.gameid == gameid then
 131                                                         return true
 132                                                 end
 133                                                 return false
 134                                         end --filter fct
 135                                         )
 136
 137         filterlist.add_sort_mechanism(worldlist,"alphabetic",sort_worlds_alphabetic)
 138         filterlist.set_sortmode(worldlist,"alphabetic")
 139
 140 end
 141
 142 --------------------------------------------------------------------------------
 143 function update_menu()
 144
 145         local formspec = "size[12,5.2]"
 146
 147         -- handle errors
 148         if gamedata.errormessage ~= nil then
 149                 formspec = formspec ..
 150                         "field[1,2;10,2;;ERROR: " ..
 151                         gamedata.errormessage ..
 152                         ";]"..
 153                         "button[4.5,4.2;3,0.5;btn_error_confirm;" .. fgettext("Ok") .. "]"
 154         else
 155                 formspec = formspec .. tabbuilder.gettab()
 156         end
 157
 158         engine.update_formspec(formspec)
 159 end
 160
 161 --------------------------------------------------------------------------------
 162 function menu.render_world_list()
 163         local retval = ""
 164
 165         local current_worldlist = filterlist.get_list(worldlist)
 166
 167         for i,v in ipairs(current_worldlist) do
 168                 if retval ~= "" then
 169                         retval = retval ..","
 170                 end
 171
 172                 retval = retval .. engine.formspec_escape(v.name) ..
 173                                         " \\[" .. engine.formspec_escape(v.gameid) .. "\\]"
 174         end
 175
 176         return retval
 177 end
 178
 179 --------------------------------------------------------------------------------
 180 function menu.render_texture_pack_list(list)
 181         local retval = ""
 182
 183         for i,v in ipairs(list) do
 184                 if retval ~= "" then
 185                         retval = retval ..","
 186                 end
 187
 188                 retval = retval .. v
 189         end
 190
 191         return retval
 192 end
 193
 194 --------------------------------------------------------------------------------
 195 function menu.init()
 196         --init menu data
 197         gamemgr.update_gamelist()
 198
 199         menu.last_game  = tonumber(engine.setting_get("main_menu_last_game_idx"))
 200
 201         if type(menu.last_game) ~= "number" then
 202                 menu.last_game = 1
 203         end
 204
 205         if engine.setting_getbool("public_serverlist") then
 206                 menu.favorites = engine.get_favorites("online")
 207         else
 208                 menu.favorites = engine.get_favorites("local")
 209         end
 210
 211         menu.defaulttexturedir = engine.get_texturepath() .. DIR_DELIM .. "base" ..
 212                                         DIR_DELIM .. "pack" .. DIR_DELIM
 213 end
 214
 215 --------------------------------------------------------------------------------
 216 function menu.lastgame()
 217         if menu.last_game > 0 and menu.last_game <= #gamemgr.games then
 218                 return gamemgr.games[menu.last_game]
 219         end
 220
 221         if #gamemgr.games >= 1 then
 222                 menu.last_game = 1
 223                 return gamemgr.games[menu.last_game]
 224         end
 225
 226         --error case!!
 227         return nil
 228 end
 229
 230 --------------------------------------------------------------------------------
 231 function menu.update_last_game()
 232
 233         local current_world = filterlist.get_raw_element(worldlist,
 234                                                         engine.setting_get("mainmenu_last_selected_world")
 235                                                         )
 236
 237         if current_world == nil then
 238                 return
 239         end
 240
 241         local gamespec, i = gamemgr.find_by_gameid(current_world.gameid)
 242         if i ~= nil then
 243                 menu.last_game = i
 244                 engine.setting_set("main_menu_last_game_idx",menu.last_game)
 245         end
 246 end
 247
 248 --------------------------------------------------------------------------------
 249 function menu.handle_key_up_down(fields,textlist,settingname)
 250
 251         if fields["key_up"] then
 252                 local oldidx = engine.get_textlist_index(textlist)
 253
 254                 if oldidx > 1 then
 255                         local newidx = oldidx -1
 256                         engine.setting_set(settingname,
 257                                 filterlist.get_raw_index(worldlist,newidx))
 258                 end
 259         end
 260
 261         if fields["key_down"] then
 262                 local oldidx = engine.get_textlist_index(textlist)
 263
 264                 if oldidx < filterlist.size(worldlist) then
 265                         local newidx = oldidx + 1
 266                         engine.setting_set(settingname,
 267                                 filterlist.get_raw_index(worldlist,newidx))
 268                 end
 269         end
 270 end
 271
 272 --------------------------------------------------------------------------------
 273 function tabbuilder.dialog_create_world()
 274         local mapgens = {"v6", "v7", "indev", "singlenode", "math"}
 275
 276         local current_mg = engine.setting_get("mg_name")
 277
 278         local mglist = ""
 279         local selindex = 1
 280         local i = 1
 281         for k,v in pairs(mapgens) do
 282                 if current_mg == v then
 283                         selindex = i
 284                 end
 285                 i = i + 1
 286                 mglist = mglist .. v .. ","
 287         end
 288         mglist = mglist:sub(1, -2)
 289
 290         local retval =
 291                 "label[2,0;" .. fgettext("World name") .. "]"..
 292                 "label[2,1;" .. fgettext("Mapgen") .. "]"..
 293                 "field[4.5,0.4;6,0.5;te_world_name;;]" ..
 294                 "label[2,2;" .. fgettext("Game") .. "]"..
 295                 "button[5,4.5;2.6,0.5;world_create_confirm;" .. fgettext("Create") .. "]" ..
 296                 "button[7.5,4.5;2.8,0.5;world_create_cancel;" .. fgettext("Cancel") .. "]" ..
 297                 "dropdown[4.2,1;6.3;dd_mapgen;" .. mglist .. ";" .. selindex .. "]" ..
 298                 "textlist[4.2,1.9;5.8,2.3;games;" ..
 299                 gamemgr.gamelist() ..
 300                 ";" .. menu.last_game .. ";true]"
 301
 302         return retval
 303 end
 304
 305 --------------------------------------------------------------------------------
 306 function tabbuilder.dialog_delete_world()
 307         return  "label[2,2;" ..
 308                         fgettext("Delete World \"$1\"?", filterlist.get_raw_list(worldlist)[menu.world_to_del].name) .. "]"..
 309                         "button[3.5,4.2;2.6,0.5;world_delete_confirm;" .. fgettext("Yes").. "]" ..
 310                         "button[6,4.2;2.8,0.5;world_delete_cancel;" .. fgettext("No") .. "]"
 311 end
 312
 313 --------------------------------------------------------------------------------
 314 function tabbuilder.gettab()
 315         local retval = ""
 316
 317         if tabbuilder.show_buttons then
 318                 retval = retval .. tabbuilder.tab_header()
 319         end
 320
 321         if tabbuilder.current_tab == "singleplayer" then
 322                 retval = retval .. tabbuilder.tab_singleplayer()
 323         end
 324
 325         if tabbuilder.current_tab == "multiplayer" then
 326                 retval = retval .. tabbuilder.tab_multiplayer()
 327         end
 328
 329         if tabbuilder.current_tab == "server" then
 330                 retval = retval .. tabbuilder.tab_server()
 331         end
 332
 333         if tabbuilder.current_tab == "settings" then
 334                 retval = retval .. tabbuilder.tab_settings()
 335         end
 336
 337         if tabbuilder.current_tab == "texture_packs" then
 338                 retval = retval .. tabbuilder.tab_texture_packs()
 339         end
 340
 341         if tabbuilder.current_tab == "credits" then
 342                 retval = retval .. tabbuilder.tab_credits()
 343         end
 344
 345         if tabbuilder.current_tab == "dialog_create_world" then
 346                 retval = retval .. tabbuilder.dialog_create_world()
 347         end
 348
 349         if tabbuilder.current_tab == "dialog_delete_world" then
 350                 retval = retval .. tabbuilder.dialog_delete_world()
 351         end
 352
 353         retval = retval .. modmgr.gettab(tabbuilder.current_tab)
 354         retval = retval .. gamemgr.gettab(tabbuilder.current_tab)
 355         retval = retval .. modstore.gettab(tabbuilder.current_tab)
 356
 357         return retval
 358 end
 359
 360 --------------------------------------------------------------------------------
 361 function tabbuilder.handle_create_world_buttons(fields)
 362
 363         if fields["world_create_confirm"] or
 364                 fields["key_enter"] then
 365
 366                 local worldname = fields["te_world_name"]
 367                 local gameindex = engine.get_textlist_index("games")
 368
 369                 if gameindex > 0 and
 370                         worldname ~= "" then
 371
 372                         local message = nil
 373
 374                         if not filterlist.uid_exists_raw(worldlist,worldname) then
 375                                 engine.setting_set("mg_name",fields["dd_mapgen"])
 376                                 message = engine.create_world(worldname,gameindex)
 377                         else
 378                                 message = fgettext("A world named \"$1\" already exists", worldname)
 379                         end
 380
 381                         if message ~= nil then
 382                                 gamedata.errormessage = message
 383                         else
 384                                 menu.last_game = gameindex
 385                                 engine.setting_set("main_menu_last_game_idx",gameindex)
 386
 387                                 filterlist.refresh(worldlist)
 388                                 engine.setting_set("mainmenu_last_selected_world",
 389                                                                         filterlist.raw_index_by_uid(worldlist,worldname))
 390                         end
 391                 else
 392                         gamedata.errormessage =
 393                                 fgettext("No worldname given or no game selected")
 394                 end
 395         end
 396
 397         if fields["games"] then
 398                 tabbuilder.skipformupdate = true
 399                 return
 400         end
 401
 402         --close dialog
 403         tabbuilder.is_dialog = false
 404         tabbuilder.show_buttons = true
 405         tabbuilder.current_tab = engine.setting_get("main_menu_tab")
 406 end
 407
 408 --------------------------------------------------------------------------------
 409 function tabbuilder.handle_delete_world_buttons(fields)
 410
 411         if fields["world_delete_confirm"] then
 412                 if menu.world_to_del > 0 and
 413                         menu.world_to_del <= #filterlist.get_raw_list(worldlist) then
 414                         engine.delete_world(menu.world_to_del)
 415                         menu.world_to_del = 0
 416                         filterlist.refresh(worldlist)
 417                 end
 418         end
 419
 420         tabbuilder.is_dialog = false
 421         tabbuilder.show_buttons = true
 422         tabbuilder.current_tab = engine.setting_get("main_menu_tab")
 423 end
 424
 425 --------------------------------------------------------------------------------
 426 function tabbuilder.handle_multiplayer_buttons(fields)
 427
 428         if fields["te_name"] ~= nil then
 429                 gamedata.playername = fields["te_name"]
 430                 engine.setting_set("name", fields["te_name"])
 431         end
 432
 433         if fields["favourites"] ~= nil then
 434                 local event = explode_textlist_event(fields["favourites"])
 435                 if event.typ == "DCL" then
 436                         gamedata.address = menu.favorites[event.index].address
 437                         gamedata.port = menu.favorites[event.index].port
 438                         gamedata.playername             = fields["te_name"]
 439                         if fields["te_pwd"] ~= nil then
 440                                 gamedata.password               = fields["te_pwd"]
 441                         end
 442                         gamedata.selected_world = 0
 443
 444                         if menu.favorites ~= nil then
 445                                 gamedata.servername = menu.favorites[event.index].name
 446                                 gamedata.serverdescription = menu.favorites[event.index].description
 447                         end
 448
 449                         if gamedata.address ~= nil and
 450                                 gamedata.port ~= nil then
 451
 452                                 engine.start()
 453                         end
 454                 end
 455
 456                 if event.typ == "CHG" then
 457                         local address = menu.favorites[event.index].address
 458                         local port = menu.favorites[event.index].port
 459
 460                         if address ~= nil and
 461                                 port ~= nil then
 462                                 engine.setting_set("address",address)
 463                                 engine.setting_set("port",port)
 464                         end
 465
 466                         menu.fav_selected = event.index
 467                 end
 468                 return
 469         end
 470
 471         if fields["key_up"] ~= nil or
 472                 fields["key_down"] ~= nil then
 473
 474                 local fav_idx = engine.get_textlist_index("favourites")
 475
 476                 if fields["key_up"] ~= nil and fav_idx > 1 then
 477                         fav_idx = fav_idx -1
 478                 else if fields["key_down"] and fav_idx < #menu.favorites then
 479                         fav_idx = fav_idx +1
 480                 end end
 481
 482                 local address = menu.favorites[fav_idx].address
 483                 local port = menu.favorites[fav_idx].port
 484
 485                 if address ~= nil and
 486                         port ~= nil then
 487                         engine.setting_set("address",address)
 488                         engine.setting_set("port",port)
 489                 end
 490
 491                 menu.fav_selected = fav_idx
 492                 return
 493         end
 494
 495         if fields["cb_public_serverlist"] ~= nil then
 496                 engine.setting_setbool("public_serverlist",
 497                         tabbuilder.tobool(fields["cb_public_serverlist"]))
 498
 499                 if engine.setting_getbool("public_serverlist") then
 500                         menu.favorites = engine.get_favorites("online")
 501                 else
 502                         menu.favorites = engine.get_favorites("local")
 503                 end
 504                 menu.fav_selected = nil
 505                 return
 506         end
 507
 508         if fields["btn_delete_favorite"] ~= nil then
 509                 local current_favourite = engine.get_textlist_index("favourites")
 510                 engine.delete_favorite(current_favourite)
 511                 menu.favorites = engine.get_favorites()
 512                 menu.fav_selected = nil
 513
 514                 engine.setting_set("address","")
 515                 engine.setting_get("port","")
 516
 517                 return
 518         end
 519
 520         if fields["btn_mp_connect"] ~= nil or
 521                 fields["key_enter"] then
 522
 523                 gamedata.playername             = fields["te_name"]
 524                 gamedata.password               = fields["te_pwd"]
 525                 gamedata.address                = fields["te_address"]
 526                 gamedata.port                   = fields["te_port"]
 527
 528                 local fav_idx = engine.get_textlist_index("favourites")
 529
 530                 if fav_idx > 0 and fav_idx <= #menu.favorites and
 531                         menu.favorites[fav_idx].address == fields["te_address"] and
 532                         menu.favorites[fav_idx].port == fields["te_port"] then
 533
 534                         gamedata.servername                     = menu.favorites[fav_idx].name
 535                         gamedata.serverdescription      = menu.favorites[fav_idx].description
 536                 else
 537                         gamedata.servername = ""
 538                         gamedata.serverdescription = ""
 539                 end
 540
 541                 gamedata.selected_world = 0
 542
 543                 engine.start()
 544                 return
 545         end
 546 end
 547
 548 --------------------------------------------------------------------------------
 549 function tabbuilder.handle_server_buttons(fields)
 550
 551         local world_doubleclick = false
 552
 553         if fields["srv_worlds"] ~= nil then
 554                 local event = explode_textlist_event(fields["srv_worlds"])
 555
 556                 if event.typ == "DCL" then
 557                         world_doubleclick = true
 558                 end
 559                 if event.typ == "CHG" then
 560                         engine.setting_set("mainmenu_last_selected_world",
 561                                 filterlist.get_raw_index(worldlist,engine.get_textlist_index("srv_worlds")))
 562                 end
 563         end
 564
 565         menu.handle_key_up_down(fields,"srv_worlds","mainmenu_last_selected_world")
 566
 567         if fields["cb_creative_mode"] then
 568                 engine.setting_setbool("creative_mode",tabbuilder.tobool(fields["cb_creative_mode"]))
 569         end
 570
 571         if fields["cb_enable_damage"] then
 572                 engine.setting_setbool("enable_damage",tabbuilder.tobool(fields["cb_enable_damage"]))
 573         end
 574
 575         if fields["cb_server_announce"] then
 576                 engine.setting_setbool("server_announce",tabbuilder.tobool(fields["cb_server_announce"]))
 577         end
 578
 579         if fields["start_server"] ~= nil or
 580                 world_doubleclick or
 581                 fields["key_enter"] then
 582                 local selected = engine.get_textlist_index("srv_worlds")
 583                 if selected > 0 then
 584                         gamedata.playername             = fields["te_playername"]
 585                         gamedata.password               = fields["te_passwd"]
 586                         gamedata.port                   = fields["te_serverport"]
 587                         gamedata.address                = ""
 588                         gamedata.selected_world = filterlist.get_raw_index(worldlist,selected)
 589
 590                         menu.update_last_game(gamedata.selected_world)
 591                         engine.start()
 592                 end
 593         end
 594
 595         if fields["world_create"] ~= nil then
 596                 tabbuilder.current_tab = "dialog_create_world"
 597                 tabbuilder.is_dialog = true
 598                 tabbuilder.show_buttons = false
 599         end
 600
 601         if fields["world_delete"] ~= nil then
 602                 local selected = engine.get_textlist_index("srv_worlds")
 603                 if selected > 0 and
 604                         selected <= filterlist.size(worldlist) then
 605                         local world = filterlist.get_list(worldlist)[selected]
 606                         if world ~= nil and
 607                                 world.name ~= nil and
 608                                 world.name ~= "" then
 609                                 menu.world_to_del = filterlist.get_raw_index(worldlist,selected)
 610                                 tabbuilder.current_tab = "dialog_delete_world"
 611                                 tabbuilder.is_dialog = true
 612                                 tabbuilder.show_buttons = false
 613                         else
 614                                 menu.world_to_del = 0
 615                         end
 616                 end
 617         end
 618
 619         if fields["world_configure"] ~= nil then
 620                 selected = engine.get_textlist_index("srv_worlds")
 621                 if selected > 0 then
 622                         modmgr.world_config_selected_world = filterlist.get_raw_index(worldlist,selected)
 623                         if modmgr.init_worldconfig() then
 624                                 tabbuilder.current_tab = "dialog_configure_world"
 625                                 tabbuilder.is_dialog = true
 626                                 tabbuilder.show_buttons = false
 627                         end
 628                 end
 629         end
 630 end
 631
 632 --------------------------------------------------------------------------------
 633 function tabbuilder.tobool(text)
 634         if text == "true" then
 635                 return true
 636         else
 637                 return false
 638         end
 639 end
 640
 641 --------------------------------------------------------------------------------
 642 function tabbuilder.handle_settings_buttons(fields)
 643         if fields["cb_fancy_trees"] then
 644                 engine.setting_setbool("new_style_leaves",tabbuilder.tobool(fields["cb_fancy_trees"]))
 645         end
 646         if fields["cb_smooth_lighting"] then
 647                 engine.setting_setbool("smooth_lighting",tabbuilder.tobool(fields["cb_smooth_lighting"]))
 648         end
 649         if fields["cb_3d_clouds"] then
 650                 engine.setting_setbool("enable_3d_clouds",tabbuilder.tobool(fields["cb_3d_clouds"]))
 651         end
 652         if fields["cb_opaque_water"] then
 653                 engine.setting_setbool("opaque_water",tabbuilder.tobool(fields["cb_opaque_water"]))
 654         end
 655
 656         if fields["cb_mipmapping"] then
 657                 engine.setting_setbool("mip_map",tabbuilder.tobool(fields["cb_mipmapping"]))
 658         end
 659         if fields["cb_anisotrophic"] then
 660                 engine.setting_setbool("anisotropic_filter",tabbuilder.tobool(fields["cb_anisotrophic"]))
 661         end
 662         if fields["cb_bilinear"] then
 663                 engine.setting_setbool("bilinear_filter",tabbuilder.tobool(fields["cb_bilinear"]))
 664         end
 665         if fields["cb_trilinear"] then
 666                 engine.setting_setbool("trilinear_filter",tabbuilder.tobool(fields["cb_trilinear"]))
 667         end
 668
 669         if fields["cb_shaders"] then
 670                 engine.setting_setbool("enable_shaders",tabbuilder.tobool(fields["cb_shaders"]))
 671         end
 672         if fields["cb_pre_ivis"] then
 673                 engine.setting_setbool("preload_item_visuals",tabbuilder.tobool(fields["cb_pre_ivis"]))
 674         end
 675         if fields["cb_particles"] then
 676                 engine.setting_setbool("enable_particles",tabbuilder.tobool(fields["cb_particles"]))
 677         end
 678         if fields["cb_finite_liquid"] then
 679                 engine.setting_setbool("liquid_finite",tabbuilder.tobool(fields["cb_finite_liquid"]))
 680         end
 681
 682         if fields["btn_change_keys"] ~= nil then
 683                 engine.show_keys_menu()
 684         end
 685 end
 686
 687 --------------------------------------------------------------------------------
 688 function tabbuilder.handle_singleplayer_buttons(fields)
 689
 690         local world_doubleclick = false
 691
 692         if fields["sp_worlds"] ~= nil then
 693                 local event = explode_textlist_event(fields["sp_worlds"])
 694
 695                 if event.typ == "DCL" then
 696                         world_doubleclick = true
 697                 end
 698
 699                 if event.typ == "CHG" then
 700                         engine.setting_set("mainmenu_last_selected_world",
 701                                 filterlist.get_raw_index(worldlist,engine.get_textlist_index("sp_worlds")))
 702                 end
 703         end
 704
 705         menu.handle_key_up_down(fields,"sp_worlds","mainmenu_last_selected_world")
 706
 707         if fields["cb_creative_mode"] then
 708                 engine.setting_setbool("creative_mode",tabbuilder.tobool(fields["cb_creative_mode"]))
 709         end
 710
 711         if fields["cb_enable_damage"] then
 712                 engine.setting_setbool("enable_damage",tabbuilder.tobool(fields["cb_enable_damage"]))
 713         end
 714
 715         if fields["play"] ~= nil or
 716                 world_doubleclick or
 717                 fields["key_enter"] then
 718                 local selected = engine.get_textlist_index("sp_worlds")
 719                 if selected > 0 then
 720                         gamedata.selected_world = filterlist.get_raw_index(worldlist,selected)
 721                         gamedata.singleplayer   = true
 722
 723                         menu.update_last_game(gamedata.selected_world)
 724
 725                         engine.start()
 726                 end
 727         end
 728
 729         if fields["world_create"] ~= nil then
 730                 tabbuilder.current_tab = "dialog_create_world"
 731                 tabbuilder.is_dialog = true
 732                 tabbuilder.show_buttons = false
 733         end
 734
 735         if fields["world_delete"] ~= nil then
 736                 local selected = engine.get_textlist_index("sp_worlds")
 737                 if selected > 0 and
 738                         selected <= filterlist.size(worldlist) then
 739                         local world = filterlist.get_list(worldlist)[selected]
 740                         if world ~= nil and
 741                                 world.name ~= nil and
 742                                 world.name ~= "" then
 743                                 menu.world_to_del = filterlist.get_raw_index(worldlist,selected)
 744                                 tabbuilder.current_tab = "dialog_delete_world"
 745                                 tabbuilder.is_dialog = true
 746                                 tabbuilder.show_buttons = false
 747                         else
 748                                 menu.world_to_del = 0
 749                         end
 750                 end
 751         end
 752
 753         if fields["world_configure"] ~= nil then
 754                 selected = engine.get_textlist_index("sp_worlds")
 755                 if selected > 0 then
 756                         modmgr.world_config_selected_world = filterlist.get_raw_index(worldlist,selected)
 757                         if modmgr.init_worldconfig() then
 758                                 tabbuilder.current_tab = "dialog_configure_world"
 759                                 tabbuilder.is_dialog = true
 760                                 tabbuilder.show_buttons = false
 761                         end
 762                 end
 763         end
 764 end
 765
 766 --------------------------------------------------------------------------------
 767 function tabbuilder.handle_texture_pack_buttons(fields)
 768         if fields["TPs"] ~= nil then
 769                 local event = explode_textlist_event(fields["TPs"])
 770                 if event.typ == "CHG" or event.typ=="DCL" then
 771                         local index = engine.get_textlist_index("TPs")
 772                         engine.setting_set("mainmenu_last_selected_TP",
 773                                 index)
 774                         local list = filter_texture_pack_list(engine.get_dirlist(engine.get_texturepath(), true))
 775                         local current_index = engine.get_textlist_index("TPs")
 776                         if #list >= current_index then
 777                                 local new_path = engine.get_texturepath()..DIR_DELIM..list[current_index]
 778                                 if list[current_index] == "None" then new_path = "" end
 779
 780                                 engine.setting_set("texture_path", new_path)
 781                         end
 782                 end
 783         end
 784 end
 785
 786 --------------------------------------------------------------------------------
 787 function tabbuilder.tab_header()
 788
 789         if tabbuilder.last_tab_index == nil then
 790                 tabbuilder.last_tab_index = 1
 791         end
 792
 793         local toadd = ""
 794
 795         for i=1,#tabbuilder.current_buttons,1 do
 796
 797                 if toadd ~= "" then
 798                         toadd = toadd .. ","
 799                 end
 800
 801                 toadd = toadd .. tabbuilder.current_buttons[i].caption
 802         end
 803         return "tabheader[-0.3,-0.99;main_tab;" .. toadd ..";" .. tabbuilder.last_tab_index .. ";true;false]"
 804 end
 805
 806 --------------------------------------------------------------------------------
 807 function tabbuilder.handle_tab_buttons(fields)
 808
 809         if fields["main_tab"] then
 810                 local index = tonumber(fields["main_tab"])
 811                 tabbuilder.last_tab_index = index
 812                 tabbuilder.current_tab = tabbuilder.current_buttons[index].name
 813
 814                 engine.setting_set("main_menu_tab",tabbuilder.current_tab)
 815         end
 816
 817         --handle tab changes
 818         if tabbuilder.current_tab ~= tabbuilder.old_tab then
 819                 if tabbuilder.current_tab ~= "singleplayer" then
 820                         menu.update_gametype(true)
 821                 end
 822         end
 823
 824         if tabbuilder.current_tab == "singleplayer" then
 825                 menu.update_gametype()
 826         end
 827
 828         tabbuilder.old_tab = tabbuilder.current_tab
 829 end
 830
 831 --------------------------------------------------------------------------------
 832 function tabbuilder.init()
 833         tabbuilder.current_tab = engine.setting_get("main_menu_tab")
 834
 835         if tabbuilder.current_tab == nil or
 836                 tabbuilder.current_tab == "" then
 837                 tabbuilder.current_tab = "singleplayer"
 838                 engine.setting_set("main_menu_tab",tabbuilder.current_tab)
 839         end
 840
 841         --initialize tab buttons
 842         tabbuilder.last_tab = nil
 843         tabbuilder.show_buttons = true
 844
 845         tabbuilder.current_buttons = {}
 846         table.insert(tabbuilder.current_buttons,{name="singleplayer", caption=fgettext("Singleplayer")})
 847         table.insert(tabbuilder.current_buttons,{name="multiplayer", caption=fgettext("Client")})
 848         table.insert(tabbuilder.current_buttons,{name="server", caption=fgettext("Server")})
 849         table.insert(tabbuilder.current_buttons,{name="settings", caption=fgettext("Settings")})
 850         table.insert(tabbuilder.current_buttons,{name="texture_packs", caption=fgettext("Texture Packs")})
 851
 852         if engine.setting_getbool("main_menu_game_mgr") then
 853                 table.insert(tabbuilder.current_buttons,{name="game_mgr", caption=fgettext("Games")})
 854         end
 855
 856         if engine.setting_getbool("main_menu_mod_mgr") then
 857                 table.insert(tabbuilder.current_buttons,{name="mod_mgr", caption=fgettext("Mods")})
 858         end
 859         table.insert(tabbuilder.current_buttons,{name="credits", caption=fgettext("Credits")})
 860
 861
 862         for i=1,#tabbuilder.current_buttons,1 do
 863                 if tabbuilder.current_buttons[i].name == tabbuilder.current_tab then
 864                         tabbuilder.last_tab_index = i
 865                 end
 866         end
 867
 868         if tabbuilder.current_tab ~= "singleplayer" then
 869                 menu.update_gametype(true)
 870         else
 871                 menu.update_gametype()
 872         end
 873 end
 874
 875 --------------------------------------------------------------------------------
 876 function tabbuilder.tab_multiplayer()
 877
 878         local retval =
 879                 "vertlabel[0,-0.25;".. fgettext("CLIENT") .. "]" ..
 880                 "label[1,-0.25;".. fgettext("Favorites:") .. "]"..
 881                 "label[1,4.25;".. fgettext("Address/Port") .. "]"..
 882                 "label[9,2.75;".. fgettext("Name/Password") .. "]" ..
 883                 "field[1.25,5.25;5.5,0.5;te_address;;" ..engine.setting_get("address") .."]" ..
 884                 "field[6.75,5.25;2.25,0.5;te_port;;" ..engine.setting_get("port") .."]" ..
 885                 "checkbox[1,3.6;cb_public_serverlist;".. fgettext("Public Serverlist") .. ";" ..
 886                 dump(engine.setting_getbool("public_serverlist")) .. "]"
 887
 888         if not engine.setting_getbool("public_serverlist") then
 889                 retval = retval ..
 890                 "button[6.45,3.95;2.25,0.5;btn_delete_favorite;".. fgettext("Delete") .. "]"
 891         end
 892
 893         retval = retval ..
 894                 "button[9,4.95;2.5,0.5;btn_mp_connect;".. fgettext("Connect") .. "]" ..
 895                 "field[9.3,3.75;2.5,0.5;te_name;;" ..engine.setting_get("name") .."]" ..
 896                 "pwdfield[9.3,4.5;2.5,0.5;te_pwd;]" ..
 897                 "textarea[9.3,0.25;2.5,2.75;;"
 898         if menu.fav_selected ~= nil and
 899                 menu.favorites[menu.fav_selected].description ~= nil then
 900                 retval = retval ..
 901                         engine.formspec_escape(menu.favorites[menu.fav_selected].description,true)
 902         end
 903
 904         retval = retval ..
 905                 ";]" ..
 906                 "textlist[1,0.35;7.5,3.35;favourites;"
 907
 908         local render_details = engine.setting_getbool("public_serverlist")
 909
 910         if #menu.favorites > 0 then
 911                 retval = retval .. menu.render_favorite(menu.favorites[1],render_details)
 912
 913                 for i=2,#menu.favorites,1 do
 914                         retval = retval .. "," .. menu.render_favorite(menu.favorites[i],render_details)
 915                 end
 916         end
 917
 918         if menu.fav_selected ~= nil then
 919                 retval = retval .. ";" .. menu.fav_selected .. "]"
 920         else
 921                 retval = retval .. ";0]"
 922         end
 923
 924         return retval
 925 end
 926
 927 --------------------------------------------------------------------------------
 928 function tabbuilder.tab_server()
 929
 930         local index = filterlist.get_current_index(worldlist,
 931                                 tonumber(engine.setting_get("mainmenu_last_selected_world"))
 932                                 )
 933
 934         local retval =
 935                 "button[4,4.15;2.6,0.5;world_delete;".. fgettext("Delete") .. "]" ..
 936                 "button[6.5,4.15;2.8,0.5;world_create;".. fgettext("New") .. "]" ..
 937                 "button[9.2,4.15;2.55,0.5;world_configure;".. fgettext("Configure") .. "]" ..
 938                 "button[8.5,4.9;3.25,0.5;start_server;".. fgettext("Start Game") .. "]" ..
 939                 "label[4,-0.25;".. fgettext("Select World:") .. "]"..
 940                 "vertlabel[0,-0.25;".. fgettext("START SERVER") .. "]" ..
 941                 "checkbox[0.5,0.25;cb_creative_mode;".. fgettext("Creative Mode") .. ";" ..
 942                 dump(engine.setting_getbool("creative_mode")) .. "]"..
 943                 "checkbox[0.5,0.7;cb_enable_damage;".. fgettext("Enable Damage") .. ";" ..
 944                 dump(engine.setting_getbool("enable_damage")) .. "]"..
 945                 "checkbox[0.5,1.15;cb_server_announce;".. fgettext("Public") .. ";" ..
 946                 dump(engine.setting_getbool("server_announce")) .. "]"..
 947                 "field[0.8,3.2;3,0.5;te_playername;".. fgettext("Name") .. ";" ..
 948                 engine.setting_get("name") .. "]" ..
 949                 "pwdfield[0.8,4.2;3,0.5;te_passwd;".. fgettext("Password") .. "]" ..
 950                 "field[0.8,5.2;3,0.5;te_serverport;".. fgettext("Server Port") .. ";30000]" ..
 951                 "textlist[4,0.25;7.5,3.7;srv_worlds;" ..
 952                 menu.render_world_list() ..
 953                 ";" .. index .. "]"
 954
 955         return retval
 956 end
 957
 958 --------------------------------------------------------------------------------
 959 function tabbuilder.tab_settings()
 960         return  "vertlabel[0,0;" .. fgettext("SETTINGS") .. "]" ..
 961                         "checkbox[1,0.75;cb_fancy_trees;".. fgettext("Fancy trees") .. ";"
 962                                         .. dump(engine.setting_getbool("new_style_leaves")) .. "]"..
 963                         "checkbox[1,1.25;cb_smooth_lighting;".. fgettext("Smooth Lighting")
 964                                         .. ";".. dump(engine.setting_getbool("smooth_lighting")) .. "]"..
 965                         "checkbox[1,1.75;cb_3d_clouds;".. fgettext("3D Clouds") .. ";"
 966                                         .. dump(engine.setting_getbool("enable_3d_clouds")) .. "]"..
 967                         "checkbox[1,2.25;cb_opaque_water;".. fgettext("Opaque Water") .. ";"
 968                                         .. dump(engine.setting_getbool("opaque_water")) .. "]"..
 969
 970                         "checkbox[4,0.75;cb_mipmapping;".. fgettext("Mip-Mapping") .. ";"
 971                                         .. dump(engine.setting_getbool("mip_map")) .. "]"..
 972                         "checkbox[4,1.25;cb_anisotrophic;".. fgettext("Anisotropic Filtering") .. ";"
 973                                         .. dump(engine.setting_getbool("anisotropic_filter")) .. "]"..
 974                         "checkbox[4,1.75;cb_bilinear;".. fgettext("Bi-Linear Filtering") .. ";"
 975                                         .. dump(engine.setting_getbool("bilinear_filter")) .. "]"..
 976                         "checkbox[4,2.25;cb_trilinear;".. fgettext("Tri-Linear Filtering") .. ";"
 977                                         .. dump(engine.setting_getbool("trilinear_filter")) .. "]"..
 978
 979                         "checkbox[7.5,0.75;cb_shaders;".. fgettext("Shaders") .. ";"
 980                                         .. dump(engine.setting_getbool("enable_shaders")) .. "]"..
 981                         "checkbox[7.5,1.25;cb_pre_ivis;".. fgettext("Preload item visuals") .. ";"
 982                                         .. dump(engine.setting_getbool("preload_item_visuals")) .. "]"..
 983                         "checkbox[7.5,1.75;cb_particles;".. fgettext("Enable Particles") .. ";"
 984                                         .. dump(engine.setting_getbool("enable_particles"))     .. "]"..
 985                         "checkbox[7.5,2.25;cb_finite_liquid;".. fgettext("Finite Liquid") .. ";"
 986                                         .. dump(engine.setting_getbool("liquid_finite")) .. "]"..
 987
 988                         "button[1,4.25;2.25,0.5;btn_change_keys;".. fgettext("Change keys") .. "]"
 989 end
 990
 991 --------------------------------------------------------------------------------
 992 function tabbuilder.tab_singleplayer()
 993
 994         local index = filterlist.get_current_index(worldlist,
 995                                 tonumber(engine.setting_get("mainmenu_last_selected_world"))
 996                                 )
 997
 998         return  "button[4,4.15;2.6,0.5;world_delete;".. fgettext("Delete") .. "]" ..
 999                         "button[6.5,4.15;2.8,0.5;world_create;".. fgettext("New") .. "]" ..
1000                         "button[9.2,4.15;2.55,0.5;world_configure;".. fgettext("Configure") .. "]" ..
1001                         "button[8.5,4.95;3.25,0.5;play;".. fgettext("Play") .. "]" ..
1002                         "label[4,-0.25;".. fgettext("Select World:") .. "]"..
1003                         "vertlabel[0,-0.25;".. fgettext("SINGLE PLAYER") .. "]" ..
1004                         "checkbox[0.5,0.25;cb_creative_mode;".. fgettext("Creative Mode") .. ";" ..
1005                         dump(engine.setting_getbool("creative_mode")) .. "]"..
1006                         "checkbox[0.5,0.7;cb_enable_damage;".. fgettext("Enable Damage") .. ";" ..
1007                         dump(engine.setting_getbool("enable_damage")) .. "]"..
1008                         "textlist[4,0.25;7.5,3.7;sp_worlds;" ..
1009                         menu.render_world_list() ..
1010                         ";" .. index .. "]" ..
1011                         menubar.formspec
1012 end
1013
1014 --------------------------------------------------------------------------------
1015 function tabbuilder.tab_texture_packs()
1016         local retval = "label[4,-0.25;".. fgettext("Select texture pack:") .. "]"..
1017                         "vertlabel[0,-0.25;".. fgettext("TEXTURE PACKS") .. "]" ..
1018                         "textlist[4,0.25;7.5,5.0;TPs;"
1019
1020         local current_texture_path = engine.setting_get("texture_path")
1021         local list = filter_texture_pack_list(engine.get_dirlist(engine.get_texturepath(), true))
1022         local index = tonumber(engine.setting_get("mainmenu_last_selected_TP"))
1023
1024         if index == nil then index = 1 end
1025
1026         if current_texture_path == "" then
1027                 retval = retval ..
1028                         menu.render_texture_pack_list(list) ..
1029                         ";" .. index .. "]"
1030                 return retval
1031         end
1032
1033         local infofile = current_texture_path ..DIR_DELIM.."info.txt"
1034         local infotext = ""
1035         local f = io.open(infofile, "r")
1036         if f==nil then
1037                 infotext = fgettext("No information available")
1038         else
1039                 infotext = f:read("*all")
1040                 f:close()
1041         end
1042
1043         local screenfile = current_texture_path..DIR_DELIM.."screenshot.png"
1044         local no_screenshot = nil
1045         if not file_exists(screenfile) then
1046                 screenfile = nil
1047                 no_screenshot = engine.get_texturepath()..DIR_DELIM..
1048                                         "base"..DIR_DELIM.."pack"..DIR_DELIM.."no_screenshot.png"
1049         end
1050
1051         return  retval ..
1052                         menu.render_texture_pack_list(list) ..
1053                         ";" .. index .. "]" ..
1054                         "image[0.65,0.25;4.0,3.7;"..(screenfile or no_screenshot).."]"..
1055                         "textarea[1.0,3.25;3.7,1.5;;"..engine.formspec_escape(infotext or "")..";]"
1056 end
1057
1058 --------------------------------------------------------------------------------
1059 function tabbuilder.tab_credits()
1060         return  "vertlabel[0,-0.5;CREDITS]" ..
1061                         "label[0.5,3;Minetest " .. engine.get_version() .. "]" ..
1062                         "label[0.5,3.3;http://minetest.net]" ..
1063                         "image[0.5,1;" .. menu.defaulttexturedir .. "logo.png]" ..
1064                         "textlist[3.5,-0.25;8.5,5.8;list_credits;" ..
1065                         "#FFFF00" .. fgettext("Core Developers") .."," ..
1066                         "Perttu Ahola (celeron55) <celeron55@gmail.com>,"..
1067                         "Ryan Kwolek (kwolekr) <kwolekr@minetest.net>,"..
1068                         "PilzAdam <pilzadam@minetest.net>," ..
1069                         "Ilya Zhuravlev (xyz) <xyz@minetest.net>,"..
1070                         "Lisa Milne (darkrose) <lisa@ltmnet.com>,"..
1071                         "Maciej Kasatkin (RealBadAngel) <mk@realbadangel.pl>,"..
1072                         "proller <proler@gmail.com>,"..
1073                         "sfan5 <sfan5@live.de>,"..
1074                         "kahrl <kahrl@gmx.net>,"..
1075                         ","..
1076                         "#FFFF00" .. fgettext("Active Contributors") .. "," ..
1077                         "sapier,"..
1078                         "Vanessa Ezekowitz (VanessaE) <vanessaezekowitz@gmail.com>,"..
1079                         "Jurgen Doser (doserj) <jurgen.doser@gmail.com>,"..
1080                         "Jeija <jeija@mesecons.net>,"..
1081                         "MirceaKitsune <mirceakitsune@gmail.com>,"..
1082                         "ShadowNinja,"..
1083                         "dannydark <the_skeleton_of_a_child@yahoo.co.uk>,"..
1084                         "0gb.us <0gb.us@0gb.us>,"..
1085                         "," ..
1086                         "#FFFF00" .. fgettext("Previous Contributors") .. "," ..
1087                         "Guiseppe Bilotta (Oblomov) <guiseppe.bilotta@gmail.com>,"..
1088                         "Jonathan Neuschafer <j.neuschaefer@gmx.net>,"..
1089                         "Nils Dagsson Moskopp (erlehmann) <nils@dieweltistgarnichtso.net>,"..
1090                         "Constantin Wenger (SpeedProg) <constantin.wenger@googlemail.com>,"..
1091                         "matttpt <matttpt@gmail.com>,"..
1092                         "JacobF <queatz@gmail.com>,"..
1093                         ";0;true]"
1094 end
1095
1096 --------------------------------------------------------------------------------
1097 function tabbuilder.checkretval(retval)
1098
1099         if retval ~= nil then
1100                 if retval.current_tab ~= nil then
1101                         tabbuilder.current_tab = retval.current_tab
1102                 end
1103
1104                 if retval.is_dialog ~= nil then
1105                         tabbuilder.is_dialog = retval.is_dialog
1106                 end
1107
1108                 if retval.show_buttons ~= nil then
1109                         tabbuilder.show_buttons = retval.show_buttons
1110                 end
1111
1112                 if retval.skipformupdate ~= nil then
1113                         tabbuilder.skipformupdate = retval.skipformupdate
1114                 end
1115         end
1116 end
1117
1118 --------------------------------------------------------------------------------
1119 --------------------------------------------------------------------------------
1120 -- initialize callbacks
1121 --------------------------------------------------------------------------------
1122 --------------------------------------------------------------------------------
1123 engine.button_handler = function(fields)
1124         --print("Buttonhandler: tab: " .. tabbuilder.current_tab .. " fields: " .. dump(fields))
1125
1126         if fields["btn_error_confirm"] then
1127                 gamedata.errormessage = nil
1128         end
1129
1130         local retval = modmgr.handle_buttons(tabbuilder.current_tab,fields)
1131         tabbuilder.checkretval(retval)
1132
1133         retval = gamemgr.handle_buttons(tabbuilder.current_tab,fields)
1134         tabbuilder.checkretval(retval)
1135
1136         retval = modstore.handle_buttons(tabbuilder.current_tab,fields)
1137         tabbuilder.checkretval(retval)
1138
1139         if tabbuilder.current_tab == "dialog_create_world" then
1140                 tabbuilder.handle_create_world_buttons(fields)
1141         end
1142
1143         if tabbuilder.current_tab == "dialog_delete_world" then
1144                 tabbuilder.handle_delete_world_buttons(fields)
1145         end
1146
1147         if tabbuilder.current_tab == "singleplayer" then
1148                 tabbuilder.handle_singleplayer_buttons(fields)
1149         end
1150
1151         if tabbuilder.current_tab == "texture_packs" then
1152                 tabbuilder.handle_texture_pack_buttons(fields)
1153         end
1154
1155         if tabbuilder.current_tab == "multiplayer" then
1156                 tabbuilder.handle_multiplayer_buttons(fields)
1157         end
1158
1159         if tabbuilder.current_tab == "settings" then
1160                 tabbuilder.handle_settings_buttons(fields)
1161         end
1162
1163         if tabbuilder.current_tab == "server" then
1164                 tabbuilder.handle_server_buttons(fields)
1165         end
1166
1167         --tab buttons
1168         tabbuilder.handle_tab_buttons(fields)
1169
1170         --menubar buttons
1171         menubar.handle_buttons(fields)
1172
1173         if not tabbuilder.skipformupdate then
1174                 --update menu
1175                 update_menu()
1176         else
1177                 tabbuilder.skipformupdate = false
1178         end
1179 end
1180
1181 --------------------------------------------------------------------------------
1182 engine.event_handler = function(event)
1183         if event == "MenuQuit" then
1184                 if tabbuilder.is_dialog then
1185                         tabbuilder.is_dialog = false
1186                         tabbuilder.show_buttons = true
1187                         tabbuilder.current_tab = engine.setting_get("main_menu_tab")
1188                         menu.update_gametype()
1189                         update_menu()
1190                 else
1191                         engine.close()
1192                 end
1193         end
1194 end
1195
1196 --------------------------------------------------------------------------------
1197 function menu.update_gametype(reset)
1198         if reset then
1199                 mm_texture.reset()
1200                 engine.set_topleft_text("")
1201                 filterlist.set_filtercriteria(worldlist,nil)
1202         else
1203                 local game = menu.lastgame()
1204                 mm_texture.update(tabbuilder.current_tab,game)
1205                 engine.set_topleft_text(game.name)
1206                 filterlist.set_filtercriteria(worldlist,game.id)
1207         end
1208 end
1209
1210 --------------------------------------------------------------------------------
1211 --------------------------------------------------------------------------------
1212 -- menu startup
1213 --------------------------------------------------------------------------------
1214 --------------------------------------------------------------------------------
1215 init_globals()
1216 mm_texture.init()
1217 menu.init()
1218 tabbuilder.init()
1219 menubar.refresh()
1220 modstore.init()
1221
1222 engine.sound_play("main_menu", true)
1223
1224 update_menu()