4.0版鼠标取窗口句柄多开(无限多开)(单开/单停/单恢复/全停/全恢复)(源码) - TC官方合作论坛

空间多开//版本:TC4.028
窗口句柄=数组[],线程句柄1=数组[],线程句柄2=数组[],线程状态=数组[],全部状态=假
功能窗口(热键)//由热键0,热键1传入值
句柄=窗口.鼠标所在窗口句柄()
aa=数组空间.查找(窗口句柄,句柄)//4.0的数组用起来爽歪歪,4.0我看行!
如果(aa==-1)//-1表示窗口句柄数组里没这个窗口句柄,是个新窗口
如果(热键==0)//把新窗口句柄加入数组并开启线程,这里开了二个线程
数组空间.增加(窗口句柄,句柄)
数组空间.增加(线程句柄1,线程.开启("多开.操作1",句柄))
数组空间.增加(线程句柄2,线程.开启("多开.操作2",句柄))
数组空间.增加(线程状态,1)//用1来表示线程是运行的,0表示暂停
列表框.增加文本("列表框0","运行(线程1:"&线程句柄1[0]&"--线程2:"&线程句柄2[0])
如果结束
否则//如果是旧窗口,根据所按热键做相应操作
如果(热键==1)//关闭线程的操作
线程.关闭(线程句柄1[aa])
线程.关闭(线程句柄2[aa])
列表框.增加文本("列表框0","线程关闭:"&线程句柄1[aa]&"--"&线程句柄2[aa])
数组空间.删除指定项(窗口句柄,aa)//线程关闭后把相应的数组元素删除
数组空间.删除指定项(线程句柄1,aa)
数组空间.删除指定项(线程句柄2,aa)
数组空间.删除指定项(线程状态,aa)
窗口.设置标题(句柄,"停止")
返回真//热键1操作完毕,收工!记得返回
如果结束//下面是热键0的操作
如果(线程状态[aa]==1)
线程.暂停(线程句柄1[aa])
线程.暂停(线程句柄2[aa])
线程状态[aa]=0
否则
线程.恢复(线程句柄1[aa])
线程.恢复(线程句柄2[aa])
线程状态[aa]=1
如果结束
如果结束
功能结束
功能操作1(句柄)
循环(真)
窗口.设置标题(句柄,"运")
辅助.等待(500)
窗口.设置标题(句柄,"行")
辅助.等待(500)
窗口.发送字符串(句柄,"运行中")
辅助.等待(500)
循环结束
功能结束
功能操作2(句柄)
循环(真)
列表框.增加文本("列表框0","窗口句柄:"&句柄&"--线程2演示")
辅助.等待(1500)
循环结束
功能结束
功能全操作(热键)//由热键2,热键3传入值
线程数量
数组空间.大小(线程句柄1,线程数量)//窗口句柄,线程句柄1,线程句柄2,线程状态随便一个数组的数量都行
如果(线程数量>0)
如果(热键==2)//根据不同的热键作不同的操作
如果(全部状态==假)//这个是真是假随自己喜欢
遍历(x=0;x<线程数量;x++)
线程.暂停(线程句柄1[x])
线程.暂停(线程句柄2[x])
线程状态[x]=0
遍历结束
标签.设置文本("标签2","全部恢复")
否则
遍历(x=0;x<线程数量;x++)
线程.恢复(线程句柄1[x])
线程.恢复(线程句柄2[x])
线程状态[x]=1
遍历结束
标签.设置文本("标签2","全部暂停")
如果结束
全部状态=!全部状态//把值设为相反
列表框.增加文本("列表框0","全部状态:"&全部状态)
否则//下面是热键3的操作
遍历(x=0;x<线程数量;x++)
线程.关闭(线程句柄1[x])
线程.关闭(线程句柄2[x])
遍历结束
窗口句柄=数组[]//线程关闭完后把相关变量初始化
线程句柄1=数组[]
线程句柄2=数组[]
线程状态=数组[]
全部状态=假
标签.设置文本("标签2","全部(暂停/恢复)")
列表框.增加文本("列表框0","全部停止!")
如果结束
如果结束
功能结束
功能热键0_热键()
多开.窗口(0)//热键里不要用开启线程来调用函数
功能结束
功能热键1_热键()
多开.窗口(1)//四个热键里都用线程来调用函数好像有点问题,不知什么原因,求真相!
功能结束
功能热键2_热键()
多开.全操作(2)
功能结束
功能热键3_热键()
多开.全操作(3)
功能结束
功能退出_点击()
辅助.退出()//退出前好像应该加点什么,懒得加了.
功能结束
空间结束

复制代码