etc/utf8.lua

@@ -1,101 +0,0 @@
--- Unicode library
-
-local pattern = '[%z\1-\127\194-\244][\128-\191]*'
-
--- helper function
-local function posrelat(pos, len)
-  if pos < 0 then
-    pos = len + pos + 1
-  end
-  return pos
-end
-
-local utf8 = {}
-
--- THE MEAT
-
-function utf8.map(s, f, no_subs)
-  local i = 0
-
-  if no_subs then
-    for b, e in s:gmatch('()' .. pattern .. '()') do
-      i = i + 1
-      local c = e - b
-      f(i, c, b)
-    end
-  else
-    for b, c in s:gmatch('()(' .. pattern .. ')') do
-      i = i + 1
-      f(i, c, b)
-    end
-  end
-end
-
--- THE REST
-
-function utf8.chars(s, no_subs)
-  return coroutine.wrap(function()
-    return utf8.map(s, coroutine.yield, no_subs)
-  end)
-end
-
-function utf8.len(s)
-  return select(2, s:gsub('[^\128-\193]', ''))
-end
-
-function utf8.replace(s, map)
-  return s:gsub(pattern, map)
-end
-
-function utf8.reverse(s)
-  s = s:gsub(pattern, function(c)
-    return #c > 1 and c:reverse()
-  end)
-  return s:reverse()
-end
-
-function utf8.strip(s)
-  return s:gsub(pattern, function(c)
-    return #c > 1 and ''
-  end)
-end
-
-function utf8.sub(s, i, j)
-  local l = utf8.len(s)
-
-  i = posrelat(i, l)
-  j = j and posrelat(j, l) or l
-
-  if i < 1 then i = 1 end
-  if j > l then j = l end
-  if i > j then return '' end
-
-  local diff = j - i
-  local iter = utf8.chars(s, true)
-
-  for _ = 1, i - 1 do iter() end
-  local c, b = select(2, iter())
-
-  if diff == 0
-  then return s:sub(b, b + c - 1) end
-
-  i = b
-  for _ = 1, diff - 1 do iter() end
-  local c, b = select(2, iter())
-
-  return s:sub(i, b + c - 1)
-end
-
--- ADDITION
-
-require 'etc.utf8data'
-
-function utf8.upper(s)
-  return utf8.replace(s, utf8_lc_uc)
-end
-
-function utf8.lower(s)
-  return utf8.replace(s, utf8_uc_lc)
-end
-
-return utf8

src/events/message.lua

@@ -1,25 +1,9 @@
-local reg = {
-  {'эх',         'хуех'}, -- надоели эхать
-  {'мета',       'хуета'},
-  {'meta',       'xueta'},
-  {'цукерберг',  'цукерхуй'},
-  {'zuckerberg', 'zuckerhui'},
-  {'whatsapp',   'вадзад'},
-  {'tiktok',     'деградация'},
-  {'.*че%?*$',   'пиши ё, грамотей'},
-  {'.*чё%?*$',   'ничё'}
-}
-
 return function(C, api, msg)
-  if msg.text then
+  -- надоели эхать
-    msg.text = utf8.lower(msg.text)
+  if msg.text
-    local t = ''
+  and msg.text:match '[Ээ]+[Хх]+' then
-    for _, v in pairs(reg) do
+    C.api:reply(msg, msg.text
-      if msg.text:match(v[1])
+      :gsub('[Ээ]+[Хх]+', 'хуех')
-      then t = t.. v[2] ..' '
+    ,nil)
-      end
-    end
-    if t ~= ''
-    then api:reply(msg, t) end
   end
 end

src/locales/en.json

@@ -28,8 +28,6 @@
       "prov": "\nData provided from central bank of Russia."
     },
     "start": {
-      "desc": "getting started",
-
       "msg": "Hi! I'm Computer - an open-source bot.\nIf you looking for source code: https://gitdab.com/er2/comp-tg"
     }
   }

src/locales/ru.json

@@ -28,8 +28,6 @@
       "prov": "\nДанные предоставлены центральным банком России."
     },
     "start": {
-      "desc": "начало работы",
-
       "msg": "Привет! Я Computer - бот с открытым исходным кодом.\nЕсли ты ищешь исходники: https://gitdab.com/er2/comp-tg"
     }
   }

src/parts/core.lua

@@ -42,8 +42,6 @@ end
 function Core:init()
   self:load 'parts'
 
-  utf8 = require 'etc.utf8'
-
   print 'Done!'
   self:emit 'ready'
 end