Properly implement invalidate_all_paths, recheck lzb on aspect change - advtrains.git

diff options

author	orwell96 <orwell@bleipb.de>	2018-10-10 22:41:59 +0200
committer	orwell96 <orwell@bleipb.de>	2018-10-10 22:41:59 +0200
commit	842a85606e4495dd631c2916d09a760d74a0ce13 (patch)
tree	f28bb815ecd01681f98166578c659aef48082b2a /advtrains/models
parent	33c839b40d48e154f5b03619a9bdce1bed1fc602 (diff)
download	advtrains-842a85606e4495dd631c2916d09a760d74a0ce13.tar.gz advtrains-842a85606e4495dd631c2916d09a760d74a0ce13.tar.bz2 advtrains-842a85606e4495dd631c2916d09a760d74a0ce13.zip

Properly implement invalidate_all_paths, recheck lzb on aspect change

Diffstat (limited to 'advtrains/models')

0 files changed, 0 insertions, 0 deletions

local def local F = minetest.formspec_escape local ifthenelse = ch_core.ifthenelse local function load_stations() local result = {} local by_stn = {} local all_lines_set = {["*"] = true} local lines_set = {} for stn, data in pairs(advtrains.lines.stations) do local new_station = { stn = stn, name = data.name or "", owner = data.owner or "", tracks = {}, } by_stn[stn] = new_station lines_set[stn] = {} table.insert(result, new_station) end for epos, data in pairs(advtrains.lines.stops) do if data.stn ~= nil and data.stn ~= "" and by_stn[data.stn] ~= nil then local st = by_stn[data.stn] local new_track = { epos = epos, pos = assert(advtrains.decode_pos(epos)), track = data.track or "", } table.insert(st.tracks, new_track) local ars = data.ars if ars ~= nil then if ars.default then lines_set[data.stn] = all_lines_set else local set = lines_set[data.stn] for _, rule in ipairs(ars) do if not rule.n and rule.ln ~= nil then set[rule.ln] = true end end end end end end for _, st in ipairs(result) do local set = lines_set[st.stn] if set["*"] then st.lines = {"*"} else local lines = {} for line, _ in pairs(set) do table.insert(lines, line) end table.sort(lines) st.lines = lines end end table.sort(result, function(a, b) return a.stn < b.stn end) return result end advtrains.lines.load_stations_for_formspec = load_stations local function station_distance(player_pos, st) if st.tracks[1] == nil then return -- no tracks end local distance = vector.distance(player_pos, st.tracks[1].pos) for i = 2, #st.tracks do local d2 = vector.distance(player_pos, st.tracks[i].pos) if d2 < distance then distance = d2 end end return distance end local function station_distance_s(player_pos, st) local result = station_distance(player_pos, st) if result ~= nil then return string.format("%d m", result) else return "" end end local function filter_all() return true end local function sort_by_distance(a, b, player_info) return (station_distance(player_info.pos, a) or 1.0e+20) < (station_distance(player_info.pos, b) or 1.0e+20) end local function sort_by_stn(a, b) return tostring(a.stn) < tostring(b.stn) end local function sort_by_name(a, b) local a_key, b_key = ch_core.utf8_radici_klic(a.name, false), ch_core.utf8_radici_klic(b.name, false) if a_key ~= b_key then return a_key < b_key else return sort_by_stn(a, b) end end local filters = { { description = "od nejbližší", -- filter = filter_all, sorter = sort_by_distance, }, { description = "podle kódu A-Z", -- filter = filter_all, sorter = sort_by_stn, }, { description = "podle názvu A-Z", -- filter = filter_all, sorter = sort_by_name, }, } local function get_formspec(custom_state) local pinfo = ch_core.normalize_player(assert(custom_state.player_name)) if pinfo.player == nil then minetest.log("error", "Expected player not in game!") return "" end local player_info = { name = assert(custom_state.player_name), pos = assert(custom_state.player_pos), } local stations = custom_state.stations if stations == nil then -- local filter_func = filters[custom_state.active_filter].filter or filter_all local sorter_func = filters[custom_state.active_filter].sorter stations = {} for _, st in ipairs(load_stations()) do -- if filter_func(st, player_info) then table.insert(stations, st) -- end end table.sort(stations, function(a, b) return sorter_func(a, b, player_info) end) custom_state.stations = stations if custom_state.selection_index ~= nil and custom_state.selection_index > #stations + 1 then custom_state.selection_index = nil end end local selection_index = custom_state.selection_index local formspec = { ch_core.formspec_header({formspec_version = 6, size = {20, 10}, auto_background = true}), "label[0.5,0.6;Editor dopraven]", } table.insert(formspec, "tablecolumns[image,".. "0=ch_core_empty.png,".. "1=basic_materials_padlock.png\\^[resize:16x16".. ";text;text,width=25;color,span=1;text,width=7;text;text]".. "table[0.5,1.25;19,5;dopravna;0,KÓD,NÁZEV,#ffffff,SPRAVUJE,VZDÁLENOST,INFO") for _, st in ipairs(stations) do local n_tracks = #st.tracks table.insert(formspec, ",0,"..F(st.stn)..","..F(st.name)..",#ffffff,"..F(ch_core.prihlasovaci_na_zobrazovaci(st.owner))..",".. F(station_distance_s(custom_state.player_pos, st))..","..n_tracks.." kolej") if n_tracks < 1 or n_tracks > 4 then table.insert(formspec, "í") elseif n_tracks ~= 1 then table.insert(formspec, "e") end if n_tracks > 0 then table.insert(formspec, "\\, linky " ..F(table.concat(st.lines, ","))) end end table.insert(formspec, ";"..(selection_index or "").."]") -- rozbalovací pole s volbou filtru a řazení table.insert(formspec, "dropdown[8,0.3;7,0.6;filter;"..F(assert(filters[1].description))) for i = 2, #filters do table.insert(formspec, ","..F(filters[i].description)) end table.insert(formspec, ";"..custom_state.active_filter..";true]") table.insert(formspec, "button_exit[18.75,0.3;0.75,0.75;close;X]") local st = selection_index ~= nil and stations[selection_index - 1] local stn, nazev, spravuje if st then stn = F(st.stn) nazev = F(st.name) spravuje = F(ch_core.prihlasovaci_na_zobrazovaci(st.owner)) else stn, nazev, spravuje = "", "", F(pinfo.viewname) end table.insert(formspec, "field[0.5,7;2.5,0.75;stn;kód:;"..stn.."]".. "field[3.25,7;7,0.75;name;název:;"..nazev.."]".. ifthenelse(pinfo.role == "admin", "field[10.5,7;4,0.75;owner;spravuje:;", "label[10.5,6.75;spravuje:\n").. spravuje.."]")


context:
space:
mode: