require 'dotenv/load'
require 'yaml'
require 'discordrb'


MAX_COINS_PER_DAY = 4
COIN_TIMEOUT = 15
SCOREBOARD = './scoreboard.yml'
PASTA='You know what? Im done, i am leaving, we were friendly talking about the subject. This crossed the line of "ok killer of joy" to "no fun allowed"'
COIN_EMOJI = '🪙'

$coin_state_active = false
$coins_offered_today = 0

bot = Discordrb::Bot.new token: ENV['DISCORD_TOKEN']

def get_seconds_to_midnight(time)
  t2 = Time.new(time.year, time.month, time.day + 1)
  return t2 - time
end

def get_random_hours(min, max)
  min_hours = min * 60 * 60
  max_hours = max * 60* 60
  return rand(min_hours..max_hours)
end

def load_scoreboard()
  YAML::load_file(SCOREBOARD) || {}
end

def get_coin_count(user)
  scoreboard = load_scoreboard()
  scoreboard[user] || 0
end

def increment_coin(user, amount=1)
  scoreboard = load_scoreboard()
  coins = get_coin_count(user) + amount
  scoreboard[user] = coins

  File.write(SCOREBOARD, scoreboard.to_yaml)

  return coins
end

def empty_coin(user)
  scoreboard = load_scoreboard()
  scoreboard[user] = 0

  File.write(SCOREBOARD, scoreboard.to_yaml)
end

def plural(string, count)
  "#{count} #{string}#{count != 1 ? 's' : ''}"
end

def clean_name(input)
  input.tr '@', ''
end

def get_coin(event)
  # update score
  author = event.methods.include?(:author) ? event.author : event.user

  if $coin_state_active
    if author.bot_account?
      event.respond "Bots don't get coins!"
    end
    $coin_state_active = false
    if(rand(100) == 47)
      hyper_coin_amount = rand(100)
      coins = increment_coin(event.author.id, hyper_coin_amount)
      event.respond "What astounding luck!!! #{clean_name author.display_name}, you've just activated HYPER COIN EVENT and have received #{hyper_coin_amount} coins for a grand total of #{coins} coins!"
    else
      coins = increment_coin(author.id)
      event.respond "Nice catch, #{clean_name author.display_name}! You have #{plural('coin', coins)} now!"
    end
  else
    event.respond "No coins for you, #{clean_name author.display_name}!"
  end
end

def give_coin(event)
  reactor_coins = get_coin_count(event.user.id)
  if reactor_coins == 0
    event.respond("Nice gesture, <@#{event.user.id}>, but you're broke! To get more coins, type the words `GET COIN` whenever I post the coin event message! But be quick, your friends are trying their best to get it before you do!")
    return
  end

  if event.message.author == event.user
    event.respond("<@#{event.user.id}>, you can't give coins to yourself!")
    return
  end

  increment_coin(event.message.author.id)
  increment_coin(event.user.id, -1)

  event.respond "How nice! <@#{event.message.author.id}> has received a coin from <@#{event.user.id}>!"
end

bot.message(in: Integer(ENV['BOT_CHANNEL'])) do |event|
  if event.message.attachments.count { |x| x.filename.scan(/coin*/).length > 0 } > 0
    event.respond "Oh no! Looks like you tried to post a fradulent coin! #{clean_name event.author.display_name}, your coin balance has now been emptied. Let that be a lesson for next time!"
    empty_coin(event.author.id)
  end
end

bot.message(content: 'GET COIN' ) do |event|
  get_coin(event)
end

bot.message(with_text: '/coins') do |event|
  coins = get_coin_count(event.author.id)
  event.respond "#{clean_name event.author.display_name}, you have #{plural('coin', coins)}!"
end

bot.message(with_text: '!leave') do |event|
event.respond PASTA
end

bot.message(with_text: 'boobs', in: Integer(ENV['CUM_CHANNEL'])) do |event|
next if not ENV['CUM_CHANNEL']
event.respond "OHHHHHH IM GONNA CUM"
end

bot.reaction_add do |event|
  next unless event.emoji.name == COIN_EMOJI

  if event.message.author.id == bot.bot_application.id
    get_coin(event)
  else
    give_coin(event)
  end

end

bot.run(true)

loop do
  # sleep random amount of time between 1 and 4 hours
  sleep(get_random_hours(1, 4))
  # activate coin state
  $coin_state_active = true
  # send coin GIF
  bot.send_file(ENV['BOT_CHANNEL'], File.open('./coin.gif', 'r'))
  $coins_offered_today += 1

  # if max coins per day has reached, sleep until midnight
  if $coins_offered_today >= MAX_COINS_PER_DAY
    sleep(get_seconds_to_midnight(Time.now))
    sleep(get_random_hours(5, 11))
    $coins_offered_today = 0
  end
end

bot.join()