运行环境：分辨率：1280×960 色深：32位 操作系统：Microsoft Windows XP 按键精灵版本：9.50.11632

@880412    2012/12/21

UserVar VarQ=1000 "延迟"   Rem A   kd= Plugin.Sys.GetScRX()   gd= Plugin.Sys.GetScRY()   Call Plugin.Msg.ShowScrTXT(1,1,200,100,"狙击模式","0000FF")    Call Plugin.Msg.ShowScrTXT(kd/2-2,gd/2+2,kd/2+3,gd/2+3,"■","F3F3F3")       Call Plugin.Msg.ShowScrTXT(kd/2,gd/2+1,kd/2+1,gd/2+15,"■","F3F3F3")   FindColorEx kd*0.47,gd*0.52,kd*0.53,gd*0.6,"303AA5",0,0.7,intX,intY   If intX > 0 And intY > 0 Then       IfColor 15,15,"000000",2 Then           Call Q()       Else           Call W()       End If   End If   Goto A   Sub Q()       SetSimMode 2       LeftClick 1       Delay 5       KeyPress "3", 1       Delay 5       KeyPress "1", 1       Delay VarQ   End Sub   Sub W()       SetSimMode 2       RightClick 1       Delay 5       LeftClick 1       Delay 5       KeyPress "3", 1       Delay 5       KeyPress "1", 1       Delay VarQ   End Sub