- 用户定义变量 jn1="a" "设置技能1键位"
- 用户定义变量 jn2=2 "设置技能2键位"
- 用户定义变量 jn3="F11" "设置技能3键位"
- 用户定义变量 s1=60 "设置技能1施放间隔时间"
- 用户定义变量 s2=90 "设置技能2施放间隔时间"
- 用户定义变量 s3=120 "设置技能3施放间隔时间"
- 注释:-----------------------------------------------------------------------
- 注释:---------------------------------------------------------[赋值初始变量]
- 注释:-----------------------------------------------------------------------
- 定义变量 number(2), thetime(2), key(2), sj(2)
- 定义变量 a, b, c, d, jn1, jn2, jn3, s1, s2, s3, t1, t2, t3, L
- 注释:声明变量
- 令 number(0) = jn1
- 令 number(1) = jn2
- 令 number(2) = jn3
- 令 thetime(0) = s1
- 令 thetime(1) = s2
- 令 thetime(2) = s3
- 注释:把自定义参数的返回值转换成数组元素
- 令 t1 = now
- 令 t2 = now
- 令 t3 = now
- 注释:返回当前系统日期时间到变量
- 注释:-----------------------------------------------------------------------
- 注释:---------------------------------------------------------- [跳转子程序]
- 注释:-----------------------------------------------------------------------
- 调用 判断按键()
- 调用 判断时间()
- 注释:-----------------------------------------------------------------------
- 注释:---------------------------------------------------------- [脚本主程序]
- 注释:-----------------------------------------------------------------------
- 循环当 true 时
- 注释:条件无限循环
- 如果 DateDiff("s",t1,now) >= sj(0) 则
- 注释:< DateDiff 函数:返回两个日期之间的时间间隔>
- 注释:<"s":秒> <t1:时间变量> <now:当前系统日期和时间> <s(0):自定义时间变量>
- 延时 10 毫秒
- (键盘)按 key(0) 键, 1次
- 注释:按键 变量k(0) 1次
- 令 t1 = now
- 注释:重新赋值日期时间到变量
- 条件结束
- 如果 DateDiff("s",t2,now) >= sj(1) 则
- 延时 10 毫秒
- (键盘)按 key(1) 键, 1次
- 令 t2 = now
- 条件结束
- 如果 DateDiff("s",t3,now) >= sj(2) 则
- 延时 10 毫秒
- (键盘)按 key(2) 键, 1次
- 令 t3 = now
- 条件结束
- 延时 10 毫秒
- 循环结束
- 注释:-----------------------------------------------------------------------
- 注释:------------------------------------------------------ [判断键码子程序]
- 注释:-----------------------------------------------------------------------
- 子程序 判断按键()
- 令 a = 0
- 令 b = 0
- 注释:赋值数组最小下标
- 循环 3 次
- 令 L = Len(number(a))
- 注释:< Len 函数:返回字符串内字符的数量>
- 如果 L = 1 则
- 令 key(b) = Asc(UCase(number(a)))
- 注释:< Asc 函数:返回字符串首字母的ASCII字符代码> < UCase 函数:返回转换为大写字母的字符>
- 如果 key(b) < 48 或者 key(b) > 90 则
- 调用 结束()
- 注释:超出范围跳转到脚本结束标记
- 否则如果 key(b) > 57 并且 key(b) < 65 则
- 调用 结束()
- 条件结束
- 否则如果 L > 1 并且 L < 4 则
- 如果 UCase(Left(number(a),1)) = "F" 则
- 注释:判断字符串首字字符 < Left 函数:返回字符串最左边的指定数量的字符>
- 令 key(b) = Asc(UCase(Left(number(a),1))) + Right(number(a),L - 1) + 41
- 注释:< Right 函数:返回字符串最右边的指定数量的字符>
- 如果 key(b) < 112 或者 key(b) > 123 则
- 调用 结束()
- 条件结束
- 否则
- 调用 结束()
- 条件结束
- 否则
- 调用 结束()
- 条件结束
- 令 a = a + 1
- 令 b = b + 1
- 注释:数组下标+1
- 延时 10 毫秒
- 循环结束
- 子程序结束
- 注释:-----------------------------------------------------------------------
- 注释:------------------------------------------------------ [判断时间子程序]
- 注释:-----------------------------------------------------------------------
- 子程序 判断时间()
- 令 c = 0
- 令 d = 0
- 循环 3 次