berserkAttackClub :: EntThink
berserkAttackClub =
  GenericEntThink "berserk_attack_club" $ \selfRef -> do
    self <- readRef selfRef

    r <- Lib.rand
    let n = r `mod` 6 + 5
        aim = V3 (fromIntegral Constants.meleeDistance) (self^.eMins._x) (-4)

    void $ GameWeapon.fireHit selfRef aim (fromIntegral n) 400 -- slower attack
    return True
berserkAttackClub :: EntThink
berserkAttackClub =
  GenericEntThink "berserk_attack_club" $ \selfRef -> do
    self <- readRef selfRef

    r <- Lib.rand
    let n = r `mod` 6 + 5
        aim = V3 (fromIntegral Constants.meleeDistance) (self^.eMins._x) (-4)

    void $ GameWeapon.fireHit selfRef aim (fromIntegral n) 400 -- slower attack
    return True
berserkAttackClub =
  GenericEntThink "berserk_attack_club" $ \selfRef -> do
    self <- readRef selfRef

    r <- Lib.rand
    let n = r `mod` 6 + 5
        aim = V3 (fromIntegral Constants.meleeDistance) (self^.eMins._x) (-4)

    void $ GameWeapon.fireHit selfRef aim (fromIntegral n) 400 -- slower attack
    return True