//〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓★功能说明★〓〓〓〓〓〓〓〓〓〓〓〓〓☆〓〓〓〓
//1. 可设为手动行走或自动跟随队员
//2. 自动判断队伍中人员的数量
//3. 自动加血技能回蓝
//4. 当然队伍中两人以上(包括自己)血量少于设定值时，用群加
//5. 自动加法力护盾
//6. 当血量太少时，吃红药
//7. 狩猎副本中，死亡时自动复活，死亡达到设定次数时终止挂机，防止装备熔化
//〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓★使用说明★〓〓〓〓〓〓〓〓〓〓〓〓〓☆〓〓〓〓
//1. 数字键1设为群疗技能1：治愈之风
//2. 数字键2设为群疗技能2：群体治疗
//3. 数字键3设为单疗技能1：治愈之手
//4. 数字键4设为单疗技能2：神圣之手
//5. 数字键5设为单疗技能3：天使之手
//6. 数字键6设为心灵转换技能，以后放魔法恢复技能
//7. 数字键7设为：单体复活
//8. 数字键8设为：法力护盾
//9. 数字键9设为红药
//10.数字键0设为跟随
//11.符号键-设为自动捡物品
//12.符号键=设为坐下休息
//13.按CTRL+F1开始脚本后，按F2~F10键，用于确定要跟随的队员，如果按其它键，则自己进行手动移动
//14.第一次按热键启动脚本后，会自动生个一个“SunSM.txt”的配置文件，以后大家可以根据自己的实际情况修改设置
//15.游戏环境为：1024*768,16位，全屏，效果全关
//〓〓〓〓〓〓〓〓〓〓〓〓〓〓★快捷键自定义★〓〓〓〓〓〓〓〓〓〓〓〓☆〓〓〓〓
//如果技能存在，就设为1，不存在，则设为0
dim Num1,Num2,Num3,Num4,Num5,Num6,Num7,Num8,Num9
//Num1=1
//Num2=0
//Num3=1
//Num4=1
//Num5=0
//Num6=1
//Num7=1
//Num8=0
//Num9=1
//〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓★变量声明★〓〓〓〓〓〓〓〓〓〓〓〓〓☆〓〓〓〓
Dim YanShi,MinMyHPPot,MaxMyHPPot,MyMPPot,TimeDuiWu,DuiWuHPPot
Dim FLHDPot,SiWangPot,GenSuiTimePot
Dim MinMyHPFlage,MaxMyHPFlage,MyMPFlage,QunLiaoFlage,DanLiaoFlage,FBFlage
Dim strMySetFile,file,myfile,nw
//应用变量声明
Dim GenSui,RenShu,DuiWuY,QunLiao,DanLiao,DanLiaoDuiYan,FuHuo
Dim DuiWuTime,MyMPTime,BuffTime1,GenSuiTime
Dim DanLiaoTime1,DanLiaoTime2,DanLiaoTime3,QunLiaoTime1,QunLiaoTime2
//〓〓〓〓〓〓〓〓〓〓〓〓〓★玩家自定义变量★〓〓〓〓〓〓〓〓〓〓〓〓☆〓〓〓〓
//跟据网络情况设定自己的延时，取值在50-200之间
//YanShi=100
//设定自身血量低于该百分比时吃红药
//MinMyHPPot=50
//设定自身血量低于该百分比时给自己单疗
//MaxMyHPPot=70
//设定自身蓝量低于该百分比时用技能回蓝
//MyMPPot=70
//设定多长时间检查一次队伍情况，单位：秒
//TimeDuiWu=60
//设定队员血量低于该百分比时需加血
//DuiWuHPPot=80
//根据魔法护盾的技能等级设定时间，单位：秒
//FLHDPot=180
//位置标志，0为在城中，1为野外，2为狩猎副本，3为关卡副本，4为PVP副本
//FBFlage=2
//挂机死亡次数达到此值时，终止挂机，防止装备熔化
//SiWang=5
//设定相隔以下时间重新跟随一次，单位：秒
//GenSuiTimePot=15
//〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓★主程序★〓〓〓〓〓〓〓〓〓〓〓〓〓☆〓〓〓〓〓
Rem 主程序
//相关配置文件定义
strMySetFile="SunSm.txt"
//读配置文件
Gosub [写配置]
//设定队伍检查的初始时间
DuiWuTime=0
//设定各技能的初始时间
MyMPTime=0
QunLiaoTime1=0
QunLiaoTime2=0
DanLiaoTime1=0
DanLiaoTime2=0
DanLiaoTime3=0
BuffTime1=0
//复活次数初始值
FuHuo=0
//设定跟随的初始记时
GenSuiTime=Timer
//设定要跟随的队员
WaitKey GenSui
If GenSui>112 And GenSui<122
    Gosub [跟随]
Else 
    GenSui=112
    Gosub [跟随]
EndIf 
While 1
    //检查队伍人数
    If Timer-DuiWuTime>TimeDuiWu
        Gosub [队伍检查]
    EndIf 
    //扫描人员状态