saypro3 发表于 2014-9-17 22:46:30

易语言循环取色问题! 源码已上传 求好心人帮我解决下

游戏画面是变动的,我用旋转视角 找怪,找怪的血。找到就按键打怪。
先循环判断取色,如果取色的值相同-就开始循环按键(但是循环按键中存在延时 就是延时技能的CD)
如果取色的值不相同就继续重新取色。(这里的取色 就是直到值相同为止)
中间还需要判断取色 颜色是否存在 不存在就跳出循环按键,然后就继续循环按键,直到找色的色值不存在。


问题:取色值找到,循环按键中的延时 怎么不起效果,一直无限的按。

代码如下!!!!!!!!!!!!!!






.版本 2
.支持库 EThread
.支持库 eAPI

.程序集 窗口程序集_启动窗口
.程序集变量 跳出循环, 逻辑型
.程序集变量 识图, 类_识图
.程序集变量 句柄, 整数型

.子程序 __启动窗口_创建完毕



.子程序 _按钮1_被单击

跳出循环 = 假
句柄 = 进程_名取句柄 (“xajh.exe”)
窗口_热键注册 (取窗口句柄 (), 1, #N键, &_按钮2_被单击, “123456789”)

.判断循环首 (1 = 1)
    .如果真 (识图.取色 (句柄, 382, 66, ) ≠ 3369710)' 没找到怪
      键盘_单击 (#左光标键, 1)
      延时 (50)' 这里延迟50 是放慢旋转视角速度。 没加延迟这里一直旋转视角太快了。
      键盘_单击 (#左光标键, 2)

    .如果真结束

    .如果真 (识图.取色 (句柄, 382, 66, ) = 3369710)' 找到怪 血条值相同
      键盘_单击 (#左光标键, 2)
      启动线程 (&打怪全线程, , )' 这里找到怪 按键速度好快,延时都根本没有效果!! 这里怎么解决?还是我代码写错。!!!!!


      ' 启动线程 (&自动打怪技能1, , )
      ' 启动线程 (&自动打怪技能2, , )
      ' 启动线程 (&自动打怪技能3, , )
      ' 启动线程 (&自动打怪技能4, , )
      ' 自动打怪技能1 ()
      ' 自动打怪技能2 ()
      ' 自动打怪技能3 ()
      ' 自动打怪技能4 ()
    .如果真结束

    .如果真 (跳出循环)
      跳出循环 ()
    .如果真结束

.判断循环尾 ()

.子程序 _按钮2_被单击

跳出循环 = 真

.子程序 打怪全线程

启动线程 (&自动打怪技能1, , )
启动线程 (&自动打怪技能2, , )
启动线程 (&自动打怪技能3, , )
启动线程 (&自动打怪技能4, , )

.子程序 自动打怪技能1

模拟按键 (到文本 (编辑框1.内容), , )
延时 (到数值 (编辑框8.内容))

.子程序 自动打怪技能2

模拟按键 (到文本 (编辑框2.内容), , )
延时 (到数值 (编辑框7.内容))

.子程序 自动打怪技能3

模拟按键 (到文本 (编辑框3.内容), , )
延时 (到数值 (编辑框6.内容))

.子程序 自动打怪技能4

模拟按键 (到文本 (编辑框4.内容), , )
延时 (到数值 (编辑框5.内容))
页: [1]
查看完整版本: 易语言循环取色问题! 源码已上传 求好心人帮我解决下