5068儿童新闻中心

仙境幻想精英大殿挂机脚本

新人 2012-02-03 18:30:57 手机版

  有玩家问小编仙境幻想挂机的脚本,小编也去咨询了一下专业人士,下面就把这个脚本展现给大家看吧。

  Plugin.Bkgnd.KeyPress 参数1, 参数2

  Dim 窗口

  窗口 = Plugin.Window.MousePoint() //以上3行为对后台运行脚本进行定义

  Rem 回血

  GetColor = Plugin.Bkgnd.GetPixelColor(窗口, 212, 205)

  If GetColor = "484E53" Then //判断是否缺血

  Call Plugin.Bkgnd.KeyPress(窗口, 57)//按键8,红

  Delay 200

  Else

  Delay 200

  End If

  Rem 回蓝

  GetColor = Plugin.Bkgnd.GetPixelColor(窗口, 209, 223)

  If GetColor = "484E53" Then //判断是否缺蓝

  Call Plugin.Bkgnd.KeyPress(窗口, 56)//按键9,蓝

  Delay 200

  Else

  Delay 200

  End If

  Rem 打怪 //定义“打怪”逻辑

  GetColor = Plugin.Bkgnd.GetPixelColor(窗口, 509, 18)

  If GetColor = "27365A" Then //判断是否选中怪物

  Call Plugin.Bkgnd.KeyPress(窗口, 49)//按键1,开打

  Delay 12000

  Call Plugin.Bkgnd.KeyPress(窗口, 54)//按键3,使用状态技能

  Delay 200

  Goto 回血

  Else //判断无目标,则进行如下操作

  For i=1 to 18

  Call Plugin.Bkgnd.KeyPress(窗口, 32)//空格捡东西18次

  Delay 300

  Next

  Call Plugin.Bkgnd.KeyPress(窗口, 9)//Tab选怪

  Goto 打怪

  End If

  Goto 回血