Html 引导内容选项卡自动幻灯片

我有一个具有滑动效果的引导内容选项卡。我需要让这个标签每4秒自动滑动一次。如何使其自动滑动以及相应地更改选项卡菜单的活动状态

这是密码

$('.tabs-slider a[data-toggle="tab"]').on('hide.bs.tab', function (e) {
        var $old_tab = $($(e.target).attr("href"));
        var $new_tab = $($(e.relatedTarget).attr("href"));

        if($new_tab.index() < $old_tab.index()){
            $old_tab.css('position', 'relative').css("right", "0").show();
            $old_tab.animate({"right":"-100%"}, 300, function () {
                $old_tab.css("right", 0).removeAttr("style");
            });
        }
        else {
            $old_tab.css('position', 'relative').css("left", "0").show();
            $old_tab.animate({"left":"-100%"}, 300, function () {
                $old_tab.css("left", 0).removeAttr("style");
            });
        }
    });

    $('.tabs-slider a[data-toggle="tab"]').on('show.bs.tab', function (e) {
        var $new_tab = $($(e.target).attr("href"));
        var $old_tab = $($(e.relatedTarget).attr("href"));

        if($new_tab.index() > $old_tab.index()){
            $new_tab.css('position', 'relative').css("right", "-2500px");
            $new_tab.animate({"right":"0"}, 300);
        }
        else {
            $new_tab.css('position', 'relative').css("left", "-2500px");
            $new_tab.animate({"left":"0"}, 300);
        }
    });

    $('.tabs-slider a[data-toggle="tab"]').on('shown.bs.tab', function (e) {
        // your code on active tab shown
    });

$（'.tabs滑块a[data toggle=“tab”]'）。打开（'hide.bs.tab'，函数（e）{
var$old_tab=$（$（e.target）.attr（“href”）；
var$new_tab=$（$（e.relatedTarget）.attr（“href”）；
如果（$new\u tab.index（）<$old\u tab.index（））{
$old_tab.css（'position'，'relative'）.css（“right”，“0”）.show（）；
$old_tab.animate（{“right”：“-100%”），300，函数（）{
$old_tab.css（“右”，0）.removeAttr（“样式”）；
});
}
否则{
$old_tab.css（'position'，'relative'）.css（“left”，“0”）.show（）；
$old_tab.animate（{“left”：“-100%”），300，函数（）{
$old_tab.css（“左”，0）.removeAttr（“样式”）；
});
}
});
$（'.tabs滑块a[data toggle=“tab”]'）。打开（'show.bs.tab'，函数（e）{
var$new_tab=$（$（e.target）.attr（“href”）；
var$old_tab=$（$（e.relatedTarget）.attr（“href”）；
如果（$new_tab.index（）>$old_tab.index（））{
$new_tab.css（'position'，'relative'）.css（'right'，“-2500px”）；
$new_tab.animate（{“right”：“0”}，300）；
}
否则{
$new_tab.css（'position'，'relative'）.css（'left'，“-2500px”）；
$new_tab.animate（{“left”：“0”}，300）；
}
});
$（'.tabs滑块a[data toggle=“tab”]'）。打开（'show.bs.tab'，函数（e）{
//显示“活动”选项卡上的代码
});