View difference between Paste ID: HGik5w8F and dF4yty87

 if warpdriveCommons then os.unloadAPI("warpdriveCommons") end
 if not os.loadAPI("warpdrive/warpdriveCommons") then error("missing warpdriveCommons") end
 local w = warpdriveCommons.w
 
 local data
 ----------- Force field support
 
 local ffield_projectorAddresses = {}
 local ffield_projectors = {}
 local ffield_projector_indexSelected = 1
 local ffield_projector_indexFirstLine = 1
 local ffield_projector_lines = 10
 
 function ffield_boot(isDetailed)
   if #ffield_projectorAddresses == 0 and #ffield_relayAddresses == 0 then
     return
   end
 
   if isDetailed == nil then
     isDetailed = true
   end
 
   if isDetailed then
     w.write("Booting Cores")
 
     w.writeLn("...")
     w.sleep(0.1)
   end
 
   -- getting projectors parameters
   ffield_projectors = {}
   for key, address in pairs(ffield_projectorAddresses) do
     local device = w.device_get(address)
      name = device.name()
     fn = ""
     file = name:gsub(" ","")
     stt = "disk/"..file
     f = fs.open(stt,"r");
     fn = f.readAll();
    x, y, z = fn
     f.close();
     local name1 = device.name()
-   -- local pos = device.getLocalPosition()
+
       address = address,
       device = device,
       position = fn,
       name = name1,
-      position = fn,--{ x = x, y = y, z = z },
+
       isEnabled = isEnabled }
     if isDetailed then
       w.writeLn(ffield_projector_getDescription(projector))
     end
 
     table.insert(ffield_projectors, projector)
   end
 
 end
 
 
 function ffield_read(parData)
   data = parData
-function ffield_save()
+
-  -- nothing
+
 function ffield_projector_getDescription(projector)
   if projector == nil or projector.device == nil then
     return "~invalid~"
   end
   local description = "#" .. w.format_string(projector.name, 20)
           .. " @ " .. w.format_string(projector.position, 30)
   return description
 end
 
 function ffield_projector_getIndexes()
- -- local device = w.device_get(address)
+
---local name = device.name()
+
- --       fn = ""
+
-   -- file = name:gsub(" ","")
+
-    --stt = "disk/"..file
+
-    --f = fs.open(stt,"r");
+
-   -- fn = f.readAll();
+
-   --x, y, z = fn
+
-    --f.close();
+
       ffield_projector_indexFirstLine = ffield_projector_indexSelected - ffield_projector_lines
     end
-          --.. " Y " .. w.format_integer(y1, 3) .. " Z " .. w.format_integer(z1, 7) .. ") "
+
   else
     return 1, 1
   end
 end
 
 function ffield_projector_get(index)
   local indexToUse = index
   local projector
 
   if ffield_projectors ~= nil then
     if indexToUse > #ffield_projectors then
       indexToUse = 1
     elseif indexToUse < 1 then
       indexToUse = #ffield_projectors
     end
     projector = ffield_projectors[indexToUse]
   end
 
   if projector == nil then
     ffield_boot(false)
     w.status_showWarning("Invalid projector index " .. index)
     projector = {
       address = "-",
       device = nil,
       position = { x = 0, y = 0, z = 0 },
       name = "-",
       beamFrequency = -1,
       shape = "NONE",
       isEnabled = false }
   end
   return projector
 end
 
 function ffield_projector_getSelected()
   return ffield_projector_get(ffield_projector_indexSelected)
 end
 
 function ffield_enable(projectorOrRelay, enable)
   if projectorOrRelay == nil or projectorOrRelay.device == nil then
     return
   end
   local enableToApply = enable
   if enableToApply == nil then
     enableToApply = not projectorOrRelay.device.enable()
   end
   projectorOrRelay.isEnabled = projectorOrRelay.device.enable(enableToApply)
   return projectorOrRelay.isEnabled
 end
 
 function ffield_projector_key(character, keycode)
   if keycode == 200 or keycode == 203 or character == '-' then -- Up or Left or -
     ffield_projector_indexSelected = ffield_projector_indexSelected - 1
     return true
   elseif keycode == 208 or keycode == 205 or character == '+' then -- Down or Right or +
     ffield_projector_indexSelected = ffield_projector_indexSelected + 1
     return true
   end
   return false
 end
 
 function ffield_projector_page()
   w.page_begin(w.data_getName() .. " - Monitored Cores")
 
   -- w.setCursorPos(1, 2)
   if #ffield_projectors == 0 then
     w.setColorDisabled()
     w.writeCentered(2, "No force field projector defined, connect one and reboot!")
-  if character == 's' or character == 'S' then
+
-    for key, projector in pairs(ffield_projectors) do
+
-      ffield_enable(projector, true)
+
     w.writeCentered(2, "Monitored Core " .. indexSelected .. " of " .. #ffield_projectors .. " is selected")
     local indexLastLine = math.min(indexFirstLine + ffield_projector_lines, #ffield_projectors)
-  elseif character == 'p' or character == 'P' then
+
-    for key, projector in pairs(ffield_projectors) do
+
-      ffield_enable(projector, false)
+
         w.clearLine()
         w.write(">")
-  elseif character == 'e' or character == 'E' then
+
-    local projector = ffield_projector_getSelected()
+
-    if projector ~= nil and projector.device ~= nil then
+
-      ffield_enable(projector)
+
       local projector = ffield_projector_get(indexCurrent)
       local description = ffield_projector_getDescription(projector)
-  elseif character == 'c' or character == 'C' then -- C or keycode == 46
+
-    ffield_projector_config()
+
-    w.data_save()
+
   end
-  elseif keycode == 200 or keycode == 203 or character == '-' then -- Up or Left or -
+
   w.setCursorPos(1, 16)
   w.setColorNormal()
   w.write("  -----------------------------------------------")
 
   w.setCursorPos(1, 17)
   w.setColorControl()
 end
 
 function ffield_register()
   w.device_register("warpdriveShipController",
       function(deviceType, address, wrap) table.insert(ffield_projectorAddresses, address) end,
       function() end)
 end
 
 ----------- connections status
 
 function connections_page(isBooting)
   w.page_begin(w.data_getName() .. " - Connections")
 
   w.writeLn("")
 
   local monitors = w.device_getMonitors()
   if #monitors == 0 then
     w.setColorDisabled()
     w.writeLn("No Monitor detected")
   elseif #monitors == 1 then
     w.setColorSuccess()
     w.writeLn("1 monitor detected")
   else
     w.setColorSuccess()
     w.writeLn(#monitors .. " Monitors detected")
   end
 
   if #ffield_projectorAddresses == 0 then
     w.setColorDisabled()
     w.writeLn("No Ship Controllers Detected.")
   elseif #ffield_projectorAddresses == 1 then
     w.setColorSuccess()
     w.writeLn("1 Ship Controller Detected.")
   else
     w.setColorSuccess()
     w.writeLn(#ffield_projectorAddresses .. " Ship Controllers Detected.")
   end
 
   if isBooting then
     ffield_boot()
   end
 
   w.writeLn("")
   w.setColorNormal()
   w.writeLn("This is a keyboard controlled user interface.")
   w.write("Key controls are written like so: ")
   w.setColorControl()
   w.write("Action (key)")
   w.setColorNormal()
   w.writeLn(".")
   w.write("For example, typing ")
   w.setColorControl()
   w.write(" 1 ")
   w.setColorNormal()
   w.writeLn(" will open Cores.")
 end
 
 ----------- Boot sequence
 
 w.page_setEndText(" Home (0), Cores (1)")
 w.page_register('0', connections_page, nil)
 w.page_register('1', ffield_projector_page, ffield_projector_key)
 ffield_register()
 
 w.boot()
 w.run()
 w.close()