lll0 писал(а): только на цифры Ну что-же, вот тебе только цифры code_32786.txt------------ Дoбавленo в 22.21:На всякий случай, вот реально рабочий вариант с дешифрацией - только цифры Предыдущий вариант был нацелен на подталкивание ТС к размышлению "почему не работает" Add(EnCrypt,14889527,175,126) { Mode=7 Key="123" link(onEnCrypt,2715489:doConvert,[]) } Add(Str_Enum,6858416,273,126) { Delimiter="" Step=2 link(onEnum,10308078:doConvert,[]) } Add(ConvertorEx,10308078,322,126) { Mode=5 link(onResult,11179302:doStrCat,[]) } Add(StrCat,11179302,371,126) { Str1="000" link(onStrCat,10041622:doCopy,[]) } Add(Copy,10041622,434,126) { Position=1 Count=3 Direction=1 link(onCopy,12350797:doStrCatDlm,[]) } Add(Edit,8900620,98,119) { Left=25 Top=15 Width=280 Text="1" link(onChange,15409776:doEvent1,[]) } Add(StrCatDelim,12350797,490,126) { Point(doClear) link(onStrCatDlm,9808976:doText,[]) link(Str1,12350797:Result,[(496,107)(478,107)(478,167)(496,167)]) } Add(Hub,15409776,147,119) { link(onEvent1,12350797:doClear,[(418,125)(418,139)]) link(onEvent2,14889527:doEnCrypt,[]) } Add(Memo,9808976,539,105) { Left=5 Top=60 Width=360 Height=140 ScrollBars=3 } Add(Button,3003609,84,259) { Left=130 Top=205 Caption="Decode" link(onClick,5858328:doEvent1,[]) } Add(For,8846476,210,266) { Start=1 Step=3 link(onEvent,7227285:doCopy,[]) link(onStop,7368229:doConvert,[(257,279)(257,329)]) link(End,8216246:Result,[(223,254)(198,254)(198,309)(166,309)]) } Add(LineBreakEx,12278974,539,164) { Caption="data" Type=3 link(_Data,9808976:Text,[]) } Add(LineBreakEx,15925917,160,237) { Caption="data" Type=2 } Add(Length,8216246,160,266) { link(onLength,8846476:doFor,[]) link(Str,15925917:getVar,[]) } Add(Copy,7227285,266,266) { Count=3 link(onCopy,14076355:doConvert,[]) link(Str,15809479:getVar,[]) } Add(LineBreakEx,15809479,266,237) { Caption="data" Type=2 } Add(ConvertorEx,14076355,314,266) { Mode=6 link(onResult,5317136:doStrCat,[]) } Add(StrCat,5317136,370,266) { Point(doClear) link(Str1,5768555:Var1,[(376,254)(364,254)(364,310)]) } Add(DeCrypt,12324810,419,323) { Mode=7 Key="123" link(onDeCrypt,14769465:doText,[]) } Add(StreamConvertor,7368229,370,323) { Mode=3 link(onResult,12324810:doDeCrypt,[]) link(Data,5768555:Var2,[]) } Add(StreamConvertor,2715489,224,126) { Mode=2 link(onResult,6858416:doEnum,[]) } Add(Label,14769465,463,323) { Left=10 Top=265 } Add(GetDataEx,5768555,370,305) { link(Data,5317136:Result,[]) } Add(Hub,5858328,133,259) { link(onEvent1,5317136:doClear,[(357,265)(357,279)]) link(onEvent2,8216246:doLength,[]) }
|