1.                 dim inbattle,btlx,btly,ex,i,k,term
  2.                 dim blood,bloodx,bloody,bldUpSpd,bldUpTime,beginTime
  3.                 dim monst(2),tolTimes,perExp,tolExp,dieNums,reLive,tolsecond,howlong,dl,hl,ml,sl
  4.                 dim rndAtk,attackOrder
  5.                 dim maxDly,minDly
  6.                 dim makeoredusttimes,rollmap
  7.                 left=125:top=245:right=860:bottom=480:c1="00B4FF":i=0:j=0
  8.                 tolTimes=1:tolExp=1:perExp=0.02:dienums=0:reLive=0
  9.                 maxDly=5000:minDly=1000:beginTime=now
  10.                 bloodx1=610:bloodx2=689:bloody1=235:bloody2=240
  11.                 makeoredusttimes=0:rollmap=1
  12.                 //攻击方向:0上1中2下
  13.                 dim atkDirx(3),atkDiry(3)
  14.                 atkdirx(0)=337:atkdiry(0)=328
  15.                 atkdirx(1)=370:atkdiry(1)=371
  16.                 atkdirx(2)=339:atkdiry(2)=419
  17.                 dim fhlj,fhljlen,diedly
  18.                 fhlj="22015":fhljlen=len(fhlj)
  19.                 //路径坐标0代表复活点
  20.                 dim fhx(6),fhy(6)
  21.                 fhx(0)=800:fhy(0)=270
  22.                 fhx(1)=800:fhy(1)=208
  23.                 fhx(2)=800:fhy(2)=228
  24.                 fhx(3)=800:fhy(3)=248
  25.                 fhx(4)=800:fhy(4)=268
  26.                 fhx(5)=800:fhy(5)=288
  27.                 ///////////////////////////////////////////
  28.                 //----------自定义变量-----------
  29.                 //c是需要打的怪的特征色
  30.                 //c1是团队刷怪(怪上方的黄色团队打怪标志)
  31.                 //dagc是需要避免的怪:年长的恶魔犬[4] 99FF
  32.                 //鼠怪[1] FF00 狂狗[2] BF4C 雄性火蜘蛛2 BF4C 鼠怪头领[3] FF99 鼠怪领袖[2]FF66.
  33.                 //刽子手护腿:杀人蜂卫兵[3]ffff 骷髅勇士[3]FFCC 骷髅兵[2] 8434
  34.                 //term=0组队开关 0单刷1组队2遇到就打,刷高级怪的时候最好设置为1,怪少的时候可以设置为2
  35.                 //maxerr组队情况下设置连续多少次找不到组队刷怪时, 自己刷怪!
  36.                 //bldUpSpd常态下回血速度/秒, bldUpTime为恢复时间
  37.                 //rndAtk是否探索组合招式0否1是随机出招
  38.                 //attackOrder出招顺序表1上2中3下
  39.                 //eatbread战斗过后是否直接吃面包0否1是
  40.                 //makeoredust是否磨矿粉0否1是
  41.                 ///////////////////////////////////////////
  42.                 monst(0)="骷髅勇士[3]"
  43.                 monst(1)="FFCC"
  44.                 c=monst(1)
  45.                 dagc="8AE7"
  46.                 term=0
  47.                 blood=250
  48.                 bldUpSpd=2.0
  49.                 rndAtk=0
  50.                 maxErr=130
  51.                 outTimes=30
  52.                 //attackOrder="323322"
  53.                 //attackOrder="222"
  54.                 attackOrder="112322"
  55.                 eatbread=0
  56.                 makeoredust=0
  57.                 ////////////////////////////////////////////
  58.                 randomize
  59.                 如果表达式 (1) 为真,则循环执行
  60.                     //msgbox j
  61.                     标记 rr
  62.                     //是否退出挂机
  63.                     如果表达式 (exit_my_script=1) 为真,则
  64.                         调用子程序 ExitDrgGame
  65.                     条件结束
  66.                     //是否暂停挂机
  67.                     如果表达式 (pause_my_script=1) 为真,则
  68.                         延时100毫秒
  69.                         跳转到标记 rr
  70.                     条件结束
  71.                     //获取控制信息
  72.                     调用子程序 getdrgCtlInf
  73.                     调用子程序 renewDrgGameInf
  74.                     zd=0:ex=0
  75.                     i=i+1:i=i mod 4
  76.                     j=j+1:j=j mod maxErr
  77.                     //关闭弹出窗口
  78.                     调用插件命令 subhwnd=Window.Find(0,subtip(0))
  79.                     如果表达式 (subhwnd*1>0) 为真,则
  80.                         调用插件命令 Window.Close(subhwnd)
  81.                     条件结束
  82.                     调用插件命令 subhwnd=Window.Find(0,subtip(1))
  83.                     如果表达式 (subhwnd*1>0) 为真,则
  84.                         reLive=reLive+1
  85.                         调用插件命令 Window.Close(subhwnd)
  86.                         //msgbox "第" & reLive & "成功复活!",61," -- 网页对话框"
  87.                         //Delay mindly
  88.                     条件结束
  89.                     //与游戏兼容性未授权、未准备好(怪刚好消失)
  90.                     调用插件命令 bcxy=Bkgnd.FindColor(hwnd, 420-main_win_left,364-main_win_top, 431-main_win_left,369-main_win_top,"8eccd0")
  91.                     如果表达式 (bcxy<>"-1|-1") 为真,则
  92.                         调用插件命令 BGKM5.LClick(hwnd,487-main_win_left,368-main_win_top)
  93.                     条件结束
  94.                     //找不到怪就自动切换地图
  95.                     调用插件命令 bcxy=Bkgnd.FindColor(hwnd, 440-main_win_left,160-main_win_top, 490-main_win_left,180-main_win_top,"B6")
  96.                     //msgbox bcxy & "11111111111111111"
  97.                     如果表达式 (bcxy<>"-1|-1") 为真,则
  98.                         //msgbox i
  99.                         如果表达式 (i=0) 为真,则
  100.                             调用插件命令 BGKM5.LClick(hwnd,464-main_win_left,160-main_win_top)