ChupManHinh_Source

#include <ScreenCapture.au3>
HotKeySet("{F1}","setA")
HotKeySet("{F2}","setB")
HotKeySet("{F3}","capture")
Global $left,$top,$right,$bottom

While 1
   Sleep(100)
WEnd
Func setA()
   Local $pos
   $pos = MouseGetPos()
   $left = $pos[0]
   $top = $pos[1]
EndFunc
Func setB()
   Local $pos
   $pos = MouseGetPos()
   $right = $pos[0]
   $bottom = $pos[1]
EndFunc
Func capture()
   _ScreenCapture_Capture(@DesktopDir & "\PHIEULANG"  & @MON & @MDAY  & @HOUR & @MIN & @SEC  & ".jpg", $left, $top, $right, $bottom)
EndFunc