哪位大仙有时间帮帮忙

hqt1591

哪位大仙有时间帮帮忙...看看我的脚本应该怎么弄···万分感谢     这个脚本每次运行到输入验证码的时候就卡住
#import"dm.dmsoft" dm
空间 仙境传说
整型 线程句柄
功能 逻辑型 刷箱子()
循环(真)  
辅助.等待(1000)
鼠标.左键双击(1)
辅助.等待(500)
键盘.按键(13,1)
辅助.等待(500)
键盘.按键(13,1)
辅助.等待(500)
键盘.按键(13,1)
dm.SetPath(辅助.获取资源路径("rc:"))
dm.SetDict(0,"字库.txt")
dm.UseDict(0)
字符型 返回值=dm.Ocr(177,137,1324,823,"ff0031-000000",1.0)
辅助.消息框(返回值)
整型 T=1
        整型 Len=字符串.长度(返回值)
        循环(T<=Len)
            dm.KeyPressChar(字符串.截取(返回值,T-1,T))
            辅助.等待(200)
            T=T+1
        循环结束
键盘.按键(13,1)
辅助.等待(500)
键盘.按键(13,1)
辅助.等待(500)
键盘.按键(13,1)
辅助.等待(500)
键盘.按键(13,1)
辅助.等待(500)
键盘.按键(13,1)
辅助.等待(500)
键盘.按键(13,1)
辅助.等待(500)
循环结束
返回 真
功能结束
功能 逻辑型 开始_点击()
线程句柄=线程.开启("仙境传说.刷箱子","")
返回 真
//函数返回语句
功能结束
功能 逻辑型 退出_点击()
线程.关闭(线程句柄)
返回 真
功能结束
空间结束

信仰使徒

把
dm.SetPath(辅助.获取资源路径("rc:"))
dm.SetDict(0,"字库.txt")
dm.UseDict(0)
这几句写在循环外

hqt1591

回复 2楼信仰使徒的帖子

谢谢了