Make(delphi) ver(4.04 build 185) Add(MainForm,2953706,91,105) { Width=312 Height=150 Point(onClose) Point(onKeyUp) Point(onKeyDown) link(onClose,15167877:doStopHotKey,[(247,132)(247,216)]) link(onKeyUp,1332116:doEvent11,[]) link(onKeyDown,1332116:doEvent1,[]) } Add(Edit,13557978,203,133) { Left=30 Top=10 Width=160 TabOrder=-1 Text="" } Add(MultiElementEx,1332116,154,133) { @Hint=#19:Модуль ввода HotKey| link(onTrim,13557978:doText,[]) AddHint(69,-40,124,13,@Hint) } BEGIN_SDK Add(EditMultiEx,16651926,21,21) { WorkCount=#9:doEvent11|8:doEvent1| EventCount=#6:onTrim| VarCount=#6:Result| Width=538 Height=193 VOffset=28 link(doEvent11,1038750:doEvent1,[]) link(doEvent1,11418303:doEvent1,[(36,62)(36,83)]) link(Result,2688205:Result,[(27,204)(503,204)]) } Add(Switch,3865109,112,63) { DataOn=Integer(1) DataOff=Integer(0) Point(doOn) Point(State) } Add(Hub,11418303,63,77) { link(onEvent1,3865109:doOn,[]) link(onEvent2,8852587:doEvent,[(91,90)(91,146)]) } Add(IndexToChanel,8852587,112,140) { Point(Index) link(onEvent2,9029135:doData,[]) link(Index,3865109:State,[]) } Add(ChangeMon,9029135,154,147) { link(onData,9748063:doMultiReplace,[]) } Add(MultiReplace,9748063,196,147) { ReplaceList="16 = Shift;\r\n17 = Ctrl;\r\n18 = Alt;\r\n91 = Win;" link(onResult,7108364:doConvert,[]) } Add(StrCatDelim,15059163,455,154) { Delimiter=" + " Point(doClear) link(onStrCatDlm,2688205:doTrim,[]) link(Str1,15059163:Result,[(461,142)(449,142)(449,198)(461,198)]) } Add(Hub,1038750,63,49) { link(onEvent1,3865109:doReset,[(90,55)(90,76)]) link(onEvent2,15059163:doClear,[(441,62)(441,167)]) } Add(Trim,2688205,497,154) { Char=" + " Mode=4 Point(Result) link(onTrim,16651926:onTrim,[(542,160)(542,55)]) } Add(Convertor,7108364,238,147) { Mode=4 link(onResult,8401765:doTrim,[]) } Add(Case,9400200,329,147) { Value=String() link(onNextCase,3832642:doWork1,[(431,153)]) link(onTrue,16603553:doData,[]) } Add(DoData,16603553,378,154) { link(onEventData,3832642:doWork2,[]) link(Data,9748063:Result,[(384,134)(277,134)(277,191)(202,191)]) } Add(Trim,8401765,287,147) { link(onTrim,9400200:doCase,[]) } Add(HubEx,3832642,427,154) { link(onEvent,15059163:doStrCatDlm,[]) } END_SDK Add(Button,13607731,91,210) { Left=200 Top=10 TabOrder=-1 Caption="Set" link(onClick,14997237:doEvent1,[]) } Add(GHotKey,15167877,266,203) { Point(doAlt) Point(doCtrl) Point(doShift) Point(doWin) Point(doKey) Point(onError) link(onEventHotKey,10162265:doExec,[]) } Add(MultiElementEx,14997237,154,210) { @Hint=#30:Модуль программирования HotKey| link(Str,1332116:Result,[]) link(onEvent2,15167877:doStartHotKey,[(226,216)(226,209)]) link(onBit1,15167877:doAlt,[]) link(onBit2,15167877:doCtrl,[]) link(onBit3,15167877:doShift,[]) link(onBit4,15167877:doWin,[]) link(onResult,15167877:doKey,[]) AddHint(61,73,193,13,@Hint) } BEGIN_SDK Add(EditMultiEx,6276689,21,21) { WorkCount=#8:doEvent1| EventCount=#8:onEvent2|6:onBit1|6:onBit2|6:onBit3|6:onBit4|8:onResult| DataCount=#3:Str| Width=482 Height=214 VOffset=14 HOffset=63 link(doEvent1,13220809:doEvent1,[]) } Add(Replace,10667793,84,98) { SubStr=" " link(onReplace,14463955:doEnum,[]) link(Str,6276689:Str,[]) } Add(Str_Enum,14463955,140,98) { Delimiter="+" link(onEnum,16664940:doGetIndex,[]) link(onEndEnum,4370031:doEvent1,[(193,111)(193,139)]) } Add(StrList,16664940,203,56) { Strings=#3:Alt|4:Ctrl|5:Shift|3:Win| Point(doGetIndex) Point(onGetIndex) link(onGetIndex,10226458:doCase,[]) } Add(Math,3927522,308,63) { OpType=9 Op1=1 ResultType=0 link(onResult,3276567:doOperation,[]) } Add(Case,10226458,252,63) { Value=Integer(-1) link(onNextCase,3927522:doOperation,[]) link(onTrue,12230406:doConvert,[(296,76)(296,195)]) } Add(IntToBits,7959862,392,161) { Count=4 Data_0=Integer(0) Data_1=Integer(1) link(Value,12055668:Var2,[]) link(onBit1,6276689:onBit1,[(444,167)(444,48)]) link(onBit2,6276689:onBit2,[(453,174)(453,55)]) link(onBit3,6276689:onBit3,[(462,181)(462,62)]) link(onBit4,6276689:onBit4,[(471,188)(471,69)]) } Add(Math,3276567,392,63) { ResultType=0 Point(doClear) link(Op2,12055668:Var1,[(405,51)(383,51)(383,107)]) } Add(GetDataEx,12055668,392,102) { link(Data,3276567:Result,[]) } Add(Hub,13220809,42,35) { link(onEvent1,3276567:doClear,[(354,41)(354,76)]) link(onEvent2,10667793:doReplace,[(70,48)(70,104)]) } Add(Convertor,12230406,308,189) { Mode=3 link(onResult,6276689:onResult,[(479,195)(479,76)]) link(Data,14463955:Part,[(314,145)(153,145)]) } Add(Hub,4370031,336,133) { link(onEvent1,7959862:doBits,[(371,139)(371,167)]) link(onEvent2,6276689:onEvent2,[(435,146)(435,41)]) } END_SDK Add(WinExec,10162265,329,203) { FileName="notepad.exe" }