大漠测试综合工具，希望指点下，呵呵，自己做的

MCyouxi

源码贴上

空间 大漠综合测试工具
//默认空间
//#import  "dm.dmsoft" dm
//开始按钮_点击操作
dm=com("dm.dmsoft")
变量 鼠标窗口
功能 退出_点击()

辅助.退出()
功能结束


功能 初始化()
//这里添加你要执行的代码
是否成功=辅助.是否注册("dm.dmsoft")
句柄=窗口.自身句柄()

窗口.设置标题(句柄,"定做辅助：QQ447285468")


如果(是否成功)

  辅助.消息框("QQ447285468制作，定做各种按键辅助！")
    //注册大漠成功

如果结束
是否成功=辅助.注册插件("rc:dm.dll",真)

   如果(是否成功)
         dm.SetPath("rc:")
   如果结束
如果(!是否成功)
    //不成功 就开始注册大漠
  
  ret=help.regdll("rc:dm.dll",true)
   //开始注册大漠
if(ret)

    help.messagebox("QQ447285468制作，定做各种按键辅助！")
   dm.SetPath("rc:")

//注册大漠插件成功
endif
如果结束
功能结束


//空间结束语句
功能 按钮_截图_点击()
//这里添加你要执行的代码

截图成功=dm.Capture(0,0,2000,2000,"截图成功.bmp")
如果(截图成功==1)
辅助.消息框("成功！截图模式正确")
否则
辅助.消息框("请更换截图模式，失败")  
如果结束
功能结束

功能 热键_1_热键()
///这里添加你要执行的代码

鼠标窗口=窗口.鼠标所在窗口句柄()

标签.设置文本("标签_句柄",类型.转字符型(鼠标窗口))
功能结束




功能 按钮_键盘_点击()
//这里添加你要执行的代码

dm.KeyPress(类型.转整型(编辑框.获得文本("编辑框_按键码值")))
功能结束


功能 按钮_移_动_点击()
//这里添加你要执行的代码
x=类型.转整型(编辑框.获得文本("编辑框_X"))
y=类型.转整型(编辑框.获得文本("编辑框_Y"))
移动成功=dm.MoveTo(x,y)
如果(移动成功==1)
    辅助.消息框("鼠标移动成功，鼠标模式正确")
否则
辅助.消息框("鼠标移动失败，请更换鼠标模式")  
如果结束
功能结束

功能 按钮_修改热键_点击()
//这里添加你要执行的代码
热键.销毁("热键_1")
修改成功=热键.注册("热键_1")
如果(修改成功)
    辅助.消息框("热键设置成功")
否则
   
      辅助.消息框("热键设置失败，可能是热键冲突")
如果结束
功能结束
功能 按钮_解除绑定_点击()
//这里添加你要执行的代码

  dm.UnBindWindow()

功能结束


功能 按钮_绑定窗口_点击()
//这里添加你要执行的代码
M=dm.SetWindowState(鼠标窗口,12)
如果(M==1)
    选项a=下拉框.得到选项("下拉框_截屏模式")
a=下拉框.获得内容("下拉框_截屏模式",选项a)
选项b=下拉框.得到选项("下拉框_鼠标模式")
b=下拉框.获得内容("下拉框_鼠标模式",选项b)
选项c=下拉框.得到选项("下拉框_键盘模式")
c=下拉框.获得内容("下拉框_键盘模式",选项c)
选项d=下拉框.得到选项("下拉框_mode")
d=下拉框.获得内容("下拉框_mode",选项d)
绑定模式 = dm.BindWindow(鼠标窗口,a,b,c,d)
如果(绑定模式 ==1)
辅助.消息框("恭喜，绑定窗口成功！")
否则
  辅助.消息框("失败！绑定模式错误")  

如果结束

否则
    如果结束

功能结束


空间结束