这TM也没人愿做？
就这代码改一下加个判断有这么难。
Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer ’API判断键盘上某键的当前状态是否按下
技能键组 = "123456"
触发键 = "Q"
do'循环
if GetAsyncKeyState(asc(ucase(触发键))) <0 then '如果触发键被按下
for i=1 to len(技能键组) '循环技能键个数次（设多少个键就循环多少次）
keydown mid(技能键组,i,1),1 '注意这里不能用keypress因为keypress内置延时50毫秒会打乱技能顺序，应该龙牙的时候可能会给你打穿云
keyup mid(技能键组,i,1),1
next
end if
delay 125 '每秒8次循环
loop