View difference between Paste ID: K4KTrddc and 1qXEFJvu

 --[[
 
 Создано командой SOCC company
 Nightmare_Night
 
 P.S. Программа написана на скорую руку
 Просьба тапками не кидаться
 
 P.S.S. Функция получения времени хост-машины была взята из API ECS
 
 ]]--
 
 local component = require("component")
 local term = require("term")
 local event = require("event")
 local fs = require("filesystem")
 
 local gpu = component.gpu
 
 local LOG_PATH = "chat_log.txt"
 
 -- Конвертирует строку в массив
 function stringToArray(text)
     t = {}
     text:gsub(".",function(c) table.insert(t,c) end)
     return t
 end
 
 --Получить текущее реальное время компьютера, хостящего сервер майна
 function getHostTime(timezone)
     timezone = timezone or 2
     local file = io.open("/HostTime.tmp", "w")
     file:write("")
     file:close()
     local timeCorrection = timezone * 3600
     local lastModified = tonumber(string.sub(fs.lastModified("/HostTime.tmp"), 1, -4)) + timeCorrection
     fs.remove("/HostTime.tmp")
     local year, month, day, hour, minute, second = os.date("%Y", lastModified), os.date("%m", lastModified), os.date("%d", lastModified), os.date("%H", lastModified), os.date("%M", lastModified), os.date("%S", lastModified)
     return tonumber(day), tonumber(month), tonumber(year), tonumber(hour), tonumber(minute), tonumber(second)
 end
 
 -- Получет настоящее время, стоящее на Хост-машине
 function real_time()
     local time = {getHostTime(3)}
     local text = string.format("%02d:%02d:%02d", time[4], time[5], time[6])
     return text
 end
 
 -- Проверяет является ли текст окрашенным
 function isColored(text)
     for pos, i in pairs(stringToArray(text)) do
         if (i ~= "&") then
             if (i ~= " ") then
                 return false
             end
         else
             return true
         end
     end
 
     return true
 end
 
 -- Проверяет в глобальном ли чате написано сообщение
 function isGlobal(text)
     for pos, i in pairs(stringToArray(text)) do
         if (i ~= "!") then
             if (i ~= " ") then
                 return false
             end
         else
             return true, pos
         end
     end
     return false
 end
 
 -- Делит строку на части
 function split(str, pat)
     local t = {}
     local fpat = "(.-)" .. pat
     local last_end = 1
     local s, e, cap = str:find(fpat, 1)
     while s do
         if s ~= 1 or cap ~= "" then
             table.insert(t,cap)
         end
         last_end = e+1
         s, e, cap = str:find(fpat, last_end)
     end
     if last_end <= #str then
         cap = str:sub(last_end)
         table.insert(t, cap)
     end
     return t
 end
 
 -- Устанавливает цвет шрифта в зависимости от патерна
 function setColor(num)
     if (num == "0") then
         gpu.setForeground(0x333333)
     end
 
     if (num == "1") then
         gpu.setForeground(0x000099)
     end
 
     if (num == "2") then
         gpu.setForeground(0x006600)
     end
 
     if (num == "3") then
         gpu.setForeground(0x006666)
     end
 
     if (num == "4") then
         gpu.setForeground(0x660000)
     end
 
     if (num == "5") then
         gpu.setForeground(0x660066)
     end
 
     if (num == "6") then
         gpu.setForeground(0xFF8000)
     end
 
     if (num == "7") then
         gpu.setForeground(0xA0A0A0)
     end
 
     if (num == "8") then
         gpu.setForeground(0x404040)
     end
 
     if (num == "9") then
         gpu.setForeground(0x3399FF)
     end
 
     if (num == "a") then
         gpu.setForeground(0x99FF33)
     end
 
     if (num == "b") then
         gpu.setForeground(0x00FFFF)
     end
 
     if (num == "c") then
         gpu.setForeground(0xFF3333)
     end
 
     if (num == "d") then
         gpu.setForeground(0xFF00FF)
     end
 
     if (num == "e") then
         gpu.setForeground(0xFFFF00)
     end
 
     if (num == "f") then
         gpu.setForeground(0xFFFFFF)
     end
 end
 
 -- Выводит сообщение
 function writeMessage(text)
     local t = split(text, "&")
     for pos, i in pairs(t) do
         if (pos == 1 and not isColored(text)) then
             io.write(i)
         else
             setColor(string.sub(i, 1, 1))
             io.write(string.sub(i, 2))
         end
     end
 end
 
 -- Выводит остальную часть сообщения
 function message(nick, msg, isGlobal, pos)
     local type = ""
     if (isGlobal) then msg = string.sub(msg, pos + 1) type = "G" else type = "L" end
 
     local file = fs.open(LOG_PATH, "a")
     file:write("[" .. real_time() .. "] [" .. type .. "] " .. nick .. ": " .. msg .. "\n")
     file:close()
 
     gpu.setForeground(0x00FFFF)
     io.write("[" .. real_time() .. "] ")
     gpu.setForeground(0xFFFFFF)
     if (type == "G") then
         gpu.setForeground(0xFF9933)
     else
         gpu.setForeground(0xFFFFFF)
     end
     io.write("[" .. type .. "] ")
     gpu.setForeground(0x00FF00)
     io.write(nick)
     gpu.setForeground(0xFFFFFF)
     io.write(": ")
     writeMessage(msg, l)
     io.write("\n")
 end
 
 local c, fs = require("component"), require("filesystem")
 local gpu = c.gpu
-local TC, RO, RN, RD, TPS = 0.3, 0, 0, 0
+local TC, RO, RN, RD, TPS = 1, 0, 0, 0
 
 local admins = {
     {"max32","макс"},
     {"OSSO","OSSO"},
     {"Garou","Garou"},
     {"__HAPKOMAH__","нарик"},
     {"LiwMorgan","ливМорган"},
     {"Alpaka_Masha","альпака"},
     {"Turgor","тургор"}
 
 
 
 }
 
 
 
 local component = require("component")
 local computer = require("computer")
 local unicode = require("unicode")
 local event = require("event")
 local gpu = component.gpu
 local w,h = gpu.getViewport()
 
 local function check()
     local line = 3
     for ind = 1,#admins do
         local name = admins[ind][1]
         local rank = admins[ind][2]
         gpu.setForeground(0xFFFFFF)
         -- gpu.set(130,line,"[")
         -- gpu.set(unicode.len(rank)+2,line,"] - "..name)
         gpu.set(131,line,rank)
         if computer.addUser(name) then
             computer.removeUser(name)
             gpu.setForeground(0x00FF00)
             gpu.set(140,line,"online")
         else
             gpu.setForeground(0x999999)
             gpu.set(140,line,"offline")
         end
         line = line + 1
     end
 end
 
 
 gpu.setForeground(0x99b2f2)
 gpu.set(1, 2, "TPS Сервера:")
 local function time()
     local f = io.open("/tmp/TF", "w")
     f:write("test")
     f:close()
     return(fs.lastModified("/tmp/TF"))
 end
 
-print("Инициализация...")
+--print("Инициализация...")
-os.sleep(0.1)
+--os.sleep(0.1)
-print("Ожидание первого сообщения...")
+--print("Ожидание первого сообщения...")
 
 local _, add, nick, msg = event.pull("chat_message")
 term.clear()
 local type, pos = isGlobal(msg)
 message(nick, msg, type, pos)
 
 
 --computer.addUser(({event.pull("touch")})[6])
 
 while true do
 
-        local _, add, nick, msg = event.pull("chat_message")
+
-        local type, pos = isGlobal(msg)
+    RO = time()
-        message(nick, msg, type, pos)
+    os.sleep(TC)
     RN = time()
     RD = RN - RO
     TPS = 20000 * TC / RD
     TPS = string.sub(TPS, 1, 5)
     nTPS = tonumber(TPS)
     gpu.setForeground(0x00FF00)
     gpu.set(137, 2, "     ")
     gpu.set(137, 2, " TPS - "..TPS)
 
        check()
 
 end