botframework.lua

print("botframework.lua - So you can bot inside a bot")
settings = {prefix=":"}
bot = {}
bot.stop = false
bot.commands = {}
function bot.addCommand(name,func) bot.commands[name] = func end
function bot.removeCommand(name) bot.commands[name] = nil end
bot.commands.say = function(args,msg,nick,chan,host) print(msg) end
bot.commands.stop = function(args,msg,nick) if nick == irc.nick then print("Stopping botframework.lua") bot.stop = true end end

-- copypasta
function split(str, pat)
    local t = {}  -- NOTE: use {n = 0} in Lua-5.0
    local fpat = "(.-)" .. pat
    local last_end = 1
    local s, e, cap = str:find (fpat, 1)
    while s do
        if s ~= 1 or cap ~= "" then
     table.insert(t,cap)
        end
        last_end = e+1
        s, e, cap = str:find(fpat, last_end)
    end
    if last_end <= #str then
        cap = str:sub(last_end)
        table.insert(t, cap)
    end
    return t
end

while not bot.stop do
    local msg, nick, chan, host = event.wait("msg")
    if msg:sub(1,#settings.prefix) == settings.prefix then
        msg = msg:sub(#settings.prefix+1)
        local args = split(msg," ")
        local cmd = table.remove(args,1)
        msg = msg:sub(#cmd+2)
        if bot.commands[cmd] then
            bot.commands[cmd](args,msg,nick,chan,host)
        end
    end
end