有偿请求把AHK代码转成易语言的乐玩.

versxk

乐玩插件能实现剑灵的后台取色和抓字,点击鼠标操作吗?.只想要有大佬帮我把AHK转换一下就得了,接下来我自己研究.有偿,请加我Q16680065.当初我也是从AHK的成品代码来研究出自己的.
XButton1::
#Persistent
SetTimer,HT,0
Return
F3::
SetTimer,KE,off
SetTimer,Z,off
SetTimer,JR,off
SetTimer,HT,off
send {Right up}
reload this script
Return
Return
F2::
SetTimer,KE,0
SetTimer,Z,0
SetTimer,JR,5000
Return
Z:
WinActivate, ahk_class LaunchUnrealUWindowsClient
if c(674,97)=0xF36B24
{
send {Right up}
send 1
send 3
loop
{
send ]
}
until c(674,97)!=0xF36B24
}
else
{
send {Right down}
;send 6
;send ]
}
Return
KE:
if (c(1403,382)=0x966932 or c(1408,374)=0xBB8B46) and c(674,97)!=0xF36B24
{
SetTimer,Z,off
sleep 200
send c
sleep 50
send {Esc}
sleep 200
send j
sleep 400
Mouseclick,left , 1404,390, 2
sleep 100
Mouseclick,left , 1408,374, 2
sleep 100
MouseClick, left, , , 2
sleep 50
MouseClick, left, , , 2
sleep 50
MouseClick, left, , , 2
sleep 50
MouseClick, left,1427,690
sleep 10
MouseClick, left,1427,690
sleep 10
MouseClick, left,1427,690
sleep 10
send ff
sleep 10
send ff
sleep 50
send ff
sleep 30
send ff
sleep 50
send ff
sleep 50
send ff
sleep 50
send ff
sleep 50
send ff
sleep 50
send ff
sleep 600
MouseClick, left,145,78,2
sleep 500
if c(43,41)!=0xF6D9BF
{
run,D:\Documents\Desktop\AHK\rm.ahk
sleep 4500
}
send [
SetTimer,Z,0
}
;;没有任务
if c(1374,378)!=0x57A8D9 and c(1375,444)!=0x0979B7
{
send c
sleep 50
send {Esc}

sleep 100
send j
sleep 600
MouseClick, left,145,78,2
sleep 500
if c(43,41)!=0xF6D9BF
{
run,D:\Documents\Desktop\AHK\rm.ahk
sleep 4500
send [
}
}
if c(951,901)=0xD66B4E
{
send 7

}
if c(324,110)=0xD69C67 or c(843,645)=0xEDA20F or c(843,644)=0xF6B213
{
send {Esc}
sleep 50
send {Esc}
sleep 100
send yy
sleep 30
}
;修武器
if c(1110,768)=0*F8787 or c(1082,771)=0xF9B3B3 or c(1262,894)=0xF6B2B2 or c(1197,899)=0xFAB2B2
{
send 8
}
PixelSearch, Px, Py, 1013, 872, 1501, 917,0x6D201E, 0, Fast RGB
If ErrorLevel
{
}
Else
{
send 8
}
if c(859,773)=0xF0612B
{
send 7
}
IfWinExist,ahk_class LaunchUnrealUWindowsClient
{
}
else
{
SetTimer,KE,off
SetTimer,Z,off
sleep 500
goto g
}
IfWinExist,ahk_class Ghost
{
ToolTip, % "检测到未响应", 20, 20, R
SetTimer,KE,off
SetTimer,Z,off
sleep 25000
goto g
}
;组人
PixelSearch, ZX, ZY, 1013, 872, 1501, 917, 0xEEDACD, 2, Fast RGB
if ErrorLevel
{
}
else
{
if c(24,323)!=0x26B3FF
{
ToolTip, % "组人区域找色", 20, 20, R
sleep 200
SetTimer,JR,off
SetTimer,Z,off
sleep 30
send i
sleep 1000
Mouseclick,left ,%ZX%,%ZY%
sleep 600
MouseClick, left,842,144,5
sleep 600
send {Right up}
sleep 30
send {Right down}
sleep 30
send {Esc}
sleep 30
SetTimer,JR,1000
sleep 30
SetTimer,Z,0
Return
}
Return
}
if c(1261,897)=0xDEC4B1 or c(1262,894)=0xEED6C7 or c(1264,892)=0xCE997F or c(1262,898)=0xECD*F
{
ToolTip, % "组人8", 20, 20, R
sleep 500
SetTimer,JR,off
SetTimer,Z,off
sleep 30
send i
sleep 1000
Mouseclick,left ,1261,897
sleep 600
MouseClick, left,840,150,5
sleep 600
send {Right up}
sleep 30
send {Right down}
sleep 30
send {Esc}
sleep 30
SetTimer,JR,200
sleep 30
SetTimer,Z,0
Return
}
if c(1225,894)=0xF0E4D9 or c(1226,897)=0xEAC9B2 or c(1225,898)=0xEEDACD
{
ToolTip, % "组人82", 20, 20, R
sleep 500
sleep 500
SetTimer,JR,off
SetTimer,Z,off
sleep 30
send i
sleep 1000
Mouseclick,left ,1226,897
sleep 600
MouseClick, left,842,144,5
sleep 600
send {Right up}
sleep 30
send {Right down}
sleep 30
send {Esc}
sleep 30
SetTimer,JR,200
sleep 30
SetTimer,Z,0
Return
}
if c(1264,889)=0x615E5B
{
ToolTip, % "组人83", 20, 20, R
sleep 500
ToolTip, % "组人82", 20, 20, R
sleep 500
sleep 500
SetTimer,JR,off
SetTimer,Z,off
sleep 30
send i
sleep 1000
Mouseclick,left ,1264,889
sleep 600
MouseClick, left,842,144,5
sleep 600
send {Right up}
sleep 30
send {Right down}
sleep 30
send {Esc}
sleep 30
SetTimer,JR,200
sleep 30
SetTimer,Z,0
Return
}
Return
JR:
if c(826,784)=0x674E25
{
SetTimer,KE,off
SetTimer,Z,off
sleep 500
ToolTip, % "死了", 20, 20, R
sleep 500
run,tencent://message/?uin=16680065
sleep 500
send 死了555555555
sleep 500
send {Enter}
sleep 500
winclose,烟仔
sleep 500
SetTimer,KE,1000
SetTimer,Z,0
}
;存在聊天框
if c(22,914)=0xFFFFFF
{
send {Enter}
sleep 80
}
if c(44,44)=0xF5D7B9 and c(26,322)!=0x1FB0FF and c(844,910)=0x3D9872
{
SetTimer,KE,off
SetTimer,Z,off
sleep 30
send {Enter}
sleep 300
send /Z 蜘蛛 通宵无限**

hdyra

竹小柒 发表于 2020-1-6 23:39
这个稍微百度一下资料就行了吧 只是搞起来比较费事儿

对着你头像冲了

versxk

ahk的有简单的作品很容易对照学，易语言的循环我搞不懂。求指导一下。

竹小柒

这个稍微百度一下资料就行了吧 只是搞起来比较费事儿

leishenclub

应该可以吧，有人还弄逆水寒呢