游戏中的钥匙精灵可以自动识别数字并判断是否购买吗?好吧,50分
//首先在附件中添加沙漠插件“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