[罗技硬件宏脚本] 野蛮人6+2全自动旋风斩，完美版II(8月31日更新)

暗夜飞翔

MX518启动不了
去掉键盘和第三个END好了

暗夜飞翔

mu8951 发表于 2015-6-21 11:27
第3个end是22行那个吗

从上往下数第三个

暗夜飞翔

mu8951 发表于 2015-6-21 16:07
都改了，哎，不知道哪儿出问题了

你试试这个
----鼠标左键->旋风斩

----鼠标右键->威吓呐喊

----Q键->无视痛苦

----W键->战斗怒火

----E键->狂暴者之怒

----R键->战吼


Barbarian_Macro_LoopInterval = 10 --脚本循环间隔（毫秒）


function OnEvent(event, arg, family)

    if (event == "MOUSE_BUTTON_PRESSED" and arg == 3) then --3为罗技鼠标中键

        --如果CapsLock键未按下，则按下并释放CapsLock键

        if not (IsKeyLockOn("capslock")) then
            PressAndReleaseKey("capslock")
            Sleep(10)
        end

        Barbarian_Macro_FullyAuto() --V2.2野蛮人6+2全自动左键旋风斩

    end
end

function Barbarian_Macro_FullyAuto()
    --按下并释放Q键（战吼）、W键（无视苦痛）、E键（狂暴者之怒）

    PressAndReleaseKey("q", "w", "e", "r")

    --Shift键（右）+鼠标左键（启动左键旋风斩）

    PressKey("rshift")
    PressMouseButton(1)
    Sleep(10)
    ReleaseKey("rshift")
    Left_Mouse_Button_Pressed = true --鼠标左键已按下


    Times_Key_Q = 0
    Times_Key_W = 0
    Times_Key_E= 0
    Times_Key_R= 0

    --如果CapsLock键已按下则启动循环，否则退出循环

    while (IsKeyLockOn("capslock")) do               
        Sleep(Barbarian_Macro_LoopInterval) --循环间隔


        Times_Key_Q = Times_Key_Q + 1
        Times_Key_W = Times_Key_W + 1
        Times_Key_E = Times_Key_E + 1
        Times_Key_R = Times_Key_R + 1

        --每10秒按下并释放Q键

        if ((Times_Key_Q*Barbarian_Macro_LoopInterval) == 10000) then
            PressAndReleaseKey("q")
            Times_Key_Q = 0
        end

        --每115秒按下并释放W键

        if ((Times_Key_W*Barbarian_Macro_LoopInterval) == 115000) then
            PressAndReleaseKey("w")
            Times_Key_W = 0
        end

        --每20秒按下并释放E键

        if ((Times_Key_E*Barbarian_Macro_LoopInterval) == 20000) then
            PressAndReleaseKey("e")
            Times_Key_E = 0
        end

        --每55秒按下并释放R键
        if ((Times_Key_R*Barbarian_Macro_LoopInterval) == 55000) then
            PressAndReleaseKey("r")
            Times_Key_R = 0
        end

        --在鼠标左键已按下未释放时（左键旋风斩中），

        --按住Alt键（左）则释放鼠标左键（暂停左键旋风斩），

        --释放Alt键（左）则重新按下Shift键（右）+鼠标左键（启动左键旋风斩）

        if (IsModifierPressed("lalt")) then
            if (Left_Mouse_Button_Pressed) then
                ReleaseMouseButton(1)
                Left_Mouse_Button_Pressed = false --鼠标左键未按下

            end
        else
            if not (Left_Mouse_Button_Pressed) then
                PressKey("rshift")
                PressMouseButton(1)
                Sleep(10)
                ReleaseKey("rshift")
                Left_Mouse_Button_Pressed = true --鼠标左键已按下

            end
        end
    end

    --循环结束，释放鼠标左键

    ReleaseMouseButton(1)
end

暗夜飞翔

鼠标左键-先祖召唤，鼠标右键-旋风斩，Q键-无视痛苦，W键-战斗怒火，E键-狂暴者之怒，R键-威吓呐喊，中键启动完美运行

Barbarian_Macro_LoopInterval = 10


function OnEvent(event, arg, family)

    if (event == "MOUSE_BUTTON_PRESSED" and arg == 3) then


        if not (IsKeyLockOn("capslock")) then
            PressAndReleaseKey("capslock")
            Sleep(10)
        end

        Barbarian_Macro_FullyAuto()

    end
end

function Barbarian_Macro_FullyAuto()

    PressAndReleaseKey("q", "w", "e", "r")

    PressMouseButton(3)
    Right_Mouse_Button_Pressed = true

    Times_Key_Q = 0
    Times_Key_W = 0
    Times_Key_E= 0
    Times_Key_R= 0


    while (IsKeyLockOn("capslock")) do               
        Sleep(Barbarian_Macro_LoopInterval)


        Times_Key_Q = Times_Key_Q + 1
        Times_Key_W = Times_Key_W + 1
        Times_Key_E = Times_Key_E + 1
        Times_Key_R = Times_Key_R + 1


        if ((Times_Key_Q*Barbarian_Macro_LoopInterval) == 10000) then
            PressAndReleaseKey("q")
            Times_Key_Q = 0
        end


        if ((Times_Key_W*Barbarian_Macro_LoopInterval) == 115000) then
            PressAndReleaseKey("w")
            Times_Key_W = 0
        end


        if ((Times_Key_E*Barbarian_Macro_LoopInterval) == 20000) then
            PressAndReleaseKey("e")
            Times_Key_E = 0
        end


        if ((Times_Key_R*Barbarian_Macro_LoopInterval) == 15000) then
            PressAndReleaseKey("r")
            Times_Key_R = 0
        end

        if (IsModifierPressed("lalt")) then
            if (Right_Mouse_Button_Pressed) then
                ReleaseMouseButton(3)
                Right_Mouse_Button_Pressed = false
            end
        else
            if not (Right_Mouse_Button_Pressed) then
                PressMouseButton(3)
                Right_Mouse_Button_Pressed = true
            end
        end
    end

    ReleaseMouseButton(3)
end