local cmp = require("component")
local term = require("term")
local gpu = cmp.gpu
local modem = cmp.modem
local chat = cmp.chat_box
local event = require("event")
local white_list ={}
local exit = true
local args = {}
local default_resolution_X = 160
local default_resolution_Y = 50
local antimute = false

------Функция нарезки
local function split(str)
  local data = {}
  for substring in str:gmatch("%S+") do
   table.insert(data, substring)
  end
  return data
end
local function set_default_settings()
  term.clear()
  gpu.setResolution(default_resolution_X, default_resolution_Y)
end

local function msg(_,_,name,msg)
    args = split(msg)
    if #white_list == 0 then
        chat.say("Вайт лист не настроен. Обратитесь к сис. Администратору.")
    else
        for i=1, #white_list do
            if name == white_list[i] then

                if args[1] == "$$ff_core" then
                  if args[2] == "exit" then
                    chat.say("§4Система управления остановленна!")
                    exit = false
                  elseif args[2] == "power_sito" then
                    if (args[3] == "on") then
                      modem.broadcast(111, "on_sito")
					  chat.say("§aПитание на систему авто-сит включено!")
                    elseif(args[3] == "off") then
                      modem.broadcast(111, "off_sito")
					  chat.say("§4Питание на систему авто-сит отключено!")
                    else
                     chat.say("§cНеверный аргумент используйте <on/off>")
                    end

				  elseif args[2] == "power_matter" then
                    if (args[3] == "on") then
                      modem.broadcast(111, "on_matter")
					  chat.say("§aПитание на систему генерации материи включено!")
                    elseif(args[3] == "off") then
                      modem.broadcast(111, "off_matter")
					  chat.say("§Питание на систему генерации материи отключено!")
                    else
                     chat.say("§cНеверный аргумент используйте <on/off>")
                    end
                  elseif args[2] == "time" then

                    chat.say("§eЗапущено приложение §b[Часы]")
                    set_default_settings()
                    os.execute("ff_core_time")
				  elseif args[2] == "radar" then

                    chat.say("§eЗапущено приложение §b[Радар]")
                    set_default_settings()
                    os.execute("ff_core_radar")
                  else

                      chat.say("§a======= §4FF-Core 1.0 §a=======")
                      chat.say("§bexit §6- остановка и выход из системы")
                      chat.say("§btime §6- запустить программу <Время>")
					  chat.say("§bradar §6- запустить программу <Радар> (покажет игроков на острове)")
					  chat.say("§bpower_sito §6- используйте <on/off> для управления питанием авто-сит")
					  chat.say("§bpower_matter §6- используйте <on/off> для управления питанием ген. материи")

                  end

                end
            end
        end
    end
end

function StartSystem()
 chat.setName("§6FF-Core§7")
 white_list[#white_list+1] = "4epB9Ik"
 white_list[#white_list+1] = "M9lcko"
 event.listen("chat_message", msg)
 modem.open(111)
 while exit do
   os.sleep(1)
 end
 event.ignore("chat_message",msg)
end

StartSystem()