这个有取色,所以窗口在屏幕上也行,只要他还能运行就好,至少在不遮住游戏窗口的情况下,我还能聊点QQ什么 ,游戏窗口不大。我的是按键精灵9.55.11965版。求大神
While true
FindPic 0,0,1024,768,"Attachment:\inth.bmp",0.9,inthX,inthY
IfColor inthX+64,inthY+85,"E6",0 Then
Delay 200
KeyPress "Down", 8
Delay 200
KeyPress "Enter", 1
Delay 2000
End If
IfColor inthX-52,inthY+99,"FAFAFA",0 Then
Delay 200
KeyPress "Down", 1
KeyPress "Enter", 3
Delay 800
End If
IfColor inthX-24,inthY+225,"299ED",0 Then
Delay 400
KeyPress "Num 1", 1
End If
Wend
你的按键精灵版本不是9.55的吧,提示说你的是老版本
追答我的是9.55.11965
追问不能运行,一点反应都没有
追答Hwnd = Plugin.Window.MousePoint()
//得到当前点的颜色,并弹出对话框显示出来
While true
FindPic 0,0,1024,768,"Attachment:\inth.bmp",0.9,inthX,inthY
cr1=Plugin.Color.GetPixelColor(inthX+64,inthY+85,1)
If Cr1 = "E6" Then
Delay 200
KeyPress "Down", 8
Delay 200
KeyPress "Enter", 1
Delay 2000
Else
Call Plugin.Msg.Tips("Cr1的颜色:"&Cr1)
Delay 2000
End If
cr2=Plugin.Color.GetPixelColor(inthX-52,inthY+99,1)
If CR2 = "FAFAFA" Then
Delay 200
KeyPress "Down", 1
KeyPress "Enter", 3
Delay 800
Else
Call Plugin.Msg.Tips("Cr2的颜色:"&Cr2)
Delay 2000
End If
cr3=Plugin.Color.GetPixelColor(inthX-24,inthY+225,1)
If Cr3 = "299ED" Then
Delay 400
KeyPress "Num 1", 1
Else
Call Plugin.Msg.Tips("Cr3的颜色:"&Cr3)
Delay 2000
End If
Wend
//自己去测试一下
可以运行了,但是和我之前的差不多啊,只是多了个“否“,还是不能将
KeyPress "Down", 8
Delay 200
KeyPress "Enter", 1
Delay 2000
这些部分输入到指定的窗口中。我点击其他窗口后这部分内容就是对点击的窗口起作用了。不过谢谢你的帮助
Hwnd = Plugin.Window.MousePoint()
While true
FindPic 0,0,1024,768,"Attachment:\inth.bmp",0.9,inthX,inthY
cr1=Plugin.Color.GetPixelColor(inthX+64,inthY+85,1)
If Cr1 = "E6" Then
Delay 200
For 8
Call Plugin.Bkgnd.KeyPress(Hwnd, 40)
Next
Delay 200
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 2000
End If
cr2=Plugin.Color.GetPixelColor(inthX-52,inthY+99,1)
If CR2 = "FAFAFA" Then
Delay 200
Call Plugin.Bkgnd.KeyPress(Hwnd, 40)
Delay 200
For 3
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Next
Delay 800
End If
cr3=Plugin.Color.GetPixelColor(inthX-24,inthY+225,1)
If Cr3 = "299ED" Then
Delay 400
Call Plugin.Bkgnd.KeyPress(Hwnd, 97)
End If
Wend
这个应该可以了
我就是想知道怎么改,这是我第一次编程,什么都不会,就上面程序我都是现学现写的
追答可以啊,第一次就能写出这么个程序
追问花了很长时间
追答不错,很有前途