SCORE = { "A" => 11, "J" => 10, "Q" => 10, "K" => 10, "2" => 2, "3" => 3,
          "4" => 4, "5" => 5, "6" => 6, "7" => 7, "8" => 8, "9" => 9,
          "10" => 10 }

SUITS = ['H', 'D', 'S', 'C']
VALUES = ['2', '3', '4', '5', '6', '7', '8', '9', '10', 'J', 'Q', 'K', 'A']

BUST_POINT = 21
DEALER_HEDGE = 17
WAIT_TIME = 1.5

def initialize_deck
  SUITS.product(VALUES).shuffle
end

def update_total(plyr_hand)
  values = plyr_hand.map { |card| card[1] }
  sum = 0

  values.each do |value|
    sum += SCORE[value]
  end

  values.select { |value| value == "A" }.count.times do
    sum -= 10 if sum > BUST_POINT
  end

  sum
end

def update_deck(array, draw)
  array.select! { |e| !draw.include?(e) }
end

def busted?(plyr_tot)
  plyr_tot > BUST_POINT
end

def check_winner(player_tot, dealer_tot)
  if player_tot > BUST_POINT
    'player busted'
  elsif dealer_tot > BUST_POINT
    'dealer busted'
  elsif dealer_tot < player_tot
    'Player'
  elsif player_tot < dealer_tot
    'Dealer'
  else
    'tie'
  end
end

def display_winner(player_tot, dealer_tot)
  result = check_winner(player_tot, dealer_tot)

  case result
  when 'player busted'
    puts 'You busted! Dealer wins!'
  when 'dealer busted'
    puts 'Dealer busted! You win!'
  when 'Player'
    puts 'You win!'
  when 'Dealer'
    puts 'Dealer wins!'
  when 'tie'
    puts "It's a tie"
  end
end

# def display_player_hand(player_hand)
# end
#
# def display_dealer_hand(dealer_hand)
# end

def play_again?
  choice = ''
  loop do
    puts 'Do you want to play again? y/n '
    choice = gets.chomp.downcase
    break if %w(y n).include?(choice)
    puts "invalid response. enter 'y' or 'n'"
  end
  choice == 'y'
end

def update_score(hsh, string)
  hsh[string] += 1
end

def grand_winner?(player_score, dealer_score)
  player_score == 5 || dealer_score == 5
end

def display_grand_winner(player_score, dealer_score)
  if player_score == 5
    puts "Game over! You have won 5 games!"
  elsif dealer_score == 5
    puts "Game over! Dealer has won 5 games!"
  end
end

def request_player_choice
  player_choice = ''
  loop do
    print "Enter 'h' to hit or 's' to stay: "
    player_choice = gets.chomp.downcase
    break if %w(h s).include?(player_choice)
    puts "invalid choice, please enter 'h' or 's'"
  end
  player_choice
end
# Game Play

puts "Welcome to the game of 21!"
sleep WAIT_TIME
# intialize counters
player_score = 0
dealer_score = 0

loop do
  deck = initialize_deck
  system 'cls'

  loop do
    puts "...issuing two cards to player"
    sleep WAIT_TIME
    player_hand = deck.sample(2)
    update_deck(deck, player_hand)

    puts "...issuing two cards to dealer"
    sleep WAIT_TIME
    dealer_hand = deck.sample(2)
    update_deck(deck, dealer_hand)

    player_total = update_total(player_hand)
    dealer_total = update_total(dealer_hand)

    puts "Dealer has: #{dealer_hand.sample[1]} and unknown card"
    puts "You have: #{player_hand[0][1]} and #{player_hand[1][1]}"

    loop do
      player_choice = request_player_choice

      if player_choice == 'h'
        player_hand += [deck.sample]
        puts 'You chose to hit'
        puts "Your cards are now #{player_hand}"
        update_deck(deck, player_hand)
        player_total = update_total(player_hand)
      end

      break if busted?(player_total) || player_choice == 's'
    end

    if busted?(player_total)
      dealer_score += 1
      display_winner(player_total, dealer_total)
      break
    else
      puts 'You chose to stay!'
      puts "Your current total is #{player_total}"
    end

    puts 'Dealer turn...'
    sleep WAIT_TIME

    while dealer_total < DEALER_HEDGE
      puts 'Dealer hits!'
      dealer_hand += [deck.sample]
      puts "Dealer's cards are now #{dealer_hand}"
      update_deck(deck, dealer_hand)
      dealer_total = update_total(dealer_hand)

      break if busted?(dealer_total)
    end

    if busted?(dealer_total)
      player_score += 1
      display_winner(player_total, dealer_total)
      break
    else
      puts "Dealer stays at #{dealer_total}"
    end

    # result time
    puts '======================='
    puts "Dealer has #{dealer_hand}, for a total of: #{dealer_total}"
    puts "Player has #{player_hand}, for a total of: #{player_total}"
    puts '======================='

    result = check_winner(player_total, dealer_total)
    player_score += 1 if result == "Player"
    dealer_score += 1 if result == "Dealer"

    display_winner(player_total, dealer_total)

    if grand_winner?(player_score, dealer_score)
      display_grand_winner(player_score, dealer_score)
    end

    break
  end
  break if grand_winner?(player_score, dealer_score)
  break unless play_again?
end

puts "Thank you for playing #{BUST_POINT}!"