- 注释：※※※※※※※※※【在电脑桌面建立挂机记录】※※※※※※※※
- 令 IsFile = File.IsFileExit("C:\Documents and Settings\Administrator\桌面\打怪记录.txt")
- 如果 IsFile <> True 则
- 令 objShell = CreateObject("WScript.Shell")
- 令 x = objShell.SpecialFolders.Item("desktop")
- 注释：↑取得桌面路径
- 令 fso = CreateObject("Scripting.FileSystemObject")
- 定义常量 forwriting = 2
- 定义常量 forreading = 1
- 令 myfile = fso.createtextfile(x & "\打怪记录.txt")
- 注释：↑写一个TXT到桌面
- 注释：↑判断挂机记录.txt是否存在，如不存在，则建立。
- myfile.writeline(("天龙八部打怪，可在800*600或1024*768窗口大小下运行，可在屏幕上随意放置游戏窗口。注意：1、人物和珍兽的血条和级别数字要显在桌面上；2、窗口遮住时，影响识别防挂图 和捡包，建议记住挂图出现并估计再次出现时间（30分钟左右），不捡包；3、珍兽食物要足够,4、防挂图出现区域隐蔽在屏幕外时测防挂图时，因间接测珍兽级别数字，准确率不高；5、如果要移动窗口，需结束脚本后移动，然后重启脚本，不能暂停脚本。"))
- myfile.writeline(("F1：门派第1本书第1个技能，F6：普技或大群，F7：普技或大群，F8：加血药或共生或峨嵋清心，F9：加蓝药或血祭,F10：宝宝食物，ALT1：所有门派都有的这个近攻技能"))
- myfile.writeline(("打怪开始时间:" & now))
- myfile.Close()
- 条件结束
- 注释：※※※※※※※※※【检测屏幕分分辨率是否：1024*768】※※※※※※※※
- 定义环境变量 allx
- 令 allx = Sys.GetScRX()
- 令 ally = Sys.GetScRY()
- 如果 allx <> 1024 并且 ally <> 768 则
- 注释：↑allx为屏幕分辨率宽度,↑ally为屏幕分辨率高度.
- 弹出窗口 "请将屏幕分辨率设为：1024*768后，再开启此工具。"
- 脚本停止运行
- 条件结束
- 注释：※※※※※※※※※【锁定当前窗口,得到窗口客户区大小】※※※※※※※※
- 定义环境变量 Lx
- 注释：↑定义全局变量
- 令 Hwnd = Window.Foreground()
- 调用 Window.Active(Hwnd)
- 令 sRect = Window.GetClientRect(Hwnd)
- 定义变量 MyArray
- 令 MyArray = Split(sRect,"|")
- 令 Lx = Clng(MyArray(0))
- 令 Ty = Clng(MyArray(1))
- 令 Rx = Clng(MyArray(2))
- 令 By = Clng(MyArray(3))
- 注释：※※※※※※※※※【获取游戏窗口上端框架颜色】※※※※※※※※
- 定义环境变量 Tcolor
- 注释：↑存储游戏窗口在正常状态下的颜色，防止窗口不在最前端。
- 令 Tcolor = 得到指定点 (Lx + 486, Ty - 15) 的颜色
- 注释：※※※※※※※※※【鼠标形状代码数值】※※※※※※※※
- 用户定义变量 sbdm=954439560 "鼠标(包/箱)形状代码"
- 用户定义变量 pkdm=1594686126 "鼠标(剑)形状代码"
- 用户定义变量 mousen=4 "鼠标移动圈数"
- 注释：※※※※※※※※※【用户自定义变量】※※※※※※※※
- 用户定义变量 fuben=DropList{"不延时":"0"|"不当队长延时等待":"1"|"当队长延时点击":"2"}=0 "进副本延时选项"
- 用户定义变量 yanshi=600 "(当队长)延时(秒)鼠标左击选项进副本"
- 用户定义变量 killms=DropList{"逐个杀怪":"0"|"抢怪/引怪(只打红)":"1"}=0 "打怪模式"
- 用户定义变量 pkms=DropList{"只用F1攻":"0"|"用F1-F7攻":"1"|"用F1-F7和ALT2-ALT5攻":"2"}=0 "技能设置"
- 用户定义变量 gsms=DropList{"不跟随":"0"|"(近攻)跟随怪":"1"}=0 "跟随设置"
- 用户定义变量 salt1=15 "普通近攻跟随ALT1间隔(秒)"
- 用户定义变量 gsys=1 "近攻跟随移动过程中耗用时间(秒)"
- 用户定义变量 bossms=DropList{"遇BOSS不报警/不近攻":"0"|"遇BOSS报警":"1"|"遇BOSS近攻":"2"}=0 "遇BOSS模式"
- 用户定义变量 gxue=DropList{"≤40%时近攻":"0.5"|"≤60%时近攻":"0.6"|"≤80%时近攻":"0.7"}=1 "BOSS血占第1行血?比例时近攻"
- 用户定义变量 delayt=100 "寻怪延时(毫秒/个)"
- 用户定义变量 maxtime=15 "杀怪限时(秒/个)"
- 用户定义变量 jbms=DropList{"不捡包":"0"|"(画圈)搜包":"1"}=1 "捡拾设置"
- 用户定义变量 fguatu=DropList{"不测防挂图":"0"|"防挂图出现区域无隐蔽时测防挂图":"1"|"防挂图出现区域隐蔽在屏幕外时测防挂图":"2"}=1 "报警设置"
- 用户定义变量 baojing=DropList{"声音(声卡)报警":"0"|"乐曲(播放器)报警":"1"|"关游戏":"2"|"关机":"3"}=0 "报警选项"
- 用户定义变量 sf1=1 "门派第1本书第1个技能F1间隔(秒)"
- 用户定义变量 sf2=21 "攻击F2间隔(秒)"
- 用户定义变量 sf3=26 "攻击F3间隔(秒)"
- 用户定义变量 sf4=31 "攻击F4间隔(秒)"
- 用户定义变量 sf5=64 "攻击F5间隔(秒)"
- 用户定义变量 sf6=61 "攻击F6间隔(秒)"
- 用户定义变量 melee=DropList{"停用F6":"0"|"F6普通技能":"1"|"F6群攻技能(拖放)":"2"}=0 "F6设置"
- 用户定义变量 sf7=61 "攻击F7间隔(秒)"
- 用户定义变量 attack=DropList{"停用F7":"0"|"F7普通技能":"1"|"F7群攻技能(拖放)":"2"}=0 "F7设置"
- 用户定义变量 salt2=1 "攻击ALT2间隔(秒)"
- 用户定义变量 salt3=61 "攻击ALT3间隔(秒)"
- 用户定义变量 salt4=61 "攻击ALT4间隔(秒)"
- 用户定义变量 salt5=94 "攻击ALT5间隔(秒)"
- 用户定义变量 xuems=DropList{"不补血":"0"|"(共生/药品)补血":"1"|"清心补血":"2"}=2 "补血设置"
- 用户定义变量 lanms=DropList{"不补蓝":"0"|"(血祭/药品)补蓝":"1"}=1 "补蓝设置"
- 用户定义变量 rxue=DropList{"≤50%时补血":"0.5"|"≤60%时补血":"0.6"|"≤70%时补血":"0.7"}=1 "人物补血比例"
- 用户定义变量 rlan=DropList{"≤50%时补蓝":"0.5"|"≤60%时补蓝":"0.6"|"≤70%时补蓝":"0.7"}=0 "人物补蓝比例"
- 用户定义变量 sxue=DropList{"≤50%时补血":"0.5"|"≤60%时补血":"0.6"|"≤70%时补血":"0.7"}=1 "珍兽补血比例"
- 用户定义变量 song=DropList{"不测试":"0"|"测声音(声卡)报警":"1"|"测乐曲(播放器)报警":"2"}=0 "报警声音测试C:\WINDOWS\Media\air.wav"
- 如果 song = 1 则
- 调用 声音()
- 否则如果 song = 2 则
- 调用 乐曲()
- 条件结束
- 注释：※※※※※※※※※【定义时间变量】※※※※※※※※
- 定义变量 tf1, tf2, tf3, tf4, tf5, tf6, tf7
- 令 tf1 = now
- 令 tf2 = now
- 令 tf3 = now
- 令 tf4 = now
- 令 tf5 = now
- 令 tf6 = now
- 令 tf7 = now
- 定义变量 talt1, talt2, talt3, talt4, talt5
- 令 talt1 = now
- 令 talt2 = now
- 令 talt3 = now
- 令 talt4 = now
- 令 talt5 = now