高分!求一个按键精灵的脚本代码

2024-12-01 11:34:17
推荐回答(2个)
回答1:

VBSCall a=GetPixelColor(100,120)
VBSCall b=GetPixelColor(101,121)
VBSCall c=GetPixelColor(102,122)
If a=b
If a=c
MoveTo 27 750
LeftClick 1
EndIf

复制上面的到源代码就可以了

//第一行括号内为x1,y1;第二行括号内为x2,y2;第三行括号内为x3,y3; MoveTo 27 750为鼠标移到 x y

下面用 and 也可以

VBSCall GetCursorpos(100,120)
color1=GetPixelColor(100,120)
VBSCall GetCursorpos(101,121)
color2=GetPixelColor(101,121)
VBSCall GetCursorpos(102,122)
color3=GetPixelColor(102,122)
If color1=color2 and color1=color3
MoveTo 27 750
LeftClick 1
EndIf

回答2:

一样啊,都不会