大神们帮忙修改下 老是运行就卡死 无响应 怎样添加线程

pengyd1982

#import "dm.dmsoft" dm
空间 傲视
整型 线程
功能 整型 升级()
    整型 intX,intY
系统.设置路径(辅助.获取资源路径("rc:"))
//dm.SetDict(0,"剑侠.txt")
整型 句柄 = 网页.得到窗口句柄("浏览器0")

句柄 = dm.FindWindowEx(句柄,"MacromediaFlashPlayerActiveX","")
//辅助.消息框(转换.整型转字符型(句柄))
dm.SetWindowState(句柄,12)
dm.BindWindow(句柄,"normal","normal","normal",0)
//dm.BindWindow(句柄,"gdi","windows3","windows",0)
循环(真)
dm.FindPic(0,0,2000,2000,"完成任务.bmp|接受任务.bmp","000000",0.9,0,intX,intY)
如果(intX>0)
        dm.MoveTo(intX,intY)
    辅助.等待(1000)
    dm.LeftClick()
否则
//    傲视.点击()
傲视.立即()
傲视.确定()
傲视.确定2()
//傲视.柯()
//傲视.挑战()
//



如果结束
辅助.等待(50)
循环结束

返回 0
功能结束
功能 逻辑型 开始_点击()
线程=线程.开启("傲视.升级","")
返回 真
//函数返回语句
功能结束
功能 逻辑型 退出_点击()
//线程=线程.关闭("傲视.升级","")
辅助.退出()
返回 真
功能结束
功能 逻辑型 初始化()
辅助.注册插件("rc:\\dm.dll",真)
网页.转到("浏览器0","http://jxqy.37wan.com/server_list.html")
下拉框.增加文本("下拉框0","循环任务")
下拉框.增加文本("下拉框0","拜访岳伯乐")
下拉框.增加文本("下拉框0","问候偶也真")
下拉框.增加文本("下拉框0","看望陆婷玉")
下拉框.增加文本("下拉框0","虾婆婆")
下拉框.设置选项("下拉框0",0)
返回 真
功能结束

功能 整型 立即()
整型 intX,intY
dm.FindPic(0,0,2000,2000,"立即.bmp","000000",0.9,0,intX,intY)
如果(intX>0)
dm.MoveTo(intX,intY)
    辅助.等待(1000)
    dm.LeftClick()
如果结束
返回 0
功能结束
功能 整型 确定()
整型 intX,intY
dm.FindPic(0,0,2000,2000,"确定.bmp","000000",0.9,0,intX,intY)
如果(intX>0)
   dm.MoveTo(intX,intY)
    辅助.等待(1000)
    dm.LeftClick()
如果结束
返回 0
功能结束
功能 整型 确定2()
整型 intX,intY
dm.FindPic(0,0,2000,2000,"确定2.bmp","000000",0.9,0,intX,intY)
如果(intX>0)
   dm.MoveTo(intX+2,intY+2)
    辅助.等待(1000)
    dm.LeftClick()
如果结束
返回 0
功能结束

运行红色部分系统就卡了 无响应

功能 逻辑型 热键0_热键()
辅助.注册插件("rc:\\dm.dll",真)
系统.设置路径(辅助.获取资源路径("rc:"))
整型 intX,intY
整型 得到编号
字符型 字符串
循环(真)
得到编号=下拉框.得到选项("下拉框0")
如果(得到编号==0)
dm.FindPic(0,0,2000,2000,"活动.bmp|唐伯虎.bmp","000000",0.9,0,intX,intY)
如果(intX>0)
   dm.MoveTo(intX,intY)
    辅助.等待(1000)
    dm.LeftClick()
如果结束
否则
    傲视.接受任务()

如果结束
辅助.等待(50)
循环结束
返回 真
功能结束
//整型 线程=线程.关闭("傲视.热键0_热键","")
功能 整型 接受任务()
整型 intX,intY
dm.FindPic(0,0,2000,2000,"接受任务.bmp","000000",0.9,0,intX,intY)
如果(intX>0)
   dm.MoveTo(intX,intY)
    辅助.等待(1000)
    dm.LeftClick()
如果结束
返回 0
功能结束

空间结束
//空间结束语句

陌上青衣。

热键里不要加循环. 线程开启下