按键精灵怎么写代码( 二 ) _按键精灵

i=0
For 10
Y(i)=X(Z(i))
i=i+1
Next
Call RunApp("notepad.exe")
Delay 1000
Hwnd = Plugin.Window.Find(0 ， "无标题 - 记事本")
Hwnd = Plugin.Window.FindEx(Hwnd, 0, "Edit", 0)
i=0
For 10
Call Plugin.Window.SendString(hwnd,Y(i))
Call Plugin.Bkgnd.KeyPress(hwnd,13)
i=i+1
Next
6.求按键精灵代码Rem 等待按键1
WaitKey key
TracePrint "用户按下的键是：" & key
If key=65
Gosub XXX
//执行你需要的东西.
Delay 1000
Goto 等待按键1
EndScript
SUB XXX
这里加你的脚本内容
RETURN XXX
将你要执行的XXX写成SUB ，然后调用
方法2
直接写你要直接的XXX ，然后开始键设为A ，即可
7.按键精灵翻页代码怎么写FindPic fanyeX,fanyeY,fanye1X,fanye1Y,"Attachment:\3221.bmp",1,intX2,intY2
FindPic fanyeX,fanyeY,fanye1X,fanye1Y,"Attachment:\12.bmp",1,intX3,intY3
FindPic fanyeX,fanyeY,fanye1X,fanye1Y,"Attachment:\21.bmp",1,intX4,intY4
FindPic fanyeX,fanyeY,fanye1X,fanye1Y,"Attachment:\321.bmp",1,intX1,intY1
If intX1 > 0 And intY1 > 0 Then
Call shouye()
ElseIf intX2 > 0 And intY2 > 0 Then
Call xiayiye()
ElseIf intX3 > 0 And intY3 > 0 Then
Call xiayiye()
ElseIf intX4 > 0 And intY4 > 0 Then
Call shouye()
Else
MessageBox "没有找到图片"
End If完成。
8.帮写一段按键精灵代码//以下只是参考指令，楼主执行修改，如果有不明白的地方可以追问！
//判断A点颜色
Rem A点颜色
IfColor 0,0,0,0
//当色点等于A ，则移动鼠标到某处，按一下左键，
MoveTo 0,0
Delay 100
LeftClick 1
//然后移动到另一点再按一下鼠标左键。
moveto 0,0
Delay 100
LeftClick 1
Else
//设置点延时
Delay 100
//当不等于A时判断下面
Goto B点颜色
EndIf
//判断B点颜色
Rem B点颜色
IfColor 0,0,0,0
//当颜色等于B ，则ATL+C,
KeyDown 18,1
KeyPress 67,1
KeyUp 18,1
//延迟500毫秒ALT+V 。
Delay 500
KeyDown 18,1
KeyPress 86,1
KeyUp 18,1
Else
//当颜色不等于B ，则ALT+W
KeyDown 18,1
KeyPress 87,1
KeyUp 18,1
EndIf
//脚本结束
EndScript
有什么不懂的楼主可以追问
【按键精灵怎么写代码】

文章插图