Set dm = createobject("dm.dmsoft")
dm.Setpath "f:\tmp"
dm.setdict 0, "song9.txt"
hwnd = dm.GetMousePointWindow()
dm_ret = dm.BindWindow(hwnd, "normal", "normal", "normal", 0)
// 这里是找怪 的判断 注意血条要高亮 否则和怪血冲突
Rem 找怪
//判断 血色找到后跑过去
dm_ret = dm.FindColor(4,18,787,338,"ff0000-000000",1.0,4,intX,intY)
If intX > 0 And intY>0Then
dm.MoveTo intX+20 , intY+10
dm.RightDown
// 跑过去 调用打怪
Call 打怪()
Else
// 如果没找到 就随机跑动找怪
Call 跑动()
End If
// 这是捡东西子程序 注意要把不捡的不显示的通过内挂添加 以下是祖玛**类的装备捡取回收(回收具体在下边) 可以自己编辑下需要的
Sub 捡东西()
i=0
While i = 0
dm_ret = dm.FindStrFast(0,0,2000,2000,"骨玉|龙纹剑|泰坦|裁决|力量|紫碧螺|绿色|龙之|恶魔|三眼|骑士|精品|天下|**|法神|天尊|灵魂|","ff0000-000000|000ffff-000000|a5cbf7-000000|a5cbf7-000000",1,x1,y1)
If x1 >