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/plugins/quotes.lua
Akamaru 5ce1042f6a Kleine Änderungen und Bugfixes
- "if not is_sudo" Texte ausgetauscht
- Pattern-Fix in google_books.lua
- Dateipfad in Random Pic Plugins angepasst
- sh.lua überarbeitet
- Neues Pattern in youtube.lua
- Fix für verschiedene Dateiendungen in youtube_dl.lua
2016-06-23 13:55:39 +02:00

97 lines
2.4 KiB
Lua

do
local function save_quote(msg)
if msg.text:sub(11):isempty() then
return "Benutzung: #addquote [Zitat]"
end
local quote = msg.text:sub(11)
local hash = get_redis_hash(msg, 'quotes')
print('Saving quote to redis set '..hash)
redis:sadd(hash, quote)
return 'Gespeichert: "'..quote..'"'
end
local function delete_quote(msg)
if msg.text:sub(11):isempty() then
return "Benutzung: #delquote [Zitat]"
end
local quote = msg.text:sub(11)
local hash = get_redis_hash(msg, 'quotes')
print('Deleting quote from redis set '..hash)
if redis:sismember(hash, quote) == true then
redis:srem(hash, quote)
return 'Zitat erfolgreich gelöscht!'
else
return 'Dieses Zitat existiert nicht.'
end
end
local function get_quote(msg)
local to_id = tostring(msg.to.id)
local hash = get_redis_hash(msg, 'quotes')
if hash then
print('Getting quote from redis set '..hash)
local quotes_table = redis:smembers(hash)
if not quotes_table[1] then
return 'Es wurden noch keine Zitate gespeichert.\nSpeichere doch welche mit #addquote [Zitat]'
else
return quotes_table[math.random(1,#quotes_table)]
end
end
end
local function list_quotes(msg)
local hash = get_redis_hash(msg, 'quotes')
if hash then
print('Getting quotes from redis set '..hash)
local quotes_table = redis:smembers(hash)
local text = ""
for num,quote in pairs(quotes_table) do
text = text..num..") "..quote..'\n'
end
if not text or text == "" then
return 'Es wurden noch keine Zitate gespeichert.\nSpeichere doch welche mit #addquote [Zitat]'
else
return text
end
end
end
local function run(msg, matches)
if matches[1] == "quote" then
return get_quote(msg)
elseif matches[1] == "addquote" then
return save_quote(msg)
elseif matches[1] == "delquote" then
if not is_sudo(msg) then
return "Das darf nur mein Meister!"
else
return delete_quote(msg)
end
elseif matches[1] == "listquotes" then
return list_quotes(msg)
end
end
return {
description = "Zitate speichern, löschen und abrufen.",
usage = {
"#addquote [Zitat]: Fügt Zitat hinzu.",
"#quote: Gibt zufälliges Zitat aus.",
"#delquote [Zitat]: Löscht das Zitat (nur Superuser)",
"#listsquotes: Listet alle Zitate auf"
},
patterns = {
"^#(delquote) (.+)$",
"^#(addquote) (.+)$",
"^#(quote)$",
"^#(listquotes)$"
},
run = run
}
end