运行环境：分辨率：1440×900 色深：32位 操作系统：Microsoft Windows XP 按键精灵版本：8.00.6701

DY=10 "第一组强化次数（一般不改）最大10"   UserVar DE=10 "第二组强化次数（一般不改）最大10"   UserVar DS=10 "第三组强化次数（一般不改）最大10"   UserVar tm=100 "网络延时1s=1000ms根据网速定）"   UserVar sj=50 "双击鼠标的延时ms根据网速定）"   UserVar BJ=5 "三组全部强化以后失败报警次数"   UserVar BJYS=200 "三组全部强化失败后报警间隔时间"   UserVar QHSJ=23000"每组强化中的时间推荐23000"   Hwnd = Plugin.Window.Find(0,"FLYFF")   Rect = Plugin.Window.GetClientRect(Hwnd)   MyArray = Split(Rect, "|")   qx = Cint(MyArray(0))   qy = Cint(MyArray(1))   w = Cint(MyArray(2))   h = Cint(MyArray(3))   a1=0   a2=0   a3=0   Delay 500   Rem aaa   MoveTo 592+qx,283+qy   Delay tm   For 10       LeftDoubleClick 1       Delay sj   Next   MoveTo 624+qx,283+qy   Delay 100   For 10       LeftDoubleClick 1       Delay sj   Next   Delay tm   MoveTo 81+qx,513+qy   Delay tm   LeftClick 1   Delay QHSJ   MoveTo 244+qx,511+qy   Delay tm   LeftClick 1   a1=a1+1   If a1=DY then       Goto bb     End If   Delay tm   Goto aaa   //第一组结束   Rem bb   Rem bbb   Delay 500   MoveTo 591+qx,318+qy   Delay 100   For 10       LeftDoubleClick 1       Delay sj   Next   MoveTo 626+qx,319+qy   Delay tm   For 10       LeftDoubleClick 1       Delay sj   Next   Delay tm   MoveTo 81+qx,513+qy   Delay tm   LeftClick 1   Delay QHSJ   MoveTo 244+qx,511+qy   Delay tm   LeftClick 1   a2=a2+1   If a2=DE then       Goto cc   End If   Delay tm   Goto bbb   //第二组结束   Rem cc   Rem ccc   Delay 500   MoveTo 592+qx,351+qy   Delay tm   For 10       LeftDoubleClick 1       Delay sj   Next   MoveTo 624+qx,351+qy   Delay tm   For 10       LeftDoubleClick 1       Delay sj   Next   Delay tm   MoveTo 81+qx,513+qy   Delay tm   LeftClick 1   Delay QHSJ   MoveTo 244+qx,511+qy   Delay tm   LeftClick 1   a3=a3+1   If a3=DS then       for BJ           Delay BJYS           beep        Next       MessageBox "超哥恭喜你人品太差了！！强化了297次没有加10！！"       EndScript   End If   Delay tm   Goto ccc   //第三组结束