//没登陆

欢迎您来到凯恩之角,奈非天!

帖子:1178

符文:681

跳转到指定楼层
1#
发表于 2020-7-6 01:23:02 |只看该作者 |倒序浏览 来自:云南
本帖最后由 征战天下杀杀杀 于 2020-11-16 12:59 编辑

根据某个大佬的宏自己改的,有双侧键鼠标的应该都可以用,本人没有测试。现在可以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















































更多图片 小图 大图
组图打开中,请稍候......

dh恐惧冰.zip

11.29 KB, 下载次数: 3344

帖子:347

符文:20

2#
感谢分享
发表于 2020-7-6 03:04:42 来自凯恩之角App |只看该作者 来自:重庆

帖子:775

符文:35

3#
謝謝,請問如何錄製-自动拾取,可以自己录一个连续左键放在G4,
发表于 2020-7-6 03:09:06 |只看该作者 来自:中国香港
[armory]http://tw.battle.net/d3/zh/profile/wing-3524/hero/2339545[/armory]

帖子:1178

符文:681

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

不用录制,就按住Ctrl+左键就可以自动拾取
发表于 2020-7-6 04:44:41 来自凯恩之角App |只看该作者 来自:云南

帖子:77

符文:28

5#
这个宏能保持17层以上吗?我用别的宏有时候会打一两下左键不叠层
发表于 2020-7-6 05:25:37 来自凯恩之角App |只看该作者 来自:山东

帖子:1178

符文:681

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

手动叠20层后 开宏 会保持buff
发表于 2020-7-6 05:29:58 来自凯恩之角App |只看该作者 来自:云南

帖子:525

符文:566

7#
晚上试一下这个全自动的,自己录了个1234的要按住右键,时间长了也不舒服
发表于 2020-7-6 05:53:11 来自凯恩之角App |只看该作者 来自:湖北

帖子:88

符文:47

8#
从哪里开始复制
发表于 2020-7-6 09:11:18 来自凯恩之角App |只看该作者 来自:北京

帖子:1178

符文:681

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

脚本如下~冒号后面的全部复制就行了
发表于 2020-7-6 09:56:17 来自凯恩之角App |只看该作者 来自:云南

帖子:38

符文:88

10#
看到宏代码就兴奋
发表于 2020-7-6 10:55:10 来自凯恩之角App |只看该作者 来自:陕西
头像被屏蔽

帖子:1871

符文:15

11#
亲测GHUB也可以用,效果不错,多谢分享
发表于 2020-7-6 11:20:27 |只看该作者 来自:海南

帖子:28

符文:108

12#
玩暗黑3都要重新买鼠标了,还要学会编程。我才小学文化啊,这不是难为我吗
发表于 2020-7-6 11:27:08 |只看该作者 来自:云南

帖子:1178

符文:681

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

害 也可以佛系手动玩 就是比较累啊
发表于 2020-7-6 11:44:58 来自凯恩之角App |只看该作者 来自:云南

帖子:1217

符文:194

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

勤学多问会舔,论坛热心大佬还是好的多
发表于 2020-7-6 11:48:07 来自凯恩之角App |只看该作者 来自:山东

帖子:248

符文:221

15#
感谢分享!!
发表于 2020-7-6 12:20:18 来自凯恩之角App |只看该作者 来自:安徽
您需要登录后才可以回帖 登录 | 注册网易通行证