FEATURE: ocr support

FEATURE: build process

Author: BenjaminKobjolke

.gitignore

@@ -1,2 +1,3 @@
 /release
 /screenshots
+/bin

.gitmodules

@@ -1,3 +1,6 @@
 [submodule "github_modules/Gdip"]
 	path = github_modules/Gdip
 	url = https://github.com/tariqporter/Gdip.git
+[submodule "github_modules/OCR"]
+	path = github_modules/OCR
+	url = https://github.com/Descolada/OCR.git

KeyboardScreenshot.ahk

@@ -1,8 +1,6 @@
-;https://www.autohotkey.com/boards/viewtopic.php?style=19&t=96159
-;@Ahk2Exe-ExeName %A_ScriptDir%\release\KeyboardScreenshot.exe
+#Include %A_ScriptDir%\config.ahk
 #Include github_modules/Gdip/Gdip.ahk
 
-#SingleInstance, force
 CoordMode, Mouse, Screen
 
 mouseSpeed := 50
@@ -22,6 +20,7 @@ resizeNextScreenshotBy := 1
 saveToFile := 0
 uploadWithShareX := 0
 editWithShareX := 0
+ocrScreenshot := 0
 
 if (!a_iscompiled) {
 	Menu, tray, icon, icon.ico,0,1
@@ -91,6 +90,7 @@ return
 		saveToFile := 0
 		uploadWithShareX := 0
 		editWithShareX := 0
+		ocrScreenshot := 0
 		;SetTimer, MouseHintTimer, 100
 		ToolTip, move to START position with arrow keys`nthen press space
 	}	
@@ -214,6 +214,11 @@ e::
 	uploadWithShareX := 0
 return
 
+o::
+	ToolTip, Screenshot will be OCR'd
+	ocrScreenshot := 1
+return
+
 GetStartPosition:
 	state := 2
 	MouseGetPos, screenShotStartX, screenShotStartY
@@ -293,7 +298,7 @@ CreateScreenshot:
     SoundBeep, 500, 5
 	*/
 
-	CaptureScreen(screenShotStartX ", " screenShotStartY ", " screenShotEndX ", " screenShotEndY, 0, saveToFile, uploadWithShareX, editWithShareX, 0, resizeNextScreenshotBy) 
+	CaptureScreen(screenShotStartX ", " screenShotStartY ", " screenShotEndX ", " screenShotEndY, 0, saveToFile, uploadWithShareX, editWithShareX, ocrScreenshot, 0, resizeNextScreenshotBy) 
     ;ToolTip, Mouse region capture to clipboard
 	Sleep, 1000
 	ToolTip,
@@ -355,7 +360,7 @@ PreviewDestroy() {
 ; Convert("C:\image.bmp", "C:\image.jpg", 95)
 ; Convert(0, "C:\clip.png")   ; Save the bitmap in the clipboard to sFileTo if sFileFr is "" or 0.
 
-CaptureScreen(aRect = 0, bCursor = False, saveToFile = 0, uploadWithShareX = 0, editWithShareX = 0, nQuality = "", resizeBy = 1)
+CaptureScreen(aRect = 0, bCursor = False, saveToFile = 0, uploadWithShareX = 0, editWithShareX = 0, ocrScreenshot = 0, nQuality = "", resizeBy = 1)
 {
     ; Add Gdip startup
     If !pToken := Gdip_Startup()
@@ -436,10 +441,11 @@ CaptureScreen(aRect = 0, bCursor = False, saveToFile = 0, uploadWithShareX = 0,
 
 	SetClipboardData(hBM)
 
-	if(saveToFile = 1 || uploadWithShareX = 1 || editWithShareX = 1) {
+	if(saveToFile = 1 || uploadWithShareX = 1 || editWithShareX = 1 || ocrScreenshot = 1) {
 		;Convert(hBM, "c:\test.bmp", nQuality), DllCall("DeleteObject", "ptr", hBM)
 		FormatTime, currentDateTime, , yyyy_MM_dd_HH_mm_ss
-		filename := A_ScriptDir . "\screenshots\" . currentDateTime . ".jpg"		
+		baseFilename := A_ScriptDir . "\screenshots\" . currentDateTime
+		filename := baseFilename . ".jpg"
 		Convert(0, filename) 
 	}
 
@@ -460,7 +466,24 @@ CaptureScreen(aRect = 0, bCursor = False, saveToFile = 0, uploadWithShareX = 0,
 			FileDelete, %filename%
 		}
 	}
-	
+
+	if(ocrScreenshot = 1) {
+		;M sgBox, "C:\Program Files\ShareX\ShareX.exe" "%filename%"
+		if (!a_iscompiled) {
+			RunWait, "ocr.ahk" "%baseFilename%"
+		} else {
+			RunWait, "ocr.exe" "%baseFilename%"
+		}
+		textFilename := baseFilename . ".txt"
+		FileRead, text, %textFilename%
+		clipboard := text
+		FileDelete, %textFilename%
+		if(saveToFile = 0) {
+			Sleep, 1000
+			FileDelete, %filename%
+		}
+	}
+
 	DllCall("DeleteObject", "ptr", hBM)
     ; Add Gdip shutdown at the end of the function
     Gdip_Shutdown(pToken)	

README.md

@@ -75,6 +75,11 @@ It will also be copied to the clipboard as usual.
 Note that you need to have sharex installed and configured for this to work.
 Currently te path is fixed to `C:\Program Files\ShareX\ShareX.exe`
 
+#### ocr
+
+Press o during the screenshot process to run ocr on the screenshot.
+The text will be copied to the clipboard and not the image.
+
 ## Licence
 
 GPL 2.0

build_release.bat

@@ -0,0 +1,9 @@
+mkdir bin
+del bin\* /Q
+mkdir release
+del release\* /Q
+"tools\Ahk2Exe.exe" /in KeyboardScreenshot.ahk
+"tools\Ahk2Exe.exe" /bin tools\AutoHotkey64_v2.exe /in ocr.ahk
+cd bin
+7z a ..\release\KeyboardScreenshot.zip *
+cd ..

config.ahk

@@ -0,0 +1,10 @@
+;@Ahk2Exe-SetMainIcon icon.ico
+;@Ahk2Exe-ExeName %A_ScriptDir%\bin\KeyboardScreenshot.exe
+
+#NoEnv 
+SendMode Input
+#SingleInstance force
+SetTitleMatchMode, 2
+SetWorkingDir %A_ScriptDir%
+ListLines Off
+SetBatchLines -1

github_modules/OCR

@@ -0,0 +1,14 @@
+#Requires AutoHotkey >=v2.0
+;@Ahk2Exe-ExeName %A_ScriptDir%\bin\ocr.exe
+#include github_modules\OCR\Lib\OCR.ahk
+#NoTrayIcon
+command := A_Args[1]
+imageFilename := command . ".jpg"
+textFilename := command . ".txt"
+;M sgBox imageFilename
+result := OCR.FromFile(imageFilename)
+resultText := result.Text
+;M sgBox resultText
+if (FileExist(textFilename))
+	FileDelete textFilename
+FileAppend resultText, textFilename