MarksRifle 发表于 2012-8-8 22:42:01

[已解决]找色辨别同时做出相应的按键输出,不知道哪里错了。

本帖最后由 MarksRifle 于 2012-8-10 21:26 编辑

我是初学者,之前只接触过c语言~~
这段代码是同学让我帮他写的,说是要用在游戏里面,根据颜色变化决定输不输出按键。
找色还有判断的语句我是从帮助里面查找的,也参考了一些论坛里面的资料,
找色好像涉及的更多的是外挂,但是这个不是,而且我也没有找到相似的资源可以参考。
由于是初学,很多东西不懂,自己查了几天的资料才写了这一点点,但是其中循环部分只运行了一次,不懂问题出在哪里。
望各位大神不吝赐教~

#Include <WinAPI.au3>


$hwnd=WinGetHandle("游戏窗口")
Dim $x,$y,$i
$x=912
$y=64
$i=0
$Color = PixelGetColor ( $x,$y,$hwnd)
While$i < 5
If PixelGetColor ( $x,$y,$hwnd)=$ColorThen
Sen()
$i=$i+1
EndIf
WEnd


Func Sen()
      $hwnd=WinGetHandle("游戏窗口")
                controlSend($hwnd,"","","{/}")
                Sleep(100)
        EndFunc

半芯竹 发表于 2012-8-8 22:54:05

本帖最后由 半芯竹 于 2012-8-8 22:57 编辑


#Include <WinAPI.au3>
Local $hwnd=WinGetHandle("游戏窗口")
Local $x=912,$y=64,$i,$Color = PixelGetColor ( $x,$y,$hwnd)
While1
if $i >5 then exitloop
If PixelGetColor ( $x,$y,$hwnd)=$ColorThen
      controlSend($hwnd,"","","{/}")
      Sleep(100)
$i+=1
EndIf
WEnd

MarksRifle 发表于 2012-8-8 23:04:27

回复 2# 半芯竹


    谢谢,我学习下。第一次发帖,谢谢你帮助~~

半芯竹 发表于 2012-8-9 20:03:29

回复 3# MarksRifle


    如果解决了,请编辑标题更改为+已解决
如果没解决,请详说问题情况。。

MarksRifle 发表于 2012-8-9 20:31:30

回复 4# 半芯竹


    好的,这两天还没有机会尝试,估计要周六日才有空,到时候我会回复的,谢谢提醒。
页: [1]
查看完整版本: [已解决]找色辨别同时做出相应的按键输出,不知道哪里错了。