|
发表于 2015-1-26 21:40:30
|
显示全部楼层
功能 热键_启动_热键()
多开1.单开(0)
//----------以下和单开0一致
//变量 数组下标, 长度, 顶层句柄
//窗口句柄 = 窗口.鼠标所在窗口句柄()
//如果(窗口句柄 > 0)
//如果(是否重定义)
//顶层窗口句柄数组 = 数组空间.重定义(顶层窗口句柄数组, 真, Index + 1)
//窗口句柄数组 = 数组空间.重定义(窗口句柄数组, 真, Index + 1)
//窗口标题数组 = 数组空间.重定义(窗口标题数组, 真, Index + 1)
//任务线程句柄 = 数组空间.重定义(任务线程句柄, 真, Index + 1)
//检测线程句柄 = 数组空间.重定义(检测线程句柄, 真, Index + 1)
//ts_R = 数组空间.重定义(ts_R, 真, Index + 1)
//如果结束
//数组下标 = 数组空间.查找(窗口句柄数组, 窗口句柄)
//如果(数组下标 == -1)
//调试输出("[单开] 线程开启 窗口句柄: " & 窗口句柄 & " Index:" & Index)
//顶层句柄 = 窗口.得到父窗口(窗口句柄)
//顶层窗口句柄数组[Index] = 顶层句柄
//窗口句柄数组[Index] = 窗口句柄
//窗口标题数组[Index] = 窗口.得到标题(顶层句柄)
//任务线程句柄[Index] = 线程.开启("多开1.任务线程", Index)
//检测线程句柄[Index] = 1
//Index = Index + 1
////错误误判机制
//数组空间.大小(窗口句柄数组, 长度)
//如果(Index != 长度)
//Index = 长度
//如果结束
//是否重定义 = 真
//如果结束
//如果结束
功能结束
//------------------------------热键_单停_热键------------------------------//
功能 热键_单停_热键()
多开1.单开(1)
//----------以下和单开1一致
//变量 窗口句柄, 数组下标
//窗口句柄 = 窗口.鼠标所在窗口句柄()
//数组下标 = 数组空间.查找(窗口句柄数组, 窗口句柄)
//如果(数组下标 != -1)
////线程解绑
//ts_R[数组下标].UnBindWindow()
////关闭子线程
//线程.关闭(任务线程句柄[数组下标])
////恢复窗口标题
//ts_R[数组下标].SetWindowText(顶层窗口句柄数组[数组下标], 窗口标题数组[数组下标])
//顶层窗口句柄数组[数组下标] = null
//窗口句柄数组[数组下标] = null
//窗口标题数组[数组下标] = null
//任务线程句柄[数组下标] = null
//检测线程句柄[数组下标] = null
//Index = 数组下标 //0
//是否重定义 = 假
//调试输出("[单开] 线程关闭 窗口句柄: " & 窗口句柄 & " 窗口句柄数组:" & 窗口句柄数组[数组下标] & " 数组下标:" & 数组下标 & " Index:" & Index)
//返回 真
//否则
//辅助.消息框("脚本未执行", "提示")
//如果结束
//返回 真
功能结束
//------------------------------热键_单停_热键------------------------------//
功能 热键_停止_热键()
多开1.停止()
功能结束
//------------------------------初始化------------------------------//
功能 初始化()
热键.销毁("热键_启动")
热键.销毁("热键_单停")
热键.销毁("热键_停止")
热键.注册("热键_启动")
热键.注册("热键_单停")
热键.注册("热键_停止")
//是否成功 = 辅助.注册插件("rc:TSPlug.dll", 真)
是否成功 = 辅助.注册插件("rc:dm.dll", 真)
如果(是否成功)
调试输出("插件注册成功")
//ts = com("ts.tssoft")
ts = com("dm.dmsoft")
版本 = ts.Ver()
调试输出("版本:" & 版本)
否则
调试输出("插件注册失败")
如果结束
功能结束 |
|