import random
import collections
def setup():
    global restart_text,pause_text,throw_text,score_text,menuboxes,gameboxes,pokertable,pokertitle,start_text,whichmenu
    global bankamount,betamount,negatory_text,pository_text,amount_text,bet_text,check_text,fold_text,call_text,raise_text,balance_text
    global handsize,numberofplayers,backofcard,drawtwocards_text,deckimage,hand1,cardl,cardw,hand2,turn,turn_text,trueholder,trueholder1,thedeck,hand1,hand2
    global v,bankamount,Game,Sina,Varun
    size(1000,650)
    v = getVariables("variable.txt")

    thedeck = Deck(4,13)

    cardw = v["cardw"]
    cardl = v["cardl"]
    #This is the amount of money each user wants to bet
    betamount = v["betamount"]
    #Amount of money in bank

    pokertable = loadImage("poker.jpg")
    pokertitle = loadImage("PokerTitle.png")
    backofcard = loadImage("backofcard.jpg")
    deckimage = loadImage("deck.png")
    start_text = v["start_text"]
    start_text.append(color(255,99,71))
    bet_text = v["bet_text"]
    bet_text.append(color(0,0,0))
    negatory_text = v["negatory_text"]
    negatory_text.append(color(50,50,50))
    pository_text = v["pository_text"]
    pository_text.append(color(50,50,50))
    amount_text = v["amount_text"]
    amount_text.append(color(0,200,0))
    check_text = v["check_text"]
    check_text.append(color(139, 0, 255))
    fold_text = v["fold_text"]
    fold_text.append(color(255, 0, 0))
    call_text = v["call_text"]
    call_text.append(color(127,255,212))
    drawtwocards_text = v["drawtwocards_text"]
    drawtwocards_text.append(color(100,149,237))
    balance_text = v["balance_text"]
    balance_text.append(color(100,149,237))
    turn_text = v["turn_text"]
    turn_text.append(color(0,0,0))
    whichmenu = v["whichmenu"]
    menuboxes = [start_text]
    handsize = v["handsize"]
    numberofplayers = v["numberofplayers"]
    trueholder = [False,False,False,False,False]
    Game = Poker(thedeck)
    Sina = Player(1000,"Sina",Game)
    Varun = Player(1000,"Varun",Game)
    Game.addPlayers([Sina,Varun])


def draw():
    global whichmenu,trueholder,turn
    global betamount,bankamount,bet_text,negatory_text,pository_text,amount_text,bet_text,check_text,fold_text,call_text,raise_text,balance_text
    global backofcard,handsize,numberofplayers,drawtwocards_text,deckimage,hand1,hand2, thedeck,turn,trueholder,trueholder1,v


    image(pokertable,-100,-50,1100,750)
    if whichmenu == 0:
        menu()
    elif whichmenu == 1:
        pokerTable()
        #this displays back of card
        #This displays the hand





def menu():
    global whichmenu
    background(0)

    image(pokertable,0,0,1000,650)
    image(pokertitle,315,190,400,100)

    drawTextboxes(menuboxes)
    if isClicked(textboxes[0]):
        whichmenu = 1




def pokerTable():
    global betamount,bankamount,bet_text,negatory_text,pository_text,amount_text,bet_text,check_text,fold_text,call_text,raise_text,balance_text
    global backofcard,handsize,numberofplayers,drawtwocards_text,deckimage,hand1,hand2, thedeck,turn,turn_text,trueholder,hand1,amount_text,betamount,Game,Varun,Sina
    Game.turn = Game.turn%2
    gameboxes = [bet_text,negatory_text,pository_text,amount_text,bet_text, check_text,fold_text,call_text,balance_text,drawtwocards_text,turn_text]
    drawTextboxes(gameboxes)
    theplayer = Game.playerList[Game.turn]
    betamount = getBet(gameboxes[2],gameboxes[1],betamount,theplayer.balance)
    amount_text = [820,150,110,50,"$"+str(betamount),color(0,200,0)]
    text(theplayer.balance,240,105)
    drawHand([[0,0],[0,0],[0,0],[0,0],[0,0]],1,backofcard,1152,1600)
    drawHand([[0,0],[0,0],[0,0],[0,0],[0,0]],0,backofcard,1152,1600)
    drawHand(theplayer.hand,Game.turn,deckimage,80,110)


    if isClicked(gameboxes[10]):
        trueholder = [False,False,False,False,False]
        Game.turn+=1
    if isClicked(gameboxes[9]):

        indexes = [index for index in range(len(trueholder)) if trueholder[index] == True]
        theplayer.hand = thedeck.changeHand(theplayer.hand,indexes)
        trueholder = [False,False,False,False,False]

    if isClicked(gameboxes[5]):
        Game.Check()
        betamount = 0

    elif isClicked(gameboxes[6]):
        Game.Fold(theplayer)

    elif isClicked(gameboxes[7]):
        Game.Call(theplayer)

    if isClicked(gameboxes[4]) and Game.turn ==1:
        Game.Raise(theplayer,betamount)
        betamount = 0



def getBet(plusbox,minusbox,betamount,bankamount):
    if isClicked(minusbox) and betamount>1:
        betamount -=1
    elif isClicked(plusbox) and betamount<bankamount:
        betamount+=1
    return(betamount)


def drawTextboxes(textboxes):
    textSize(30)
    fill(255)
    for i in range(len(textboxes)):
        fill(textboxes[i][5])
        rect(textboxes[i][0],textboxes[i][1],textboxes[i][2],textboxes[i][3])
        fill(255)
        text(textboxes[i][4],textboxes[i][0],textboxes[i][1]+35)

def drawtextboxes(textboxes):
    textSize(30)
    fill(255)
    for i in range(len(textboxes)):
        fill(textboxes[i][5])
        rect(textboxes[i][0],textboxes[i][1],textboxes[i][2],textboxes[i][3])
        fill(255)
        text(textboxes[i][4],textboxes[i][0],textboxes[i][1]+35)

def isClicked(info):
    clicked = False
    if mousePressed and mouseButton == LEFT:
        if info[0] < mouseX < info[0] + info[2] and info[1] < mouseY < info[1] + info[3]:
            clicked = True
    return clicked

def drawHand(hand,num,theimage,cardw,cardl):
    global backofcard,trueholder

    for i in range(len(hand)):
        cardval = hand[i][0]
        suitval = hand[i][1]

        textSize(30)
        if hand == [[0,0],[0,0],[0,0],[0,0],[0,0]]:
                copy(backofcard,0,0,1152,1600,110+130*i,150+(num*250),115,160)

        else:

            if isClicked([110+130*i,150+(num*250),115,160]) and sum(trueholder)<2  or trueholder[i]:
                trueholder[i] = True
                copy(backofcard,0,0,1152,1600,110+130*i,150+(num*250),115,160)
            else:
                copy(theimage, cardw*(cardval), cardl*suitval, cardw, cardl, 110+130*i, 150+(num*250), 115, 160)





def getVariables(fileName):
    try:
        variables = {}
        with open(fileName,"r") as file:
            for line in file:
                line = line.replace(" ","")
                name,value = line.split("=")
                variables[name] = string2type(value)
        return(variables)
    except Exception as E:
        print(E)

def string2type(value):
    try:
        return(int(value))
    except ValueError:
        if "[" in value and "]" in value:
            value = value.replace("[","")
            value = value.replace("]","")
            value = value.split(",")

            for i in range(len(value)):
                value[i] = string2type(value[i])
        elif value == "True":
            value = True
        elif value == "False":
            value = False
        else:
            value = value.replace('"',"")
            value = value.strip()
        return(value)




class Deck: #!
    def __init__(self,numsuit,numcard):
        self.numsuit = numsuit
        self.numcard = numcard
        self.deck = [[True] * numsuit for i in range (numcard)]

    def createCard(self): #!
        if self.deck.count:
            suitval = random.randint(0,self.numsuit-1)
            cardval = random.randint(0,self.numcard-1)
        while self.deck[cardval][suitval] == False:
            suitval = random.randint(0,self.numsuit-1)
            cardval = random.randint(0,self.numcard-1)
        self.deck[cardval][suitval] = False
        return((cardval,suitval))

    def createHand(self,handSize):
        cards = []
        for i in range(handSize):
            card = Deck.createCard(self)
            cards.append(card)
        return(cards)

    def changeHand(self,hand,indexList):
      for i in range(len(indexList)):
        hand[indexList[i]] = Deck.createCard(self)
      return(hand)

def Occur(cards):
    scorelist = [2,4,8]
    counter = collections.Counter(cards)
    largest = [0,0]
    largest2 = [0,0]
    for key in counter:
        occur = counter[key]
        if occur > largest2[1]:
            if occur > largest[1]:
                largest2 = largest
                largest = [key,occur]
            else:
                largest2 = [key,occur]
    num = max([largest[0],largest2[0]])
    if largest[1] == 3 and largest2[1] == 2:
        return(7,largest[0])
    elif largest[1] == largest2[1]:
        return(3,num)
    elif largest[1] in [2,3,4]:
        return(scorelist[[2,3,4].index(largest[1])],num )
    return(1,num)

def bubbleSort(arr):
  isSorted = False
  while not(isSorted):
    for i in range(len(arr) - 1):
        for j in range(len(arr) - 1 - i):
            if arr[j] > arr[j+1]:
                arr[j], arr[j+1] = arr[j+1],arr[j]
            else:
              isSorted = True
  return(arr)

def Flush(cards):
    counter = collections.Counter(cards)
    if len(counter) == 1:
        return(True,max(cards))
    return(False,max(cards))

def Straight(cards):
    if cards[4] - cards[0] == 4:
        return(True,max(cards))
    return(False,max(cards))

def Royal(cards):
    royal = [0,9,10,11,12]
    if cards == royal:
        return(True,13)
    return(False,13)

def getScore(hand):
    suit  = bubbleSort([i[1] for i in hand])
    value  = bubbleSort([i[0] for i in hand])
    occurances =  Occur(value)
    if occurances == 2:
        if Flush(suit) == 5:
            if Straight(value):
                return(9)
            if Royal(value):
                return(10)
            return(6)
        if Straight(value):
            return(5)
        return(1)
    return(occurances)

class Player:
    def __init__(self,startBalance,name,game):
        self.balance = startBalance
        self.name = name
        self.game = game
        self.hand = game.Deck.createHand(5)
        self.score = getScore(self.hand)

    def bet(self,betAmount):
        if betAmount <= self.balance:
            self.balance -= betAmount
            self.game.currentPot += betAmount
        else:
            print("Not enough money")




class Poker:
    def __init__(self,Deck):
        self.checkCounter = 0
        self.turn = 0
        self.currentPot = 0
        self.previousBet = 0
        self.raised = False
        self.Deck = Deck
    def addPlayers(self,playerList):
        self.playerList = playerList
    def Check(self):
        if self.raised == False:
            if self.checkCounter < 1:
                self.checkCounter += 1
                self.turn += 1
            else:
                self.checkCounter = 0
                Poker.checkWinner(self)
        else:
            print("You have to raise buddy")
    def Fold(self,player):
        Poker.newRound(self,self.playerList[(self.turn + 1) % 2])
    def Raise(self,player,betAmount):
        if betAmount > self.previousBet and betAmount <= self.playerList[(self.turn + 1) % 2]:
            self.raised = True
            self.previousBet = betAmount
            player.bet(betAmount)
            self.turn += 1
        else:
            print("You have to raise more than "+str(self.previousBet)+" or you have bet too much!")
    def Call(self,player):
        if self.raised:
            self.raised = False
            player.bet(self.previousBet)
            self.turn += 1
        else:
            print("There is nothing to call, retard")
    def checkWinner(self):
        if self.playerList[0].score[0] > self.playerList[1].score[0]:
            winner = self.playerList[0]
        elif self.playerList[0].score[0] < self.playerList[1].score[0]:
            winner = self.playerList[1]
        else:
            if self.playerList[0].score[1] > self.playerList[1].score[1]:
                winner = self.playerList[0]
            elif self.playerList[0].score[1] < self.playerList[1].score[1]:
                winner = self.playerList[1]
            else:
                winner = 0
        Poker.newRound(self,winner)
    def newRound(self,winner):
        self.playerList[0].hand = self.Deck.createHand(5)
        self.playerList[1].hand = self.Deck.createHand(5)
        if winner != 0:

            winner.balance += self.currentPot
            print("The winner of the round is "+ winner.name)
        else:
            print("its a tie")
            self.playerList[0].balance += self.currentPot / 2
            self.playerList[1].balance += self.currentPot / 2
        self.Deck.deck = [[True] * self.Deck.numsuit for i in range (self.Deck.numcard)]
        Poker.__init__(self,self.Deck)