digicompute_redo/api.lua

-- digicompute/api.lua

-- SYSTEM FUNCTIONS
-- turn on
function digicompute.on(pos, node)
  local temp = minetest.get_node(pos) -- get node
  minetest.swap_node({x = pos.x, y = pos.y, z = pos.z}, {name = "digicompute:"..node.."_bios", param2 = temp.param2}) -- set node to bios
  minetest.after(3.5, function(pos_)
    minetest.swap_node({x = pos_.x, y = pos_.y, z = pos_.z}, {name = "digicompute:"..node.."_on", param2 = temp.param2}) -- set node to on after 5 seconds
  end, vector.new(pos))
  local meta = minetest.get_meta(pos) -- get meta
  meta:set_string("formspec", digicompute.formspec_normal("", ""))
end
-- turn off
function digicompute.off(pos, node)
  local temp = minetest.get_node(pos) -- get node
  local meta = minetest.get_meta(pos) -- get meta
  meta:set_string("formspec", "") -- clear formspec
  minetest.swap_node({x = pos.x, y = pos.y, z = pos.z}, {name = "digicompute:"..node, param2 = temp.param2}) -- set node to off
end
-- reboot
function digicompute.reboot(pos, node)
  digicompute.off(pos, node)
  digicompute.on(pos, node)
end
-- clear
function digicompute.clear(field, pos)
  local meta = minetest.get_meta(pos) -- get meta
  meta:set_string(field, "") -- clear value
end
-- /SYSTEM FUNCTIONS

function digicompute.register_terminal(termstring, desc)
  -- check os
  if not desc.os then
    desc.os = "bios"
  end
  digicompute.os.load(desc.os) -- load os
  -- off
  minetest.register_node("digicompute:"..termstring, {
    description = desc.description,
    tiles = desc.off_tiles,
    paramtype2 = "facedir",
    groups = {cracky = 2},
    sounds = default.node_sound_stone_defaults(),
    digiline = {
      receptor = {},
      effector = {
        action = function(pos, node, channel, msg)
          if digicompute.os.digiline ~= false then
            local meta = minetest.get_meta(pos) -- get meta
            -- if channel is correct, turn on
            if channel == meta:get_string("channel") then
              if msg.system == digicompute.os.digiline_on then
                digicompute.on(pos, termstring)
              end
            end
          end
        end
      },
    },
    on_rightclick = function(pos)
      digicompute.on(pos, termstring)
    end,
  })
  -- bios
  minetest.register_node("digicompute:"..termstring.."_bios", {
    description = desc.description,
    tiles = desc.bios_tiles,
    paramtype2 = "facedir",
  	groups = {cracky = 2},
  	sounds = default.node_sound_stone_defaults(),
  })
  -- on
  minetest.register_node("digicompute:"..termstring.."_on", {
    description = desc.description,
    tiles = desc.on_tiles,
    paramtype2 = "facedir",
  	groups = {cracky = 2},
  	sounds = default.node_sound_stone_defaults(),
    digiline = {
      receptor = {},
      effector = {
        action = function(pos, node, channel, msg)
          if digicompute.os.digiline ~= false then
            local meta = minetest.get_meta(pos) -- get meta
            if channel ~= meta:get_string("channel") then return end -- ignore if not proper channel
            if msg.system then
              if msg.system == digicompute.os.clear then digicompute.clear("output", pos) -- clear output
              elseif msg.system == digicompute.os.off then digicompute.off(pos, termstring) -- turn off
              elseif msg.system == digicompute.os.reboot then digicompute.reboot(pos, termstring) -- reboot
              else digicompute.os.proc_digiline({x = pos.x, y = pos.y, z = pos.z}, fields.input) end -- else, hand over to OS
            end
          end
        end
      },
    },
    on_construct = function(pos) -- set meta and formspec
      local meta = minetest.get_meta(pos) -- get meta
      meta:set_string("output", "") -- output buffer
      meta:set_string("input", "") -- input buffer
      local name = meta:get_string("name") -- get computer name
      if not name then name = "" end -- if name nil, set to blank
      meta:set_string("formspec", digicompute.formspec_name(name)) -- computer name formspec
    end,
    on_receive_fields = function(pos, formname, fields, sender) -- precess formdata
      local meta = minetest.get_meta(pos) -- get meta
      -- if name received, set
      if fields.name then
        meta:set_string("name", fields.name) -- set name
        meta:set_string("formspec", digicompute.formspec_normal(meta:get_string("input"), meta:get_string("output"))) -- refresh formspec
        return
      end
      -- if submit, check for keywords and process according to os
      if fields.submit then
        if fields.input == digicompute.os.clear then digicompute.clear("output", pos) -- clear output
        elseif fields.input == digicompute.os.off then digicompute.off(pos, termstring) return -- turn off
        elseif fields.input == digicompute.os.reboot then digicompute.reboot(pos, termstring) return -- reboot
        else digicompute.os.proc_input({x = pos.x, y = pos.y, z = pos.z}, fields.input) end -- else, hand over to OS
        digicompute.clear("input", pos) -- clear input field
      else meta:set_string("input", fields.input) end -- else, keep input
      -- refresh formspec
      meta:set_string("formspec", digicompute.formspec_normal(meta:get_string("input"), meta:get_string("output")))
    end,
  })
end