UserVar sf=DropList{是:值1|否:值2}=0 是否打开图片所在文件夹
Rem 1
WaitKey o
If o=81
    VBSCall Call GetCursorPos(x,y)
Else 
    Goto 1
EndIf 
Rem 2
WaitKey p
If p=81
    VBSCall Call GetCursorPos(x1,y1)
Else 
    Goto 2
EndIf 
//下面这句在屏幕区域范围内截图保存到("C:\PIC.bmp")里
Plugin Pic.PrintScreen(x, y, x1, y1, "C:\PIC.bmp")
If sf="值1"
    VBSCall RunApp("C:")
Else 
EndIf