TC官方合作论坛

 找回密码
 立即注册
查看: 368|回复: 3
打印 上一主题 下一主题

[问题] 新手求教 为什么延时命令不执行

[复制链接]
跳转到指定楼层
楼主
发表于 2015-3-11 22:22:32 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上加入TC

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
求教下各位大神  为什么加血里面的延时不起作用!!!    还有 第二个死循环他不循环啊~~~~~~~!!!!

空间 小妖之吻

变量 路径,窗口标题,标题内容,窗口句柄,intX,intY,图像序号,群号

dm=com("dm.dmsoft")



//开始按钮_点击操作
功能 热键0_热键()





    线程.开启("小妖之吻.加血","")




功能结束

//退出按钮_点击操作
功能 加血()

    dm=com("dm.dmsoft")
    变量 窗口句柄,颜色,人物血,人物蓝,宠物血,宠物蓝,宠物黄,窗口句柄1

    dm.SetPath(辅助.获取资源路径("rc:"))

    窗口句柄 = dm.GetMousePointWindow()

    traceprint(窗口句柄)
    辅助.等待(200)
    窗口标题=窗口.得到标题(窗口句柄)
    辅助.写配置("游戏窗口名","窗口名",窗口标题,路径&"\\Config.ini")

    窗口.设置标题(窗口句柄,"欢迎使用")

    如果(窗口句柄>0)
        辅助.等待(200)
        dm_ret = dm.BindWindowEx(窗口句柄,"dx2","dx.mouse.clip.lock.api","dx.keypad.input.lock.api","dx.public.active.api",0)
        辅助.等待(200)
        循环(真)
            辅助.等待(500)
            //颜色=dm.GetColor(32,28)
            //如果(颜色=="ff0000")
            //traceprint("没有战斗")
            //辅助.等待(200)

            dm.FindPic(0,0,2000,2000,"指针.bmp","000000",0.9,0,intX,intY)


            如果(intX>0&&intY>0)
                traceprint(图像序号)

                辅助.等待(200)
                人物蓝=dm.GetColor(980,27)
                如果(人物蓝!="126cdf")
                    traceprint("要加蓝")
                    辅助.等待(100)
                    dm.MoveTo(964, 27)
                    辅助.等待(100)
                    dm.RightClick()
                    辅助.等待(100)
                    dm.RightClick()

                否则
                    traceprint("不需要加蓝`````")


                如果结束

                辅助.等待(100)
                宠物蓝=dm.GetColor(811,27)
                如果(宠物蓝!="126cdf")
                    traceprint("要加蓝")
                    辅助.等待(100)
                    dm.MoveTo(811,27)
                    辅助.等待(100)
                    dm.RightClick()
                    辅助.等待(100)
                    dm.RightClick()

                否则
                    traceprint("不需要加蓝`````")


                如果结束


                辅助.等待(200)
                宠物血=dm.GetColor(809,10)
                如果(宠物血!="df2c11")
                    traceprint("要加红")
                    辅助.等待(100)
                    dm.MoveTo(809,10)
                    辅助.等待(100)
                    dm.RightClick()
                    辅助.等待(100)
                    dm.RightClick()

                否则
                    traceprint("不需要加红`````")


                如果结束

                辅助.等待(100)
                人物血=dm.GetColor(986,10)
                如果(人物血!="df2c11")
                    traceprint("要加红")
                    辅助.等待(100)
                    dm.MoveTo(986,10)
                    辅助.等待(100)
                    dm.RightClick()
                    辅助.等待(100)
                    dm.RightClick()

                否则
                    traceprint("不需要加红`````")


                如果结束

                辅助.等待(100)
                宠物黄=dm.GetColor(817,61)
                如果(宠物黄!="ba8e11")
                    traceprint("要加红")
                    辅助.等待(100)
                    dm.MoveTo(817,61)
                    辅助.等待(100)
                    dm.RightClick()
                    辅助.等待(100)
                    dm.RightClick()

                否则
                    traceprint("不需要加红`````")


                如果结束

            否则

                线程.开启("花江山单开.战斗","")

            如果结束

        循环结束

    如果结束
功能结束




功能 战斗()

    traceprint("进入战斗")
    循环(真)

        辅助.等待(2000)
        dm.FindPic(0,0,2000,2000,"战斗.bmp","000000",0.9,0,intX,intY)

        如果(intX>0&&intY>0)
            辅助.等待(2000)
            traceprint("有自动````````````")
        否则
       traceprint("没有自动```开始点击``")
            dm.MoveTo(1004,261)   
            辅助.等待(300)
            dm.RightClick()

            辅助.等待(2000)
            辅助.等待(30000)
        如果结束

        辅助.等待(1000)
        辅助.等待(500)
        //颜色=dm.GetColor(32,28)
        dm.FindPic(0,0,2000,2000,"指针.bmp","000000",0.9,0,intX,intY)
        //如果(颜色=="ff0000")
        如果(intX>0&&intY>0)
            traceprint("没有战斗")
            辅助.等待(200)
            跳出
        如果结束

    循环结束



功能结束



















功能 退出_点击()



    标题内容=辅助.读配置("游戏窗口名","窗口名",路径&"\\Config.ini")


    窗口.设置标题(窗口句柄,标题内容)
    辅助.等待(200)
    dm.UnBindWindow

    辅助.等待(2000)

    辅助.退出()
功能结束


功能 初始化()
    //这里添加你要执行的代码
    //大漠注册  ↓↓↓↓↓↓↓↓↓↓↓↓↓↓
    变量 dm
    是否成功=辅助.是否注册("dm.dmsoft")
    如果(是否成功)
        调试输出("插件已注册")
    否则

        大漠注册=辅助.注册插件("rc:\\dm.dll",真)
        如果(大漠注册)
            dm=com("dm.dmsoft")
            版本号=dm.Ver()
            如果(版本号!="3.1233")
                大漠注册=辅助.注册插件("rc:\\dm.dll",假)
                dm=null
                大漠注册=辅助.注册插件("rc:\\dm.dll",真)
            如果结束
            调试输出("注册成功")

        如果结束


    如果结束

    //大漠注册 ↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑


    路径=系统.获取程序路径()
    dm.SetPath(辅助.获取资源路径("rc:"))


功能结束


功能 销毁()
    //这里添加你要执行的代码
    标题内容=辅助.读配置("游戏窗口名","窗口名",路径&"\\Config.ini")


    窗口.设置标题(窗口句柄,标题内容)
    辅助.等待(200)
    dm.UnBindWindow


功能结束




空间结束
//空间结束语句


回复

使用道具 举报

沙发
发表于 2015-3-11 23:25:24 | 只看该作者
战斗循环不是死循环呀   有个跳出
回复 支持 反对

使用道具 举报

板凳
 楼主| 发表于 2015-3-12 09:31:25 | 只看该作者
1106752189 发表于 2015-3-11 23:25
战斗循环不是死循环呀   有个跳出


是这一段的延时不执行

循环(真)

        辅助.等待(2000)
        dm.FindPic(0,0,2000,2000,"战斗.bmp","000000",0.9,0,intX,intY)

        如果(intX>0&&intY>0)
            辅助.等待(2000)
            traceprint("有自动````````````")
        否则
       traceprint("没有自动```开始点击``")
            dm.MoveTo(1004,261)   
            辅助.等待(300)
            dm.RightClick()

            辅助.等待(2000)
            辅助.等待(30000)
        如果结束
回复 支持 反对

使用道具 举报

地板
发表于 2015-3-12 12:33:57 | 只看该作者
否则

                线程.开启("花江山单开.战斗","")


这里的 不用线程  用功能调用  避免重复开启
回复 支持 反对

使用道具 举报

*滑动验证:
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关闭

站长推荐上一条 /2 下一条

关闭

小黑屋|TC官方合作论坛 (苏ICP备18043773号

GMT+8, 2025-9-23 17:24 , Processed in 0.168124 second(s), 23 queries .

Powered by 海安天坑软件科技有限公司

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表