分享一个dh 蛮子 通用旋风全自动鼠标宏 解放双手 g502鼠标的

征战天下杀杀杀

根据某个大佬的宏自己改的，有双侧键鼠标的应该都可以用，本人没有测试。现在可以dh和蛮子旋风通用，现在是发的是dh的， 鼠标宏包含了一键分解，一键赌博，一键拾取。蛮子的只需要编辑脚本，调整技能时间就行。dh 技能位置一定要一样！！！，dh 建议进门先按追踪箭叠满buff再开宏。更新!这次是真正的解放双手！追踪箭不会断！只移动鼠标就行！ 附件只能网页版看得见APP看不到，以下是代码（此代码是dh冰吞宏，修改技能位置和时间 就是旋风宏了）---------------------------------------------------玩家设置-----------------------------------------------
--按G5开宏，capslock键灯亮 ，再按G5关宏，capslock键灯灭；capslock灯灭不影响G4功能，不影响一键分解赌博。
--左ctrl+G3(中键）一键分解；左ctrl+右键一键赌博；左ctrl+左键一键拾取。
--开宏后，右键持续扫射，按住左alt暂停，松开恢复（推荐用G4连续左键实现拾取功能)。1-4键盘及左键自动施放。
--1键复仇0.05秒按1次，2键吞噬剑1.5秒1次，3键无敌0.5秒1次，4键战宠0.05秒1次，左键0.05秒1次，可根据自己技能和打法习惯更换，1秒=1000。
--自动拾取，可以自己录一个连续左键放在G4，互不影响，同时用很爽。
---------------------------------------------------全局设置-----------------------------------------------
EnablePrimaryMouseButtonEvents (true)

--分解
function FenJie()
        MoveMouseTo(6000,17000)
        Sleep(100)
        PressAndReleaseMouseButton(1)
        Sleep(50)
        k=0
        while k<60
        do
                X=k%10-- 分解列
                Y=math.floor(k/10)--分解行
                MoveMouseTo(49000+1700*X,36000+3000*Y)
                Sleep(2)
                PressAndReleaseMouseButton(1)
                Sleep(2)
                PressAndReleaseKey("Enter")
                Sleep(2)
                PressAndReleaseMouseButton(1)
                Sleep(2)
                PressAndReleaseKey("Enter")
                Sleep(2)
                k=k+1
        end
end

Xunhuan_Jiange = 10 --循环间隔10毫秒

------------------------------------------------------主程序----------------------------------------------
function OnEvent(event, arg, family)
    if (event == "MOUSE_BUTTON_RELEASED" and arg == 5 and not IsModifierPressed("lctrl")) then --启动宏，罗技鼠标5为侧键前进
        Quanzidong_Xuanfeng()
       end
    if(event=="MOUSE_BUTTON_PRESSED"and arg==3 and IsModifierPressed("lctrl"))then--CTRL+G3键分解
                FenJie()
       end
    if(event=="MOUSE_BUTTON_PRESSED"and arg==2 and IsModifierPressed("lctrl"))then--CTRL+右键赌博
                k=50
                while k>0
                do
                        PressAndReleaseMouseButton(3)
                        Sleep(5)
                        k=k-1
                end
        end
    if(event=="MOUSE_BUTTON_PRESSED"and arg==1 and IsModifierPressed("lctrl"))then--CTRL+左键拾取
                k=25
                while k>0
                do
                        PressAndReleaseMouseButton(1)
                        Sleep(15)
                        k=k-1
                end
        end
end

function Quanzidong_Xuanfeng()
    if (IsKeyLockOn("capslock")) then
        --按下并释放1-4键,如需某按键手动，去掉对应按键数并在下面对应自动释放按键程序前加--，既取消该按键自动施放
        PressAndReleaseKey("1", "2", "3", "4")
        --Shift键（右）+鼠标左键，如冲层需要左键手动，可在下面四句前加--，取消自动施放左键功能
        PressKey("rshift")
        PressAndReleaseMouseButton(1)
        Sleep(10)
        ReleaseKey("rshift")

        --按住鼠标右键（启动右键旋风）
        PressMouseButton(3)
        Alt_Pressed = false

        Times_Key_1 = 0
        Times_Key_2 = 0
        Times_Key_3 = 0
        Times_Key_4 = 0
        Times_Button_LeftMouse = 0
    end

    --如果CapsLock键已按下则启动循环，否则退出循环
    while (IsKeyLockOn("capslock")) do
        Sleep(Xunhuan_Jiange) --循环间隔

        Times_Key_1 = Times_Key_1 + 1
        Times_Key_2 = Times_Key_2 + 1
        Times_Key_3 = Times_Key_3 + 1
        Times_Key_4 = Times_Key_4 + 1
        Times_Button_LeftMouse = Times_Button_LeftMouse + 1

        --每0.06秒按下并释放1键
        if ((Times_Key_1*Xunhuan_Jiange) == 50) then
            PressAndReleaseKey("1")
            Times_Key_1 = 0
        end

        --每2秒按下并释放2键
        if ((Times_Key_2*Xunhuan_Jiange) == 2000) then
            PressAndReleaseKey("2")
            Times_Key_2 = 0
        end

        --每1秒按下并释放3键
        if ((Times_Key_3*Xunhuan_Jiange) == 400) then
            PressAndReleaseKey("3")
            Times_Key_3 = 0
        end

        --每0.05秒按下并释放4键
        if ((Times_Key_4*Xunhuan_Jiange) == 50) then
            PressAndReleaseKey("4")
            Times_Key_4 = 0
        end

        --每0.5秒按下并释放鼠标左键
        if ((Times_Button_LeftMouse*Xunhuan_Jiange) == 500) then
            PressKey("rshift")
            PressAndReleaseMouseButton(1)
            Sleep(10)
            ReleaseKey("rshift")
            Times_Button_LeftMouse = 0
        end

        --按住lalt键暂停持续右键，松开恢复
        if (IsModifierPressed("lalt")) then
            if not (Alt_Pressed) then
                ReleaseMouseButton(3)
                Alt_Pressed = true
            end
        else
            if (Alt_Pressed) then
                PressMouseButton(3)
                Alt_Pressed = false
            elseif not (IsMouseButtonPressed(3)) then
                ReleaseMouseButton(3)
                PressMouseButton(3)
            end
        end
    end

    ReleaseMouseButton(3)
end

征战天下杀杀杀

dolung 发表于 2020-7-6 03:09
謝謝，請問如何錄製-自动拾取，可以自己录一个连续左键放在G4，

不用录制，就按住Ctrl+左键就可以自动拾取

征战天下杀杀杀

阿斯达斯大苏 发表于 2020-7-6 05:25
这个宏能保持17层以上吗？我用别的宏有时候会打一两下左键不叠层

手动叠20层后 开宏 会保持buff

征战天下杀杀杀

一枝独秀丶 发表于 2020-7-6 09:11
从哪里开始复制

脚本如下~冒号后面的全部复制就行了

征战天下杀杀杀

雨湖2 发表于 2020-7-6 11:27
玩暗黑3都要重新买鼠标了，还要学会编程。我才小学文化啊，这不是难为我吗

害 也可以佛系手动玩 就是比较累啊

征战天下杀杀杀

甘尼克斯_ 发表于 2020-7-6 18:57
大佬 左键为什么不自动释放

确实是左键不能自动释放，手动点一下就行了~我也没用弄明白怎么回事，应该是有冲突bug

征战天下杀杀杀

不再怀恋过去 发表于 2020-7-9 14:33
老年人求教  我按步骤弄好了  怎么开启不了。。。。

侧键绑定大写键了吗？

征战天下杀杀杀

战清风 发表于 2020-7-10 13:18
--每0.5秒按下并释放鼠标左键
        if ((Times_Button_LeftMouse*Xunhuan_Jiange) == 0.5) the ...

感谢测试 确实改成500后 解决了问题

征战天下杀杀杀

最新文件已上传，网页版才能看到下载

征战天下杀杀杀

技能位置时间可以自己编辑调换，左键500可以自动，改成0.5 左键不触发

征战天下杀杀杀

不再怀恋过去 发表于 2020-7-9 17:14
知道为什么没用了  我放6号位了   
但是左键技能不放= =！  不知道为什么

左键时间改成500 就可以自动了

征战天下杀杀杀

执剑如初 发表于 2020-7-16 18:13
楼主 请问这个宏在大米里怎么暂停。。。

在按一下侧键停止啊

征战天下杀杀杀

执剑如初 发表于 2020-7-18 21:32
版主 可以私发一下嘛。只要1234 加鼠标左键的。

木有这种 只有我发的这种 我不会写宏，我是根据大佬的哄我，自己修改的