133 lines
5.4 KiB
Lua
133 lines
5.4 KiB
Lua
local special = {}
|
||
|
||
special.triggers = {
|
||
"[Rr][Ii][Cc][Hh] [Bb][Ii][Tt][Cc][Hh]",
|
||
"^[Mm][Ii][Kk][Uu]%??$",
|
||
"^/[Oo][Ll][Dd]$",
|
||
"^[Nn][Yy][Uu]$",
|
||
"^[Nn][Ii][Ii][Ss][Aa][Nn]$",
|
||
"^[Nn][Ii][Ii](-)[Ss][Aa][Nn]$",
|
||
"^[Nn][Ii][Ss][Ss][Aa][Nn]$",
|
||
"^/[Nn][Ee][Oo][Rr][Aa][Mm][Ee]$",
|
||
"^/[Nn][Aa][Uu]$",
|
||
"^/[Ff][Tt][Tt]$",
|
||
"^/[Ff][Tt][Ff]$",
|
||
"^[Mm]ö[Pp]?$",
|
||
"^[Mm][Ee][Ee][Pp]$",
|
||
"^/[Bb][Aa][Rr][Uu][Ss][Aa][Mm][Ii][Kk][Oo][Ss][Uu]$",
|
||
"^/[Bb][Aa][Ll][Ss][Aa][Mm][Ii][Kk][Oo] [Ee][Ss][Ss][Ii][Gg]$",
|
||
"^[Bb][Aa][Kk][Aa] [Bb][Oo][Tt]$",
|
||
"^[Aa][Hh][Aa].[Pp][Nn][Gg]$",
|
||
"^~?[Pp][Oo][Ii]$",
|
||
"^/[Tt][Hh][Yy][Mm][Ee]$",
|
||
"^[Yy][Oo][Ll][Oo]$",
|
||
"[Ii] [Ww][Ii][Ss][Hh] [Ss][Qq][Uu][Ii][Dd][Ss] [Ww][Ee][Rr][Ee] [Rr][Ee][Aa][Ll]",
|
||
"^/[Kk][Ii][Ll][Ll] (.*)",
|
||
"[Mm]ö[Dd][Cc][Hh][Ee][Nn]",
|
||
"[Mm]Ö[Dd][Cc][Hh][Ee][Nn]",
|
||
"^[Pp][Ee]$",
|
||
"^[Vv][Aa]$",
|
||
"^[Mm][Uu]$",
|
||
"^/[Ii][Yy][Kk][Ww][Ii][Mm]$",
|
||
"^/%)$",
|
||
"^%(\\$",
|
||
"^/[Ss][Cc][Hh][Ee][Ll][Ll][Ee]$",
|
||
"^[Pp][Ii][Nn][Gg]$",
|
||
"^[Dd][Aa][Ss] [Ii][Ss][Tt]? [Nn][Ii][Cc][Hh][Tt]? [Ll][Uu][Ss][Tt][Ii][Gg]!?$"
|
||
|
||
}
|
||
|
||
function special:action(msg, config, matches)
|
||
local user_name = get_name(msg)
|
||
local msg_text = msg.text
|
||
local output
|
||
|
||
if msg_text:match("[Rr][Ii][Cc][Hh] [Bb][Ii][Tt][Cc][Hh]") then
|
||
output = 'Akamaru ist nicht reich!'
|
||
elseif string.match(msg.text, "[Mm][Ii][Kk][Uu]%??") then
|
||
local alive_answers = {'Ja?','Was gibts, '..user_name..'?','Ja '..user_name..', was ist?', 'Ich bin noch da.', user_name, 'Nein!','So heiße ich', 'Nerv mich nicht!','Was.'}
|
||
local random_alive = math.random(9)
|
||
output = alive_answers[random_alive]
|
||
elseif msg_text:match("/[Oo][Ll][Dd]") then
|
||
output = 'Deine Mudda is old!'
|
||
elseif msg_text:match("[Nn][Yy][Uu]") then
|
||
utilities.send_photo(msg.chat.id, download_to_file('http://img.ponywave.de/di/JSXH/nyu.jpg'), nil, msg.message_id)
|
||
return
|
||
elseif msg_text:match("[Nn][Ii][Ii][Ss][Aa][Nn]") or msg_text:match("[Nn][Ii][Ii](-)[Ss][Aa][Nn]") or msg_text:match("[Nn][Ii][Ss][Ss][Aa][Nn]") then
|
||
utilities.send_photo(msg.chat.id, download_to_file('http://img.ponywave.de/di/XB2T/Nii-san.jpg'), nil, msg.message_id)
|
||
return
|
||
elseif msg_text:match("/[Nn][Ee][Oo][Rr][Aa][Mm][Ee]") then
|
||
utilities.send_photo(msg.chat.id, download_to_file('http://img.ponywave.de/di/GM93/neorame.jpg'), nil, msg.message_id)
|
||
return
|
||
elseif msg_text:match("[Nn][Aa][Uu]") then
|
||
utilities.send_photo(msg.chat.id, download_to_file('http://img.ponywave.de/di/V1QH/nau.jpg'), nil, msg.message_id)
|
||
return
|
||
elseif msg_text:match("[Ff][Tt][Tt]") then
|
||
output = [[(╯°□°)╯︵ ┻━┻ FLIP THAT TABLE.
|
||
┻━┻ ︵ ヽ(°□°ヽ) FLIP THIS TABLE.
|
||
┻━┻ ︵ \(`0`)/ ︵ ┻━┻ FLIP ALL THE TABLES
|
||
ಠ_ಠ Child. . .
|
||
ಠ_ಠ Put.
|
||
ಠ__ಠ The tables.
|
||
ಠ___ಠ Back.
|
||
(╮°-°)╮┳━┳
|
||
(╯°□°)╯︵ ┻━┻ NEVER]]
|
||
elseif msg_text:match("[Ff][Tt][Ff]") then
|
||
output = [[(╯┳┳)╯︵ ಠ‾ಠ FLIP THAT FATHER.
|
||
ಠ‾ಠ ︵ ヽ(┳┳ヽ) FLIP THIS FATHER.
|
||
ಠ‾ಠ ︵ \(┳┳)/ ︵ ಠ‾ಠ FLIP ALL THE FATHERS
|
||
┳━┳ Child. . .
|
||
┳━┳ Put.
|
||
┳━━┳ The Fathers.
|
||
┳━━━┳ Back.
|
||
(╮┳┳)╮ಠ_ಠ
|
||
(╯┳┳)╯︵ ಠ‾ಠ NEVER]]
|
||
elseif msg_text:match("^[Mm]ö[Pp]?$") or msg_text:match("[Mm][Ee][Ee][Pp]") then
|
||
output = 'se'
|
||
elseif msg_text:match("[Bb][Aa][Rr][Uu][Ss][Aa][Mm][Ii][Kk][Oo][Ss][Uu]") or msg_text:match("[Bb][Aa][Ll][Ss][Aa][Mm][Ii][Kk][Oo] [Ee][Ss][Ss][Ii][Gg]") then
|
||
utilities.send_photo(msg.chat.id, download_to_file('http://img.ponywave.de/di/0SEY/barusamikosu.jpg'), nil, msg.message_id)
|
||
return
|
||
elseif msg_text:match("[Bb][Aa][Kk][Aa] [Bb][Oo][Tt]") then
|
||
output = 'Gomen\'nasai '..msg.from.first_name..'-senpai 😣'
|
||
elseif msg_text:match("[Aa][Hh][Aa].[Pp][Nn][Gg]") then
|
||
utilities.send_photo(msg.chat.id, download_to_file('http://img.ponywave.de/di/W97R/aha.png'), nil, msg.message_id)
|
||
return
|
||
elseif msg_text:match("[Pp][Oo][Ii]") then
|
||
utilities.send_document(msg.chat.id, download_to_file('https://dl.dropboxusercontent.com/u/32829149/poi.webp'), nil, msg.message_id)
|
||
return
|
||
elseif msg_text:match("/[Tt][Hh][Yy][Mm][Ee]") then
|
||
utilities.send_photo(msg.chat.id, download_to_file('http://img.ponywave.de/di/N6NO/thyme.jpg'), nil, msg.message_id)
|
||
return
|
||
elseif msg_text:match("[Yy][Oo][Ll][Oo]") then
|
||
output = 'Hä YOLO?'
|
||
elseif msg_text:match("[Ii] [Ww][Ii][Ss][Hh] [Ss][Qq][Uu][Ii][Dd][Ss] [Ww][Ee][Rr][Ee] [Rr][Ee][Aa][Ll]") then
|
||
utilities.send_photo(msg.chat.id, download_to_file('http://img.ponywave.de/di/N03B/squid.jpg'), 'They are', msg.message_id)
|
||
return
|
||
elseif msg_text:match("[Kk][Ii][Ll][Ll]") then
|
||
output = user_name..' tötet '..matches[1]
|
||
elseif msg_text:match("[Mm]ö[Dd][Cc][Hh][Ee][Nn]") or msg_text:match("[Mm]Ö[Dd][Cc][Hh][Ee][Nn]") then
|
||
output = 'Es heißt MÄDCHEN!'
|
||
elseif msg_text:match("[Pp][Ee]") then
|
||
output = 'nis'
|
||
elseif msg_text:match("[Vv][Aa]") then
|
||
output = 'gina'
|
||
elseif msg_text:match("[Mm][Uu]") then
|
||
output = 'schi'
|
||
elseif msg_text:match("/[Ii][Yy][Kk][Ww][Ii][Mm]") then
|
||
output = '(¬‿¬)'
|
||
elseif msg_text:match("/%)") then
|
||
output = '(\\'
|
||
elseif msg_text:match("%(\\") then
|
||
output = '/)'
|
||
elseif msg_text:match("^/[Ss][Cc][Hh][Ee][Ll][Ll][Ee]$") then
|
||
output = 'So dumme Befehle wie die "HiddenDatabase" benutzen wir nicht!'
|
||
elseif msg_text:match("^[Pp][Ii][Nn][Gg]$") then
|
||
output = 'Pong'
|
||
elseif msg_text:match("^[Dd][Aa][Ss] [Ii][Ss][Tt]? [Nn][Ii][Cc][Hh][Tt]? [Ll][Uu][Ss][Tt][Ii][Gg]!?$") then
|
||
output = 'Aber Funny!'
|
||
end
|
||
|
||
utilities.send_reply(msg, output)
|
||
end
|
||
|
||
return special |