- 注释：脚本运行环境：
- 注释：分辨率:建议在X>1152，Y>800的分辨率下运行！标准分辨率为：1440x900
- 注释：系统：Microsoft Windows XP
- 注释：按键版本：8.31.8583
- 注释：色深：32
- 注释：可做任务：
- 注释：扫地
- 注释：探访
- 注释：放河灯
- 注释：买戒指
- 注释：买衣服
- 注释：买武器
- 注释：种树+杀怪
- 注释：巡逻+杀怪
- 注释：┏━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓
- 注释： 说明:
- 注释：
- 注释： 本脚本为"草稿"作品.因有事,未经优化,放上代码供大家学习之用.
- 注释： 如执行中出现意外.脚本可能死循环某一段代码,停止不前.
- 注释：
- 注释： 特殊功能:
- 注释：
- 注释： 考虑到游戏窗口的灵活性,脚本会自己调节游戏窗口大小.
- 注释：
- 注释： 设置
- 注释：
- 注释： 分辨率:建议在X>1152，Y>800的分辨率下运行！标准分辨率为：1440x900
- 注释：
- 注释： ㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣
- 注释： ㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣作者 : 按键用户 ㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣
- 注释： ㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣ QQ : 897589424 ㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣
- 注释： ㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣㊣
- 注释：┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛
- 用户定义变量 加血=70 "当血少于？%时加血"
- 用户定义变量 加蓝=40 "当蓝少于？%时加蓝"
- 用户定义变量 加血按键="F1" "按？键加血"
- 用户定义变量 加蓝按键="F2" "按？键加蓝"
- 用户定义变量 jnaj=1 "按？键技能(单秒技能)"
- 用户定义变量 WLGZ=9 "按？键万流归宗(回师门)"
- 用户定义变量 任务完成=DropList{"关机":"关机"|"报警":"报警"|"短信提示":"短信提示"}=0 "设置内容"
- 用户定义变量 音乐路径="C:\WINDOWS\Media\Windows XP 启动.wav" "报警音乐路径"
- 定义变量 怪
- 令 Hwnd = Window.Find("MainWnd class of ArkEngine",0)
- 调用 Window.Move(Hwnd,0,0)
- 调用 Window.SetClientSize(Hwnd,1024,758)
- 调用 Window.Active(Hwnd)
- 令 XY = Window.GetClientRect(Hwnd)
- 如果 StrComp(Right(XY,8),"1024|758") <> 0 则
- MsgBox("桌面分辨率太小，脚本无法执行!")
- 脚本停止运行
- 条件结束
- 调用 调整窗口大小()
- 令 KMData = bgkms3_02.KMTransform(hwnd,1)
- 如果 Not IsArray(KMData) 则
- MsgBox("获得窗口数据失败",4096)
- 条件结束
- 延时 1000 毫秒
- 令 sRect = Window.GetClientRect(Hwnd)
- 令 x = Split(sRect,"|")(0)
- 令 y = Split(sRect,"|")(1)
- 注释：///////////////////////////////////////////////////////////
- 令 Y1 = Year(Date)
- 令 Mon1 = Month(Date)
- 令 D1 = Day(Date)
- 令 W1 = Weekday(Date,vbMonday)
- 令 Text = File.ReadFileEx("C:\Log.txt")
- 令 BT1 = UBound(Split(Text,Y1 & "年" & Mon1 & "月" & D1 & "号 星期" & W1))
- 如果 BT1 < 1 则
- 调用 File.WriteFileEx("C:\Log.txt",vbCrLf & vbCrLf & vbCrLf & "脚本启动时间:" & Y1 & "年" & Mon1 & "月" & D1 & "号 星期" & W1 & vbCrLf)
- 条件结束
- 注释：///////////////////////////////////////////////////////////
- 注释：脚本开始
- 启动线程 加血蓝线程
- 调用 万流归宗()
- 调用 目标太虚道长()
- 标记 接任务
- 调用 师门任务()
- 调用 接受()
- 调用 任务判断(任务)
- 脚本停止运行
- 子程序 加血蓝线程()
- 注释：加血算法=(血条后X坐标-血条前X坐标)/100*百分比参数+窗口起点X坐标+窗口上血条X坐标
- 循环当 true 时
- 如果点 ((181 - 75) / 100 * 加血 + 血蓝X + 75,血蓝Y + 29) 的颜色约等于 "090990" 则
- 否则
- 调用 bgkms3_02.KeyPress(KMData,加血按键)
- 条件结束
- 如果点 ((181 - 75) / 100 * 加蓝 + 血蓝X + 75,血蓝Y + 40) 的颜色约等于 "953C09" 则
- 否则
- 调用 bgkms3_02.KeyPress(KMData,加蓝按键)
- 条件结束
- Randomize
- 令 延时 = Int((900 * Rnd) + 501)
- 注释： TracePrint 延时
- 延时 延时 毫秒
- 循环结束
- 子程序结束
- 子程序 任务判断(任务)
- 延时 1000 毫秒
- (语句无法识别，可能有错误): XY=Plugin.Color.FindMutiColor(0,0,1440,900,"FFC64C","2|-2|FFC64C,0|8|FFC64C,2|8|FFC64C,2|7|FFC64C,5|3|FFC64C,7|3|FFC64C,5|-1|FFC64C,5|7|FFC64C,19|7|FFC64C,22|3|FFC64C,12|3|FFC64C",1)//扫地