//没登陆

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

帖子:225

符文:46

楼主 问一下 这个升级我这边启用一直点很快 但是我实际升级一个装备要等动画的,这个动画是可以关闭的吗 求解
发表于 2019-3-28 16:11:07 来自凯恩之角App |显示全部楼层

帖子:97

符文:16

要切换用别的宏是不是就把别的改成永久性配置文件就行了?比如说我想玩奶僧的话就把奶僧那个宏改成永久性配置文件?
发表于 2019-3-28 17:17:44 |显示全部楼层

帖子:8

符文:11

大叔 停宏后鼠标会乱点为什么啊 有群吗
发表于 2019-3-31 11:11:32 |显示全部楼层

帖子:76

符文:32

小小云 发表于 2019-3-28 16:11
楼主 问一下 这个升级我这边启用一直点很快 但是我实际升级一个装备要等动画的,这个动画是可以关闭的吗 求 ...

算是投机取巧吧,升级完成一个之后快速切换页面,动画就取消了,这样能节省很多时间
发表于 2019-4-1 20:58:13 来自凯恩之角App |显示全部楼层

帖子:76

符文:32

魔盒之手 发表于 2019-3-24 20:02
为什么下载下来的宏不能导入?是否还要解压呢大神? 求具体~~

下载下来的不是宏,是按键配置,你导入按键配置才可以
发表于 2019-4-1 20:59:25 来自凯恩之角App |显示全部楼层

帖子:76

符文:32

Alvinknight 发表于 2019-3-28 17:17
要切换用别的宏是不是就把别的改成永久性配置文件就行了?比如说我想玩奶僧的话就把奶僧那个宏改成永久性配 ...

对的zsbdzsbd
发表于 2019-4-1 20:59:53 来自凯恩之角App |显示全部楼层

帖子:76

符文:32

leozhouliang 发表于 2019-3-31 11:11
大叔 停宏后鼠标会乱点为什么啊 有群吗

具体一点,乱点是什么情况,如果还有你可以尝试长按ctrl取消一切自动按键
发表于 2019-4-1 21:00:43 来自凯恩之角App |显示全部楼层

帖子:76

符文:32

魔盒之手 发表于 2019-3-24 20:04
还有这个附加功能代码 怎么用的~?

附件直接导入按键配置就可以了,附加功能有按键说明
发表于 2019-4-1 21:01:33 来自凯恩之角App |显示全部楼层
弟大物勃丶丶 该用户已被删除
提示: 作者被禁止或删除 内容自动屏蔽
发表于 2019-4-1 23:40:19 来自凯恩之角App |显示全部楼层

帖子:33

符文:44

请问楼主怎么把附加功能放到别的宏里?玩家设置之前的这段是DVD的盾奶按键设置

function OnEvent(event, arg)


RestartMacro("HAND", 5, event, arg); --5为鼠标G5键
RestartMacro("RUN", 4, event, arg); --4为鼠标G4键
RestartMacro("BOSS", 7, event, arg); --7为鼠标G7键
RestartMacro("BOSS2", 6, event, arg); --6为鼠标G6键

end


function RestartMacro(MacroName, MacroKey, event, arg)
    if (event == "MOUSE_BUTTON_RELEASED" and arg == MacroKey) then
        if not (MacroStarted) then
            PlayMacro(MacroName);
            MacroStarted = true;
        else
            AbortMacro();
            MacroStarted = false;
        end
    end
end
---------------------------------------------------玩家设置-----------------------------------------------
--[[
        附加功能
        赌博左键连点                默认:CTRL+右键  
        拾取连点                        默认:CTRL+左键  
        分解背包所有物品        默认:CTRL+中键  
        自动附魔                        默认:中键     ####务必选择好词缀附魔一次,否则自动附魔第一条词缀      
       
        升级稀有或转换材料        默认:左Shift+中键 (大件)
                                                默认:右Shift+中键 (小件)
        Tips:
        1.背包物品尽量占据格数一致,否则会出现漏物品现象
        2.点击左ctrl停止
        3.自左向右、自上至下开始
        4.自动从鼠标位置开始,避免因中途暂停而重新开始
-]]

--按键修改
--1 2 3 4 5按顺序对应为:左键 右键 中键 后退 前进
--修饰按键分为:lctrl rctrl lshift rshift lalt ralt  即分左右
-----单键
Start=4                   --启动键,启动/暂停宏,关闭大小写键即可关闭

--以下功能需标识按键关闭时才有效
FM=3                        --自动附魔
-----组合键
KeyGroup={
        {MKey="lctrl",PKey=2},                --赌博 右键连点                                        --默认:CTRL+右键
        {MKey="lctrl",PKey=0},                --拾取 左键连点                                        --默认:CTRL+左键
        {MKey="lctrl",PKey=3},                --自动分解背包所有物品                        --默认:CTRL+中键
        {MKey="lshift",PKey=3},        --升级大件稀有或转换材料                --默认:左Shift+中键
        {MKey="rshift",PKey=3},        --升级小件稀有                                        --默认:右Shift+中键
}



--宏开始标记按键
StartMark="capslock"                        --默认Capslock大小写锁定键,但开宏可能影响打字
                                                                --可设置为"scrolllock"或"capslock"或"numlock"

StepTime=35                                        --自动分解间隔时限 默认35 如果存在漏物品现象可增大数值
---------------------------------------------------全局设置-----------------------------------------------
EnablePrimaryMouseButtonEvents(true);
H=96235
Xo=32767--人物中心X坐标
Yo=30700--人物中心Y坐标

--开启
function KaiQi()
        if  IsKeyLockOn(StartMark) then
        else
                PressAndReleaseKey(StartMark)
        end
end

--关闭
function GuanBi()
        if  IsKeyLockOn(StartMark) then
                PressAndReleaseKey(StartMark)
        end
end

function JiNeng_Down(JiNeng)
        if JiNeng=="Left" then
                PressKey("Lshift")--按下强制站立
                PressMouseButton(1)--点击左键
        elseif JiNeng=="Right" then
                PressMouseButton(3)--点击右键
        else
                PressKey(JiNeng)
        end
end

function JiNeng_Up(JiNeng)
        if JiNeng=="Left" then
                ReleaseMouseButton(1)--释放左键
                ReleaseKey("Lshift")--释放强制站立
        elseif JiNeng=="Right" then
                ReleaseMouseButton(3)--释放右键
        else
                ReleaseKey(JiNeng)
        end
end
--赌博
function DuBo()
        k=0
        while k<50
        do
                PressAndReleaseMouseButton(3)
                Sleep(10)
        k=k+1
        end

end

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

--升级稀有转换材料
function ShengJiZhuanHuan(mode)
        Thx,Thy=GetMousePosition()
        if (Thx<48151 or Thx>65149 or Thy<34501 or Thy>52499) then
                k=1
        elseif mode==2 then
                k=math.floor((Thx-48150)/1700)+1+10*math.floor((Thy-34500)/6000)
        else
                k=math.floor((Thx-48150)/1700)*6+math.floor((Thy-34500)/3000)+1
        end
       
        local Pos={
                {Posx=20000,Posy=51000,KeyNum=1,SleepTime=StepTime},
                {Posx=29000,Posy=51000,KeyNum=1,SleepTime=StepTime},
                {Posx=24500,Posy=51000,KeyNum=1,SleepTime=StepTime},
                {Posx=8100,Posy=50000,KeyNum=1,SleepTime=StepTime}
        }
       
        while k<(60/mode+1)
        do
                if mode==2 then
                        ThingX=(k-1)%10-- 升级列
                        ThingY=math.floor((k-1)/10)--升级行
                else
                        ThingX=math.floor((k-1)/6)-- 升级列
                        ThingY=(k-1)%6--升级行
                end
               
                Sleep(StepTime)
                if not MoveAndPress(Pos[1]) then break end
                if not MoveAndPress(Pos[2]) then break end
               
                LoopPos={Posx=49000+1700*ThingX,Posy=36000+3000*mode*ThingY,KeyNum=3,SleepTime=StepTime}
                if not MoveAndPress(LoopPos) then break end       
                if not MoveAndPress(Pos[3]) then break end
                if not MoveAndPress(Pos[4]) then break end
                Sleep(StepTime)
                k=k+1
        end
end
--自动附魔
function FuMo()
        MoveMouseTo(8500,24000)
        Sleep(50)
        PressAndReleaseMouseButton(1)
        Sleep(2)
        MoveMouseTo(9000,47400)
        Sleep(50)
        PressAndReleaseMouseButton(1)
        Sleep(500)
        PressAndReleaseMouseButton(1)
end
--按键判定
function MoveAndPress(InPos)
        MoveMouseTo(InPos.Posx,InPos.Posy)
        if IsModifierPressed("lctrl") then
                return false
        end
        Sleep(InPos.SleepTime)
        if IsModifierPressed("lctrl") then
                return false
        end
        PressAndReleaseMouseButton(InPos.KeyNum)
        Sleep(InPos.SleepTime)       
        if IsModifierPressed("lctrl") then
                return false
        end
        return true
end

----------------------------------------------------主程序------------------------------------------------
function OnEvent(event,arg)
        if(event=="MOUSE_BUTTON_PRESSED"and arg==DuiYuanSu and not IsKeyLockOn(StartMark) and not IsModifierPressed("ctrl") and not IsModifierPressed("shift"))then--鼠标前进键
                KaiQi()
               PressAndReleaseMouseButton(1)
                BiaoJi=0--CTRL是否被按下
                BiaoJi_ZhuangTai=0--CTRL按下状态
                QiDong=0--宏是否启动
                QiDong_ZhuangTai=0--宏启动状态
                XunHuan=0
                X=0--陨石位置X坐标
                Y=0--陨石位置Y坐标
                ShenMuX=0--神目位置X坐标
                ShenMuY=0--神目位置Y坐标
                YunShiX=0--陨石相对位置X坐标
                YunShiY=0--陨石相对位置Y坐标
                Sleep(400)
                KaiShi=GetRunningTime()--宏开始时间
                XianZai_ZhenShu=0--宏开始帧数
                while IsKeyLockOn(StartMark)
                do
                        if i==1 then
                                Type1()
                        else
                                Type2()                       
                        end
                end
        end
        if(event=="MOUSE_BUTTON_PRESSED"and arg==KeyGroup[1].PKey and IsModifierPressed(KeyGroup[1].MKey))then--赌博
                DuBo()--赌博物品:页、行、列
                GuanBi()
        end
        if(event=="MOUSE_BUTTON_PRESSED"and arg==KeyGroup[3].PKey and IsModifierPressed(KeyGroup[3].MKey))then----分解
                FenJie()
                GuanBi()
        end
        if(event=="MOUSE_BUTTON_PRESSED"and arg==KeyGroup[4].PKey and IsModifierPressed(KeyGroup[4].MKey))then----S升级稀有或转换材料
                ShengJiZhuanHuan(2)
                GuanBi()
        end
        if(event=="MOUSE_BUTTON_PRESSED"and arg==KeyGroup[5].PKey and IsModifierPressed(KeyGroup[5].MKey))then----升级小件稀有
                ShengJiZhuanHuan(1)
                GuanBi()
        end
        if(event=="MOUSE_BUTTON_PRESSED"and arg==FM and not IsModifierPressed("shift") and not IsModifierPressed("ctrl"))then----自动附魔
                FuMo()
                GuanBi()
        end
        if(event=="MOUSE_BUTTON_PRESSED"and arg==KeyGroup[2].PKey and IsModifierPressed(KeyGroup[2].MKey)) then----拾取
                k=25
                while k>0
                do
                        PressAndReleaseMouseButton(1)
                        Sleep(15)
                        k=k-1
                end
                GuanBi()
        end
end
发表于 2019-4-8 18:01:24 |显示全部楼层

帖子:12

符文:34

插个眼,紫薯布丁
发表于 2019-4-9 17:06:33 来自凯恩之角App |显示全部楼层

帖子:1

符文:21

大神,请问有没有散黑奥的宏
发表于 2019-4-12 00:08:30 来自凯恩之角App |显示全部楼层

帖子:76

符文:32

在希望的苞谷地 发表于 2019-4-8 18:01
请问楼主怎么把附加功能放到别的宏里?玩家设置之前的这段是DVD的盾奶按键设置

function OnEvent(event, ...

把你需要的附加功能复制到你的宏里面,位置不重要,只要不是在fuc里面就行,最后找到主程序,如果你能看懂代码,还需要写一个触发条件,比如按哪个键之类的,如果还有疑问可以教你
发表于 2019-4-28 20:31:34 来自凯恩之角App |显示全部楼层

帖子:76

符文:32

盛夏啊 发表于 2019-4-9 17:06
插个眼,紫薯布丁

反眼,控视野zsbd
发表于 2019-4-28 20:31:59 来自凯恩之角App |显示全部楼层

帖子:45

符文:56

11.png

1111.png

我这边都按要求来设置了,所有键位都是默认的,已设为永久性配置文件了
单独这个转换的代码复制进去没有效果,本人也看不懂代码
这个自动升级黄装和转换材料确实很实用,方便的话麻烦教一下新手教程。
发表于 2019-5-4 09:55:10 |显示全部楼层
您需要登录后才可以回帖 登录 | 注册网易通行证

触屏版|移动版凯恩之角|Archiver|凯恩之角 ( 粤B2-20090191 ) 

GMT+8, 2019-11-15 15:58

Powered by Discuz! X3.3

© 2001-2012 Comsenz Inc.