From 0a1d941e655b4db4055fe9a7142feb5ca27558fc Mon Sep 17 00:00:00 2001
From: Igor Timofeev <eliteclubsessions@gmail.com>
Date: Tue, 4 Aug 2015 22:51:55 +0300
Subject: [PATCH] Create Geoscan.lua

---
 Applications/Geoscan.lua | 159 +++++++++++++++++++++++++++++++++++++++
 1 file changed, 159 insertions(+)
 create mode 100644 Applications/Geoscan.lua

diff --git a/Applications/Geoscan.lua b/Applications/Geoscan.lua
new file mode 100644
index 00000000..97927023
--- /dev/null
+++ b/Applications/Geoscan.lua
@@ -0,0 +1,159 @@
+local c = require("component")
+local event = require("event")
+local geo = c.geolyzer
+local holo = c.hologram
+local gpu = c.gpu
+local ecs = require("ECSAPI")
+
+local args = {...}
+
+
+if not c.isAvailable("geolyzer") or not c.isAvailable("hologram") then
+  error("Подключите геоанализатор и голографический проектор 2-ого уровня")
+end
+-------------------------
+
+local xScanFrom, xScanTo = -24, 23
+local zScanFrom, zScanTo = xScanFrom, xScanTo
+
+local massiv = {}
+
+local yModifyer = -20
+local scales = {0.33, 0.75, 1, 1.5, 2, 2.5, 3}
+local currentScale = 1
+local countOfScales = #scales
+
+local command = args[1] or "scan"
+local argument1 = args[2] or -24
+local argument2 = args[3] or 23
+
+local xSize, ySize = gpu.getResolution()
+local yCenter = math.floor(ySize / 2)
+
+---------------------------------------
+
+local function clear()
+  holo.clear()
+end
+
+local function changeScale()
+  if currentScale < countOfScales then
+    currentScale = currentScale + 1
+  else
+    currentScale = 1
+  end
+
+  holo.setScale(scales[currentScale])
+end
+
+local function displayRow(x, yModifyer, z,  tablica)
+  local color = 1
+  for i = 1, #tablica do
+    if tablica[i] > 0.5 then
+      
+      color = 1
+
+      if tablica[i] < 2 then
+        color = 2
+      elseif tablica[i] >= 2 and tablica[i] < 3 then
+        color = 1
+      elseif tablica[i] >= 3 and tablica[i] then
+        color = 3
+      end
+
+      if tablica[i + yModifyer] then
+        holo.set(xScanTo - x + 1, i + yModifyer, zScanTo - z + 1, color)
+      end
+    end
+  end
+end
+
+local function displayAllRows()
+  clear()
+  for x, val in pairs(massiv) do
+    for z, val2 in pairs(massiv[x]) do
+      displayRow(x, yModifyer, z, val2)
+    end
+  end
+end
+
+local function scan()
+  clear()
+  ecs.clearScreen(0xffffff)
+  local barWidth = math.floor(xSize / 3 * 2)
+  local percent = 0
+  local xBar, yBar = math.floor(xSize/2 - barWidth / 2), yCenter
+  local countOfAll = (math.abs(xScanFrom) + math.abs(xScanTo) + 1) ^ 2
+
+  local counter = 0
+  for x = xScanFrom, xScanTo do
+    massiv[x] = {}
+    for z = zScanFrom, zScanTo do
+
+      massiv[x][z] = geo.scan(x, z, true)
+      for i = 1, #massiv[x][z] do
+        displayRow(x, yModifyer, z, massiv[x][z])
+      end
+      percent = counter / countOfAll * 100
+      ecs.progressBar(xBar, yBar, barWidth, 1, 0xcccccc, ecs.colors.blue, percent)
+      gpu.setForeground(0x444444)
+      gpu.setBackground(0xffffff)
+      ecs.centerText("x", yBar + 1, "   Сканирование стека на x = "..x..", z = "..z.."   ")
+      counter = counter + 1
+
+    end
+  end
+end
+
+local obj = {}
+local function newObj(class, name, ...)
+  obj[class] = obj[class] or {}
+  obj[class][name] = {...}
+end
+
+local function main()
+  ecs.clearScreen(0xffffff)
+  local yPos = yCenter - 10
+  newObj("buttons", "Сканировать местность", ecs.drawAdaptiveButton("auto", yPos, 3, 1, "Сканировать местность", 0x444444, 0xffffff)); yPos = yPos + 4
+  newObj("buttons", "Перерисовать голограмму", ecs.drawAdaptiveButton("auto", yPos, 3, 1, "Перерисовать голограмму", 0x444444, 0xffffff)); yPos = yPos + 4
+  newObj("buttons", "Масштаб", ecs.drawAdaptiveButton("auto", yPos, 3, 1, "Масштаб", 0x444444, 0xffffff)); yPos = yPos + 4
+  newObj("buttons", "+ 10 блоков", ecs.drawAdaptiveButton("auto", yPos, 3, 1, "+ 10 блоков", 0x444444, 0xffffff)); yPos = yPos + 4
+  newObj("buttons", "- 10 блоков", ecs.drawAdaptiveButton("auto", yPos, 3, 1, "- 10 блоков", 0x444444, 0xffffff)); yPos = yPos + 4
+  newObj("buttons", "Выйти", ecs.drawAdaptiveButton("auto", yPos, 3, 1, "Выйти", 0x666666, 0xffffff)); yPos = yPos + 4
+  gpu.setBackground(0xffffff)
+  gpu.setForeground(0x444444)
+  ecs.centerText("x", yPos, "Модификатор высоты: "..yModifyer)
+end
+
+----------------------------
+
+changeScale()
+main()
+
+while true do
+  local e = {event.pull()}
+  if e[1] == "touch" then
+    for key, val in pairs(obj["buttons"]) do
+      if ecs.clickedAtArea(e[3], e[4], obj["buttons"][key][1], obj["buttons"][key][2], obj["buttons"][key][3], obj["buttons"][key][4]) then
+        ecs.drawAdaptiveButton(obj["buttons"][key][1], obj["buttons"][key][2], 3, 1, key, ecs.colors.green, 0xffffff)
+        os.sleep(0.3)
+        if key == "Сканировать местность" then
+          scan()
+        elseif key == "Масштаб" then
+          changeScale()
+        elseif key == "Перерисовать голограмму" then
+          displayAllRows()
+        elseif key == "+ 10 блоков" then
+          yModifyer = yModifyer + 10
+        elseif key == "- 10 блоков" then
+          yModifyer = yModifyer - 10
+        elseif key == "Выйти" then
+          ecs.prepareToExit()
+          return 0
+        end
+        main()
+        break
+      end
+    end
+  end
+end