1. 用户定义变量 jn1=a 设置技能1键位
2. 用户定义变量 jn2=2 设置技能2键位
3. 用户定义变量 jn3=F11 设置技能3键位
4. 用户定义变量 s1=60 设置技能1施放间隔时间
5. 用户定义变量 s2=90 设置技能2施放间隔时间
6. 用户定义变量 s3=120 设置技能3施放间隔时间
7. //-----------------------------------------------------------------------
8. //---------------------------------------------------------[赋值初始变量]
9. //-----------------------------------------------------------------------
10. dim number(2),thetime(2),key(2),sj(2)
11. dim a,b,c,d,jn1,jn2,jn3,s1,s2,s3,t1,t2,t3,L
12. //声明变量
13. number(0)=jn1:number(1)=jn2:number(2)=jn3
14. thetime(0)=s1:thetime(1)=s2:thetime(2)=s3
15. //把自定义参数的返回值转换成数组元素
16. t1=now:t2=now:t3=now
17. //返回当前系统日期时间到变量
18. //-----------------------------------------------------------------------
19. //---------------------------------------------------------- [跳转子程序]
20. //-----------------------------------------------------------------------
21. 调用子程序 判断按键
22. 调用子程序 判断时间
23. //-----------------------------------------------------------------------
24. //---------------------------------------------------------- [脚本主程序]
25. //-----------------------------------------------------------------------
26. 如果表达式 (true) 为真,则循环执行
27.     //条件无限循环
28.     如果表达式 (DateDiff("s",t1,now)>=sj(0)) 为真,则
29.         //< DateDiff 函数：返回两个日期之间的时间间隔>
30.         //<"s"：秒> <t1：时间变量> <now：当前系统日期和时间> <s(0)：自定义时间变量>
31.         延时10毫秒
32.         按键#key(0)
33.         //按键 变量k(0) 1次
34.         t1=now
35.         //重新赋值日期时间到变量
36.     条件结束
37.     如果表达式 (DateDiff("s",t2,now)>=sj(1)) 为真,则
38.         延时10毫秒
39.         按键#key(1)
40.         t2=now
41.     条件结束
42.     如果表达式 (DateDiff("s",t3,now)>=sj(2)) 为真,则
43.         延时10毫秒
44.         按键#key(2)
45.         t3=now
46.     条件结束
47.     延时10毫秒
48. 循环结束
49. //-----------------------------------------------------------------------
50. //------------------------------------------------------ [判断键码子程序]
51. //-----------------------------------------------------------------------
52. 子程序 判断按键
53.     a=0:b=0
54.     //赋值数组最小下标
55.     循环 3 遍
56.         L=Len(number(a))
57.         //< Len 函数：返回字符串内字符的数量>
58.         如果表达式 (L=1) 为真,则
59.             key(b)=Asc(UCase(number(a)))
60.             //< Asc 函数：返回字符串首字母的ASCII字符代码> < UCase 函数：返回转换为大写字母的字符>
61.             如果表达式 (key(b)<48 or key(b)>90) 为真,则
62.                 跳转到标记 End
63.                 //超出范围跳转到脚本结束标记
64.             否则如果(key(b)>57 and key(b)<65)为真,则
65.                 跳转到标记 End
66.             条件结束
67.         否则如果(L>1 and L<4)为真,则
68.             如果表达式 (UCase(Left(number(a),1))="F") 为真,则
69.                 //判断字符串首字字符 < Left 函数：返回字符串最左边的指定数量的字符>
70.                 key(b)=Asc(UCase(Left(number(a),1)))+Right(number(a),L-1)+41
71.                 //< Right 函数：返回字符串最右边的指定数量的字符>
72.                 如果表达式 (key(b)<112 or key(b)>123) 为真,则
73.                     跳转到标记 End
74.                 条件结束
75.             否则
76.                 跳转到标记 End
77.             条件结束
78.         否则
79.             跳转到标记 End
80.         条件结束
81.         a=a+1:b=b+1
82.         //数组下标+1
83.         延时10毫秒
84.     循环结束
85. 子程序结束,回到调用处
86. //-----------------------------------------------------------------------
87. //------------------------------------------------------ [判断时间子程序]
88. //-----------------------------------------------------------------------
89. 子程序 判断时间
90.     c=0:d=0
91.     循环 3 遍
92.         如果表达式 (IsNumeric(thetime(c))=True) 为真,则
93.             //< IsNumeric 函数：返回布尔值指明表达式的值是否为数字>
94.             sj(d)=cint(thetime(c))
95.             //< CInt 函数：返回已被转换为整形子类型的变体的表达式>
96.         否则
97.             跳转到标记 End
98.         条件结束
99.         c=c+1:d=d+1
100.         延时10毫秒