// Play.java
// Part of Tetris.java, V1.0
// Sunday, Oct. 1, 2000, by Yamin Li, yamin@k.hosei.ac.jp
// Free to use, modify, and distribute.

import java.awt.*;

class Play extends Canvas {
    private static final int rows=20;
    private static final int cols=10;
    private static final int size=20;
    private static final Color empty=Color.darkGray;
    private static final Color shapeColor[]={
        Color.cyan, Color.pink, Color.green, Color.orange,
        Color.red, new Color(127,127,255), Color.magenta};
    private boolean leftOutSide=false, rightOutSide=false, upOutSide=false;
    private boolean noPlace=false, drop=false, gameOver=false;
    private int score=0, level=0, lines=0, delay=300;
    private int shapeType=0, currentDirection=0, tryDirection=0;
    private int tryPositionX=5, tryPositionY=1;
    private int tryX[], tryY[];
    private int currentPositionX=5, currentPositionY=0;
    private int currentX[], currentY[];
    private Image displayBuffer;
    private Graphics drawingBuffer;
    private Color playArea[][];
    private Color myColor;

    public void initialize(){
        setSize(cols*size+100, rows*size);
        displayBuffer=createImage(cols*size+100, rows*size);
        drawingBuffer=displayBuffer.getGraphics();
        playArea=new Color[rows+2][cols];
        tryX=new int[Shape.pieces];
        tryY=new int[Shape.pieces];
        currentX=new int[Shape.pieces];
        currentY=new int[Shape.pieces];
        drop=false;
        score=0;
        level=0;
        lines=0;
        clearPlayArea();
        myColor=new Color(0x1f, 0xbf, 0xaf);
        generateNewBlock();
    }

    public void paint(Graphics g){
        int i, j;
        for(i=0; i<rows; i++){
            for(j=0; j<cols; j++){
                drawingBuffer.setColor(playArea[i][j]);
                drawingBuffer.fill3DRect(j*size, i*size, size, size, true);
            }
        }
        drawingBuffer.setColor(myColor);
        drawingBuffer.fillRect(cols*size,0,100,rows*size);
        drawingBuffer.setColor(Color.yellow);
        drawingBuffer.setFont(new Font("Sansserif", Font.BOLD,20));
        drawingBuffer.drawString("TETRIS", cols*size+8, 30);
        drawingBuffer.setColor(Color.blue);
        drawingBuffer.setFont(new Font("Sansserif", Font.BOLD,12));
        drawingBuffer.drawString("J, L: Shift", cols*size+8, 80);
        drawingBuffer.drawString("I, K: Rotate", cols*size+10, 100);
        drawingBuffer.drawString("SPACE: Drop", cols*size+8, 120);
        drawingBuffer.setFont(new Font("Sansserif", Font.BOLD,14));
        drawingBuffer.drawString("LEVEL: "+Integer.toString(level), cols*size+8, rows*size-80);
        drawingBuffer.drawString("LINES: "+Integer.toString(lines), cols*size+8, rows*size-60);
        drawingBuffer.drawString("SCORE: "+Integer.toString(score), cols*size+8, rows*size-40);
        g.drawImage(displayBuffer,0,0,this);
    }

    public void update(Graphics g){
        paint(g);
    }

    public void game(int keycode){
        int i;
        if (gameOver){
            if (keycode==0x53){ //'S'
                clearPlayArea();
                score=0;
                level=0;
                lines=0;
                delay=300;
                gameOver=false;
            }
            return;
        }
        if (!drop){
            for(i=0; i<Shape.pieces; i++)
                playArea[currentY[i]][currentX[i]]=empty;
        } else {
            if (removeLines()) repaint();
            generateNewBlock();
            drop=false;
            return;
        }
        tryPositionX=currentPositionX;
        tryPositionY=currentPositionY;
        tryDirection=currentDirection;
        if ((keycode==0x49)||(keycode==0x26)){ // 'I' or UpArrow
            tryDirection=(currentDirection+3)%4;
            checkPlace();
        } else if ((keycode==0x4b)||(keycode==0x28)){ // 'K' or DownArrow
            tryDirection=(currentDirection+1)%4;
            checkPlace();
        } else if ((keycode==0x4a)||(keycode==0x25)){ // 'J' or LeftArrow
            tryPositionX=currentPositionX-1;
            checkPlace();
        } else if ((keycode==0x4c)||(keycode==0x27)){ // 'L' or RightArrow
            tryPositionX=currentPositionX+1;
            checkPlace();
        } else if (keycode==0x20){ // Space
            while(!drop){
                tryPositionX=currentPositionX;
                tryPositionY=currentPositionY+1;
                tryDirection=currentDirection;
                checkPlace();
                checkDrop();
            }
        } else {
            tryPositionY=currentPositionY+1;
            checkPlace();
            checkDrop();
        }
        for(i=0; i<Shape.pieces; i++){
            playArea[currentY[i]][currentX[i]]=shapeColor[shapeType];
        }
        repaint();
    }

    public void checkPlace(){
        int i;
        for(i=0; i<Shape.pieces; i++){
            tryX[i]=tryPositionX+Shape.X[shapeType][tryDirection][i];
            tryY[i]=tryPositionY+Shape.Y[shapeType][tryDirection][i];
        }
        int d=0;
        leftOutSide=false;
        for(i=0; i<Shape.pieces; i++)
            if (tryX[i]<0){
                leftOutSide=true;
                if (-tryX[i]>d)
                    d=-tryX[i];
            }
        if (leftOutSide){
            for(i=0; i<Shape.pieces; i++)
                tryX[i]+=d;
            tryPositionX+=d;
        }
        d=0;
        rightOutSide=false;
        for(i=0; i<Shape.pieces; i++)
            if (tryX[i]>(cols-1)){
                rightOutSide=true;
                if ((tryX[i]-(cols-1))>d)
                    d=tryX[i]-(cols-1);
            }
        if (rightOutSide){
            for(i=0; i<Shape.pieces; i++)
               tryX[i]-=d;
            tryPositionX-=d;
        }
        d=0;
        upOutSide=false;
        for(i=0; i<Shape.pieces; i++)
            if (tryY[i]<0){
                upOutSide=true;
                if (-tryY[i]>d)
                    d=-tryY[i];
            }
        if (upOutSide){
            for(i=0; i<Shape.pieces; i++)
                tryY[i]+=d;
            tryPositionY+=d;
        }
        noPlace=false;
        for(i=0; i<Shape.pieces; i++){
            if (playArea[tryY[i]][tryX[i]]!=empty){
                noPlace=true;
            }
        }
        if (!noPlace){
            for(i=0; i<Shape.pieces; i++){
                currentX[i]=tryX[i];
                currentY[i]=tryY[i];
            }
            currentPositionX=tryPositionX;
            currentPositionY=tryPositionY;
            currentDirection=tryDirection;
        }
    }

    public void checkDrop(){
        drop=false;
        for(int i=0; i<Shape.pieces; i++){
            if (playArea[tryY[i]][tryX[i]]!=empty){
                drop=true;
                break;
            }
        }
    }

    public void generateNewBlock(){
        currentDirection=0;
        currentPositionX=5;
        currentPositionY=0;
        shapeType=(int)(Math.random()*Shape.numbers);
        gameOver=false;
        for(int i=0; i<Shape.pieces; i++){
            currentX[i]=currentPositionX+Shape.X[shapeType][0][i];
            currentY[i]=currentPositionY+Shape.Y[shapeType][0][i];
            if (playArea[currentY[i]][currentX[i]]!=empty){
                gameOver=true;
                delay=1000;
            }
        }
    }

    public boolean removeLines(){
        int i, j, k;
        int dropLines=0;
        boolean removed=false;
        for(i=rows-1; i>0; i--){
            boolean removeThisLine=true;
            for(j=0; j<cols; j++){
                if (playArea[i][j]==empty)
                    removeThisLine=false;
            }
            if (removeThisLine){
                dropLines++;
                removed=true;
                for(k=i; k>0; k--)
                    for(j=0; j<cols; j++){
                        playArea[k][j]=playArea[k-1][j];
                        if ((k-1)==0) playArea[k-1][j]=empty;
                    }
                i++;
            }
        }
        switch(dropLines){
            case 1: score+=1; break;
            case 2: score+=3; break;
            case 3: score+=5; break;
            case 4: score+=8; break;
        }
        lines+=dropLines;
        level=lines>>4;
        return(removed);
    }

    public void clearPlayArea(){
        int i, j;
        for(i=0; i<rows; i++){
            for(j=0; j<cols; j++){
                playArea[i][j]=empty;
            }
        }
        for(j=0; j<cols; j++){
            playArea[rows][j]=shapeColor[0];
        }
    }

    public boolean getOver(){
        return(gameOver);
    }

    public int getSleepTime(){
        return(delay-level*20);
    }
}