module QuadSPIs (
    input Clk_i,
    input Rst_i,

    input Sck_i,
    input Ss_i,
    input Mosi0_i,
    input Mosi1_i,
    input Mosi2_i,
    input Mosi3_i,

    input [1:0] WidthSel_i,
    input EnEdge_i,
    input PulsePol_i,

    output reg [23:0] Data_o,
    output reg [7:0] Addr_o,
    output reg Val_o
);

//================================================================================
//	REG/WIRE
//================================================================================

reg ssReg;
reg ssRegR; 
reg SckReg; 
reg [7:0] addrReg;
reg [7:0] shiftReg0;
reg [7:0] shiftReg1;
reg [7:0] shiftReg2;

reg [7:0] shiftReg0M;
reg [7:0] shiftReg1M;
reg [7:0] shiftReg2M;
reg [7:0] addrRegM;

reg Sck;

//===============================================================================
//  ASSIGNMENTS




//================================================================================
//	CODING
//================================================================================
always @(*) begin 
    if (PulsePol_i) begin 
        if (EnEdge_i) begin 
            assign Sck = ~Sck_i;
        end
        else begin 
            assign Sck = Sck_i;
        end
    end
    else begin 
        if (EnEdge_i) begin 
            assign Sck = Sck_i;
        end
        else begin 
            assign Sck = ~Sck_i;
        end
    end
end
always @(posedge Sck) begin 
    if (Rst_i) begin 
        SckReg <= 1'b0;
    end
    else begin 
        SckReg <= Sck;
    end
end


always	@(posedge	Clk_i)	begin
	ssReg	<=	Ss_i;
	ssRegR	<=	ssReg;
end


always @(*) begin 
    if (Rst_i) begin
        addrRegM = 8'h0; 
        shiftReg0M = 8'h0;
        shiftReg1M = 8'h0;
        shiftReg2M = 8'h0;
    end
    else begin 
        case(WidthSel_i)  
             0: begin 
                addrRegM   = addrReg  [1:0];
                shiftReg0M = shiftReg0[1:0];
                shiftReg1M = shiftReg1[1:0];
                shiftReg2M = shiftReg2[1:0];
            end
            1: begin 
                addrRegM   = addrReg  [3:0];
                shiftReg0M = shiftReg0[3:0];
                shiftReg1M = shiftReg1[3:0];
                shiftReg2M = shiftReg2[3:0];
            end
            2: begin 
                addrRegM   = addrReg  [5:0];
                shiftReg0M = shiftReg0[5:0];
                shiftReg1M = shiftReg1[5:0];
                shiftReg2M = shiftReg2[5:0];
            end
            3: begin 
                addrRegM   = addrReg  [7:0];
                shiftReg0M = shiftReg0[7:0];
                shiftReg1M = shiftReg1[7:0];
                shiftReg2M = shiftReg2[7:0];
            end
        endcase
    end
end



always @(posedge Clk_i) begin 
    if (Rst_i) begin 
        Data_o <= 24'h0;
    end
    else begin 
        if (ssReg && !ssRegR) begin 
            Data_o <= {shiftReg2M, shiftReg1M, shiftReg0M};
        end
        else begin 
            Data_o <= 24'h0;
        end
    end
end

always @(posedge Clk_i) begin 
    if (Rst_i) begin 
        Addr_o <= 8'h0;
    end
    else begin 
        if (ssReg && !ssRegR) begin 
            Addr_o <= addrRegM;
        end
    end
end


always @(posedge Sck) begin 
    if (Rst_i) begin 
        shiftReg0 <= 8'h0;
    end
    else begin 
        if (!Ss_i) begin 
            shiftReg0 <= {shiftReg0[6:0], Mosi0_i};
        end
        else begin 
            shiftReg0 <= 8'h0;
        end
    end
end


always @(posedge Sck ) begin 
    if (Rst_i) begin 
        shiftReg1 <= 8'h0;
    end
    else begin 
        if (!Ss_i) begin 
            shiftReg1 <= {shiftReg1[6:0], Mosi1_i};
        end
        else begin 
            shiftReg1 <= 8'h0;
        end
    end
end


always @(posedge Sck ) begin 
    if (Rst_i) begin 
        shiftReg2 <= 8'h0;
    end
    else begin 
        if (!Ss_i) begin 
            shiftReg2 <= {shiftReg2[6:0], Mosi2_i};
        end
        else begin 
            shiftReg2 <= 8'h0;
        end
    end
end


always @(posedge Sck ) begin 
    if (Rst_i) begin 
        addrReg <= 8'h0;
    end
    else begin 
        if (!Ss_i) begin 
            addrReg <= {addrReg[6:0], Mosi3_i};
        end
        else begin 
            addrReg <= 8'h0;
        end
    end
end



always @(posedge Clk_i) begin 
    if (ssReg && !ssRegR) begin 
        Val_o <= 1'b1;
    end
    else begin 
        Val_o <= 1'b0;
    end
end




endmodule