Rem 总起始
UserVar &&&&&&&&&&&&综合类设置&&&&&&&&&&&&&&&
UserVar peizhi=3 游戏配置信息操作 1-写入 2-还原 3-不做操作
UserVar hp=65 HP<%,补红("F1")
UserVar sp=45 SP<%,补红("F2")
UserVar y_or_n_skillHP=1 1-为技能补血 2为喝药补血
UserVar y_or_n_skill=n "Y"-技能打怪,"N"-物理攻击
// "Y"-SP<%转为物理攻击,"N"-不转为
y_or_n_wg=y
//SP<%,转为物理攻击,设置范围 0~14
sp_s_w=1
UserVar ber_time=12 打怪寻找时间间隔,单位:秒
//&&&&&&&&&&&&综合类设置end&&&&&&&&&&&&&&&
UserVar &&&&&&&&&&&&召唤宝宝类设置&&&&&&&&&&&&&&&&
UserVar y_or_n_zhs=y "Y"-召唤精灵,"N"-不召唤精灵
UserVar time_baby=15 单位:秒,召唤宝宝的时间间隔
//&&&&&&&&&&&&召唤宝宝类设置end&&&&&&&&&&&&&&&&
UserVar /&&&&&&&&&&&&自动归位类设置&&&&&&&&&&&&&&&&
UserVar y_or_n_return=y "Y"-自动归位,"N"-不自动归位
UserVar return_time=2 自动归位间隔时间,单位:分钟
UserVar bar_hp=30 HP<%,则自动逃跑一段路
UserVar err_denglu=1 自动登陆时1~4号角色的位置
UserVar die_city=s Y-死亡后回城做生意,S-关机,N-关闭此功能
UserVar Business_or_Create=2 1-回城后摆摊,2-回城后打造
UserVar down_or_return=1 1-无怪时归位 2-无怪时打坐
//&&&&&&&&&&&&自动归位类设置end&&&&&&&&&&&&&&&&
UserVar &&&&&&&&&&&&自动捡物类设置&&&&&&&&&&&&&&&&
UserVar y_or_n_pick=y "Y"-捡物品,"N"-不捡物品
UserVar y_or_n_lanlv=1 1-只捡蓝绿色材料,2-只捡钱,3-不使用此功能
UserVar propfull=1 1-包裹满后只捡钱 2-包裹满后不捡物 3-关闭检查包裹
UserVar time_PropFull=10 几分钟检查下包裹是否满了
//&&&&&&&&&&&&自动捡物类设置end&&&&&&&&&&&&&&&&
UserVar &&&&&&&&&&&&自定义技能类设置&&&&&&&&&&&&&&&&
UserVar use_f4=n “Y”使用f4键上技能攻击,“N”不使用
UserVar use_f5=n “Y”使用f5键上技能攻击,“N”不使用
UserVar use_f6=y “Y”使用f6键上技能,“N”不使用
UserVar use_f7=n “Y”使用f7键上技能,“N”不使用
UserVar f4_time=20 f4键上辅助技能使用间隔单位:秒
UserVar f5_time=300 f5键上辅助技能使用间隔单位:秒
UserVar f6_time=600 f6键上辅助技能使用间隔单位:秒
UserVar f7_time=300 f7键上辅助技能使用间隔单位:秒
//&&&&&&&&&&&&自定义技能类设置end&&&&&&&&&&&&&&&&
//*******************************************
//使用说明:
//游戏分辨率请使用窗口化800*600  或是全屏,请勿使用窗口1024*768
//最好使用16位色,32位色也能使用。
//请设置好召唤宝宝的时间间隔。
//自动归位是指打怪多少分钟后回到用户指定的位置。(请按照图片要求设置相关的属性)在大地图上右键点击来设置归位点
//请设置要挂机的怪物的大小,以取得最好的挂机效果。
//          F1上放加血技能或物品
//          F2上放回蓝物品
//          F3上放攻击技能或魔法攻击技能
//          F8上放要召唤宝宝的技能
//          F9上放休息打坐技能
//          F4~F7为自定义技能
//*******************************************
//引导程序
If peizhi=1
    VBSCall MessageBox("进入脚本引导程序:第一次运行脚本时请按脚本引导程序一步一步完成,运行脚本时,游戏窗口必须是前台窗口。请按回车继续。如果您已经运行过引导程序了请将参数里的“游戏配置信息操作”改为3,如果想还原配置信息请改为2")
    Delay 2000
EndIf 
//——————————定位窗口———————————
PutAttachment plugin
Plugin a=Windows.Foreground()
hwnd=a
Plugin pos=Windows.GetClientPos(hwnd)
m=instr(pos,","):l=len(pos):pos_x=int(left(pos,m-1)):pos_y=int(right(pos,l-m))
//VBSCall inputbox(pos)
Plugin pos=Windows.GetClientRect(hwnd)
dou=InStr(pos,","):pos_len=len(pos):pix=int(left(pos,dou-1)):piy=int(right(pos,pos_len-dou))
fdx=pos_x+pix-803
fdy=pos_y+piy-622
move_x=-fdx
move_y=-fdy
//——————————定位窗口end——————————
//——————————写入游戏配置文件————————
Plugin url_game=Windows.GetExePath(hwnd)
VBS set file=CreateObject("Scripting.FileSystemObject")
VBS const forappending=8
//写入配置信息(人物不锁定)
If peizhi=1
    VBSCall MessageBox("运行脚本前的准备:按回车或鼠标点击确定来关闭游戏!!否则无法写入游戏配置信息,将无法正常运行工具")
    Plugin Windows.Close(hwnd)
    Delay 6000
    VBS set config=file.createtextfile(url_game&"\Ini\config.ini")
    VBS set config=file.opentextfile(url_game&"\Ini\config.ini",forappending)
    VBS config.writeline("€#搏就%r倘洽价才EIr番财价才EHr獚ㄟ羶EHr翚ㄟ羶EHr道粡ㄟ羶EHr构伟EMHr维砂伟EMHr#獙就%r獙府且翣EHr獙府獙骨EHr獙ㄟ且翣EHr獙ㄟ獙骨EHr#废%r硛竟且翣EHr磾線且翣EHr艧粸道粡伟EHr礌ㄟ且翣EHr剖丛墨瑺EHr蜕咳菙钮咐EHr蜕咳就透EJr辜磾倘洽EJr辜磾倘洽硛涡EHr腐虠丛EJr")
    VBS config.Close
    VBSCall MessageBox("游戏已关闭,成功写入游戏配置信息,请再次进入游戏,走到挂机点准备挂机时,按回车或点击确定开始挂机或停止脚本后在参数设置里“游戏配置信息操作”设置为3,挂机前请检查下亮度对比度是否在50%位置和人物大约在屏幕的中间位置。如果这些满足了那么您可以开始运行脚本了。")
    //还原配置信息(人物锁定)
ElseIf peizhi=2
    VBSCall MessageBox("按回车或鼠标点击确定来关闭游戏!!否则无法还原游戏配置信息")
    Plugin Windows.Close(hwnd)
    Delay 5000
    VBS set config=file.createtextfile(url_game&"\Ini\config.ini")
    VBS set config=file.opentextfile(url_game&"\Ini\config.ini",forappending)
    VBS config.writeline("€#搏就%r倘洽价才EIr番财价才EHr獚ㄟ羶EHr翚ㄟ羶EHr道粡ㄟ羶EIr构伟ENLr维砂伟EMHr#獙就%r獙府且翣EIr獙府獙骨EOHr獙ㄟ且翣EIr獙ㄟ獙骨EIHHr#废%r硛竟且翣EIr磾線且翣EHr艧粸道粡伟EMHr礌ㄟ且翣EHr剖丛墨瑺EHr蜕咳菙钮咐EHr蜕咳就透EHr辜磾倘洽EHr辜磾倘洽硛涡EIr腐虠丛EIr")
    VBS config.Close
    VBSCall MessageBox("游戏已关闭,成功还原游戏配置信息。如果需要再次挂机请将“游戏配置信息操作”设为1")
EndScript