1. //〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓★功能说明★〓〓〓〓〓〓〓〓〓〓〓〓〓☆〓〓〓〓
  2. //1. 可设为手动行走或自动跟随队员
  3. //2. 自动判断队伍中人员的数量
  4. //3. 自动加血技能回蓝
  5. //4. 当然队伍中两人以上(包括自己)血量少于设定值时,用群加
  6. //5. 自动加法力护盾
  7. //6. 当血量太少时,吃红药
  8. //7. 狩猎副本中,死亡时自动复活,死亡达到设定次数时终止挂机,防止装备熔化
  9. //〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓★使用说明★〓〓〓〓〓〓〓〓〓〓〓〓〓☆〓〓〓〓
  10. //1. 数字键1设为群疗技能1:治愈之风
  11. //2. 数字键2设为群疗技能2:群体治疗
  12. //3. 数字键3设为单疗技能1:治愈之手
  13. //4. 数字键4设为单疗技能2:神圣之手
  14. //5. 数字键5设为单疗技能3:天使之手
  15. //6. 数字键6设为心灵转换技能,以后放魔法恢复技能
  16. //7. 数字键7设为:单体复活
  17. //8. 数字键8设为:法力护盾
  18. //9. 数字键9设为红药
  19. //10.数字键0设为跟随
  20. //11.符号键-设为自动捡物品
  21. //12.符号键=设为坐下休息
  22. //13.按CTRL+F1开始脚本后,按F2~F10键,用于确定要跟随的队员,如果按其它键,则自己进行手动移动
  23. //14.第一次按热键启动脚本后,会自动生个一个“SunSM.txt”的配置文件,以后大家可以根据自己的实际情况修改设置
  24. //15.游戏环境为:1024*768,16位,全屏,效果全关
  25. //〓〓〓〓〓〓〓〓〓〓〓〓〓〓★快捷键自定义★〓〓〓〓〓〓〓〓〓〓〓〓☆〓〓〓〓
  26. //如果技能存在,就设为1,不存在,则设为0
  27. dim Num1,Num2,Num3,Num4,Num5,Num6,Num7,Num8,Num9
  28. //Num1=1
  29. //Num2=0
  30. //Num3=1
  31. //Num4=1
  32. //Num5=0
  33. //Num6=1
  34. //Num7=1
  35. //Num8=0
  36. //Num9=1
  37. //〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓★变量声明★〓〓〓〓〓〓〓〓〓〓〓〓〓☆〓〓〓〓
  38. Dim YanShi,MinMyHPPot,MaxMyHPPot,MyMPPot,TimeDuiWu,DuiWuHPPot
  39. Dim FLHDPot,SiWangPot,GenSuiTimePot
  40. Dim MinMyHPFlage,MaxMyHPFlage,MyMPFlage,QunLiaoFlage,DanLiaoFlage,FBFlage
  41. Dim strMySetFile,file,myfile,nw
  42. //应用变量声明
  43. Dim GenSui,RenShu,DuiWuY,QunLiao,DanLiao,DanLiaoDuiYan,FuHuo
  44. Dim DuiWuTime,MyMPTime,BuffTime1,GenSuiTime
  45. Dim DanLiaoTime1,DanLiaoTime2,DanLiaoTime3,QunLiaoTime1,QunLiaoTime2
  46. //〓〓〓〓〓〓〓〓〓〓〓〓〓★玩家自定义变量★〓〓〓〓〓〓〓〓〓〓〓〓☆〓〓〓〓
  47. //跟据网络情况设定自己的延时,取值在50-200之间
  48. //YanShi=100
  49. //设定自身血量低于该百分比时吃红药
  50. //MinMyHPPot=50
  51. //设定自身血量低于该百分比时给自己单疗
  52. //MaxMyHPPot=70
  53. //设定自身蓝量低于该百分比时用技能回蓝
  54. //MyMPPot=70
  55. //设定多长时间检查一次队伍情况,单位:秒
  56. //TimeDuiWu=60
  57. //设定队员血量低于该百分比时需加血
  58. //DuiWuHPPot=80
  59. //根据魔法护盾的技能等级设定时间,单位:秒
  60. //FLHDPot=180
  61. //位置标志,0为在城中,1为野外,2为狩猎副本,3为关卡副本,4为PVP副本
  62. //FBFlage=2
  63. //挂机死亡次数达到此值时,终止挂机,防止装备熔化
  64. //SiWang=5
  65. //设定相隔以下时间重新跟随一次,单位:秒
  66. //GenSuiTimePot=15
  67. //〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓★主程序★〓〓〓〓〓〓〓〓〓〓〓〓〓☆〓〓〓〓〓
  68. 标记 主程序
  69. //相关配置文件定义
  70. strMySetFile="SunSm.txt"
  71. //读配置文件
  72. 调用子程序 [写配置]
  73. //设定队伍检查的初始时间
  74. DuiWuTime=0
  75. //设定各技能的初始时间
  76. MyMPTime=0
  77. QunLiaoTime1=0
  78. QunLiaoTime2=0
  79. DanLiaoTime1=0
  80. DanLiaoTime2=0
  81. DanLiaoTime3=0
  82. BuffTime1=0
  83. //复活次数初始值
  84. FuHuo=0
  85. //设定跟随的初始记时
  86. GenSuiTime=Timer
  87. //设定要跟随的队员
  88. 等待按任意键,保存到变量GenSui中
  89. 如果表达式 (GenSui>112 And GenSui<122) 为真,则
  90.     调用子程序 [跟随]
  91. 否则
  92.     GenSui=112
  93.     调用子程序 [跟随]
  94. 条件结束
  95. 如果表达式 (1) 为真,则循环执行
  96.     //检查队伍人数
  97.     如果表达式 (Timer-DuiWuTime>TimeDuiWu) 为真,则
  98.         调用子程序 [队伍检查]
  99.     条件结束
  100.     //扫描人员状态