2021-10-04 FSM 前进+dig+fall+splat

module top_module(
    input clk,
    input areset,    // Freshly brainwashed Lemmings walk left.
    input bump_left,
    input bump_right,
    input ground,
    input dig,
    output walk_left,
    output walk_right,
    output aaah,
    output digging ); 

    parameter left = 0, right = 1, fall_l = 2, fall_r = 3, dig_l = 4, dig_r = 5, splat = 6;
    reg [31:0] count;
    reg [2:0] state, next_state;
    
    always @(*) begin
        case (state)
            left : next_state = ~ground? fall_l : (dig? dig_l : (bump_left? right : left));
            right : next_state = ~ground? fall_r : (dig? dig_r : (bump_right? left : right));
            dig_l : next_state = ~ground? fall_l : dig_l;
            dig_r : next_state = ~ground? fall_r : dig_r;
            fall_l : next_state = ~ground? fall_l : ((count > 19)? splat : left);
            fall_r : next_state = ~ground? fall_r : ((count > 19)? splat : right);
            splat : next_state = splat;
        endcase
    end
   
    
    always @(posedge clk or posedge areset) begin
        if (areset) begin
            state <= left;
        	count <= 0;
        end
        
        else if (state == fall_l | state == fall_r) begin
            state <= next_state;
            count <= count + 1;
        end
        
        else begin
            state <= next_state;
            count <= 0;
        end
    end
    
    assign walk_left = (state == left);
    assign walk_right = (state == right);
    assign aaah = (state == fall_l || state == fall_r);
    assign digging = (state == dig_l || state == dig_r);
  
endmodule