几个验证码识别插件

19857503593

谢谢大佬

19857503593

下载地址呢，隐藏的地址失效了

kingprozb

111111111111111111111111

joe_lcz

了解一下

3103434237

我也说一句话就说我是个好

qq118462

#import "dm.dmsoft" dm
空间 大漠测试
//定义默认空间

功能 逻辑型 开始_点击()
//这里添加你要执行的代码
dm.SetPath(辅助.获取资源路径("rc:"))
整型 时尚=dm.SetDict(0,"dm_soft.txt")
整型 是否成功
重复(10)
//整型 句柄=窗口.找到窗口("║网通║百战百胜AB组统战(.稳定开放)║")
是否成功=dm.BindWindow(267974,"gdi","windows3","windows",0)
//必须用这种模式才能绑定成功
//整型 输入句柄=dm.BindWindow(句柄,"gdi","windows3","windows",0)

整型 是否
整型 X
整型 Y
字符型 字符串
//返回的是数组
整型 元宝
整型 X3
整型 Y3
整型 空
整型 X2
整型 Y2
整型 回城检测=dm.KeyPress(97)
help.sleep(1000)
如果(回城检测>0)

整型 X1
整型 Y1
整型 找回城石=dm.FindPic(0,0,2000,2000,"回城石.bmp","000000",0.9,0,X1,Y1)
字符型 找回石成功=转换.整型转字符型(找回城石)
如果(找回城石<0)
dm.MoveTo(767,566)
help.sleep(500)
dm.LeftClick()
help.sleep(500)
dm.MoveTo(407,124)
help.sleep(500)
dm.LeftClick()
help.sleep(500)
dm.MoveTo(356,370)
help.sleep(500)
dm.LeftClick()
help.sleep(500)
dm.MoveTo(328,347)
help.sleep(500)
dm.LeftClick()
help.sleep(500)
dm.MoveTo(613,13)
help.sleep(500)
dm.LeftClick()
help.sleep(500)
如果结束
如果结束
dm.MoveTo(85,350)
help.sleep(500)
dm.RightClick()
help.sleep(500)
dm.MoveTo(85,350)
help.sleep(500)
dm.RightClick()
help.sleep(500)


整型 过验证码
整型 a=10
循环(a>0)

dm.MoveTo(247,359)
help.sleep(1000)
dm.LeftClick()
help.sleep(1000)
字符串=dm.Ocr(0,0,2000,2000,"ff0000-000000",1.0)
help.sleep(1000)
是否=dm.FindStr(0,0,2000,2000,"5","ff0000-000000",1.0,X,Y)
help.sleep(500)
如果(X<0)
dm.MoveTo(184,155)
help.sleep(500)
dm.LeftClick()
help.sleep(500)
dm.SendString(2099546,字符串)
help.sleep(500)
dm.MoveTo(425,350)
help.sleep(500)
dm.LeftClick()
help.sleep(500)
dm.MoveTo(75,90)
help.sleep(500)
dm.LeftClick()
help.sleep(500)
跳出
如果结束
循环结束
dm.KeyPress(120)

整型 自动随机
整型 b=1000
循环(b>0)
dm.KeyPress(98)
help.sleep(30000)
b=b-1
空=dm.FindPic(0,0,2000,2000,"空.bmp","000000",0.9,0,X2,Y2)
元宝=dm.FindPic(0,0,2000,2000,"元宝.bmp","000000",0.9,0,X3,Y3)

如果(元宝>-1)
help.sleep(500)
dm.MoveTo(X3,Y3)
dm.LeftClick()
help.sleep(1000)
dm.MoveTo(720,300)
help.sleep(1000)
dm.LeftClick()
help.sleep(500)
如果结束
如果(空<0)
dm.KeyPress(120)
help.sleep(500)
dm.KeyPress(97)
help.sleep(500)
跳出
如果结束
循环结束
dm.MoveTo(233,17)
help.sleep(1000)
dm.RightClick()
help.sleep(500)
dm.MoveTo(233,17)
help.sleep(1000)
dm.RightClick()
help.sleep(500)
dm.MoveTo(233,17)
help.sleep(1000)
dm.RightClick()
help.sleep(1000)

整型 c=10
循环(c>0)

dm.MoveTo(535,39)
help.sleep(1000)
dm.LeftClick()
help.sleep(1000)
字符串=dm.Ocr(0,0,2000,2000,"ff0000-000000",1.0)
help.sleep(1000)
是否=dm.FindStr(0,0,2000,2000,"5","ff0000-000000",1.0,X,Y)
help.sleep(500)
如果(X<0)
dm.MoveTo(211,155)
help.sleep(500)
dm.LeftClick()
help.sleep(500)
dm.SendString(2099546,字符串)
help.sleep(500)
dm.MoveTo(422,350)
help.sleep(500)
dm.LeftClick()
help.sleep(500)
dm.MoveTo(76,140)
help.sleep(500)
dm.LeftClick()
help.sleep(500)
跳出
如果结束
循环结束








dm.UnBindWindow()
重复结束
返回 真
//函数返回语句
功能结束

功能 逻辑型 退出_点击()
//这里添加你要执行的代码
辅助.退出()

返回 真
//函数返回语句
功能结束

空间结束
//空间结束语句#import "dm.dmsoft" dm
空间 大漠测试
//定义默认空间

功能 逻辑型 开始_点击()
//这里添加你要执行的代码
dm.SetPath(辅助.获取资源路径("rc:"))
整型 时尚=dm.SetDict(0,"dm_soft.txt")
整型 是否成功
重复(10)
//整型 句柄=窗口.找到窗口("║网通║百战百胜AB组统战(.稳定开放)║")
是否成功=dm.BindWindow(267974,"gdi","windows3","windows",0)
//必须用这种模式才能绑定成功
//整型 输入句柄=dm.BindWindow(句柄,"gdi","windows3","windows",0)

整型 是否
整型 X
整型 Y
字符型 字符串
//返回的是数组
整型 元宝
整型 X3
整型 Y3
整型 空
整型 X2
整型 Y2
整型 回城检测=dm.KeyPress(97)
help.sleep(1000)
如果(回城检测>0)

整型 X1
整型 Y1
整型 找回城石=dm.FindPic(0,0,2000,2000,"回城石.bmp","000000",0.9,0,X1,Y1)
字符型 找回石成功=转换.整型转字符型(找回城石)
如果(找回城石<0)
dm.MoveTo(767,566)
help.sleep(500)
dm.LeftClick()
help.sleep(500)
dm.MoveTo(407,124)
help.sleep(500)
dm.LeftClick()
help.sleep(500)
dm.MoveTo(356,370)
help.sleep(500)
dm.LeftClick()
help.sleep(500)
dm.MoveTo(328,347)
help.sleep(500)
dm.LeftClick()
help.sleep(500)
dm.MoveTo(613,13)
help.sleep(500)
dm.LeftClick()
help.sleep(500)
如果结束
如果结束
dm.MoveTo(85,350)
help.sleep(500)
dm.RightClick()
help.sleep(500)
dm.MoveTo(85,350)
help.sleep(500)
dm.RightClick()
help.sleep(500)


整型 过验证码
整型 a=10
循环(a>0)

dm.MoveTo(247,359)
help.sleep(1000)
dm.LeftClick()
help.sleep(1000)
字符串=dm.Ocr(0,0,2000,2000,"ff0000-000000",1.0)
help.sleep(1000)
是否=dm.FindStr(0,0,2000,2000,"5","ff0000-000000",1.0,X,Y)
help.sleep(500)
如果(X<0)
dm.MoveTo(184,155)
help.sleep(500)
dm.LeftClick()
help.sleep(500)
dm.SendString(2099546,字符串)
help.sleep(500)
dm.MoveTo(425,350)
help.sleep(500)
dm.LeftClick()
help.sleep(500)
dm.MoveTo(75,90)
help.sleep(500)
dm.LeftClick()
help.sleep(500)
跳出
如果结束
循环结束
dm.KeyPress(120)

整型 自动随机
整型 b=1000
循环(b>0)
dm.KeyPress(98)
help.sleep(30000)
b=b-1
空=dm.FindPic(0,0,2000,2000,"空.bmp","000000",0.9,0,X2,Y2)
元宝=dm.FindPic(0,0,2000,2000,"元宝.bmp","000000",0.9,0,X3,Y3)

如果(元宝>-1)
help.sleep(500)
dm.MoveTo(X3,Y3)
dm.LeftClick()
help.sleep(1000)
dm.MoveTo(720,300)
help.sleep(1000)
dm.LeftClick()
help.sleep(500)
如果结束
如果(空<0)
dm.KeyPress(120)
help.sleep(500)
dm.KeyPress(97)
help.sleep(500)
跳出
如果结束
循环结束
dm.MoveTo(233,17)
help.sleep(1000)
dm.RightClick()
help.sleep(500)
dm.MoveTo(233,17)
help.sleep(1000)
dm.RightClick()
help.sleep(500)
dm.MoveTo(233,17)
help.sleep(1000)
dm.RightClick()
help.sleep(1000)

整型 c=10
循环(c>0)

dm.MoveTo(535,39)
help.sleep(1000)
dm.LeftClick()
help.sleep(1000)
字符串=dm.Ocr(0,0,2000,2000,"ff0000-000000",1.0)
help.sleep(1000)
是否=dm.FindStr(0,0,2000,2000,"5","ff0000-000000",1.0,X,Y)
help.sleep(500)
如果(X<0)
dm.MoveTo(211,155)
help.sleep(500)
dm.LeftClick()
help.sleep(500)
dm.SendString(2099546,字符串)
help.sleep(500)
dm.MoveTo(422,350)
help.sleep(500)
dm.LeftClick()
help.sleep(500)
dm.MoveTo(76,140)
help.sleep(500)
dm.LeftClick()
help.sleep(500)
跳出
如果结束
循环结束








dm.UnBindWindow()
重复结束
返回 真
//函数返回语句
功能结束

功能 逻辑型 退出_点击()
//这里添加你要执行的代码
辅助.退出()

返回 真
//函数返回语句
功能结束

空间结束
//空间结束语句#import "dm.dmsoft" dm
空间 大漠测试
//定义默认空间

功能 逻辑型 开始_点击()
//这里添加你要执行的代码
dm.SetPath(辅助.获取资源路径("rc:"))
整型 时尚=dm.SetDict(0,"dm_soft.txt")
整型 是否成功
重复(10)
//整型 句柄=窗口.找到窗口("║网通║百战百胜AB组统战(.稳定开放)║")
是否成功=dm.BindWindow(267974,"gdi","windows3","windows",0)
//必须用这种模式才能绑定成功
//整型 输入句柄=dm.BindWindow(句柄,"gdi","windows3","windows",0)

整型 是否
整型 X
整型 Y
字符型 字符串
//返回的是数组
整型 元宝
整型 X3
整型 Y3
整型 空
整型 X2
整型 Y2
整型 回城检测=dm.KeyPress(97)
help.sleep(1000)
如果(回城检测>0)

整型 X1
整型 Y1
整型 找回城石=dm.FindPic(0,0,2000,2000,"回城石.bmp","000000",0.9,0,X1,Y1)
字符型 找回石成功=转换.整型转字符型(找回城石)
如果(找回城石<0)
dm.MoveTo(767,566)
help.sleep(500)
dm.LeftClick()
help.sleep(500)
dm.MoveTo(407,124)
help.sleep(500)
dm.LeftClick()
help.sleep(500)
dm.MoveTo(356,370)
help.sleep(500)
dm.LeftClick()
help.sleep(500)
dm.MoveTo(328,347)
help.sleep(500)
dm.LeftClick()
help.sleep(500)
dm.MoveTo(613,13)
help.sleep(500)
dm.LeftClick()
help.sleep(500)
如果结束
如果结束
dm.MoveTo(85,350)
help.sleep(500)
dm.RightClick()
help.sleep(500)
dm.MoveTo(85,350)
help.sleep(500)
dm.RightClick()
help.sleep(500)


整型 过验证码
整型 a=10
循环(a>0)

dm.MoveTo(247,359)
help.sleep(1000)
dm.LeftClick()
help.sleep(1000)
字符串=dm.Ocr(0,0,2000,2000,"ff0000-000000",1.0)
help.sleep(1000)
是否=dm.FindStr(0,0,2000,2000,"5","ff0000-000000",1.0,X,Y)
help.sleep(500)
如果(X<0)
dm.MoveTo(184,155)
help.sleep(500)
dm.LeftClick()
help.sleep(500)
dm.SendString(2099546,字符串)
help.sleep(500)
dm.MoveTo(425,350)
help.sleep(500)
dm.LeftClick()
help.sleep(500)
dm.MoveTo(75,90)
help.sleep(500)
dm.LeftClick()
help.sleep(500)
跳出
如果结束
循环结束
dm.KeyPress(120)

整型 自动随机
整型 b=1000
循环(b>0)
dm.KeyPress(98)
help.sleep(30000)
b=b-1
空=dm.FindPic(0,0,2000,2000,"空.bmp","000000",0.9,0,X2,Y2)
元宝=dm.FindPic(0,0,2000,2000,"元宝.bmp","000000",0.9,0,X3,Y3)

如果(元宝>-1)
help.sleep(500)
dm.MoveTo(X3,Y3)
dm.LeftClick()
help.sleep(1000)
dm.MoveTo(720,300)
help.sleep(1000)
dm.LeftClick()
help.sleep(500)
如果结束
如果(空<0)
dm.KeyPress(120)
help.sleep(500)
dm.KeyPress(97)
help.sleep(500)
跳出
如果结束
循环结束
dm.MoveTo(233,17)
help.sleep(1000)
dm.RightClick()
help.sleep(500)
dm.MoveTo(233,17)
help.sleep(1000)
dm.RightClick()
help.sleep(500)
dm.MoveTo(233,17)
help.sleep(1000)
dm.RightClick()
help.sleep(1000)

整型 c=10
循环(c>0)

dm.MoveTo(535,39)
help.sleep(1000)
dm.LeftClick()
help.sleep(1000)
字符串=dm.Ocr(0,0,2000,2000,"ff0000-000000",1.0)
help.sleep(1000)
是否=dm.FindStr(0,0,2000,2000,"5","ff0000-000000",1.0,X,Y)
help.sleep(500)
如果(X<0)
dm.MoveTo(211,155)
help.sleep(500)
dm.LeftClick()
help.sleep(500)
dm.SendString(2099546,字符串)
help.sleep(500)
dm.MoveTo(422,350)
help.sleep(500)
dm.LeftClick()
help.sleep(500)
dm.MoveTo(76,140)
help.sleep(500)
dm.LeftClick()
help.sleep(500)
跳出
如果结束
循环结束








dm.UnBindWindow()
重复结束
返回 真
//函数返回语句
功能结束

功能 逻辑型 退出_点击()
//这里添加你要执行的代码
辅助.退出()

返回 真
//函数返回语句
功能结束

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

as903583882

谢谢分享

taizizhi

谢谢分享

hhcdye

lllllllllllllllllllllll

ew001

自制插件。。。 [修改]