//↑红色(R)、绿色(G)、蓝色(B)
  Call Plugin.Color.ColorToHSL(hcolor, H, S, L)  
  //↑色调(H)、饱和度(S)、亮度(L)
  If R > 100 and G>100 and B > 100 and S < 15 Then 
	Goto 下一个
  End If
  Delay 50
  //↓测黑色
  hcolor = GetPixelColor(Lx + 264, Ty + 35)
  Call Plugin.Color.ColorToRGB(hcolor, R, G, B)  
  //↑红色(R)、绿色(G)、蓝色(B)
  Call Plugin.Color.ColorToHSL(hcolor, H, S, L)  
  //↑色调(H)、饱和度(S)、亮度(L)
  If R < 13 and G<13 and B < 5 and S > 230 and L < 10 Then 
  Goto 怪未死
  Else 	
  Goto 下一个
  End If
  Dim wrongn
  wrongn = 0
  //↑记录测怪血条左端红色点失误次数
  Rem 怪未死
  If pkboss = 1 Then 
    If DateDiff("s", tf1, now) >= sf1 Then 
	KeyDown "Alt", 1
    Delay 49
    KeyPress "1", 1
    Delay 51
    KeyUp "Alt", 1
    tf1=now
    Delay 100
    End If
  Else 
  	If DateDiff("s", tf1, now) >= sf1 Then 
	KeyPress "F1", 1
    tf1=now
    Delay 100
    End If
  End If
  Delay 100
  If follow = 1 Then 
  //↓如果follow=1,则启用近攻跟随,否则停用ALT1技能
  If DateDiff("s", talt1, now) >= salt1 Then 
  Dim tgsys
  tgsys = now
  Rem 反复跟
  KeyDown "Alt", 1
  Delay 49
  KeyPress "1", 1
  Delay 51
  KeyUp "Alt", 1
  talt1=now
  Delay 500
  //↑近攻跟随移动过程中耗用时间(秒)
  If DateDiff("s", tgsys, now) <= gsys Then 
  goto 反复跟
  //↑gsys:近攻跟随移动过程中耗用时间(秒)
  End If
  End If
  End If
  Delay 100
  If pkms = 0 Then 
  //↑打怪模式,此处只用F1攻
  	Goto 辨别
  End If
  If DateDiff("s", tf2, now) >= sf2 Then 
	KeyPress "F2", 1
    tf2=now
    Delay 100
  End If
  Delay 100
  If DateDiff("s", tf3, now) >= sf3 Then 
	KeyPress "F3", 1
    tf3=now
    Delay 100
  End If
  Delay 100
  If DateDiff("s", tf4, now) >= sf4 Then 
	KeyPress "F4", 1
    tf4=now
    Delay 100
  End If
  Delay 100
  If DateDiff("s", tf5, now) >= sf5 Then 
	KeyPress "F5", 1
    tf5=now
    Delay 100
  End If
  Delay 100
  If melee =1 Then 
  //↑此处F6只用普通攻击技,不用大群
  If DateDiff("s", tf6, now) >= sf6 Then 
	KeyPress "F6", 1
    tf6=now
    Delay 100
  End If
  End If
  If melee = 2 Then 
  //↑此处F6群攻技能(拖放)
  If DateDiff("s", tf6, now) >= sf6 Then