1. ShowStateWin
  2. //IfColor 706,263,bdcbff,2
  3. //窗口位置正确,并在游戏登录介面
  4. 如果表达式 (ColorCompare(GetPixelColor(706,263),"bdcbff",15)) 为真,则
  5.     延时500毫秒
  6.     调用子程序 移动小地图
  7.     延时2000毫秒
  8. 否则如果(Not(ColorCompare(GetPixelColor(623,152),"bdcbff",15)))为真,则
  9.     鼠标移到 860 , 229
  10.     左键单击
  11.     延时2000毫秒
  12. 条件结束
  13. //
  14. 标记 开始
  15. MoveMapCount=0
  16. 如果表达式 (reref=1) 为真,则
  17.     //刷新后登录游戏
  18.     调用子程序 登录游戏
  19.     延时5000毫秒
  20.     调用子程序 调整魔力学堂窗口位置Sub
  21.     //---重设刷新后变量---
  22.     PetHpPositionY=-1
  23.     CharacherHpPositionY=0
  24.     fighting=0
  25.     CharacherHpLow=0
  26.     CharacherMpLow=0
  27.     Bhplow=0
  28.     Bmplow=0
  29.     PetHpLow=0
  30.     PetMpLow=0
  31.     petdeath=0
  32.     PetIsDeathB=0
  33.     reref=0
  34.     GoPlaceTimeArr(2) = 0
  35.     //---重设刷新后变量---
  36. 条件结束
  37. 标记 打怪区
  38. 如果表达式 (place<>"") 为真,则
  39.     //------------
  40.     //打开小地图
  41.     MoveMapCount=0
  42.     标记 打开小地图
  43.     如果表达式 (MoveMapCount<=5) 为真,则
  44.         调用子程序 移动小地图
  45.     条件结束
  46.     //IfColor 623,152,bdcbff,2
  47.     如果表达式 (ColorCompare(GetPixelColor(623,152),"bdcbff",15)) 为真,则
  48.         延时500毫秒
  49.     否则
  50.         //--
  51.         //特殊BUG部分 - 按键"C"
  52.         如果表达式 (MoveMapCount=10) 为真,则
  53.             按键<C>
  54.             延时100毫秒
  55.         条件结束
  56.         //--
  57.         鼠标移到 860 , 229
  58.         左键单击
  59.         延时2000毫秒
  60.         调用子程序 防卡刷新
  61.         如果表达式 (fighting<=0) 为真,则
  62.             //IfColor 58,141,add78c,2
  63.             如果表达式 (ColorCompare(GetPixelColor(58,141),"add78c",15)) 为真,则
  64.                 MoveMapCount=MoveMapCount+1
  65.                 跳转到标记 打开小地图
  66.             条件结束
  67.         条件结束
  68.     条件结束
  69.     调用子程序 防卡刷新重置
  70.     //------------
  71.     fighting=0
  72.     FindMonsterLoop=0
  73.     如果表达式 (fighting<=0) 为真,则循环执行
  74.         //MsgBox fighting,0,"打怪区1"
  75.         调用子程序 检查是否战斗
  76.         调用子程序 检查是否要输入防外挂验证
  77.         //MsgBox fighting,0,"打怪区2"
  78.         如果表达式 ((ColorCompare(GetPixelColor(623,151),"C6CBFF",10)>0) And (ColorCompare(GetPixelColor(254,153),"5A6908",10)>0)) 为真,则
  79.             //小地图没打开,重试打开,战斗中可能取消自动战斗,按需求修改MoveTo位置
  80.             延时100毫秒
  81.             如果表达式 (FindMonsterLoop>10) 为真,则
  82.                 按键<C>
  83.                 延时1000毫秒
  84.                 如果表达式 ((ColorCompare(GetPixelColor(149,233),"5A6908",20)>0)) 为真,则
  85.                     按键<C>
  86.                     延时100毫秒
  87.                 条件结束
  88.                 //游戏BUG
  89.                 //MoveTo 860,229
  90.                 //LeftClick 1
  91.                 FindMonsterLoop=0
  92.             条件结束
  93.         否则
  94.             延时100毫秒
  95.             如果表达式 (Att99>0) 为真,则
  96.                 //MoveTo 836,229
  97.                 鼠标移到 857 , 218
  98.             否则
  99.                 鼠标移到 860 , 229
  100.             条件结束