1. 注释：日志记录 文件
  2. 注释：date1 = Plugin.GetSysInfo.GetDateTime()
  3. 令 s = FormatDateTime(Date,0)
  4. 令 loginFileName = "E:\login\" & s & ".txt"
  5. 调用 File.CreateFolder("E:\login")
  6. 循环当 whichQQ <= qqCount 时
  7.     调用 hideDnfWindow()
  8.     延时 1000 毫秒
  9.     调用 dnfLogin(whichQQ)
  10.     延时 1000 毫秒
  11.     调用 showDnfWindow()
  12.     延时 1500 毫秒
  13.     调用 arrangeDNFWindow()
  14.     延时 1000 毫秒
  15.     令 roleNum = 0
  16.     注释：
  17.     循环 tempI 次
  18.         调用 arrangeBigStore(0,0)
  19.         延时 1000 毫秒
  20.         循环 switchRolesCount 次
  21.             调用 startExChange()
  22.             令 roleNum = roleNum + 1
  23.             如果 roleNum < roleCount 则
  24.                 注释：MessageBox roleNum
  25.                 调用 switchRoles(roleNum)
  26.             条件结束
  27.         循环结束
  28.     循环结束
  29.     令 loginConten = loginConten & "====" & whichQQ
  30.     向调试窗口输出：loginConten
  31.     调用 recordLogin(whichQQ,loginConten,loginFileName)
  32.     调用 finishGame()
  33.     令 whichQQ = whichQQ + 1
  34. 循环结束
  35. (语句无法识别，可能有错误): /*-------------------Dnf 登录—————————--------------*/
  36. 函数 dnfLogin(num)
  37.     调用 runDnf(dnfPath)
  38.     延时 500 毫秒
  39.     令 temp1 = getQQIdAndPassword(num,qqPath)
  40.     延时 2000 毫秒
  41.     如果 temp1 = 1 则
  42.         调用 selectService()
  43.     否则
  44.         弹出窗口 "文本设置有误！请检查"
  45.         脚本停止运行
  46.     条件结束
  47. 函数结束
  48. (语句无法识别，可能有错误): /*
  49. (语句无法识别，可能有错误): *@Fun restart run application software
  50. (语句无法识别，可能有错误): *@arg2 every application software install path
  51. (语句无法识别，可能有错误): *@retun null
  52. (语句无法识别，可能有错误): **/
  53. 函数 reStartApp()
  54.     调用 （命令库 系统）结束进程("DNFchina.exe")
  55.     延时 8000 毫秒
  56.     调用 dnfLogin(whichQQ)
  57. 函数结束
  58. (语句无法识别，可能有错误): /*-------------------选择服服务器—————————--------------*/
  59. 函数 selectService()
  60.     令 Hwnd = Window.Find("#32770","地下城与勇士")
  61.     如果 Hwnd <> 0 则
  62.         令 sRect = Window.GetClientRect(Hwnd)
  63.         令 MyArray = Split(sRect,"|")
  64.         令 X = Clng(MyArray(0))
  65.         令 Y = Clng(MyArray(1))
  66.         注释：MessageBox X+100 &" "& Y+150 &" "& X+610 &" "& Y+230
  67.         调用 searchSection(X + 100,Y + 110,X + 610,Y + 230,region,1)
  68.         延时 2000 毫秒
  69.         注释：MessageBox X+100 &" "& Y+360 &" "& X+610 &" "& Y+480
  70.         调用 searchSection(X + 100,Y + 370,X + 610,Y + 480,services,2)
  71.         调用 inputQQNumAndPaw()
  72.     否则
  73.         弹出窗口 "没有所选服务器！"
  74.         调用 reStartApp()
  75.     条件结束
  76. 函数结束
  77. (语句无法识别，可能有错误): /*---------------------------输入qq号和密码—————-----------*/
  78. 函数 inputQQNumAndPaw()
  79.     延时 18000 毫秒
  80.     令 Hwnd = Window.Find("TWINCONTROL","地下城与勇士")
  81.     如果 Hwnd <> 0 则
  82.         令 sRect = Window.GetClientRect(Hwnd)
  83.         令 MyArray = Split(sRect,"|")
  84.         令 x = Clng(MyArray(0))
  85.         令 y = Clng(MyArray(1))
  86.         令 L = Clng(MyArray(2))
  87.         令 H = Clng(MyArray(3))
  88.         调用 inputQQandPaw(x,y)
  89.         调用 judgeValidate()
  90.     否则
  91.         弹出窗口 "没有可输入的QQ和密码！"
  92.         调用 reStartApp()
  93.     条件结束
  94. 函数结束
  95. (语句无法识别，可能有错误): /*---------------------------选择频道—————-----------*/
  96. 函数 selectChannel()
  97.     延时 40000 毫秒
  98.     令 Hwnd = Window.Find("地下城与勇士","地下城与勇士")
  99.     如果 Hwnd <> 0 则
  100.         从左上到右下查找图片 "Attachment:\" & CH & ".bmp"，把找到的坐标保存到 (intX, intY)，指定区域（左：107 上：182 右：693 下：470），相似度 1.0