[求助] 学习水饺的代码，个人习惯使用罗技宏设置

[复制链接]

勇士

卿白缓歌

帖子：26

符文：2

电梯直达

1^#

发表于 2018-12-9 10:29:05 |只看该作者 |倒序浏览来自：浙江

本帖最后由卿白缓歌于 2019-4-28 20:10 编辑

--EnablePrimaryMouseButtonEvents (true) --开启Ctrl键
------------------------------------------------------玩家设置----------------------------------------------
jiange = 10
led = "capslock"
bili = {16,9} --暂时设置无效
yaoshui = "q" --药水键
qiangzhiyidong = "e" --强制移动键
--按键间隔
one = 3000
two = 2000
three = 2000
four = 2000
zuo = 2000
you = 2000
yao = 500
yidong = 200
------------------------------------------------------技能设置----------------------------------------------
--按键，技能间隔，释放技能时间。关闭指定按键，添加“--”
jinengshezhi = {
{"1",one,0},
{"2",two,0},
{"3",three,0},
{"4",four,0},
{5,zuo,0},
{6,you,0},
{yaoshui,yao,0},
-- {qiangzhiyidong,yidong,0}
}
function jiance () --检测开启
if not IsKeyLockOn(led) then
PressAndReleaseKey(led)
end
end
function dianji (k) --点击按键
if jinengshezhi[k][1] == 5 then
PressAndReleaseMouseButton(1)
elseif jinengshezhi[k][1] == 6 then
PressAndReleaseMouseButton(3)
else
PressAndReleaseKey(jinengshezhi[k][1])
end
end
function zhandou (m) --施放技能
if IsKeyLockOn(led) then
xianzai = GetRunningTime()
if xianzai - jinengshezhi[m][3] > jinengshezhi[m][2] then
dianji(m)
jinengshezhi[m][3] = GetRunningTime()
end
Sleep(jiange)
end
end
------------------------------------------------------辅助功能----------------------------------------------
function fenjie () --分解
a, b = GetMousePosition()
MoveMouseTo(17500, 29500)
Sleep(10)
PressAndReleaseMouseButton(1)
Sleep(10)
for i=3,1 do
MoveMouseTo(6000+2400*i,18000)
Sleep(10)
PressAndReleaseMouseButton(1)
Sleep(10)
PressAndReleaseKey("Enter")
Sleep(10)
end
MoveMouseTo(6000,18000)
Sleep(10)
PressAndReleaseMouseButton(1)
Sleep(10)
for x =1,9 do --执行后9列
for y = 0,5 do --执行6行
MoveMouseTo(32768+(49000+1700*x-32768)*16*9/9/16,36000+3000*y)
PressAndReleaseMouseButton(1)
Sleep(1)
PressAndReleaseKey("Enter")
Sleep(1)
end
end
Sleep(10)
PressAndReleaseKey("escape")
MoveMouseTo(a, b)
Sleep(10)
PressAndReleaseKey("i")
end
function shiqu () --拾取
m=25
while m>0
do
PressAndReleaseMouseButton(1)
Sleep(50)
m=m-1
end
end
function dubo () --赌博
k=50
while k>0
do
PressAndReleaseMouseButton(3)
Sleep(5)
k=k-1
end
end
function diuqi () --丢弃
a, b = GetMousePosition()
for x =1,9 do
for y = 0,5 do
MoveMouseTo(32768+(49000+1700*x-32768)*16*9/9/16,36000+3000*y)
PressMouseButton(1)
Sleep(1)
MoveMouseTo(32767,32767)
ReleaseMouseButton(1)
Sleep(1)
end
end
MoveMouseTo(a, b)
end
------------------------------------------------------主程序----------------------------------------------
function OnEvent(event, arg)
if IsKeyLockOn("capslock") then
jiance()
Sleep(200)
i = 1
while IsKeyLockOn("capslock") do
zhandou(i)
if i == #jinengshezhi then
i = 1
else
i = i + 1
end
end
end
if(event=="MOUSE_BUTTON_PRESSED" and arg==5) then
diuqi()
end
if(event=="MOUSE_BUTTON_PRESSED" and arg==3) then
dubo()
end
if(event=="MOUSE_BUTTON_PRESSED" and arg==6) then
fenjie()
end
if(event=="MOUSE_BUTTON_PRESSED" and arg==1 and IsModifierPressed("ctrl")) then
shiqu()
end
end