177 lines
6.3 KiB
Lua
177 lines
6.3 KiB
Lua
celevator.dbdkiosk = {}
|
|
|
|
function celevator.dbdkiosk.checkprot(pos,name)
|
|
if minetest.is_protected(pos,name) and not minetest.check_player_privs(name,{protection_bypass=true}) then
|
|
minetest.chat_send_player(name,"Can't open cabinet - cabinet is locked.")
|
|
minetest.record_protection_violation(pos,name)
|
|
return false
|
|
end
|
|
return true
|
|
end
|
|
|
|
function celevator.dbdkiosk.updatefields(pos)
|
|
if minetest.get_node(pos).name ~= "celevator:dbdkiosk" then return end
|
|
local meta = minetest.get_meta(pos)
|
|
local screenstate = meta:get_string("screenstate")
|
|
if screenstate == "connect" then
|
|
meta:set_string("formspec","formspec_version[7]"..
|
|
"size[8,5]"..
|
|
"field[0.5,0.5;7,1;carid;Dispatcher ID;]"..
|
|
"field[0.5,2;7,1;landing;Landing Number;]"..
|
|
"button[3,3.5;2,1;save;Save]"
|
|
)
|
|
elseif screenstate == "main" then
|
|
local landing = meta:get_int("landing")
|
|
local fs = "formspec_version[7]"
|
|
fs = fs.."size[8,14]"
|
|
fs = fs.."label[3,0.5;Please select a floor\\:]"
|
|
local floornames = minetest.deserialize(meta:get_string("floornames"))
|
|
local floorsavailable = minetest.deserialize(meta:get_string("floorsavailable"))
|
|
local showfloors = {}
|
|
for i=1,#floornames,1 do
|
|
if floorsavailable[i] then
|
|
table.insert(showfloors,i)
|
|
end
|
|
end
|
|
local startfloor = (meta:get_int("screenpage")-1)*10+1
|
|
for i=1,10,1 do
|
|
local floornum = showfloors[startfloor+i-1]
|
|
local floorname = floornum and floornames[floornum]
|
|
if floorname and floornum ~= landing then
|
|
fs = fs..string.format("button[2,%f;4,1;floor%d;%s]",12-i,floornum,minetest.formspec_escape(floorname))
|
|
end
|
|
end
|
|
if startfloor > 1 then
|
|
fs = fs.."button[3.75,12.2;0.8,0.8;scrolldown;vvv]"
|
|
end
|
|
if startfloor+9 < #showfloors then
|
|
fs = fs.."button[3.75,1;0.8,0.8;scrollup;^^^]"
|
|
end
|
|
meta:set_string("formspec",fs)
|
|
elseif screenstate == "assignment" then
|
|
local fs = "formspec_version[7]"
|
|
fs = fs.."size[8,14]"
|
|
fs = fs.."label[3,3;Please use elevator]"
|
|
fs = fs.."style_type[label;font_size=*4]"
|
|
fs = fs.."label[3.5,5;"..meta:get_string("assignedcar").."]"
|
|
meta:set_string("formspec",fs)
|
|
elseif screenstate == "error" then
|
|
local fs = "formspec_version[7]"
|
|
fs = fs.."size[8,14]"
|
|
fs = fs.."label[3.5,0.5;ERROR]"
|
|
fs = fs.."label[2.5,3;Could not find a suitable elevator]"
|
|
fs = fs.."label[2.5,3.5;Please try again later]"
|
|
meta:set_string("formspec",fs)
|
|
end
|
|
end
|
|
|
|
function celevator.dbdkiosk.handlefields(pos,_,fields,player)
|
|
local name = player:get_player_name()
|
|
local meta = minetest.get_meta(pos)
|
|
local screenstate = meta:get_string("screenstate")
|
|
if screenstate == "connect" then
|
|
if not (fields.save and celevator.dbdkiosk.checkprot(pos,name)) then return end
|
|
if not (tonumber(fields.carid) and tonumber(fields.landing)) then return end
|
|
local carinfo = minetest.deserialize(celevator.storage:get_string(string.format("car%d",fields.carid)))
|
|
if not carinfo then return end
|
|
if not (carinfo.dispatcherpos and celevator.dispatcher.isdispatcher(carinfo.dispatcherpos)) then return end
|
|
local dmem = minetest.deserialize(minetest.get_meta(carinfo.dispatcherpos):get_string("mem"))
|
|
if not dmem then return end
|
|
local floornames = dmem.params.floornames
|
|
local floorsavailable = {}
|
|
for i=1,#floornames,1 do
|
|
floorsavailable[i] = true
|
|
end
|
|
meta:set_string("floornames",minetest.serialize(floornames))
|
|
meta:set_string("floorsavailable",minetest.serialize(floorsavailable))
|
|
meta:set_int("screenpage",1)
|
|
meta:set_string("screenstate","main")
|
|
meta:set_int("carid",tonumber(fields.carid))
|
|
meta:set_int("landing",tonumber(fields.landing))
|
|
celevator.dbdkiosk.updatefields(pos)
|
|
elseif screenstate == "main" then
|
|
for k,v in pairs(fields) do
|
|
if v and string.sub(k,1,5) == "floor" then
|
|
local floor = tonumber(string.sub(k,6,-1))
|
|
if not floor then return end
|
|
local carid = meta:get_int("carid")
|
|
local carinfo = minetest.deserialize(celevator.storage:get_string(string.format("car%d",carid)))
|
|
if not carinfo then return end
|
|
if not (carinfo.dispatcherpos and celevator.dispatcher.isdispatcher(carinfo.dispatcherpos)) then return end
|
|
local dmem = minetest.deserialize(minetest.get_meta(carinfo.dispatcherpos):get_string("mem"))
|
|
if dmem then
|
|
local floornames = dmem.params.floornames
|
|
meta:set_string("floornames",minetest.serialize(floornames))
|
|
end
|
|
local event = {
|
|
type = "dbdkiosk",
|
|
source = minetest.hash_node_position(pos),
|
|
player = name,
|
|
srcfloor = meta:get_int("landing"),
|
|
destfloor = floor,
|
|
}
|
|
celevator.dispatcher.run(carinfo.dispatcherpos,event)
|
|
end
|
|
end
|
|
if fields.scrollup then
|
|
local page = meta:get_int("screenpage")
|
|
meta:set_int("screenpage",page+1)
|
|
elseif fields.scrolldown then
|
|
local page = meta:get_int("screenpage")
|
|
meta:set_int("screenpage",math.max(1,page-1))
|
|
end
|
|
celevator.dbdkiosk.updatefields(pos)
|
|
elseif screenstate == "assignment" or screenstate == "error" then
|
|
meta:set_string("screenstate","main")
|
|
celevator.dbdkiosk.updatefields(pos)
|
|
end
|
|
end
|
|
|
|
function celevator.dbdkiosk.showassignment(pos,assignment)
|
|
local meta = minetest.get_meta(pos)
|
|
if meta:get_string("screenstate") == "main" then
|
|
local carnames = {"A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P"}
|
|
if carnames[assignment] then
|
|
meta:set_string("screenstate","assignment")
|
|
meta:set_string("assignedcar",carnames[assignment])
|
|
else
|
|
meta:set_string("screenstate","error")
|
|
end
|
|
celevator.dbdkiosk.updatefields(pos)
|
|
minetest.after(5,function()
|
|
meta:set_string("screenstate","main")
|
|
celevator.dbdkiosk.updatefields(pos)
|
|
end)
|
|
end
|
|
end
|
|
|
|
minetest.register_node("celevator:dbdkiosk",{
|
|
description = "Elevator Destination Entry Kiosk",
|
|
drawtype = "nodebox",
|
|
paramtype = "light",
|
|
paramtype2 = "4dir",
|
|
groups = {
|
|
cracky = 1,
|
|
},
|
|
node_box = {
|
|
type = "fixed",
|
|
fixed = {
|
|
{-0.2,-0.5,0.4,0.2,0.1,0.5},
|
|
},
|
|
},
|
|
tiles = {
|
|
"celevator_cabinet_sides.png",
|
|
"celevator_cabinet_sides.png",
|
|
"celevator_cabinet_sides.png",
|
|
"celevator_cabinet_sides.png",
|
|
"celevator_cabinet_sides.png",
|
|
"celevator_cabinet_sides.png^celevator_dbdkiosk.png",
|
|
},
|
|
on_construct = function(pos)
|
|
local meta = minetest.get_meta(pos)
|
|
meta:set_string("screenstate","connect")
|
|
celevator.dbdkiosk.updatefields(pos)
|
|
end,
|
|
on_receive_fields = celevator.dbdkiosk.handlefields,
|
|
})
|