马上加入TC
您需要 登录 才可以下载或查看，没有帐号？立即注册
x
#include"varlist.t"
#include"auto.t"
空间 倩女多开
hwnds
d=com("dm.dmsoft")
功能 退出_点击()
辅助.退出()
返回 真
功能结束
功能 刷新_点击()
list.deleteall("List")
varlist.clear()
//hwnds= d.EnumWindowByProcess("QQ.exe","QQ2011","",1)
hwnds= d.EnumWindowByProcess("GacRunner.exe","倩女幽魂","",1)
//help.messagebox(hwnds)
wz
hwnd
while(true)
wz=str.findstr(hwnds,",")
hwnd=str.strsub(hwnds,0,wz)
//help.messagebox(hwnd)
list.addstring("List",window.getwindowcaption(convert.strtoint(hwnd,0))+"*"+hwnd)
// varlist.addstr(str.strcat("句柄",convert.inttostr(x)),hwnd)
varlist.addstr(hwnd,0)
if (wz==-1)
break
else
hwnds=str.strcut(hwnds,wz+1,true)
endif
endwhile
返回 真
功能结束
功能 线程任务()
bt,hwnd
bt=list.getchecktext("List")
hwnd=str.strcut(bt, str.findstr(bt,"*")+1,true)
dm.setshowerrormsg(0)
//help.messagebox("窗口大漠绑定开始")
if (d.BindWindow(convert.strtoint(hwnd,0),"dx","dx","dx",0)==0) //,绑定
help.messagebox("窗口大漠绑定出现异常")
else
// help.messagebox("窗口大漠绑定成功")
d.SetWindowState(convert.strtoint(hwnd,0),1)
auto.打怪(convert.strtoint(hwnd,0))
// //下接脚本内容
// help.sleep(3000)
// help.messagebox("执行的脚本内容1")
// help.sleep(2000)
// help.messagebox("执行的脚本内容2")
endif
// help.messagebox("窗口大漠绑定结束")
返回 真
功能结束
功能 开始任务_点击()
bt,hwnd
bt=list.getchecktext("List")
if (list.getcursel("List")==-1)
help.messagebox("请在列表中选择对应标题项")
else
hwnd=字符串.截取(bt,str.findstr(bt,"*")+1,字符串.长度(bt))
倩女多开.判断线程(hwnd)
endif
返回 真
功能结束
function 判断线程(hwnd)
hwndthr,线程句柄
z= 转换.字符型转整型(hwnd,0)
if(window.iswindow(z))
线程句柄=varlist.state(hwnd) //--得到存储线程句柄值
if (线程句柄>0)
//help.messagebox("线程已经开启"+convert.inttostr(线程句柄))
else
hwndthr = thread.beginthread("倩女多开.线程任务")
// help.messagebox("新开线程"+convert.inttostr(hwndthr))
varlist.replace(hwnd,hwndthr) //改变线程值
//dm.downcpu(50)
endif
endif
return true
endfunction
功能 结束任务_点击()
bt,hwnd
窗口句柄,hwndthr
bt=list.getchecktext("List")
if (list.getcursel("List")==-1)
help.messagebox("请在列表中选择对应标题项")
else
hwnd=字符串.截取(bt,str.findstr(bt,"*")+1,字符串.长度(bt))
//窗口句柄= 转换.字符型转整型(hwnd,0)
倩女多开.结束任务(hwnd)
// hwndthr=varlist.state(hwnd) //--得到存储线程句柄值
// varlist.replace(hwnd,0) //改变线程值
// dm.release(hwndthr)
// help.sleep(500)
// thread.closethread(hwndthr) //关闭线程
endif
返回 真
功能结束
function 结束任务(hwnd)
hwndthr,线程句柄
线程句柄=varlist.state(hwnd) //--得到存储线程句柄值
if (线程句柄==0)
//help.messagebox("线程已经关闭"+convert.inttostr(线程句柄))
else
hwndthr=varlist.state(hwnd) //--得到存储线程句柄值
varlist.replace(hwnd,0) //改变线程值
dm.release(hwndthr)
help.sleep(500)
thread.closethread(hwndthr) //关闭线程
help.sleep(500)
endif
return true
endfunction
功能 选择()
bt
bt=list.getchecktext("List")
if (list.getcursel("List")==-1)
help.messagebox("请在列表中选择对应标题项")
else
return 字符串.截取(bt,str.findstr(bt,"*")+1,字符串.长度(bt))
endif
return ""
功能结束
功能 窗口顶置_点击()
if( 倩女多开.选择()!="")
窗口句柄= 转换.字符型转整型(倩女多开.选择(),0)
窗口.置顶(窗口句柄,真)
endif
返回 真
功能结束
功能 全开任务_点击()
hwnds= d.EnumWindowByProcess("QQ.exe","QQ2011","",1)
wz
hwnd
while(true)
wz=str.findstr(hwnds,",")
hwnd=str.strsub(hwnds,0,wz)
help.messagebox(hwnd)
倩女多开.判断线程(hwnd)
help.sleep(1000)
//开启线程
if (wz==-1)
break
else
hwnds=str.strcut(hwnds,wz+1,true)
endif
endwhile
返回 真
功能结束
功能 全结束_点击()
hwnds= d.EnumWindowByProcess("QQ.exe","QQ2011","",1)
wz
hwnd
while(true)
wz=str.findstr(hwnds,",")
hwnd=str.strsub(hwnds,0,wz)
倩女多开.结束任务(hwnd)
//结束线程
if (wz==-1)
break
else
hwnds=str.strcut(hwnds,wz+1,true)
endif
endwhile
大漠.释放(0)
help.sleep(500)
d.UnBindWindow()
返回 真
功能结束
功能 销毁()
倩女多开.全结束_点击()
返回 真
功能结束
功能 初始化()
倩女多开.刷新_点击()
返回 真
功能结束
空间结束
|
/2 
发表于 2012-2-25 20:06:23
