Mikubot-2/plugins/eightball.lua

local eightball = {}

local bindings = require('bindings')
local utilities = require('utilities')

eightball.command = '8ball'
eightball.doc = '`Returns an answer from a magic 8-ball!`'

function eightball:init()
	eightball.triggers = utilities.triggers(self.info.username, {'[Yy]/[Nn]%p*$'}):t('8ball', true).table
end

local ball_answers = {
	"It is certain.",
	"It is decidedly so.",
	"Without a doubt.",
	"Yes, definitely.",
	"You may rely on it.",
	"As I see it, yes.",
	"Most likely.",
	"Outlook: good.",
	"Yes.",
	"Signs point to yes.",
	"Reply hazy try again.",
	"Ask again later.",
	"Better not tell you now.",
	"Cannot predict now.",
	"Concentrate and ask again.",
	"Don't count on it.",
	"My reply is no.",
	"My sources say no.",
	"Outlook: not so good.",
	"Very doubtful.",
	"There is a time and place for everything, but not now."
}

local yesno_answers = {
	'Absolutely.',
	'In your dreams.',
	'Yes.',
	'No.'
}

function eightball:action(msg)

	if msg.reply_to_message then
		msg = msg.reply_to_message
	end

	local message

	if msg.text_lower:match('y/n%p?$') then
		message = yesno_answers[math.random(#yesno_answers)]
	else
		message = ball_answers[math.random(#ball_answers)]
	end

	bindings.sendReply(self, msg, message)

end

return eightball