AutoTrim, Off
SetKeyDelay, 30, 30
SetWorkingDir, %A_ScriptDir%
Return
^+Enter::
ClipboardSave = %Clipboard%
Send, ^x
SubClipboardEnd := SubStr(Clipboard, 0, 1)
SubClipboardBeginning := SubStr(Clipboard, 1, 1)
If InStr(Clipboard, "[")
{
String_Pos_1 := InStr(Clipboard, "[",, %String_Pos_1%, 1)
String_Pos_2 := InStr(Clipboard, "]",, %String_Pos_2%, 1)
String_Length := String_Pos_2 - String_Pos_1 + 1
String_NoRev := SubStr(Clipboard, String_Pos_1, String_Length)
String_Pos_1 -= 1
String_Pos_2 += 1
String_Rev_1 := SubStr(Clipboard, 1, String_Pos_1)
String_Rev_2 := SubStr(Clipboard, String_Pos_2)
}
rev(str){
return % DllCall("msvcrt.dll\_strrev", "str", str, "cdecl str")
}
;Clipboard = % rev(Clipboard)
Clipboard = % rev(String_Rev_2) . String_NoRev . rev(String_Rev_1)
If (SubClipboardEnd = ".") OR (SubClipboardEnd = "/")
{
Clipboard = %A_Space%%Clipboard%
}
If (SubClipboardBeginning = " ")
{
StringTrimRight, Clipboard, Clipboard, 1
}
Send, ^v
ClipboardRev = %Clipboard%
Clipboard = %ClipboardSave%
Return
^+v::
ClipboardSave = %Clipboard%
Clipboard = %ClipboardRev%
Send, ^v
Clipboard = %ClipboardSave%
Return