TC官方合作论坛
标题:
【有源码】神雕侠侣 挂机辅助 [三开]
[打印本页]
作者:
yzd112
时间:
2013-1-29 09:06
标题:
【有源码】神雕侠侣 挂机辅助 [三开]
空间 挂机小助手
dm=数组[3]
线程句柄=数组[3]
hwnd=数组[3]
zz=数组[3]
功能 开始_点击()
zz[1]=0,zz[2]=0,zz[1]=0
变量 z,c=0
循环(c<=2)
z=编辑框.获得文本("编辑框"&c&"0")
if(z!="")
线程句柄[c]=线程.开启("挂机小助手.启动",c)
endif
c=c+1
循环结束
功能结束
功能 启动(x)
变量 z
dm[x]=com("dm.dmsoft")
z=编辑框.获得文本("编辑框"&x&"0")
hwnd[x] = dm[x].FindWindow("",z)
dm[x].BindWindow(hwnd[x],"dx","normal","dx",0)
dm[x].SetPath(辅助.获取资源路径("rc:"))
dm[x].SetDict(0,"神雕字库.txt")
if(hwnd[x]==0)
help.messagebox("没有找到ID为"&z&"的游戏窗口")
辅助.退出()
endif
编辑框.设置文本("编辑框"&x&"3","开始挂机")
挂机小助手.开始挂机(x)
功能结束
功能 开始挂机(x)
变量 i,mx,my,nx,ny,z
循环(真)
编辑框.设置文本("编辑框"&x&"1",i)
z=编辑框.获得文本("编辑框"&x&"2")
dm[x].FindPic(0,0,800,600,"战斗画面.bmp","000000",0.9,0,mx,my)
if(mx>0)
dm[x].FindPic(0,0,800,600,"自动回合.bmp","000000",0.9,0,nx,ny)
i=dm[x].Ocr(nx,ny,nx+102,ny+17,"f9af1f-252525",1.0)
if(nx>0)
if(i<=z)
dm[x].KeyDown(18)
dm[x].KeyPress(49)
dm[x].KeyUp(18)
help.sleep(500)
dm[x].KeyDown(18)
dm[x].KeyPress(49)
dm[x].KeyUp(18)
endif
else
dm[x].KeyDown(18)
dm[x].KeyPress(49)
dm[x].KeyUp(18)
endif
endif
help.sleep(1000)
挂机小助手.验证(x)
循环结束
功能结束
功能 验证(x)
变量 x1,y,i,z,x2,x3,x4
dm[x].FindPic(0,0,800,600,"验证2.bmp","000000",0.9,0,x2,y)
help.sleep(200)
dm[x].FindPic(0,0,800,600,"验证1.bmp","000000",0.9,0,x1,y)
help.sleep(200)
dm[x].FindPic(0,0,800,600,"验证3.bmp","000000",0.9,0,x3,y)
help.sleep(200)
dm[x].FindPic(0,0,800,600,"验证4.bmp","000000",0.9,0,x4,y)
help.sleep(200)
if(x1>0||x2>0||x3>0||x4>0)
zz[x]=1
if(复选框.获得状态("复选框1")==真)
窗口.激活(hwnd[x])
endif
if(复选框.获得状态("复选框0")==真)
dm[x].Beep(1000,1000)
endif
编辑框.设置文本("编辑框"&x&"3","暂停")
线程.暂停(线程句柄[x])
endif
功能结束
功能 热键0_热键()
if(zz[0]==1)
线程.恢复(线程句柄[0])
zz[0]=0
编辑框.设置文本("编辑框"&0&"3","正在挂机")
else
线程.暂停(线程句柄[0])
zz[0]=1
编辑框.设置文本("编辑框"&0&"3","暂停")
endif
功能结束
功能 热键1_热键()
if(zz[1]==1)
线程.恢复(线程句柄[1])
zz[1]=0
编辑框.设置文本("编辑框"&1&"3","正在挂机")
else
线程.暂停(线程句柄[1])
zz[1]=1
编辑框.设置文本("编辑框"&1&"3","暂停")
endif
功能结束
功能 热键2_热键()
if(zz[2]==1)
线程.恢复(线程句柄[2])
zz[2]=0
编辑框.设置文本("编辑框"&2&"3","正在挂机")
else
线程.暂停(线程句柄[2])
zz[2]=1
编辑框.设置文本("编辑框"&2&"3","暂停")
endif
功能结束
功能 退出_点击()
if(线程句柄[0]!=null)
线程.关闭句柄(线程句柄[0])
dm[0].UnBindWindow()
endif
if(线程句柄[1]!=null)
线程.关闭句柄(线程句柄[1])
dm[1].UnBindWindow()
endif
if(线程句柄[2]!=null)
线程.关闭句柄(线程句柄[2])
dm[2].UnBindWindow()
endif
辅助.退出()
功能结束
功能 按钮0_点击()
辅助.写配置("RealmName","userid00",编辑框.获得文本("编辑框00"),系统.获取当前路径() &"user.ini")
辅助.写配置("RealmName","userid10",编辑框.获得文本("编辑框10"),系统.获取当前路径() &"user.ini")
辅助.写配置("RealmName","userid20",编辑框.获得文本("编辑框20"),系统.获取当前路径() &"user.ini")
辅助.写配置("RealmName","userid01",编辑框.获得文本("编辑框02"),系统.获取当前路径() &"user.ini")
辅助.写配置("RealmName","userid11",编辑框.获得文本("编辑框12"),系统.获取当前路径() &"user.ini")
辅助.写配置("RealmName","userid21",编辑框.获得文本("编辑框22"),系统.获取当前路径() &"user.ini")
功能结束
功能 初始化()
如果(文件.是否存在(系统.获取当前路径() &"user.ini"))
编辑框.设置文本("编辑框00",辅助.读配置("RealmName","userid00",系统.获取当前路径()&"user.ini"))
编辑框.设置文本("编辑框10",辅助.读配置("RealmName","userid10",系统.获取当前路径()&"user.ini"))
编辑框.设置文本("编辑框20",辅助.读配置("RealmName","userid20",系统.获取当前路径()&"user.ini"))
编辑框.设置文本("编辑框02",辅助.读配置("RealmName","userid01",系统.获取当前路径()&"user.ini"))
编辑框.设置文本("编辑框12",辅助.读配置("RealmName","userid11",系统.获取当前路径()&"user.ini"))
编辑框.设置文本("编辑框22",辅助.读配置("RealmName","userid21",系统.获取当前路径()&"user.ini"))
如果结束
功能结束
空间结束
复制代码
作者:
zxyc2000
时间:
2013-1-29 09:22
顶,写得好,很工整
作者:
sj6071
时间:
2013-1-29 11:18
uuuuuuuuuuuuuupppp
作者:
jsdai
时间:
2013-2-18 21:40
感谢分享
作者:
czczcz
时间:
2013-2-20 10:58
壮哉我大神雕
作者:
huntercx
时间:
2013-2-21 22:16
貌似大漠没用了,不能后台。还不如弄个前台3开,屏幕够大的话效果也不错的。
作者:
qohqoh
时间:
2013-4-26 05:46
壮哉我大神雕
作者:
wf009mail
时间:
2013-4-26 15:02
先复制下来,慢慢学习!
作者:
alrino
时间:
2013-7-30 12:45
好东东,来看看、。o
作者:
huhcl13
时间:
2013-8-29 10:46
挂机是自动战斗么
作者:
z14700
时间:
2013-8-29 22:31
顶,写得好,很工整
欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/)
Powered by Discuz! X3.1