TC官方合作论坛

标题: 昨天还好好的 今天运行就出错了 [打印本页]
作者: qq624424599    时间: 2012-8-24 13:59
标题: 昨天还好好的 今天运行就出错了
//定义默认空间
整型 线程句柄,窗口句柄
功能 逻辑型 自动复活()
    整型 图片X坐标,图片Y坐标
    循环(真)
窗口.找图(窗口句柄,0,0,1440,900,"rc:\\1.bmp",#101010,1.0,1,图片X坐标,图片Y坐标)
        如果(图片X坐标>0)
            窗口.鼠标左键单击(窗口句柄,图片X坐标,图片Y坐标)     //点击立即复活
            辅助.等待(100)
            窗口.发送按键(窗口句柄,90)//按下Z,自动挂机
定时器.注册("定时器0",9000000)
    定时器.销毁("定时器0")
定时器.注册("定时器0",10800000)
        窗口.找图(窗口句柄,0,0,1440,900,"rc:\\帮会.bmp",#101010,1.0,1,图片X坐标,图片Y坐标)
        如果(图片X坐标>0)
            窗口.鼠标左键单击(窗口句柄,图片X坐标,图片Y坐标)     
            辅助.等待(10000)
            窗口.找图(窗口句柄,0,0,1440,900,"rc:\\帮会神兽.bmp",#101010,1.0,1,图片X坐标,图片Y坐标)
        如果(图片X坐标>0)
            窗口.鼠标左键单击(窗口句柄,图片X坐标,图片Y坐标)     
            辅助.等待(1000)
        窗口.找图(窗口句柄,0,0,1440,900,"rc:\\2.bmp",#101010,1.0,1,图片X坐标,图片Y坐标)
        如果(图片X坐标>0)
            窗口.鼠标左键单击(窗口句柄,图片X坐标,图片Y坐标)     
            辅助.等待(2000)
            窗口.找图(窗口句柄,0,0,1440,900,"rc:\\3.bmp",#101010,1.0,1,图片X坐标,图片Y坐标)
        如果(图片X坐标>0)
            窗口.鼠标左键单击(窗口句柄,图片X坐标,图片Y坐标)     
            辅助.等待(3000)
        
        如果结束
        如果结束
        如果结束
        如果结束
如果结束
        辅助.等待(500)
循环结束
    返回 真
功能结束
功能 逻辑型 获取句柄()
    //MacromediaFlashPlayerActiveX
    窗口句柄=转换.字符型转整型(dm.EnumWindow(网页.得到窗口句柄("浏览器0"),"","MacromediaFlashPlayerActiveX",2+6+16),0)
    //辅助.消息框(字符串.格式化("%d",窗口句柄))
    返回 真
功能结束
功能 逻辑型 开始_点击()
//这里添加你要执行的代码
        神魔遮天.获取句柄()
        辅助.等待(100)
        如果(线程句柄==0)
                线程句柄=线程.开启("神魔遮天.自动复活","")
                按钮.设置文本("开始","结束")
        否则
            线程.关闭(线程句柄)
            线程句柄=0
            按钮.设置文本("开始","开始")
        如果结束
返回 真
//函数返回语句
功能结束


功能 逻辑型 插件注册()
        逻辑型 是否成功=辅助.是否注册("dm.dmsoft")
        如果(!是否成功)
                辅助.注册插件("rc:dm.dll",真)//注册插件
        如果结束
返回 真
功能结束
[attach]4911[/attach]
[attach]4911[/attach]

功能 逻辑型 初始化()
//这里添加你要执行的代码
神魔遮天.插件注册()
网页.转到("浏览器0","http://www.4399.com/flash/58079.htm")

返回 真
功能结束   

空间结束
作者: 陌上青衣。    时间: 2012-8-24 19:19

把空间名前面的大漠对象写上, 用右上角的COM工具注册大漠一次
  1. #import "dm.dmsoft" dm
  3. 空间 神魔遮天
  4. //定义默认空间
  5. //定义默认空间
  6. 整型 线程句柄,窗口句柄
  7. 功能 逻辑型 自动复活()
  8.     整型 图片X坐标,图片Y坐标
  9.     循环(真)
  10. 窗口.找图(窗口句柄,0,0,1440,900,"rc:\\1.bmp",#101010,1.0,1,图片X坐标,图片Y坐标)
  11.         如果(图片X坐标>0)
  12.             窗口.鼠标左键单击(窗口句柄,图片X坐标,图片Y坐标)     //点击立即复活
  13.             辅助.等待(100)
  14.             窗口.发送按键(窗口句柄,90)//按下Z,自动挂机
  15. 定时器.注册("定时器0",9000000)
  16.     定时器.销毁("定时器0")
  17. 定时器.注册("定时器0",10800000)
  18.         窗口.找图(窗口句柄,0,0,1440,900,"rc:\\帮会.bmp",#101010,1.0,1,图片X坐标,图片Y坐标)
  19.         如果(图片X坐标>0)
  20.             窗口.鼠标左键单击(窗口句柄,图片X坐标,图片Y坐标)     
  21.             辅助.等待(10000)
  22.             窗口.找图(窗口句柄,0,0,1440,900,"rc:\\帮会神兽.bmp",#101010,1.0,1,图片X坐标,图片Y坐标)
  23.         如果(图片X坐标>0)
  24.             窗口.鼠标左键单击(窗口句柄,图片X坐标,图片Y坐标)     
  25.             辅助.等待(1000)
  26.         窗口.找图(窗口句柄,0,0,1440,900,"rc:\\2.bmp",#101010,1.0,1,图片X坐标,图片Y坐标)
  27.         如果(图片X坐标>0)
  28.             窗口.鼠标左键单击(窗口句柄,图片X坐标,图片Y坐标)     
  29.             辅助.等待(2000)
  30.             窗口.找图(窗口句柄,0,0,1440,900,"rc:\\3.bmp",#101010,1.0,1,图片X坐标,图片Y坐标)
  31.         如果(图片X坐标>0)
  32.             窗口.鼠标左键单击(窗口句柄,图片X坐标,图片Y坐标)     
  33.             辅助.等待(3000)
  34.         
  35.         如果结束
  36.         如果结束
  37.         如果结束
  38.         如果结束
  39. 如果结束
  40.         辅助.等待(500)
  41. 循环结束
  42.     返回 真
  43. 功能结束
  44. 功能 逻辑型 获取句柄()
  45.     //MacromediaFlashPlayerActiveX
  46.     窗口句柄=转换.字符型转整型(dm.EnumWindow(网页.得到窗口句柄("浏览器0"),"","MacromediaFlashPlayerActiveX",2+6+16),0)
  47.     //辅助.消息框(字符串.格式化("%d",窗口句柄))
  48.     返回 真
  49. 功能结束
  50. 功能 逻辑型 开始_点击()
  51. //这里添加你要执行的代码
  52.     神魔遮天.获取句柄()
  53.         辅助.等待(100)
  54.         如果(线程句柄==0)
  55.         线程句柄=线程.开启("神魔遮天.自动复活","")
  56.                 按钮.设置文本("开始","结束")
  57.         否则
  58.             线程.关闭(线程句柄)
  59.             线程句柄=0
  60.             按钮.设置文本("开始","开始")
  61.         如果结束
  62. 返回 真
  63. //函数返回语句
  64. 功能结束
  67. 功能 逻辑型 插件注册()
  68.     逻辑型 是否成功=辅助.是否注册("dm.dmsoft")
  69.     如果(!是否成功)
  70.         辅助.注册插件("rc:dm.dll",真)//注册插件
  71.     如果结束
  72. 返回 真
  73. 功能结束
  74. 空间结束
复制代码




欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/) Powered by Discuz! X3.1