/* lauta6 - Test for Mefisto Board through User Extension Port and Interface. */

module lauta6(CLK,PB_IN,SW_IN,BCOL_IN,BCOL_OUT,BROW,LED_OUT);
input CLK;
input [3:0] PB_IN;
input [7:0] SW_IN;
input [7:0] BCOL_IN;
output [7:0] BCOL_OUT;
output [7:0] BROW;
output [7:0] LED_OUT;


// wire RST = PB_IN[3];


reg [7:0] BOARD_ROW [7:0];

wire [7:0] PIECES_ROW [7:0];



mefi8x8a BOARD_IO(.CLK(CLK),
                  .BCOL_IN(BCOL_IN),
                  .BCOL_OUT(BCOL_OUT),
                  .BROW(BROW),
                  .LEDS2LIT0(BOARD_ROW[0]),
                  .LEDS2LIT1(BOARD_ROW[1]),
                  .LEDS2LIT2(BOARD_ROW[2]),
                  .LEDS2LIT3(BOARD_ROW[3]),
                  .LEDS2LIT4(BOARD_ROW[4]),
                  .LEDS2LIT5(BOARD_ROW[5]),
                  .LEDS2LIT6(BOARD_ROW[6]),
                  .LEDS2LIT7(BOARD_ROW[7]),
                  .PIECES0(PIECES_ROW[0]),
                  .PIECES1(PIECES_ROW[1]),
                  .PIECES2(PIECES_ROW[2]),
                  .PIECES3(PIECES_ROW[3]),
                  .PIECES4(PIECES_ROW[4]),
                  .PIECES5(PIECES_ROW[5]),
                  .PIECES6(PIECES_ROW[6]),
                  .PIECES7(PIECES_ROW[7])
                 );


wire [2:0] shrow = {SW_IN[2],SW_IN[1],SW_IN[0]};

assign LED_OUT = {PIECES_ROW[shrow][0],PIECES_ROW[shrow][1],PIECES_ROW[shrow][2],PIECES_ROW[shrow][3],PIECES_ROW[shrow][4],PIECES_ROW[shrow][5],PIECES_ROW[shrow][6],PIECES_ROW[shrow][7]};

integer i; // A "compile-time" index to board rows. (for the for loop).

always @(posedge CLK)
  begin
// if(RST)
//  begin
//  end
// else
    begin
      for(i=0; i<8; i=i+1) BOARD_ROW[i] = PIECES_ROW[i];
    end
  end

endmodule