Мне интересно, а кто-нибудь на Lua ботов пишет? :)

#!/usr/bin/env lua local copas = require "copas" local asynchttp = require "copas.http" local json = require "cjson" local f = string.format local concat = table.concat local round = math.floor local token = "XXXXXXXXXX:XXXXXXXXXXXXXXXXXXXX" local function err(msg, ...) print(msg:format(...)) end local function encode(params) local query = {} for k, v in pairs(params) do query[#query+1] = concat({k, tostring(v)}, "=") end return concat(query, "&") end local function api_call(method, params) assert((type(method) == "string"), "method must be a string") assert((type(params) == "table" or "nil"), "params must be a table or nil") local url = f("https://api.telegram.org/bot%s/%s", token, method) if params and next(params) then url = url .. "?" .. encode(params) end local res = asynchttp.request(url) local data = json.decode(res) if not data.ok then err("Telegram API error: %d %s", data.error_code, data.description) return nil, data.error_code, data.description end return data.result end local telegram = {} setmetatable(telegram, { __index = function (_, method) return function(params, callback) if callback then copas.addthread(function () callback(api_call(method, params)) end) else return api_call(method, params) end end end }) local function process_message(message) telegram.sendMessage({ chat_id = round(message.from.id), text = message.text }, function (res) if res then print(message.text) end end) end local function event_loop() local params = {} while true do local updates = telegram.getUpdates(params) if updates ~= nil and #updates > 0 then for _, update in ipairs(updates) do if update.message then process_message(update.message) end end params.offset = round(updates[#updates].update_id) + 1 end end end copas.addthread(event_loop) copas() Вот простейший асинхронный эхо бот с Copas+CJSON. Может кому пригодится.

0

5 месяцев назад

Igor · Accepted Answer

Igor

У меня бот для управления домашней пекой, впном и сеткой в целом на Lua написан

0

5 месяцев назад

169 похожих чатов

Мне интересно, а кто-нибудь на Lua ботов пишет? :)

10 ответов

Похожие вопросы