//===变量=== UserVar Var1=DropList{亚德炎:0|冰奈斯:1|瑟冥特克:2|雷沃斯:3|火焰赫瑞克:4|冰影阿奎利斯:5|亡魂默克尔:6|极光格雷林:7}=0 F1 UserVar Var2=DropList{亚德炎:0|冰奈斯:1|瑟冥特克:2|雷沃斯:3|火焰赫瑞克:4|冰影阿奎利斯:5|亡魂默克尔:6|极光格雷林:7}=1 F2 UserVar Var3=DropList{亚德炎:0|冰奈斯:1|瑟冥特克:2|雷沃斯:3|火焰赫瑞克:4|冰影阿奎利斯:5|亡魂默克尔:6|极光格雷林:7}=2 F3 UserVar Var4=DropList{亚德炎:0|冰奈斯:1|瑟冥特克:2|雷沃斯:3|火焰赫瑞克:4|冰影阿奎利斯:5|亡魂默克尔:6|极光格雷林:7}=3 F4 UserVar Var5=DropList{亚德炎:0|冰奈斯:1|瑟冥特克:2|雷沃斯:3|火焰赫瑞克:4|冰影阿奎利斯:5|亡魂默克尔:6|极光格雷林:7}=4 F5 UserVar Var6=DropList{亚德炎:0|冰奈斯:1|瑟冥特克:2|雷沃斯:3|火焰赫瑞克:4|冰影阿奎利斯:5|亡魂默克尔:6|极光格雷林:7}=5 F6 UserVar Var7=DropList{亚德炎:0|冰奈斯:1|瑟冥特克:2|雷沃斯:3|火焰赫瑞克:4|冰影阿奎利斯:5|亡魂默克尔:6|极光格雷林:7}=6 F7 UserVar Var8=DropList{亚德炎:0|冰奈斯:1|瑟冥特克:2|雷沃斯:3|火焰赫瑞克:4|冰影阿奎利斯:5|亡魂默克尔:6|极光格雷林:7}=7 F8 UserVar Var9=DropList{使用:0|不使用:1}=0 是否使用冰奈斯补血(使用后按F9补血,按住F10停止) //===开始=== Rem 循环 WaitKey Down If Down =112 VBS X=Var1 Gosub 要输出的精灵 ElseIf Down =113 VBS X=Var2 Gosub 要输出的精灵 ElseIf Down =114 VBS X=Var3 Gosub 要输出的精灵 ElseIf Down =115 VBS X=Var4 Gosub 要输出的精灵 ElseIf Down =116 VBS X=Var5 Gosub 要输出的精灵 ElseIf Down =117 VBS X=Var6 Gosub 要输出的精灵 ElseIf Down =118 VBS X=Var7 Gosub 要输出的精灵 ElseIf Down =119 VBS X=Var8 Gosub 要输出的精灵 ElseIf Down =120 Gosub 使用冰奈斯补血 EndIf Goto 循环 //===子程序=== Sub 要输出的精灵 If X = 0 Gosub 亚德炎 ElseIf X = 1 Gosub 冰奈斯 ElseIf X = 2 Gosub 瑟冥特克 ElseIf X = 3 Gosub 雷沃斯 ElseIf X = 4 Gosub 火焰赫瑞克 ElseIf X = 5 Gosub 冰影阿奎利斯 ElseIf X = 6 Gosub 亡魂默克尔 ElseIf X = 7 Gosub 极光格雷林 EndIf Return 要输出的精灵 Sub 亚德炎 KeyPress 87,1 KeyPress 83,1 KeyPress 68,1 KeyPress 77,1 Return 亚德炎 Sub 冰奈斯 KeyPress 83,1 KeyPress 87,1 KeyPress 68,1 KeyPress 77,1 Return 冰奈斯 Sub 瑟冥特克 KeyPress 87,1 KeyPress 83,1 Delay 10 KeyPress 83,1 KeyPress 77,1 Return 瑟冥特克 Sub 雷沃斯 KeyPress 87,1 KeyPress 83,1 KeyPress 87,1 KeyPress 77,1 Return 雷沃斯 Sub 火焰赫瑞克 KeyPress 87,1 KeyPress 68,1 KeyPress 83,1 KeyPress 77,1 Return 火焰赫瑞克 Sub 冰影阿奎利斯 KeyPress 87,1 KeyPress 68,1 Delay 10 KeyPress 68,1 KeyPress 77,1 Return 冰影阿奎利斯 Sub 亡魂默克尔