游戏中的钥匙精灵可以自动识别数字并判断是否购买吗?好吧,50分

沙漠插件文字识别示例,XP系统桌面找到“我的电脑”(字体是XP系统下做的,所以这段代码只适用于XP。再自己做字体,Win7也行。)

//首先在附件中添加沙漠插件“DM . dll”DM . dll“regdll . dll”!!!

//下面第一句把“dm.dll”释放到你需要的文件夹,这个目录你自己改。

PutAttachment "D:\DmPath "," dm.dll "

//下面是注册插件释放到key的插件文件夹。这是无法改变的。

PutAttachment”。\plugin "," regdll.dll "

PutAttachment "D:\DmPath "," My computer.txt "

//以下是报名?

调用插件。RegDll.Reg("D:\DmPath\dm.dll ")

延迟50

Set dm = createobject("dm.dmsoft ")

//判断你的插件版本是否注册成功。

TracePrint dm。版本()

If Len(dm。Ver()) = 0那么?

设置dm =无

set ws=createobject("Wscript。外壳”)

ws . run " regsvr 32D:\ DM path \ DM . dll/s "

设置ws =无

延迟1500

TracePrint“注册”

不然呢?

哔哔声

如果…就会结束

Set dm = createobject("dm.dmsoft ")

dm_ret = dm。SetPath("D:\DmPath ")

dm_ret = dm.setDict(0,"我的电脑. txt ")

DM _ ret = dm.findstrfast (0,0,2000,2000,"我的电脑"," FFFFFFF-00000 ",1.0,INTX,INTY)。

如果intX & gt= 0且intY & gt= 0那么?

延迟200

dm。移动到intX,intY

MsgBox“沙漠插件找到了我的电脑”

如果…就会结束

EndScript