1. 注释:****************************************************
  2. 注释:代码作者:狂奔De蜗牛
  3. 注释:编写时间:2010-08-22
  4. 注释:脚本说明:立用了窗口激活和显示及窗口句柄插件,轻松实现窗口多开,理论上可以支持无限多个,建议在10个以内。
  5. 注释:****************************************************
  6. 弹出窗口 "脚本马上开始,请根据以下提示进行操作。"
  7. 定义变量 Win, Windows, Hwnd
  8. 令 Win = 0
  9. 令 Windows = ""
  10. 标记 窗口查找
  11. 令 Win = Win + 1
  12. 延时 200 毫秒
  13. 弹出窗口 "请将选中第 " & Win & " 个游戏窗口,确定后选中该窗口,再按任意键继续,如不想继续请在确定后按“Q”。"
  14. 延时 200 毫秒
  15. 令 AnJian = (键盘)等待按任意键
  16. 延时 200 毫秒
  17. 如果 Int(AnJian) <> 81 则
  18.     令 Hwnd = Window.Foreground()
  19.     如果 Win > 1 则
  20.         令 Windows = Windows & "||" & Hwnd
  21.     否则
  22.         令 Windows = Hwnd
  23.     条件结束
  24.     跳转到标记 窗口查找
  25. 条件结束
  26. 定义变量 WinName, i
  27. 令 WinName = Split(Windows,"||")
  28. 弹出窗口 "窗口选定完必,您一共选定了 " & Ubound(WinName) + 1 & " 个窗口。"
  29. 标记 循环选择窗口
  30. 循环 i 从 0 到 Ubound(WinName)
  31.     调用 Window.Active(WinName(i))
  32.     调用 Window.Show(WinName(i))
  33.     延时 3000 毫秒
  34. 循环结束
  35. 跳转到标记 循环选择窗口