1. 注释:脚本暂时仅支持1024*742分辨率下使用
  2. (语句无法识别,可能有错误): Hwnd = Plugin.Window.Find(0, "Lineage II")//窗口句柄
  3. 注释:ClientRect = Plugin.Window.GetClientRect(Hwnd)//获取窗口大小
  4. (语句无法识别,可能有错误): WindowRect = Plugin.Window.GetWindowRect(Hwnd)//获取桌面大小
  5. 定义变量 WMyArray
  6. 令 WMyArray = Split(WindowRect,"|")
  7. 注释:下面这句将字符串转换成数值
  8. 令 Ux = Clng(WMyArray(2))
  9. 令 Uy = Clng(WMyArray(3))
  10. 注释:Msgbox Ux & Uy
  11. 注释:-----------------------调整标准目标栏位置---------------------------------
  12. 调用 显示目标栏()
  13. 注释:-----------------------第一步 找到图形,个人认为简单,符合就移动到坐标。------------------------
  14. 从左上到右下查找图片 "Attachment:\自己角色.bmp",把找到的坐标保存到 (PlayX, PlayY),指定区域(左:0 上:0 右:Ux 下:Uy),相似度 0.3
  15. 如果 PlayX > 0 并且 PlayY > 0 则
  16.     (语句无法识别,可能有错误): MoveTo PlayX,PlayY //移动到坐标
  17.     (语句无法识别,可能有错误): LeftDoubleClick 3//单击角色3次
  18.     延时 200 毫秒
  19.     (语句无法识别,可能有错误): Call Plugin.Bkgnd.KeyPress(Hwnd, 27)//Esc
  20.     延时 200 毫秒
  21.     注释:-----------------------程序开始提示-------------------------------
  22.     循环当 i = 0 时
  23.         令 Hwnd = Window.GetKeyFocusWnd()
  24.         调用 Bkgnd.KeyPress(Hwnd,13)
  25.         延时 100 毫秒
  26.         (语句无法识别,可能有错误): Call Plugin.Window.SendString(Hwnd, "%target ,Ready to develop the la!")//内容
  27.         延时 500 毫秒
  28.         调用 Bkgnd.KeyPress(Hwnd,13)
  29.         令 i = 1
  30.     循环结束
  31.     注释:--------------------判断是否要补血或补蓝----------------------------
  32.     (语句无法识别,可能有错误): Call 补血()//补血
  33.     (语句无法识别,可能有错误): Call 补蓝()//补蓝
  34.     注释:-------------------以下执行重复----------------------------
  35.     (语句无法识别,可能有错误): Rem Again//跳转Again
  36.     (语句无法识别,可能有错误): Call GoBackDie()//死亡回城
  37.     (语句无法识别,可能有错误): Call 补血()//补血
  38.     (语句无法识别,可能有错误): Call 补蓝()//补蓝
  39.     (语句无法识别,可能有错误): Call Plugin.Bkgnd.KeyPress(Hwnd, 123)//F12
  40.     注释:KeyPress "F12", 10//扫地
  41.     延时 500 毫秒
  42.     (语句无法识别,可能有错误): Call Plugin.Bkgnd.KeyPress(Hwnd, 113)//F2
  43.     注释:KeyPress "F2", 1//选择目标
  44.     延时 300 毫秒
  45.     调用 前置目标栏()
  46.     注释:-----------------------第二步 找到图形,个人认为简单,符合就进行攻击。------------------------
  47.     注释:FindPic 0, 0, Ux, Uy, "Attachment:\目标怪物(满血).bmp", 0.2, intX1, intY1
  48.     从左上到右下查找图片 "Attachment:\Msn定位目标用.bmp",把找到的坐标保存到 (intX1, intY1),指定区域(左:0 上:0 右:Ux 下:Uy),相似度 0.8
  49.     如果 intX1 > 0 并且 intY1 > 0 则
  50.         (语句无法识别,可能有错误): IfColor intX1+555 , intY1-676,"14176F",0 Then//计算目标是否还有一点血
  51.         标记 攻击
  52.         (语句无法识别,可能有错误): Call GoBackDie()//死亡回城
  53.         (语句无法识别,可能有错误): Call 补血()//补血
  54.         (语句无法识别,可能有错误): Call 补蓝()//补蓝
  55.         注释:-----------------------每次攻击前都把鼠标移动到F3位置上进行点击三次
  56.         (语句无法识别,可能有错误): MoveTo intX1+470 , intY1+18//F3
  57.         (语句无法识别,可能有错误): LeftDoubleClick 5//单击3次
  58.         (语句无法识别,可能有错误): MoveTo intX1+505 , intY1+18//F4
  59.         (语句无法识别,可能有错误): LeftDoubleClick 5//单击3次
  60.         (语句无法识别,可能有错误): MoveTo intX1+545 , intY1+18//F5
  61.         (语句无法识别,可能有错误): LeftDoubleClick 1//单击3次
  62.         (语句无法识别,可能有错误): MoveTo intX1+585 , intY1+18//F6
  63.         (语句无法识别,可能有错误): LeftDoubleClick 5//单击3次
  64.         (语句无法识别,可能有错误): MoveTo intX1+620 , intY1+18//F7
  65.         (语句无法识别,可能有错误): LeftDoubleClick 1//单击3次
  66.         注释:----------------------------------------------------------------
  67.         注释: Call Plugin.Bkgnd.KeyPress(Hwnd, 114)//F3
  68.         注释: //KeyPress "F3", 20//进行攻击
  69.         注释: Delay 10
  70.         注释:
  71.         注释: Call Plugin.Bkgnd.KeyPress(Hwnd, 115)//F4
  72.         注释: //KeyPress "F4", 20//进行攻击
  73.         注释: Delay 10
  74.         注释:
  75.         注释: Call Plugin.Bkgnd.KeyPress(Hwnd, 116)//F5
  76.         注释: //KeyPress "F5", 20//进行攻击
  77.         注释: Delay 10
  78.         注释:
  79.         注释: Call Plugin.Bkgnd.KeyPress(Hwnd, 117)//F6
  80.         注释: //KeyPress "F6", 20//进行攻击
  81.         注释: Delay 10
  82.         注释:
  83.         注释: Call Plugin.Bkgnd.KeyPress(Hwnd, 118)//F7
  84.         注释: //KeyPress "F7", 20//进行攻击
  85.     条件结束
  86.     从左上到右下查找图片 "Attachment:\Msn定位目标用.bmp",把找到的坐标保存到 (intX2, intY2),指定区域(左:0 上:0 右:Ux 下:Uy),相似度 0.8
  87.     如果 intX2 > 0 并且 intY2 > 0 则
  88.         (语句无法识别,可能有错误): IfColor intX2+442 , intY2-676,"14176F",0 Then//计算目标是否还有一点血
  89.         (语句无法识别,可能有错误): Goto 攻击//续费攻击
  90.     否则
  91.         延时 200 毫秒
  92.         (语句无法识别,可能有错误): Call Plugin.Bkgnd.KeyPress(Hwnd, 27)//Esc
  93.         注释:KeyPress "Esc", 1
  94.         延时 100 毫秒
  95.         (语句无法识别,可能有错误): Goto Again//跳转Again
  96.     条件结束
  97. 条件结束
  98. 否则
  99.     (语句无法识别,可能有错误): Call Plugin.Bkgnd.KeyPress(Hwnd, 27)//Esc
  100.     注释:KeyPress "Esc", 1