1. 向调试窗口输出:"落落落落落落落落落落落落落落"
  2. 向调试窗口输出:"落 落叶教学-大漠多开例子 落"
  3. 向调试窗口输出:"落落 Qq 629233460 落落落落"
  4. 向调试窗口输出:"落落落落落落落落落落落落落落"
  5. (语句无法识别,可能有错误): Dimenv Hwnd1 //定义环境变量(多线程需要)
  6. 启动程序或打开文件 "notepad.exe"
  7. (语句无法识别,可能有错误): RunApp "notepad.exe" //启动记事本测试用
  8. 启动程序或打开文件 "notepad.exe"
  9. (语句无法识别,可能有错误): Delay 2000 //等待记事本工具打开
  10. (语句无法识别,可能有错误): Hwnd = Plugin.Window.Search("无标题 - 记事本") //搜索所有记事本窗口句柄
  11. (语句无法识别,可能有错误): MyArray = Split(Hwnd, "|") //分解句柄
  12. 如果 UBound(MyArray) >= 0 则
  13.     注释:判断是否搜到句柄?
  14. 条件结束
  15. 循环 i 从 0 到 UBound(MyArray) - 1
  16.     (语句无法识别,可能有错误): hwndEx = Clng(MyArray(i)) //类型转换
  17.     (语句无法识别,可能有错误): Call Plugin.Window.Move(hwndEx, i * 200 + 100, i * 200 + 100) //调整窗口位置
  18.     (语句无法识别,可能有错误): Call Plugin.Window.Active(hwndEx) //激活前面
  19.     (语句无法识别,可能有错误): Hwnd1 = Plugin.Window.FindEx(hwndEx, 0, "Edit", 0) //获取可打字的窗口句柄
  20.     (语句无法识别,可能有错误): BeginThread 线程函数 //启动线程
  21.     (语句无法识别,可能有错误): Delay 100 //启动线程需要点时间
  22. 循环结束
  23. 条件结束
  24. 注释:以下是【无限循环】防止全部脚本停止。
  25. 循环开始
  26.     向调试窗口输出:"【无限循环】防止全部脚本停止"
  27.     延时 1000 * 30 毫秒
  28. 循环结束
  29. 注释:以下是【测试用】子程序例子
  30. 子程序 线程函数()
  31.     令 Hwnd = Hwnd1
  32.     令 dm = createobject("dm.dmsoft")
  33.     令 dm_ret = dm.BindWindow(Hwnd,"normal","windows","windows",0)
  34.     向调试窗口输出:"线程绑定结果:" & dm_ret
  35.     循环 i 从 0 到 20
  36.         dm.SendString(Hwnd,i)
  37.         注释: Call Plugin.Bkgnd.SendString(Hwnd2, i)
  38.         延时 100 毫秒
  39.         dm.KeyPress(13)
  40.         注释: Call Plugin.Bkgnd.KeyPress(Hwnd2, 13)
  41.         延时 200 毫秒
  42.     循环结束
  43. 子程序结束
  44. 子程序 OnScriptExit()
  45.     注释: 这句只会在主线程结束时被调用到
  46.     令 dm_ret = dm.UnBindWindow()
  47. 子程序结束