多多云手机就不错,它可以在手机和电脑上运行。游戏里装备分为武器、防具、饰品、坐骑等类型,装备划分为不同等级、不同品质、不同职业,玩家需选择本职业的装备佩戴。装备品质划分为白、绿、蓝、紫、橙色,装备品质越高属*越好。装备有不同的等级佩戴要求,而且还有职业的佩戴限制,非本职业的装备是无法佩戴。玩家直接将装备佩戴在身上,就可获得装备的属*效果。玩家要想获得各种装备,可完成主线任务、日常任务、挑战副本等方法获取。
家等了好久````
很多人都想要这个脚本!今天我发布出来与大家分享```希望大家能用的习惯
本脚本只适合挂主动区!自动检物。
VBS dim mX1,mY1,mX2,mY2
Gosub补红蓝
Gosub读取坐标
VBS mX1=MapX
VBS mY1=MapY
SayExpression"("+CStr(mX1)+","+CStr(mY1)+")"+".准备好了没"
Rem挂机开始
Gosub补红蓝
Gosub判断坐标
Gosub找怪开始
KeyPress 120 1
Delay 100
Goto挂机开始
Sub找怪开始
Rem继续
Gosub补红蓝
KeyDown 120 1
Delay 80
KeyUp 120 1
MoveTo 1300 460
Delay 150
MoveTo 1300 460
Delay 140
MoveTo 513 460
Delay 20
LeftClick 1
Delay 100
KeyDown 114 1
Delay 100
KeyUp 114 1
Delay 50
Gosub补红蓝
VBSCall Call FindColor(150,150,750,650,"1028FF",x1,y1)
If x1<0 and y1<0
Delay 50
Goto继续
Else
Gosub打怪
EndIf
Return找怪开始
Sub打怪
Rem KG
KeyDown 120 1
Delay 80
KeyUp 120 1
Gosub补红蓝
KeyDown 114 1
Delay 100
KeyUp 114 1
Delay 50
Gosub补红蓝
VBSCall Call FindColor(150,150,750,650,"00107B",x1,y1)
If x1<0 and y1<0
Gosub补红蓝
Delay 200
MoveTo 1300 460
Delay 150
MoveTo 513 460
Delay 200
Goto挂机开始
Else
Goto KG
EndIf
Return打怪
Sub判断坐标
Gosub读取坐标
VBS mX2=MapX
VBS mY2=MapY
VBS MuBiaoY=mY1
VBS MuBiaoX=mX1
If Abs(mX1-mX2)+Abs(mY1-mY2)>20
Gosub自动行走
EndIf
Return判断坐标
Sub读取坐标
VBS MapX,MapY
VBS x=876:y=24
VBS MapXY=""
VBS i=0:j=0:k=0
For 12
Delay 16
Gosub读取数字
Rem读取完毕
If txt="]"
Goto输出坐标
EndIf
VBS MapXY=MapXY&txt
VBS x=x+6
EndFor
Rem输出坐标
VBS i=InStr(MapXY,".")
If txt="]" and i>1
VBS MapX=Clng(Left(MapXY, i- 1))
VBS MapY=Clng(Mid(MapXY, i+ 1))
EndIf
Return读取坐标
Sub读取数字
IfColor x+1 y+4 0002BD 2
IfColor x+3 y+4 0002BD 2
IfColor x+5 y+4 0002BD 2
VBS txt="-"
Goto读取完毕
EndIf
EndIf
EndIf
IfColor x+2 y+8 0002BD 2
IfColor x+3 y+8 0002BD 2
Else
VBS txt="."
Goto读取完毕
EndIf
EndIf
IfColor x+2 y 0002BD 2
VBS txt="]"
Goto读取完毕
EndIf
IfColor x+1 y+4 0002BD 2
IfColor x+1 y+5 0002BD 2
IfColor x+5 y+4 0002BD 2
VBS txt="0"
Goto读取完毕
EndIf
EndIf
EndIf
IfColor x+2 y+2 0002BD 2
VBS txt="1"
Goto读取完毕
EndIf
IfColor x+1 y+8 0002BD 2
IfColor x+5 y+8 0002BD 2
VBS txt="2"
Goto读取完毕
EndIf
EndIf
IfColor x+1 y+7 0002BD 2
IfColor x+2 y+4 0002BD 2
Else
IfColor x+3 y+4 0002BD 2
VBS txt="3"
Goto读取完毕
EndIf
EndIf
EndIf
IfColor x+2 y+3 0002BD 2
IfColor x+4 y+3 0002BD 2
VBS txt="4"
Goto读取完毕
EndIf
EndIf
IfColor x+1 y+1 0002BD 2
IfColor x+1 y+7 0002BD 2
VBS txt="5"
Goto读取完毕
EndIf
EndIf
IfColor x+4 y+2 0002BD 2
IfColor x+4 y+3 0002BD 2
Else
VBS txt="6"
Goto读取完毕
EndIf
EndIf
IfColor x+1 y+1 0002BD 2
IfColor x+4 y+3 0002BD 2
VBS txt="7"
Goto读取完毕
EndIf
EndIf
IfColor x+1 y+4 0002BD 2
Else
IfColor x+1 y+5 0002BD 2
IfColor x+5 y+5 0002BD 2
VBS txt="8"
Goto读取完毕
EndIf
EndIf
EndIf
IfColor x+1 y+4 0002BD 2
IfColor x+2 y+7 0002BD 2
IfColor x+5 y+4 0002BD 2
VBS txt="9"
Goto读取完毕
EndIf
EndIf
EndIf
Return读取数字
Sub自动行走
VBS FangX=0
VBS YDR=160
Gosub补红蓝
MoveTo 512 460
Delay 100
Gosub读取坐标
VBS JuLi1=sqr((MapX-MuBiaoX)^2+(MapY-MuBiaoY)^2)
Rem移动
Gosub补红蓝
If JuLi1>20
Rem方向右
If FangX=0
MoveTo 512+YDR 460
LeftClick 1
Delay 20
Gosub补红蓝
Delay 200
KeyDown 120 1
Delay 50
KeyUp 120 1
Delay 200
Gosub补红蓝
Gosub读取坐标
VBS JuLi2=sqr((MapX-MuBiaoX)^2+(MapY-MuBiaoY)^2)
If JuLi2<JuLi1
VBS FangX=0
VBS JuLi1=JuLi2
Goto移动
Else
VBS FangX=1
VBS JuLi1=JuLi2
Goto移动
EndIf
EndIf
Rem方向下
If FangX=1
MoveTo 512 460+YDR
LeftClick 1
Delay 20
Gosub补红蓝
Delay 200
KeyDown 120 1
Delay 50
KeyUp 120 1
Delay 200
Gosub补红蓝
Gosub读取坐标
VBS JuLi2=sqr((MapX-MuBiaoX)^2+(MapY-MuBiaoY)^2)
If JuLi2<JuLi1
VBS FangX=1
VBS JuLi1=JuLi2
Goto移动
Else
VBS FangX=2
VBS JuLi1=JuLi2
Goto移动
EndIf
EndIf
Rem方向左
If FangX=2
MoveTo 512-YDR 460
LeftClick 1
Delay 20
Gosub补红蓝
Delay 200
KeyDown 120 1
Delay 50
KeyUp 120 1
Delay 200
Gosub补红蓝
Gosub读取坐标
VBS JuLi2=sqr((MapX-MuBiaoX)^2+(MapY-MuBiaoY)^2)
If JuLi2<JuLi1
VBS FangX=2
VBS JuLi1=JuLi2
Goto移动
Else
VBS FangX=3
VBS JuLi1=JuLi2
Goto移动
EndIf
EndIf
Rem方向上
If FangX=3
MoveTo 512 460-YDR
LeftClick 1
Delay 20
Gosub补红蓝
Delay 200
KeyDown 120 1
Delay 50
KeyUp 120 1
Delay 200
Gosub补红蓝
Gosub读取坐标
VBS JuLi2=sqr((MapX-MuBiaoX)^2+(MapY-MuBiaoY)^2)
If JuLi2<JuLi1
VBS FangX=3
VBS JuLi1=JuLi2
Goto移动
Else
VBS FangX=0
VBS JuLi1=JuLi2
Goto移动
EndIf
EndIf
EndIf
Return自动行走
Sub补红蓝
IfColor 81 10 42415A 2
KeyPress 112 1
Delay 400
EndIf
Delay 10
IfColor 46 24 524139 2
KeyPress 115 1
Delay 400
EndIf
Delay 10
Return补红蓝
我的取名是综合挂机
F1红,F3技能,F4蓝,F9捡东西
F11启动,F12停止
1、Ctrl+1为默认的开启按键。
2、系统的颜色设置为32位。
3、对所有系统基本上都支持。
4、.能设置百分比加*6、10*,20*,30*,40*,50*,60*,70*,80*,90*很方面。
5、加入了对医生自动群疗的支持。
6、注:F3为红*,F4为蓝*,F5为群疗技能,请把相对的**放进快捷键内。
7、全新功能如下:这个版本为加强型,可窗口化游戏,也可全屏下使用,对游戏和系统的分辨率没要求了,人物的血条位置也没要求,想放在哪里就放哪里,对所有系统基本上都支持,都能正常。
8、加入了对医生自动群疗的支持。
9、注:F3为红*,F4为蓝*,F5为群疗技能,请把相对的**放进快捷键内。

