Miroirs/hp-saturn
1
0
Fork 0
mirror of https://github.com/sxpert/hp-saturn synced 2025-01-30 08:34:36 +01:00
Code Issues Projects Releases Packages Wiki Activity

oops, LSB first

Browse source
This commit is contained in:
Raphael Jacquot 2019-03-04 15:15:11 +01:00
parent 5716904ac8
commit fcea35b4cb
1 changed files with 9 additions and 9 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

18
saturn_serial.v
View file

@ -64,29 +64,29 @@ reg [9:0] data_reg;
reg [12:0] bit_delay; reg [12:0] bit_delay;
initial begin initial begin
bit_delay <= `BIT_DELAY_START; bit_delay = `BIT_DELAY_START;
clocking_reg <= {10{1'b1}}; clocking_reg = {10{1'b1}};
data_reg <= {10{1'b1}}; data_reg = {10{1'b1}};
end end
assign o_serial_busy = !clocking_reg[9]; assign o_serial_busy = !clocking_reg[0];
assign o_serial_tx = data_reg[9]; assign o_serial_tx = data_reg[0];
always @(posedge i_clk) begin always @(posedge i_clk) begin
bit_delay <= bit_delay + 13'd1;
// $display("%0d", bit_delay); // $display("%0d", bit_delay);
if (i_char_valid && !o_serial_busy) begin if (i_char_valid && !o_serial_busy) begin
$display("serial storing char %c", i_char_to_send); $display("serial storing char %c", i_char_to_send);
clocking_reg <= 10'b0; clocking_reg <= 10'b0;
data_reg <= { 1'b0, i_char_to_send, 1'b1 }; data_reg <= { 1'b1, i_char_to_send, 1'b0 };
bit_delay <= `BIT_DELAY_START; bit_delay <= `BIT_DELAY_START;
end end
if (!i_char_valid && o_serial_busy && bit_delay[`BIT_DELAY_TEST]) begin if (!i_char_valid && o_serial_busy && bit_delay[`BIT_DELAY_TEST]) begin
$display("%b %b", o_serial_tx, data_reg); $display("%b %b", o_serial_tx, data_reg);
clocking_reg <= { clocking_reg[8:0], 1'b1}; clocking_reg <= { 1'b1, clocking_reg[9:1] };
data_reg <= { data_reg[8:0], 1'b1}; data_reg <= { 1'b1, data_reg[9:1] };
bit_delay <= `BIT_DELAY_START; bit_delay <= `BIT_DELAY_START;
end end
bit_delay <= bit_delay + 13'd1;
end end
endmodule endmodule