#include "C:\Autoit\autoit-v3\com\Include\Array.au3"
HotKeySet("#c", "Cap_change")

While 1
	Sleep(10)
WEnd

Func Cap_change()
	Send("^c")
	$string = ClipGet()
	$string = StringSplit($string, "")
	For $i = 1 to $string[0]
		If StringIsUpper($string[$i]) Then 
			$string[$i] = StringLower($string[$i])
		Else
			$string[$i] = StringUpper($string[$i])
		EndIf
	Next
	$tempstring = ""
	For $i = 1 to $string[0]
		$tempstring = $tempstring & $string[$i]
	Next
	$string = $tempstring
	Send($string, 1)
EndFunc