Mikubot-2/otouto/plugins/rmspic.lua

local https = require('ssl.https')
local utilities = require('otouto.utilities')
local bindings = require('otouto.bindings')

local rms = {}

function rms:init(config)
    rms.triggers = utilities.triggers(self.info.username, config.cmd_pat):t('rms').table
    rms.command = 'rms'
    rms.BASE_URL = 'https://rms.sexy/img/'
    rms.LIST = {}
    local s, r = https.request(rms.BASE_URL)
    if r ~= 200 then
        print('Error connecting to rms.sexy.\nrmspic.lua will not be enabled.')
        rms.triggers = {}
    end
    for link in s:gmatch('<a href=".-%.%a%a%a">(.-)</a>') do
        table.insert(rms.LIST, rms.BASE_URL .. link)
    end
end

function rms:action(msg, config)
    bindings.sendPhoto{chat_id = msg.chat.id, photo = rms.LIST[math.random(#rms.LIST)]}
end

return rms