Jump to content

Sky Slate Blueberry Blackcurrant Watermelon Strawberry Orange Banana Apple Emerald Chocolate
Photo

Screenshot Auto Saver


  • Please log in to reply
No replies to this topic
stevemarsbar
  • Members
  • 1 posts
  • Last active: Aug 23 2013 12:37 PM
  • Joined: 05 Mar 2013

Quick script to take a screenshot, paste into paint and save to a directory: 

 

^PrintScreen::
 SaveClip := ClipBoard
 FileNameAndPath := "%UserProfile%\Desktop\Screenshots\screenshot_" . a_now . ".jpg"

 Send, {AltDown}{PrintScreen}{AltUp}
 Run, mspaint
 WinWaitActive, Paint
 Sleep, 100
 Send, ^v
 Sleep, 100
 Send, {AltDown}f{AltUp}a
 WinWaitActive, Save As
 Clipboard = %FileNameAndPath%
 Send, ^v
 Sleep, 100
 Send, {Enter}
 Send, {AltDown}f{AltUp}xn
 Clipboard = 

Return