Screen Capture and save into a folder

This is a scripting in AutoIt which is a free tool. At first when I knew about it I was on clouds, trying out every possible thing that I thought. This is one of them. It help you keep an eye on your system for instance if you have handed it over to someone for sometime. Just type in the time period till you want to capture images and it saves the screenshot to the provided location, without letting the person know if something is happening right in front of this eyes. :)


#include <ScreenCapture.au3>

Global $stime = InputBox("Auto snap time :", "Enter time in minutes : ", "", "")
Example()

Func Example()
    Local $hBmp, $i,$fname
    $i=0
    $fname=@MyDocumentsDir&"\ShowMe\"&@HOUR&@MIN&@SEC
    DirCreate($fname)
   for $i = 1 to $stime*60

    ; Capture full screen
    $hBmp = _ScreenCapture_Capture("")
   Sleep(1000)

    ; Save bitmap to file
    _ScreenCapture_SaveImage($fname&"\Image" & $i & ".png", $hBmp)

    Next
EndFunc