| 
 | 
	
功能 热键_启动_热键() 
    多开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() 
        调试输出("版本:" & 版本) 
    否则 
        调试输出("插件注册失败")  
    如果结束 
功能结束 |   
 
 
 
 |