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-2/miku/plugins/special.lua
Akamaru 8e0b6e0339 Updates & Fixes
banhammer.lua: Entferne prints
pihole.lua: Anpassung an Pi-hole 3.0
playstation_store.lua: Fix für falschen Namen
plex.lua: Anpassungen (Achtung, dreckig)
special.lua: "Kuma Shock"
Neu! get_img.lua
2017-05-10 13:35:21 +02:00

162 lines
7.2 KiB
Lua
Raw Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

local special = {}
special.triggers = {
"[Rr][Ii][Cc][Hh] [Bb][Ii][Tt][Cc][Hh]",
"[Mm]ö[Dd][Cc][Hh][Ee][Nn]",
"[Mm]Ö[Dd][Cc][Hh][Ee][Nn]",
"^[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]$",
"^/[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]$",
"^[Yy][Oo][Ss][Hh][Ii] [Dd][Aa][Nn][Cc][Ee] [Gg][Ll][Ii][Tt][Cc][Hh]",
"^[Yy][Oo][Ss][Hh][Ii] [Dd][Aa][Nn][Cc][Ee]",
"^[Nn][Oo][Pp][Ee].[Aa][Vv][Ii]",
"^[Kk][Uu][Mm][Aa] [Ss][Cc]?[Hh][Oo][Cc][Kk]",
"^[Ss][Uu][Gg][Oo][Ii] [Dd][Ee][Ss][Uu] [Nn][Ee]",
"^[Nn][Aa][Nn][Oo] [Hh][Aa][Kk][Aa][Ss][Ee]$",
"^/[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] (.*)",
"^[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]!?$",
"/[Bb][Ll][Uu][Ee][Tt][Ee][Xx][Tt]",
"/[Ll][Mm][Gg][Tt][Ff][Yy] (.*)"
}
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 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 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, '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, '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, 'http://img.ponywave.de/di/GM93/neorame.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, '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, '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, 'http://code.ponywave.de/workspace/test/fuck/poi.webp', nil, msg.message_id)
return
elseif msg_text:match("[Yy][Oo][Ss][Hh][Ii] [Dd][Aa][Nn][Cc][Ee] [Gg][Ll][Ii][Tt][Cc][Hh]") then
utilities.send_video(msg.chat.id, 'http://code.ponywave.de/workspace/test/fuck/YOSHI_DANCE_GLITCH.mp4', nil, msg.message_id)
return
elseif msg_text:match("[Yy][Oo][Ss][Hh][Ii] [Dd][Aa][Nn][Cc][Ee]") then
utilities.send_video(msg.chat.id, 'http://code.ponywave.de/workspace/test/fuck/YOSHI_DANCE.mp4', 'YOSHI DANCE!', msg.message_id)
return
elseif msg_text:match("[Nn][Oo][Pp][Ee].[Aa][Vv][Ii]") then
utilities.send_video(msg.chat.id, 'http://code.ponywave.de/workspace/test/fuck/nope.mp4', nil, msg.message_id)
return
elseif msg_text:match("[Kk][Uu][Mm][Aa] [Ss][Cc]?[Hh][Oo][Cc][Kk]") then
utilities.send_video(msg.chat.id, 'http://code.ponywave.de/workspace/test/fuck/KUMA_SHOCK.mp4', 'KUMA SHOCK!', msg.message_id)
return
elseif msg_text:match("[Ss][Uu][Gg][Oo][Ii] [Dd][Ee][Ss][Uu] [Nn][Ee]") then
utilities.send_video(msg.chat.id, 'http://code.ponywave.de/workspace/test/fuck/sugoidesune.mp4', 'eeeeee!?\nSUGOI DESU NE?', msg.message_id)
return
elseif msg_text:match("[Nn][Aa][Nn][Oo] [Hh][Aa][Kk][Aa][Ss][Ee]") then
utilities.send_video(msg.chat.id, 'http://code.ponywave.de/workspace/test/fuck/nano-hakase-1.mp4', 'NANO! NANO! NANO! NANO! NANO! NANO!\nHAKASE! HAKASE! HAKASE! HAKASE! HAKASE! HAKASE!', msg.message_id)
return
elseif msg_text:match("/[Tt][Hh][Yy][Mm][Ee]") then
utilities.send_photo(msg.chat.id, 'http://img.ponywave.de/di/N6NO/thyme.jpg', 'What thyme is it?', 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, '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("^[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!'
elseif msg_text:match("/[Bb][Ll][Uu][Ee][Tt][Ee][Xx][Tt]") then
output = [[BLUE TEXT
MUST CLICK
I AM A STUPID ANIMAL THAT IS ATTRACTED TO COLORS]]
elseif msg_text:match("/[Ll][Mm][Gg][Tt][Ff][Yy]") then
utilities.send_reply(msg, '<a href="https://lmgtfy.com/?q='..URL.escape(matches[1])..'">Deine Antwort findest du hier.</a> ;)', 'HTML')
end
utilities.send_reply(msg, output)
end
return special