【函数多线程】多开单停.简单模板。
论坛 > 新手专区 (转载)
[源码分享] 多开单停简单模板。鼠标指向类型的 理论可以无限多开。
楼主 tan0360 发消息
哈哈。先说一点 ，会的大神就不要来指点了。。我这一种方式。写给新手看的。懂得有好范例可以在下面，回复贴出来，大家共同学习。好了不多说，代码贴出来。。为了不沉大家就回复一下看看。
功能 大唐_初始化()
//这里添加你要执行的代码
热键销毁("启动","")
消息框("游戏绑定方式为,鼠标指向窗口进行点击热键绑定.")
热键注册("启动","")
变量 路径 = 系统获取工作路径()
文件删除(路径&"**.ini")
等待(100)
读写配置("句柄数","数",0,"**.ini","写")
设置托盘("大唐辅助")
dm1 = com("dm.dmsoft")
结束
功能 绑定()
//这些为全局变量数组,自己该 变量 线程ID, 检测打怪=数组(),检测停止=数组(),杀怪=数组(),dmmo = 数组(),**z=数组(),dm1,主线程 =数组()
气泡("开始绑定")
变量 hwnd , 句柄数,句柄,数,**, hwnd1,内容
hwnd = 相对绑定(dm1,"","MainWnd class of ArkEngine")//获取鼠标指向窗口的句柄
等待(100)
句柄 = 读写配置("句柄数",hwnd,"","**.ini","读")//读取是否绑定填写过了的句柄 的ini 小节名
数 = 读写配置("句柄数","数","","**.ini","读")//真假.数值 = 0 表示刚刚启动 没有绑定过.
调试输出(句柄&"句柄读取")
如果(hwnd!="")// 这里防止错误-判断是否获取到句柄..
if(数 == 0)
dmmo[hwnd]=com("dm.dmsoft")// 直接绑定 保存 句柄以小节名为 句柄 内容 为绑
执行(hwnd,dmmo[hwnd])//启动一个线程,然后绑定
读写配置("句柄数",hwnd,"绑","**.ini","写")//写配置 -- 句柄 绑
读写配置("句柄数","数",1,"**.ini","写")//更改 数 的 值 数 = 1
气泡("绑定完成")
else
如果(句柄=="")//判断ini文件里是否有 以 鼠标获取到的句柄 hwnd 的值 没有 开始绑定
气泡("开始绑定句柄为"&hwnd&"的窗口")//输出 提示
dmmo[hwnd]=com("dm.dmsoft")//创建对象 以数组形式
执行(hwnd,dmmo[hwnd])//启动一个线程,然后绑定
读写配置("句柄数",hwnd,"绑","**.ini","写")////写配置 -- 句柄 绑
读写配置("句柄数","数",数+1,"**.ini","写")//更改 数 的 值 数 + 1
气泡("绑定完成")
否则 // 否则 就是代表ini文件里有它 hwnd 的记录 开始判断是否解绑过 .在程序单停之后开始从新绑定.
内容 = 读写配置("句柄数",hwnd,"","**.ini","读")// 读取 ini hwnd 的内容 绑 或 解
调试输出("内容"&内容)
如果(内容 == "绑")// 判断 结果
气泡("此窗口已经绑定完成,请不要重复绑定")
否则// 结果为 解 则再一次的绑定 ..
如果(内容 == "解")
气泡("开始绑定句柄为"&hwnd&"的窗口")
dmmo[hwnd]=com("dm.dmsoft")
执行(hwnd,dmmo[hwnd])//启动一个线程,然后绑定
读写配置("句柄数",hwnd,"绑","**.ini","写")//读取绑定的次数
读写配置("句柄数","数",数+1,"**.ini","写")//读取绑定的次数
气泡("又一次绑定完成")
结束
结束
结束
结束
end
结束//--否则没什么好说的了
//-----------------解绑--------------------------------//
功能 解绑定()// - ------ ----- 同理 ------
气泡("开始解绑定")
变量 hwnd , 句柄数,句柄,数,**, hwnd1,内容//有一些无用的变量
hwnd = 相对绑定(dm1,"","MainWnd class of ArkEngine")//获取句柄
等待(100)
句柄 = 读写配置("句柄数",hwnd,"","**.ini","读")
数 = 读写配置("句柄数","数","","**.ini","读")
调试输出(句柄&"句柄读取和"&数&"数")
如果(hwnd!="")
如果(数 == 0)
气泡("没有开始绑定,没有需要解绑的窗口")
else
如果(句柄!="")
内容 = 读写配置("句柄数",hwnd,"","**.ini","读")
调试输出("内容"&内容)
如果(内容 == "绑")
气泡("此窗口已经绑定完成,请不要重复绑定")
关闭线程(hwnd,dmmo[hwnd])
dmmo[hwnd].UnBindWindow()
读写配置("句柄数",hwnd,"解","**.ini","写")//读取绑定的次数
气泡("解绑定完成")
否则
如果(内容 == "解")
气泡("本窗口已经解绑定了.请不要在解绑了")
// 气泡("开始绑定句柄为"&hwnd&"的窗口")
// dmmo[hwnd]=com("dm.dmsoft")
// 执行(hwnd,dmmo[hwnd])//启动一个线程,然后绑定
结束 // 读写配置("句柄数",hwnd,"绑","**.ini","写")//读取绑定的次数
结束
否则
气泡("没有获取到窗口句柄.请重新获取句柄.鼠标指向窗口后热键")
结束
结束
else
气泡("你获取的是空的句柄窗口.不正确请重新鼠标指向正确的窗口获取句柄")
end
结束
//---------------------绑定窗口-----------//
功能 窗口绑定(hwnd,对象)//传入变量 开始对应绑顶 --
调试输出("[窗口绑定]进入绑定")
窗口激活(hwnd)
等待(1000)
对象.bindWindow(hwnd,"gdi2","windows","windows",0)//这里你可以自己写成可以更改的以参数形式来填写的绑定模式
等待(1000)
调试输出("绑定完成")
返回 1
结束
回复
沙发 言术 发消息
Kankan
回复
板凳 ping1117 发消息
Kankan
回复
地板 lidongxu 发消息
Kankan
回复
5# qq641235265 发消息
看看
精品区。函数多线程。
论坛 > 新手专区 (转载)
[源码分享] 多开单停简单模板。鼠标指向类型的 理论可以无限多开。
楼主 tan0360 发消息
哈哈。先说一点 ，会的大神就不要来指点了。。我这一种方式。写给新手看的。懂得有好范例可以在下面，回复贴出来，大家共同学习。好了不多说，代码贴出来。。为了不沉大家就回复一下看看。
功能 大唐_初始化()
//这里添加你要执行的代码
热键销毁("启动","")
消息框("游戏绑定方式为,鼠标指向窗口进行点击热键绑定.")
热键注册("启动","")
变量 路径 = 系统获取工作路径()
文件删除(路径&"**.ini")
等待(100)
读写配置("句柄数","数",0,"**.ini","写")
设置托盘("大唐辅助")
dm1 = com("dm.dmsoft")
结束
功能 绑定()
//这些为全局变量数组,自己该 变量 线程ID, 检测打怪=数组(),检测停止=数组(),杀怪=数组(),dmmo = 数组(),**z=数组(),dm1,主线程 =数组()
气泡("开始绑定")
变量 hwnd , 句柄数,句柄,数,**, hwnd1,内容
hwnd = 相对绑定(dm1,"","MainWnd class of ArkEngine")//获取鼠标指向窗口的句柄
等待(100)
句柄 = 读写配置("句柄数",hwnd,"","**.ini","读")//读取是否绑定填写过了的句柄 的ini 小节名
数 = 读写配置("句柄数","数","","**.ini","读")//真假.数值 = 0 表示刚刚启动 没有绑定过.
调试输出(句柄&"句柄读取")
如果(hwnd!="")// 这里防止错误-判断是否获取到句柄..
if(数 == 0)
dmmo[hwnd]=com("dm.dmsoft")// 直接绑定 保存 句柄以小节名为 句柄 内容 为绑
执行(hwnd,dmmo[hwnd])//启动一个线程,然后绑定
读写配置("句柄数",hwnd,"绑","**.ini","写")//写配置 -- 句柄 绑
读写配置("句柄数","数",1,"**.ini","写")//更改 数 的 值 数 = 1
气泡("绑定完成")
else
如果(句柄=="")//判断ini文件里是否有 以 鼠标获取到的句柄 hwnd 的值 没有 开始绑定
气泡("开始绑定句柄为"&hwnd&"的窗口")//输出 提示
dmmo[hwnd]=com("dm.dmsoft")//创建对象 以数组形式
执行(hwnd,dmmo[hwnd])//启动一个线程,然后绑定
读写配置("句柄数",hwnd,"绑","**.ini","写")////写配置 -- 句柄 绑
读写配置("句柄数","数",数+1,"**.ini","写")//更改 数 的 值 数 + 1
气泡("绑定完成")
否则 // 否则 就是代表ini文件里有它 hwnd 的记录 开始判断是否解绑过 .在程序单停之后开始从新绑定.
内容 = 读写配置("句柄数",hwnd,"","**.ini","读")// 读取 ini hwnd 的内容 绑 或 解
调试输出("内容"&内容)
如果(内容 == "绑")// 判断 结果
气泡("此窗口已经绑定完成,请不要重复绑定")
否则// 结果为 解 则再一次的绑定 ..
如果(内容 == "解")
气泡("开始绑定句柄为"&hwnd&"的窗口")
dmmo[hwnd]=com("dm.dmsoft")
执行(hwnd,dmmo[hwnd])//启动一个线程,然后绑定
读写配置("句柄数",hwnd,"绑","**.ini","写")//读取绑定的次数
读写配置("句柄数","数",数+1,"**.ini","写")//读取绑定的次数
气泡("又一次绑定完成")
结束
结束
结束
结束
end
结束//--否则没什么好说的了
//-----------------解绑--------------------------------//
功能 解绑定()// - ------ ----- 同理 ------
气泡("开始解绑定")
变量 hwnd , 句柄数,句柄,数,**, hwnd1,内容//有一些无用的变量
hwnd = 相对绑定(dm1,"","MainWnd class of ArkEngine")//获取句柄
等待(100)
句柄 = 读写配置("句柄数",hwnd,"","**.ini","读")
数 = 读写配置("句柄数","数","","**.ini","读")
调试输出(句柄&"句柄读取和"&数&"数")
如果(hwnd!="")
如果(数 == 0)
气泡("没有开始绑定,没有需要解绑的窗口")
else
如果(句柄!="")
内容 = 读写配置("句柄数",hwnd,"","**.ini","读")
调试输出("内容"&内容)
如果(内容 == "绑")
气泡("此窗口已经绑定完成,请不要重复绑定")
关闭线程(hwnd,dmmo[hwnd])
dmmo[hwnd].UnBindWindow()
读写配置("句柄数",hwnd,"解","**.ini","写")//读取绑定的次数
气泡("解绑定完成")
否则
如果(内容 == "解")
气泡("本窗口已经解绑定了.请不要在解绑了")
// 气泡("开始绑定句柄为"&hwnd&"的窗口")
// dmmo[hwnd]=com("dm.dmsoft")
// 执行(hwnd,dmmo[hwnd])//启动一个线程,然后绑定
结束 // 读写配置("句柄数",hwnd,"绑","**.ini","写")//读取绑定的次数
结束
否则
气泡("没有获取到窗口句柄.请重新获取句柄.鼠标指向窗口后热键")
结束
结束
else
气泡("你获取的是空的句柄窗口.不正确请重新鼠标指向正确的窗口获取句柄")
end
结束
//---------------------绑定窗口-----------//
功能 窗口绑定(hwnd,对象)//传入变量 开始对应绑顶 --
调试输出("[窗口绑定]进入绑定")
窗口激活(hwnd)
等待(1000)
对象.bindWindow(hwnd,"gdi2","windows","windows",0)//这里你可以自己写成可以更改的以参数形式来填写的绑定模式
等待(1000)
调试输出("绑定完成")
返回 1
结束
回复
沙发 言术 发消息
Kankan
回复
板凳 ping1117 发消息
Kankan
回复
地板 lidongxu 发消息
Kankan
回复
5# qq641235265 发消息
看看
精品区。函数多线程。
