import java.awt.*;
import java.awt.event.*;
import java.net.URL;
import java.util.Random;
import javax.swing.*;

public class Poker extends JApplet implements ActionListener {

    JLabel blah;
    JLabel nextLabel;

    Card[] cards;
    JButton[] cardButtons;

    int cardsLeft;
    
    int nextCard;
    Card[] deck;

    JTextArea[] rowHands;
    JTextArea[] colHands;

    int score;

    public void init() {

	shuffle();

	cards = new Card[25];
	cardButtons = new JButton[25];
	rowHands = new JTextArea[5];
	colHands = new JTextArea[5];

	cardsLeft = 25;
	nextCard = 0;
	score = 0;

	blah = new JLabel("Next card: ");
	nextLabel = new JLabel();
	nextLabel.setHorizontalTextPosition(SwingConstants.LEADING);
	printCard(nextLabel, deck[nextCard]);

	JPanel nextPanel = new JPanel();
	nextPanel.add(blah);
	nextPanel.add(nextLabel);


	JPanel cardPanel = new JPanel(new GridLayout(6, 6));
	for (int i=0; i<5; i++) {
	    for (int j=0; j<5; j++) {
		cardButtons[5*i+j] = new JButton();
		cardButtons[5*i+j].setHorizontalTextPosition(SwingConstants.LEADING);
		cardButtons[5*i+j].setMargin(new Insets(0,0,0,0));
		cardButtons[5*i+j].addActionListener(this);
		cardPanel.add(cardButtons[5*i+j]);
	    }
	    rowHands[i] = new JTextArea();
	    rowHands[i].setEditable(false);
	    rowHands[i].setBackground(blah.getBackground());
	    cardPanel.add(rowHands[i]);
	}
	for (int i=0; i<5; i++) {
	    colHands[i] = new JTextArea();
	    colHands[i].setEditable(false);
	    colHands[i].setBackground(blah.getBackground());
	    cardPanel.add(colHands[i]);
	}

	Container pane = getContentPane();
	pane.add(cardPanel);
	pane.add(nextPanel, BorderLayout.NORTH);
    }

    public void actionPerformed(ActionEvent e) {
	for (int i=0; i<25; i++) {
	    if (e.getSource() == cardButtons[i]) {
		if (cards[i] == null) {
		    printCard(cardButtons[i], deck[nextCard]);
		    cards[i] = deck[nextCard];
		    nextCard++;
		    cardsLeft--;
		    if (cardsLeft == 0) {
			nextLabel.setText("");
			score();
			blah.setText("Score: ");
			nextLabel.setForeground(Color.blue);
			nextLabel.setText(String.valueOf(score));
			nextLabel.setIcon(null);
		    } else
			printCard(nextLabel, deck[nextCard]);
		}
	    }
	}
    }

    void score() {
	Card[] curcards = new Card[5];

	// rows
	for (int i=0; i<5; i++) {
	    for (int j=0; j<5; j++) {
		curcards[j] = cards[5*i+j];
	    }
	    score(curcards, rowHands[i]);
	}
	
	// cols
	for (int i=0; i<5; i++) {
	    for (int j=0; j<5; j++) {
		curcards[j] = cards[5*j+i];
	    }
	    score(curcards, colHands[i]);
	}
    }

    void score(Card[] cards, JTextArea label) {

	// flush
	boolean flush = true;

	String suit = cards[0].suit;
	for (int i=1; i<5; i++) {
	    if (!cards[i].suit.equals(suit)) {
		flush = false;
		break;
	    }
	}

	int[] nums = new int[5];
	for (int i=0; i<5; i++)
	    nums[i] = cards[i].num % 13;
	// selection sort
	for (int i=0; i<4; i++) {
	    int min = i;
	    for (int j=i; j<5; j++) {
		if (nums[j] < nums[min])
		    min = j;
	    }
	    int temp = nums[i];
	    nums[i] = nums[min];
	    nums[min] = temp;
	}

	// four
	boolean fourKind = false;
	for (int i=0; i<2; i++) {
	    int match = nums[i];
	    fourKind = true;
	    for (int j=i; j<i+4; j++) {
		if (nums[j] != match) {
		    fourKind = false;
		    break;
		}
	    }
	    if (fourKind)
		break;
	}

	// straight
	boolean straight = false;

	if (nums[0] <= 8) {
	    straight = true;
	    for (int i=1; i<5; i++) {
		if (nums[i] != nums[i-1] + 1) {
		    straight = false;
		    break;
		}
	    }
	} 
	if (nums[0] == 0 && nums[1] == 9 && nums[2] == 10 &&
	    nums[3] == 11 && nums[4] == 12) {
	    straight = true;
	}
	
	// three
	boolean three = false;
	if (nums[0] == nums[1] && nums[0] == nums[2] ||
	    nums[1] == nums[2] && nums[1] == nums[3] ||
	    nums[2] == nums[3] && nums[2] == nums[4])
	    three = true;
	
	// house
	boolean house = false;
	if (nums[0] == nums[1] && nums[0] == nums[2] && nums[3] == nums[4] ||
	    nums[0] == nums[1] && nums[2] == nums[3] && nums[2] == nums[4])
	    house = true;

	// two pair
	boolean two = false;
	if (nums[0] == nums[1] && (nums[2] == nums[3] || nums[3] == nums[4]) ||
	    nums[1] == nums[2] && nums[3] == nums[4])
	    two = true;

	if (straight && flush) {
	    label.setText("Straight Flush\n40 points");
	    score += 40;
	}
	else if (fourKind) {
	    label.setText("4 of a Kind\n35 points");
	    score += 35;
	}
	else if (house) {
	    label.setText("Full House\n30 points");
	    score += 30;
	}
	else if (flush) {
	    label.setText("Flush\n20 points");
	    score += 20;
	}
	else if (straight) {
	    label.setText("Straight\n20 points");
	    score += 20;
	}
	else if (three) {
	    label.setText("3 of a Kind\n15 points");
	    score += 15;
	}
	else if (two) {
	    label.setText("Two Pair\n10 points");
	    score += 10;
	}
    }

    void printCard(JComponent comp, Card card) {
	if (card.suit.equals("S") || card.suit.equals("C"))
	    comp.setForeground(Color.black);
	else
	    comp.setForeground(Color.red);

	if (comp instanceof AbstractButton) {
	    ((AbstractButton)comp).setText(card.rank);
	    ((AbstractButton)comp).setIcon(new ImageIcon(getURL(card.suit + ".gif")));
	}
	else if (comp instanceof JLabel) {
	    ((JLabel)comp).setText(card.rank);
	    ((JLabel)comp).setIcon(new ImageIcon(getURL(card.suit + ".gif")));
	}
    }

    void shuffle() {
	if (deck == null)
	    deck = new Card[52];

	Random rand = new Random();
	int[] nums = new int[52];
	for (int k=0; k<52; k++)
	    nums[k] = k;

	for (int j=0; j<52; j++) {

	    deck[j] = new Card();

	    int r = rand.nextInt(52-j);
	    int i = nums[r];
	    nums[r] = nums[51-j];

	    // debug
//  	    if (j==0) i = 16;
//  	    if (j==1) i = 3;
//  	    if (j==2) i = 29;
//  	    if (j==3) i = 12;
//  	    if (j==4) i = 25;
//  	    if (j==5) i = 17;
//  	    if (j==6) i = 30;
//  	    if (j==7) i = 43;
//  	    if (j==8) i = 10;
//  	    if (j==9) i = 23;

	    deck[j].num = i;

	    switch (i % 13) {

	    case 0:  deck[j].rank = "A"; break;
	    case 10: deck[j].rank = "J"; break;
	    case 11: deck[j].rank = "Q"; break;
	    case 12: deck[j].rank = "K"; break;
	    default: deck[j].rank = String.valueOf(i % 13 + 1);

	    }

	    if (i < 13)
		deck[j].suit = "S";
	    else if (i < 26)
		deck[j].suit = "C";
	    else if (i < 39)
		deck[j].suit = "H";
	    else
		deck[j].suit = "D";
	}
    }

    protected URL getURL(String filename) {
        URL codeBase = this.getCodeBase();
        URL url = null;         

	try {
            url = new URL(codeBase, filename);
        } catch (java.net.MalformedURLException e) {
            System.out.println("Couldn't create image: "
			       + "badly specified URL");
            return null;
        }

	return url;
    }
}

class Card {
    public int num;
    public String rank;
    public String suit;
}