按键精灵常用脚本_按键精灵string转int

一.鼠标控制

1.鼠标移动

MoveTo X, Y+6
//延时 单位ms
Delay 150
1
2
3

二.获取颜色

1.根据矩形范围和颜色，颜色块大小获取坐标值

//开始X，开始Y，结束X，结束Y，颜色，颜色块宽，颜色块高，扫描方式，相似度
//XY返回的值|分割的数组，如 128|990
XY = Plugin.Color.FindColorBlock(L, T, R, B, "D77800", 50, 19, 1,0.9)
//将XY数组拆分 存到数组变量ArrayXY
ArrayXY = Split(XY, "|")
X = Clng(ArrayXY(0))
Y = Clng(ArrayXY(1))
//打印坐标值
TracePrint X
TracePrint Y
1
2
3
4
5
6
7
8
9
10

2.根据句柄获取窗口坐标范围

//获取当前窗口句柄
HwndEx = Plugin.Window.Foreground
TracePrint "修改查询策略窗口句柄为：" & HwndEx
//获取上下左右4个点坐标
sRect = Plugin.Window.GetClientRect(HwndEx)
TracePrint sRect
dim MyArray
MyArray = Split(sRect, "|")
L = Clng(MyArray(0))
T = Clng(MyArray(1))
R = Clng(MyArray(2))
B = Clng(MyArray(3))
TracePrint L
TracePrint T
TracePrint R
TracePrint B
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

3.获取句柄

Hwnd = Plugin.Window.MousePoint()  //获取鼠标所在位置的句柄 
TracePrint "查找到的窗口句柄为:" & Hwnd 
Plugin.Window.Move Hwnd,0,0 //移动到左上角

//获取当前窗口句柄
HwndEx = Plugin.Window.Foreground
TracePrint "查找到的窗口句柄为:" & Hwnd 
Plugin.Window.Move Hwnd,0,0 //移动到左上角
1
2
3
4
5
6
7
8

二.注意事项

1.运算太快快导致卡死 要加延时

以下代码不加延时直接连续运算会卡死程序

RQ = (Row * Column) mod 255
Delay 150
GQ = (Row * Column * 100) mod 255
Delay 150
BQ = (R + G) mod 255

1
2
3
4
5
6
7

三.数值转换

1.数值转字符串

//DevCount是数值
//Name是字符串
Name = "T"+CStr(DevCount)
1
2
3

1.数值转int

//DevCount是数值
//Name是int
Name = "T"+int(DevCount)
1
2
3

四.for 循环和while循环

//for循环1——4
For temp=1 To 4
	逻辑表达式********
Next

//While 循环1——50
Count=1
While Count <= 50
	逻辑表达式********
Count=Count+1
Wend
1
2
3
4
5
6
7
8
9
10
11

五.逻辑判断语句

If Number = 1 Then 
	SayString "功率"
	SayString Index
End If
1
2
3
4

六.输入转义字符

需要输入"符号，但是直接SayString " " " 这种会出错，需要以ASCII码的形式输入
比如"符号的ASCII是34，使用直接chr(34)就行，输入就是SayString chr(34)，其他转义字符换成对应的ASCII码就行

SayString chr(34)
1