求助按键精灵,颜色判断

作者&投稿:能胆 (若有异议请与网页底部的电邮联系)
100分求助按键精灵后台颜色判断问题~

实际按键对网络游戏来说 好象不能够执行这样的任务了.
后台的话要抓代码 内存那方面的.
按键注册的 不能够实现.

建议使用区域找色,因为按单点找的话会因为浏览器位置和尺寸等各种原因有所偏差

A点坐标x = 100 : A点坐标y = 200 '设置点坐标
B点坐标x = 300 : B点坐标y = 300'设置点坐标
Do
    IfColor A点坐标x, A点坐标y, "D4914C", 0 Then
        MoveTo A点坐标x, A点坐标y
        Delay 20
        LeftClick 1
    End If
    Delay 300
Loop Until GetPixelColor(B点坐标x, B点坐标y) = "E1E1E1"
//执行后面脚本


Dim a, b
a = ""
b = ""
do
a=GetPixelColor(X1,Y1)
b=GetPixelColor(X2,Y2)
if a=D4914C then
MoveTo x1, y1
Delay 100

LeftClick 1
Delay 100
End if

loop Until b=E1E1E1

x1,y1是a点坐标,X2,Y2是b点坐标


按键精灵得到指定点颜色 具体用法
按键精灵得到指定点颜色具体用法,已知坐标用颜色标记的话可尝试以下代码,具体方法如下:1、已知固定坐标,并已颜色判断,代码如下。2、用getColor的话,要定到数据库里int color = GBData.getColor(x,y)。3、然后根据坐标获取目标点的颜色值。4、得到指定点颜色命令,还可以加红加蓝,源代码如下。

按键精灵颜色条件判断怎么写?
复制以下代码进去调试,根据你的需求改下颜色值即可 Do \/\/然后判断坐标(x,y)处颜色,符合#1234颜色,则停止当前脚本,否则继续点击坐标(a.b)GetColor=GetPixelColor(x,y)If GetColor = "这里填你要找的颜色值" Then Exit Do Else \/\/点击坐标(a,b),MoveTo a, b Delay 500 LeftClick ...

按键精灵~颜色判定触发条件的脚本写法
BB=GetPixelColor(1624,763)If AA = "007D82" Then \/\/ 符合再判断下一个 If BB = "9D8D00" Then MoveTo 1135,240 LeftClick 1 Else \/\/ 不符合 End If Else \/\/ 不符合 End If 你看看就懂了吧 剩下你就自己写吧

按键精灵 识别颜色的操作
Do If GetPixelColor(10, 5) = "FFFFFF" Then '比如左边10,5的颜色是FFFFFFRestartScript End IfDelay 1000Loop你的好评是我帮助你的动力

按键精灵关于点颜色循环判断问题
\/\/得到点(10,5)的颜色 Do Delay 500 GetColor=GetPixelColor(10,5)Delay 25 If getcolr = "FFFF00" Then MoveTo 10,5 Delay 25 LeftClick 1 Delay 500 Else \/\/不是黄色 If getcolr = "5F5F5F" Then \/\/灰色是什么色?MoveTo x,y\/\/移动到要点击的位置 Delay 25 LeftClick 1 Delay ...

求按键精灵的双色判断
vbs arr="ffffff":arr2="000000"IfColor 300,300,arr,0 GOTO 下一步 Else End if Ifcolor 300,300,arr2,0 GOTO 下一步 Else End If

按键精灵颜色判断代码怎么写?
\/**按住滑动*\/MoveTo 782,1277\/\/鼠标移动到782,1277LeftDown 1\/\/左键按下MoveTo 760, 1680\/\/鼠标移动到760,1680LeftUp 1\/\/左键弹起\/**颜色判断*\/IfColor 628,1846,"#FF6600",0 Then\/\/如果点628,1846等于#FF6600MoveTo 785, 1835\/\/鼠标移动到785,1835LeftClick 1\/\/左键点击一次\/\/持续。。

求助按键精灵,颜色判断
A点坐标x = 100 : A点坐标y = 200 '设置点坐标B点坐标x = 300 : B点坐标y = 300'设置点坐标Do IfColor A点坐标x, A点坐标y, "D4914C", 0 Then MoveTo A点坐标x, A点坐标y Delay 20 LeftClick 1 End If Delay 300Loop Until GetPixelColor(B点坐标x, B点坐...

如何用按键精灵判断某点颜色改变则按下鼠标左键
\/\/x为屏幕的横向坐标点 \/\/y为屏幕的纵向坐标点 \/\/z为那个点的颜色 IfColor x y z 2 鼠标移动到你要点击的屏幕点 MoveTo x y SaveMousePos \/\/延时 Delay 100 RestoreMousePos \/\/点击鼠标左键 LeftClick 1 LeftClick 1 \/\/就这样

按键精灵如何识别特定区域里的颜色?
FindColor 0, 0, 1024, 768, "0000FF", intX, intY\/\/在坐标(0,0)到(1024,768)范围内找0000ff颜色If intX > 0 And intY > 0 Then \/\/如果有找到Else \/\/没找到则End If

天山区17866538090: 按键精灵 颜色判断 -
澄泳白芍: MyColor=Plugin.Color.GetPixelColor(0,1,1) '第三个参数表示取色模式(0标准窗口/1透明窗口) If MyColor="0004DE" ThenLeftClick 1 ElseExitScript End If

天山区17866538090: 关于按键精灵的取色判定 -
澄泳白芍: 精确比较色是很难100%准确的,不是代码有错,是因为电脑在同一点,有时候很难是固定颜色的,也就是说,你这里颜色"2D3382"是在某一时刻出现的,而其他情况可能不出现了,或许出现"2D3382",这两个颜色很相近,肉眼基本分辨不出来,但是程序是可以分别出来的,所以一般不要精确比较色,要带入相似度.为了验证我的说法是否正确,你可以在一个你认为不会颜色变化的点多次用抓抓抓色,看看是不是一直一样,如果不一样,说明颜色随机变化.

天山区17866538090: 按键精灵怎么if怎么判断两个颜色? -
澄泳白芍: if嵌套啊,,,,红色为真,就进入下一个if判断白色~还是真就双击,否则就单击~~

天山区17866538090: 按键精灵如何循环判断坐标点颜色 -
澄泳白芍: 用循环语句: 前面加上While True,后面加上Wend,即可, While True //这里写你要执行的代码 Wend 这样就可以无限执行你要执行的代码,如果你想限制次数,可以这样写 n=0 While n<10 //这里写你要执行的代码 n=n+1 Wend 这样就可以执行10次,当然,有限次数的,你可以用for 语句. 本人不建议用Rem和Goto写程序,要不程序会显得非常混乱,日后修改非常不方便.

天山区17866538090: 按键精灵怎么判断颜色判断两个位置的颜色一样不一样.<br/>不一
澄泳白芍: Rem age1 = GetPixelColor(100,100)ge2 = GetPixelColor(150,150)If ge1 = ge2 ThenElseGoto aEnd IfMessageBox "颜色为:"&ge1--------------------先得到指定两个点的颜色,然后判断两个点颜色是否相等. ------------这个已经是相等继续下面的脚本,如果不等则掉转到标记a从新获取两个点的颜色继续判断了,MessageBox "颜色为:"&ge1以上就是执行在判断后的,如果相等才会跳出这个对话框,如果不相等就一直循环到相等为止.

天山区17866538090: 按键精灵颜色判断 -
澄泳白芍: Rem a Delay 1000 IfColor 123,321,9c4709,0 Else KeyPress 109,1 EndIf Goto a

天山区17866538090: 关于按键精灵的脚本 颜色抓取判断 -
澄泳白芍: 开始少了标记,所以跳转不回去ifcolor语句格式和参数用得不对下面是改过的 rem 1IfColor 1131,444,0303C5,0BeepBeepBeepBeepBeepEndScript ElseGoto 1Delay 4000endif

天山区17866538090: 按键精灵手机版做一个颜色判定怎么做 -
澄泳白芍: Dim rColor //定义变量rColor rColor = GetPixelColor(坐标X,坐标Y) //得到指定点的颜色 If rColor = "颜色代码" Then //判断颜色 //添加命令 End If 易语言,按键精灵,Visual Basic 专业游戏外挂辅助作者为您解答

天山区17866538090: 按键精灵后台颜色判断 -
澄泳白芍: 设置一个变量B用来获得100,100的颜色 B=GetPixelColor(100,100);If B=“000fff”Then 表达式1Else 表达式2End If

天山区17866538090: 按键精灵 找色判断 多个坐标 -
澄泳白芍: Function compColor(compInfo)If CmpColorEx(compInfo,0.9) = 1 ThencompColor = TrueElsecompColor = FalseEnd If End Function Dim CompInfo CompInfo = "1000|400|2523D2" //2523D2: 为该店颜色 If compColor(CompInfo) Then...

本站内容来自于网友发表,不代表本站立场,仅表示其个人看法,不对其真实性、正确性、有效性作任何的担保
相关事宜请发邮件给我们
© 星空见康网