| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150 |
- 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,
- output reg [23:0] Data_o,
- output reg [7:0] Addr_o,
- output reg Val_o
- );
- //================================================================================
- // REG/WIRE
- //================================================================================
- reg ssReg;
- reg ssRegR;
- reg RorWFlag;
- reg [3:0] cnt;
- reg [7:0] addrReg;
- reg [7:0] shiftReg0R;
- reg [7:0] shiftReg1R;
- reg [7:0] shiftReg2R;
- reg [7:0] shiftReg0RR;
- reg [7:0] shiftReg1RR;
- reg [7:0] shiftReg2RR;
- reg [7:0] shiftReg0;
- reg [7:0] shiftReg1;
- reg [7:0] shiftReg2;
- //================================================================================
- // CODING
- //================================================================================
- always @(posedge Clk_i) begin
- if (Rst_i) begin
- Data_o <= 24'h0;
- end
- else begin
- if (ssReg && !ssRegR) begin
- Data_o <= {shiftReg2, shiftReg1, shiftReg0};
- 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 <= addrReg;
- end
- end
- end
- always @(posedge Sck_i) 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_i ) 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_i ) 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_i ) 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
- ssReg <= Ss_i;
- ssRegR <= ssReg;
- shiftReg0R <= shiftReg0;
- shiftReg1R <= shiftReg1;
- shiftReg2R <= shiftReg2;
- shiftReg0RR <= shiftReg0R;
- shiftReg1RR <= shiftReg1R;
- shiftReg2RR <= shiftReg2R;
- end
- always @(posedge Clk_i) begin
- if (ssReg && !ssRegR) begin
- Val_o <= 1'b1;
- end
- else begin
- Val_o <= 1'b0;
- end
- end
- endmodule
|