#Requires AutoHotkey v2.0
;
; ----===( PhonerLite )===----
;
; ALT-Pos1 = Phoner in den Vordergrund holen / Phoner minimieren
; Pause/Unterbr = Markierte Rufnummer mit PhonerLite anrufen
; 
; Für Anruf annehmen/ablehnen bitte die Hotkeys in PhonerLite aktivieren.
;

!Home::
{
	If WinExist("PhonerLite")
		if WinActive("PhonerLite")
			WinMinimize
			WinMoveTop
		else
			WinActivate
			WinMoveTop
	else
		run "c:\Program Files (x86)\PhonerLite\PhonerLite.exe"
}

Pause::
{
	oCB := ClipboardAll()  ; Inhalt von Zwischenablage sichern
	
	A_Clipboard := ""	   ; Zwischenablage leeren (wichtig)
    Send "^c"              ; Zwischenablage neu befüllen
	ClipWait(1)
	If (A_Clipboard!="") {
		query := RegExReplace(A_Clipboard, "[^0-9\+-]+" )	; Alles löschen, was keine Rufnummer sein kann
		query := StrReplace(query, "+490", "+49" )          ; Vorwahlen dürfen keine 0 nach +49 haben.
		Run Format("C:\Program Files (x86)\PhonerLite\PhonerLite.exe tel:{1}", query)	; Anruf auslösen
	}
    A_Clipboard := oCB     ; Alte Zwischenablage wiederherstellen
}