folder = SystemPath("ScriptPath") 

RegWriteString( "HKCR", "CLSID\{42429695-AE04-11D0-A4F8-00AA00A749B9}", "", "CEKeyboard")
RegWriteString( "HKCR", "CLSID\{42429695-AE04-11D0-A4F8-00AA00A749B9}\IsSIPInputMethod", "","1")
RegWriteString( "HKCR", "CLSID\{42429695-AE04-11D0-A4F8-00AA00A749B9}\InProcServer32", "", folder\"CEKeyb.dll")
RegWriteString( "HKCR", "CLSID\{42429695-AE04-11D0-A4F8-00AA00A749B9}\DefaultIcon", "", folder\"CEKeyb.dll,0")
RegWriteString( "HKCR", "CLSID\{42429695-AE04-11D0-A4F8-00AA00A749B9}\Settings", "DefaultIm", "{42429667-ae04-11d0-a4f8-00aa00a749b9}")  
RegWriteString( "HKCU", "ControlPanel\Sip", "DefaultIm", "{42429695-AE04-11D0-A4F8-00AA00A749B9}")

Run(folder\"szt.exe"," /kbd=(CEKeyboard)")


