Вверх ↑
Ответов: 1841
Рейтинг: 369
#1: 2014-01-09 22:21:05 ЛС | профиль | цитата
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,[])
}
карма: 1
0
файлы: 1code_32786.txt [904B] [116]