module piso4 (
input CLK,
input RST,
input LOAD,
input [3:0] D,
output reg serial_out
);
// Write your code here
reg [3:0] SR;
always @(posedge CLK or posedge RST) begin
if (RST) begin
SR <= 0;
serial_out <= 0;
end else if (LOAD) begin
SR <= D;
end else begin
serial_out <= SR[0];
SR <= {1'b0,SR[3:1]};
end
end
endmodule