This repository has been archived on 2021-04-24. You can view files and clone it, but cannot push or open issues or pull requests.
Mikubot-2/otouto/plugins/shout.lua

52 lines
1.3 KiB
Lua
Raw Normal View History

local shout = {}
2016-06-07 06:31:34 +02:00
local utilities = require('otouto.utilities')
shout.command = 'shout <text>'
2016-08-14 04:26:44 +02:00
local utf8 = '('..utilities.char.utf_8..'*)'
function shout:init(config)
2016-08-14 04:46:18 +02:00
shout.triggers = utilities.triggers(self.info.username, config.cmd_pat):t('shout', true).table
shout.doc = config.cmd_pat .. 'shout <text> \nShouts something. Input may be the replied-to message.'
end
function shout:action(msg)
2016-08-14 04:46:18 +02:00
local input = utilities.input_from_msg(msg)
if not input then
utilities.send_reply(msg, shout.doc, true)
2016-08-14 04:46:18 +02:00
return
end
input = utilities.trim(input)
input = input:upper()
local output = ''
local inc = 0
local ilen = 0
for match in input:gmatch(utf8) do
if ilen < 20 then
ilen = ilen + 1
output = output .. match .. ' '
end
end
ilen = 0
output = output .. '\n'
for match in input:sub(2):gmatch(utf8) do
if ilen < 19 then
local spacing = ''
for _ = 1, inc do
spacing = spacing .. ' '
end
inc = inc + 1
ilen = ilen + 1
output = output .. match .. ' ' .. spacing .. match .. '\n'
end
end
output = '```\n' .. utilities.trim(output) .. '\n```'
utilities.send_message(msg.chat.id, output, true, false, true)
end
return shout