1.         Window.Move(Handler1,0,0)
  2.         延时 500 毫秒
  3.         Window.Move(Handler2,skL,0)
  4.     条件结束
  5. 函数结束
  6. (语句无法识别，可能有错误): /****************************************************************************/
  7. (语句无法识别，可能有错误): /*
  8. (语句无法识别，可能有错误): *@Fun inputQQNumber andr password
  9. (语句无法识别，可能有错误): *@arg2
  10. (语句无法识别，可能有错误): *@retun null
  11. (语句无法识别，可能有错误): **/
  12. 函数 inputQQandPaw(x,y)
  13.     设置模拟方式为：超级模拟
  14.     （鼠标）移动到 (x + 400, y + 375)
  15.     延时 800 毫秒
  16.     （鼠标）左键单击, 1次
  17.     延时 300 毫秒
  18.     （键盘）按 "BackSpace" 键, 18次
  19.     延时 300 毫秒
  20.     调用 （命令库 键盘）KeyList(QQNum,2,100)
  21.     延时 300 毫秒
  22.     （键盘）按 "Tab" 键, 1次
  23.     调用 （命令库 键盘）KeyList(QQpass,2,100)
  24.     延时 500 毫秒
  25.     （键盘）按 "Enter" 键, 1次
  26.     设置模拟方式为：普通模拟
  27. 函数结束
  28. (语句无法识别，可能有错误): /*
  29. (语句无法识别，可能有错误): *@Fun run application software
  30. (语句无法识别，可能有错误): *@arg2 every application software install path
  31. (语句无法识别，可能有错误): *@retun null
  32. (语句无法识别，可能有错误): **/
  33. 函数 runDnf(path)
  34.     启动程序或打开文件 path
  35. 函数结束
  36. (语句无法识别，可能有错误): /*
  37. (语句无法识别，可能有错误): *@Fun read text of QQ log info
  38. (语句无法识别，可能有错误): *@arg1 whilch one QQ
  39. (语句无法识别，可能有错误): *@arg2 text file path
  40. (语句无法识别，可能有错误): *@retun null
  41. (语句无法识别，可能有错误): **/
  42. 函数 getQQIdAndPassword(i,txtPath)
  43.     注释：下面这句是读取一个配置文件参数(小节名："Command" 键值名："Val")得到内容(Text )
  44.     令 loginConten = File.ReadINI("Command",i,txtPath)
  45.     注释：Msgbox "得到一个配置文件键值为：" & Text
  46.     向调试窗口输出：loginConten
  47.     如果 loginConten = "" 则
  48.         令 QQNum = ""
  49.         令 QQpass = ""
  50.         令 region = ""
  51.         令 services = ""
  52.         令 CH = ""
  53.         令 getQQIdAndPassword = 0
  54.     否则
  55.         令 tempStr = Split(loginConten,"----")
  56.         令 QQNum = tempStr(0)
  57.         令 QQpass = tempStr(1)
  58.         令 region = tempStr(2)
  59.         令 services = tempStr(3)
  60.         令 CH = tempStr(4)
  61.         令 getQQIdAndPassword = 1
  62.     条件结束
  63. 函数结束
  64. (语句无法识别，可能有错误): /*
  65. (语句无法识别，可能有错误): *@Fun 注册大漠插件
  66. (语句无法识别，可能有错误): *@arg null
  67. (语句无法识别，可能有错误): *@retun null
  68. (语句无法识别，可能有错误): **/
  69. (语句无法识别，可能有错误): /*
  70. 函数 registerDm()
  71.     注释：首先打包dm.dll和RegDll.dll到附件,当然如果你还有其它资源(字库，图片等)也可以一并打包
  72.     注释： 这个need_ver作为本脚本需要使用的插件版本. 如果要换插件时，记得更改这个值.
  73.     令 need_ver = "3.1239"
  74.     注释： 插件需要用到atl系统库,有些XP精简系统会把atl.dll精简掉. 为了防止注册失败，这里手动注册一下atl.dll
  75.     令 ws = createobject("Wscript.Shell")
  76.     ws.run("regsvr32 atl.dll /s")
  77.     令 ws = nothing
  78.     注释：释放附件>>>>>>>>>>>>>>>
  79.     注释： 这里选择c盘的test-_game作为插件的基本目录 也就是SetPath对应的目录。所以所有资源都释放在此目录.
  80.     展开附件 *.* 到 e:\dnfPlug 文件夹
  81.     注释： 这里要用到RegDll来注册插件，所以必须释放到Plugin. 但是切记不能把dm.dll释放到Plugin.那会导致插件失效.
  82.     展开附件 RegDll.dll 到 .\Plugin 文件夹
  83.     注释： 插件注册开始>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
  84.     注释： 下面开始注册插件,先尝试用RegDll来注册.这里必须使用绝对路径。以免有别人把dm.dll释放在系统目录.造成版本错误.
  85.     调用 RegDll.Reg("e:\dnfPlug\dm.dll")
  86.     注释： 这里判断是否注册成功
  87.     令 dm = createobject("dm.dmsoft")
  88.     令 ver = dm.Ver()
  89.     如果 ver <> need_ver 则
  90.         注释： 先释放先前创建的dm
  91.         令 dm = nothing
  92.         注释： 再尝试用regsvr32 来注册. 这里必须使用绝对路径。以免有别人把dm.dll释放在系统目录.造成版本错误.
  93.         令 ws = createobject("Wscript.Shell")
  94.         ws.run("regsvr32 e:\dnfPlug\dm.dll /s")
  95.         令 ws = nothing
  96.         延时 1500 毫秒
  97.         注释： 再判断插件是否注册成功
  98.         令 dm = createobject("dm.dmsoft")
  99.         令 ver = dm.Ver()
  100.         如果 ver <> need_ver 则