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

diS.Silent

我用的不是F键而是鼠标5键来激活狂暴者之怒，然则
Times_Key_F = Times_Key_F + 1
这类词缀都没有改动，依然暴力循环了……

实在没有心力查找对应词缀了，有多余代码也将就了

随风而化

改完后是这样，但还是启动不了，郁闷了

--脚本按键设置：

----鼠标左键->先祖召唤

----鼠标右键->战斗怒火

----A键->威吓呐喊

----S键->旋风斩

----D键->无视痛苦

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


Barbarian_Macro_LoopInterval = 10

function OnEvent(event, arg, family)
        if (event == "MOUSE_BUTTON_RELEASED" and arg == 3) then

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

function Barbarian_Macro_FullyAuto()
   
    PressAndReleaseMouseButton(2)
        
    PressKey("S")
    S_Alt_Pressed = true
               
    Times_Key_S = 0
    Times_Button_RightMouse = 0

    while (IsKeyLockOn("capslock")) do               
        Sleep(Barbarian_Macro_LoopInterval)
               
        Times_Key_S = Times_Key_S + 1
        Times_Button_RightMouse = Times_Button_RightMouse + 1
               
        
               
        if ((Times_Button_RightMouse*Barbarian_Macro_LoopInterval) == 100000) then
            PressAndReleaseMouseButton(2)
            Times_Button_RightMouse = 0
        end
               
        if (IsModifierPressed("lalt")) then
            if (S_Alt_Pressed) then
                ReleaseKey("S")
                S_Alt_Pressed = false
            end
        else
            if not (S_Alt_Pressed) then
                PressKey("S")
                S_Alt_Pressed = true
            end
          end
       end

     ReleaseKey("d")

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

狂野之弦

随风而化 发表于 2015-6-22 04:41
改完后是这样，但还是启动不了，郁闷了

--脚本按键设置：

1. --脚本按键设置：
   
2. ----鼠标右键->战斗怒火
   
3. ----S键->旋风斩
   
4. 
   
5. Barbarian_Macro_LoopInterval = 10
   
6. 
   
7. function OnEvent(event, arg, family)
   
8.     if (event == "MOUSE_BUTTON_RELEASED" and arg == 3) then
   
9.         if not (IsKeyLockOn("capslock")) then
   
10.             PressAndReleaseKey("capslock")
    
11.             Sleep(10)
    
12.         end
    
13.                
    
14.         Barbarian_Macro_FullyAuto()
    
15.     end
    
16. end
    
17. 
    
18. function Barbarian_Macro_FullyAuto()
    
19. 
    
20.     PressAndReleaseMouseButton(3)
    
21.         
    
22.     PressKey("s")
    
23.     S_Alt_Pressed = true
    
24.                
    
25.     Times_Button_RightMouse = 0
    
26. 
    
27.     while (IsKeyLockOn("capslock")) do               
    
28.         Sleep(Barbarian_Macro_LoopInterval)
    
29.                
    
30.         Times_Button_RightMouse = Times_Button_RightMouse + 1
    
31.                
    
32.         if ((Times_Button_RightMouse*Barbarian_Macro_LoopInterval) == 100000) then
    
33.             PressAndReleaseMouseButton(3)
    
34.             Times_Button_RightMouse = 0
    
35.         end
    
36.                
    
37.         if (IsModifierPressed("lalt")) then
    
38.             if (S_Alt_Pressed) then
    
39.                 ReleaseKey("s")
    
40.                 S_Alt_Pressed = false
    
41.             end
    
42.         else
    
43.             if not (S_Alt_Pressed) then
    
44.                 PressKey("s")
    
45.                 S_Alt_Pressed = true
    
46.             end
    
47.         end
    
48.     end
    
49.         
    
50.     ReleaseKey("s")
    
51. end

复制代码

随风而化

还是不行，启动不了

随风而化

哎，原因找到了，我电脑里装了2个暗黑3，设置到亚服那个去了，现在可以完美中键启动，大写键结束，谢谢楼主不厌其烦指导！

随风而化

--脚本按键设置：
----鼠标右键->战斗怒火
----A键->旋风斩

Barbarian_Macro_LoopInterval = 10

function OnEvent(event, arg, family)
    if (event == "MOUSE_BUTTON_RELEASED" and arg == 3) then
        if not (IsKeyLockOn("capslock")) then
            PressAndReleaseKey("capslock")
            Sleep(10)
        end

        Barbarian_Macro_FullyAuto()
    end
end

function Barbarian_Macro_FullyAuto()

    PressAndReleaseMouseButton(3)

    PressKey("a")
    A_Alt_Pressed = true

    Times_Button_RightMouse = 0

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

        Times_Button_RightMouse = Times_Button_RightMouse + 1

        if ((Times_Button_RightMouse*Barbarian_Macro_LoopInterval) == 100000) then
            PressAndReleaseMouseButton(3)
            Times_Button_RightMouse = 0
        end

        if (IsModifierPressed("lshift")) then
            if (A_Shift_Pressed) then
                ReleaseKey("a")
                A_Shift_Pressed = false
            end
        else
            if not (A_Shift_Pressed) then
                PressKey("a")
                A_Shift_Pressed = true
            end
        end
    end

    ReleaseKey("a")
end



这个脚本已经很完美了！
E、D、F和鼠标左键随你习惯设置，因为嘲讽吼盾墙和狂暴者之怒因为减CD原因不容易设置，刷小米割草的话这3个键有跟没有没什么区别，刷大米这3个键还是手动为佳！

楼主的暂停我设置了左shift键，因为手指放在SDF键上alt键按起来不舒服，原来shift键上的强制原地站立就需要设置到别的按键上去

吟游蛮子

用了  挺好用的。现在一口气刷100次不带喘气的·
顶

很多游戏都不封鼠标键盘宏的，因为鼠键宏能够实现的功能有限。

我研究了半天，没找到鼠标定位的方式，也就是说只能单纯的按键  不能定位坐标

狂野之弦

吟游蛮子 发表于 2015-6-23 17:08
用了  挺好用的。现在一口气刷100次不带喘气的·
顶

罗技脚本有控制鼠标指针定位的接口，可以一键换装，自动移动（很危险哦，封了自负哦）

水青

楼主请问为什么做了个简单的旋风斩宏感觉会卡，好像是快速点鼠标右键一样，麻烦楼主可以帮我做个旋风宏吗？一个健释放技能，在按一个健停止释放技能的宏。

火奴上尉

楼主，你的那个代码，最前面那行，少了一个--。 还是加回去吧。

火奴上尉

可能真的跟左键旋风没有缘分，无论我怎么测试代码，中键和右键都起作用。

怪事，我也把按压下右键那个3改成2，试过，还是不行。

狂野之弦

火奴上尉 发表于 2015-6-24 12:59
可能真的跟左键旋风没有缘分，无论我怎么测试代码，中键和右键都起作用。

怪事，我也把按压下右键那个3 ...

我更新过代码，新的代码也不行吗？ 宏启动的键值3是中键，施放技能的键值3是右键，是反着的