comp-tg/src/events/message.moon

29 lines
897 B
Plaintext
Raw Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

reg = {
{'эх+%.*', 'хуех'} -- надоели эхать
{'мета', 'хуета'}
{'meta', 'xueta'}
{'цукерберг', 'цукерхуй'}
{'zuckerberg', 'zuckerhui'}
{'wh?atsapp?', 'вадзад'}
{'в[ао][тсц]+апп?', 'вадзад'}
{'tiktok', 'деградация'}
{'ч[ую]ма', 'капитализм'}
{'минет', 'еблет'}
{'еблет', 'пакет'}
{'да', 'пизда'}
{'нет', 'минет'}
{'че%?*', 'пиши ё, грамотей'}
{'чё%?*', 'ничё'}
}
(api, msg) =>
if msg.text
msg.text = utf8.lower ' '.. msg.text ..' '
t = ''
for _, v in pairs reg
if utf8.match msg.text, '%s+'.. v[1] ..'%s+'
t ..= "#{v[2]} "
api\reply msg, t if t ~= ''
return