Вверх ↑
Этот топик читают: Гость
Ответов: 6
Рейтинг: 0
#1: 2017-01-20 19:02:27 ЛС | профиль | цитата
доброе время суток
Подскажите пожалуйста, для дешифровки строки собрал схемку
Что не так, rc4 обработка срабатывает, а по AES ни в какую...
Make(delphi)ver(4.05 build 186)
Add(MainForm,2953706,126,259)
{
Width=365
Height=225
Caption="Encrypt_Decrypt Data"
Position=1
}
Add(Edit,4117780,497,497)
{
Left=90
Top=10
Width=255
Font=[MS Sans Serif,8,1,0,204]
Cursor=1
WinStyle=2
Text="project_hiasm"
}
Add(Edit,8331896,651,623)
{
Left=90
Top=135
Width=255
Font=[Courier New,8,0,0,204]
Cursor=1
TabOrder=-1
WinStyle=2
Text=""
ReadOnly=0
}
Add(Button,15489552,140,483)
{
Left=150
Top=160
Width=70
Font=[MS Sans Serif,8,1,0,1]
TabOrder=-1
Caption="Decrypt"
link(onClick,8724897:doDeCrypt,[(331,489)(331,629)])
}
Add(DeCrypt,8724897,490,623)
{
Mode=7
link(onDeCrypt,8331896:doText,[])
link(DataCrypt,11544278:Text,[(496,576)(272,576)])
link(Key,4117780:Text,[])
}
Add(Edit,11544278,266,497)
{
Left=55
Top=85
Width=255
Font=[MS Sans Serif,8,1,0,204]
Cursor=1
WinStyle=2
Text="5kYVjut+J7G3CZmoE2hJ7A=="
ClearAfterEnter=1
}

[color=gray][size=9]Редактировалось 7 раз(а), последний 2017-01-20 19:07:28[/size][/color]
карма: 0

0
Разработчик
Ответов: 26113
Рейтинг: 2126
#2: 2017-01-20 20:15:27 ЛС | профиль | цитата
Схема


Add(MainForm,8693130,189,161)
{
Width=365
Height=225
Caption="Encrypt_Decrypt Data"
Position=1
}
Add(Edit,4117780,322,161)
{
Left=90
Top=10
Width=255
Font=[MS Sans Serif,8,1,0,204]
Cursor=1
WinStyle=2
Text="project_hiasm"
}
Add(Edit,8331896,378,252)
{
Left=90
Top=135
Width=255
Font=[Courier New,8,0,0,204]
Cursor=1
TabOrder=-1
WinStyle=2
Text=""
ReadOnly=0
}
Add(Button,15489552,189,245)
{
Left=150
Top=160
Width=70
Font=[MS Sans Serif,8,1,0,1]
TabOrder=-1
Caption="Decrypt"
link(onClick,11865824:doCharset,[(226,251)(226,258)])
}
Add(DeCrypt,8724897,315,252)
{
Mode=7
link(onDeCrypt,8331896:doText,[])
link(Key,4117780:Text,[])
}
Add(Edit,11544278,259,161)
{
Left=55
Top=85
Width=255
Font=[MS Sans Serif,8,1,0,204]
Cursor=1
WinStyle=2
Text="5kYVjut+J7G3CZmoE2hJ7A=="
ClearAfterEnter=1
}
Add(Charset,11865824,259,252)
{
Type=4
link(onCharset,8724897:doDeCrypt,[])
link(Text,11544278:Text,[])
}

карма: 22

0
Ответов: 6
Рейтинг: 0
#3: 2017-01-23 19:17:03 ЛС | профиль | цитата
Спасибо за подсказку, работает.
То есть без преобразования кодировок при шифровании и де шифровании не обойтись?
Это такая специфика AES или компонентов интересно.
карма: 0

0
Разработчик
Ответов: 26113
Рейтинг: 2126
#4: 2017-01-23 23:03:40 ЛС | профиль | цитата
asmuser писал(а):
Это такая специфика AES

Энкодер работает с бинарными данными, а переменная String в Delphi по сути и есть набор бинарных данных в кодах ASCII. Можно не использовать никаких кодировок, а тупо перевести строку в стрим, а стрим записать в файл. В примерах для простоты применялась кодировка Base64, тк она чисто текстовая и широко используется при передаче текста по интернету.

Редактировалось 3 раз(а), последний 2017-01-23 23:08:28
карма: 22

0
Ответов: 9906
Рейтинг: 351
#5: 2017-01-23 23:10:13 ЛС | профиль | цитата
nesco писал(а):
а переменная String в Delphi по сути и есть набор бинарных данных в кодах ASCII

Ну ты и сказанул

Редактировалось 1 раз(а), последний 2017-01-23 23:11:52
карма: 9

0
Разработчик
Ответов: 26113
Рейтинг: 2126
#6: 2017-01-23 23:38:03 ЛС | профиль | цитата
Galkov писал(а):
Ну ты и сказанул

А че не так? Ведь String в Delphi может не иметь терминального нуля и поддерживает любые коды ASCII от 0 до 255. Если бы это было не так, то многих компонентов бы не было, и энкодера шифрования тоже.

Редактировалось 1 раз(а), последний 2017-01-23 23:40:06
карма: 22

0
Ответов: 6
Рейтинг: 0
#7: 2017-01-23 23:41:15 ЛС | профиль | цитата
Спасибо за ответы
Я в криптографии не силён Принимаю Ваши объяснения как аксиому.
Заметил я еще один момент, при расшифровке строки в "текстовом поле ввода" расшифрованная строка (простите за тавтологию) выглядит правильно, то есть как изначальная. Но при выделении и помещении её в буфер обмена часть символов теряется, в основном кириллические. Как это можно поправить?
Спасибо
PS нужен пример?

Редактировалось 5 раз(а), последний 2017-01-23 23:49:04
карма: 0

0
Разработчик
Ответов: 26113
Рейтинг: 2126
#8: 2017-01-23 23:55:24 ЛС | профиль | цитата
asmuser писал(а):
Но при выделении и помещении её в буфер обмена часть символов теряется, в основном кириллические. Как это можно поправить?

А перевести раскладку в Винде перед копированием не пробовал?
карма: 22

0
Ответов: 6
Рейтинг: 0
#9: 2017-01-24 00:21:02 ЛС | профиль | цитата
Да добавил переключалку.
Но для обработки непечатных символов это не помогает.
Видимо надо со строками пошаманить
карма: 0

0
Разработчик
Ответов: 26113
Рейтинг: 2126
#10: 2017-01-24 00:36:43 ЛС | профиль | цитата
asmuser писал(а):
Но для обработки непечатных символов это не помогает.
Видимо надо со строками пошаманить

Текстовая строка не должна содержать непечатных символов.
карма: 22

0
Ответов: 9906
Рейтинг: 351
#11: 2017-01-24 08:28:23 ЛС | профиль | цитата
nesco писал(а):
Ведь String в Delphi может не иметь терминального нуля и поддерживает любые коды ASCII от 0 до 255

Во первых, имеет обязательно. Для совместимости.
Во вторых, кто это такие: коды ASCII

Те, которые от 0 до 255 - это и есть бинарные данные. А те, которые от -128 до 127 - это что, не бинарные данные разве?
И чем они отличаются от предыдущих, спрашивается. Или они не представлены в виде кодов ASCII ?

Вообще-то, я думал, что никаких других и не бывает - все данные в нашей электронике состоят из нулей и единичек. Бинарные типа...
А все остальное - это не более, чем способы работы с этими данными. Для 65 можно - символ A напечатать, можно последовательность битов - 01000001, можно - как прозрачность в альфа канале использовать, можно - как адрес устройства в каком-то интерфейсе (COM, CAN, I2C, ...). И т.д., и т.п..
Это все было про один и тот же байт данных, которому все вышесказанное по барабану.

Причем тут какая-то характеристика этих данных. Коды они там какие-то...
Ты еще расскажи, в какой кодировке хранятся эти коды ASCII в строке Дельфи - ну полный дурдом будет же

--- Добавлено в 2017-01-24 08:42:13

Вообще-то, я подозреваю, что у нового поколения такая каша в голове, что трудно себе вообразить порой.
Когда видишь передачу по COM-порту знака числа (как и цифр, впрочем) в виде того самого ASCII-символа - волосы на голове начинают шевелиться.
А мы им еще более умные слова впариваем

Редактировалось 5 раз(а), последний 2017-01-24 08:43:40
карма: 9

1
Голосовали:Tad
Ответов: 98
Рейтинг: 1
#12: 2024-08-06 13:49:38 ЛС | профиль | цитата
Всем привет!
У меня не работает декодирование. что я делаю не так? Stream-поток. Если вместо декодера поставить опять кодер, то данные выходят.
Add(MainForm,2953706,70,63)
{
link(onCreate,16593950:doEvent1,[(135,83)(135,174)])
}
Add(EnCrypt,8080906,357,168)
{
Mode=7
Key="123"
Point(onError)
Point(SrcStream)
Point(Count)
Point(DstStream)
link(onEncrypt,6429648:doEvent1,[])
link(SrcStream,5725902:Stream,[(391,156)(303,156)(303,212)(216,212)])
link(Count,5725902:Size,[(398,156)(310,156)(310,212)(223,212)])
link(DstStream,4637271:Var1,[(405,135)])
}
Add(Memory,15521796,210,98)
{
Default=String(D:\\1.txt)
AddHint(-5,-26,66,13,Default)
}
Add(FileStream,5725902,210,168)
{
link(onLoad,8080906:doEncryptStream,[(300,174)(300,188)])
link(FileName,15521796:Value,[])
}
Add(Hub,16593950,168,168)
{
link(onEvent1,5725902:doOpen,[])
link(onEvent2,5725902:doClose,[])
}
Add(MemoryStream,11497243,427,84)
{
Point(Position)
}
Add(Message,13090973,756,161)
{
}
Add(StreamConvertor,5461495,672,161)
{
Mode=6
Point(Data)
link(onResult,3076053:doWork2,[])
link(Data,6188669:Var2,[(678,152)(608,152)])
}
Add(MemoryStream,2735362,602,91)
{
}
Add(Hub,6429648,420,168)
{
OutCount=3
link(onEvent1,6578805:doConvert,[(455,174)(455,237)])
link(onEvent2,13922385:doDecryptStream,[])
link(onEvent3,11497243:doClear,[(446,188)(446,142)(415,142)(415,97)])
}
Add(GetDataEx,4637271,427,130)
{
link(Data,11497243:Stream,[])
}
Add(GetDataEx,6188669,602,134)
{
link(Data,2735362:Stream,[])
}
Add(Hub,954078,630,161)
{
link(onEvent1,5461495:doConvert,[])
link(onEvent2,2735362:doClear,[(656,174)(656,146)(590,146)(590,104)])
}
Add(StreamConvertor,6578805,476,231)
{
Mode=6
Point(Data)
link(onResult,3076053:doWork3,[(718,237)])
link(Data,15303977:Var2,[])
}
Add(GetDataEx,15303977,476,130)
{
Angle=3
link(Data,4637271:Var3,[])
}
Add(HubEx,3076053,714,161)
{
link(onEvent,13090973:doMessage,[])
}
Add(DeCrypt,13922385,518,161)
{
Mode=7
Key="123"
Point(SrcStream)
Point(Count)
Point(DstStream)
link(onDecrypt,954078:doEvent1,[])
link(SrcStream,15303977:Var3,[(552,135)])
link(Count,11497243:Size,[(559,139)(440,139)])
link(DstStream,6188669:Var1,[(566,139)])
}

Редактировалось 2 раз(а), последний 2024-08-06 14:03:23
карма: 0

0
Ответов: 783
Рейтинг: 168
#13: 2024-08-06 14:13:09 ЛС | профиль | цитата
strannik_nebes писал(а):
У меня не работает декодирование. что я делаю не так? Stream-поток. Если вместо декодера поставить опять кодер, то данные выходят.

В MemoryStream перед декодированием нужно возвращать позицию на начало.

Add(MainForm,10393006,147,210)
{
link(onCreate,2882193:doExecute,[])
}
Add(EnCrypt,8080906,371,210)
{
Mode=7
Key="123"
Point(onError)
Point(SrcStream)
Point(Count)
Point(DstStream)
link(onEncrypt,6429648:doEvent1,[])
link(SrcStream,5725902:Stream,[(405,201)(363,201)(363,271)(307,271)])
link(Count,5725902:Size,[(412,194)(356,194)(356,264)(314,264)])
link(DstStream,715005:Var1,[(419,187)])
}
Add(FileStream,5725902,301,224)
{
link(onLoad,8080906:doEncryptStream,[])
}
Add(Hub,16593950,259,224)
{
link(onEvent1,5725902:doOpen,[])
link(onEvent2,5725902:doClose,[])
}
Add(MemoryStream,11497243,546,119)
{
Point(Position)
Point(doPosition)
}
Add(Message,13090973,924,294)
{
}
Add(StreamConvertor,5461495,791,210)
{
Mode=6
Point(Data)
link(onResult,3076053:doWork2,[])
link(Data,6188669:Var2,[])
}
Add(MemoryStream,2735362,791,119)
{
Point(doPosition)
}
Add(Hub,6429648,434,210)
{
OutCount=4
link(onEvent1,8065872:doData,[(459,216)(459,139)])
link(onEvent2,13922385:doDecryptStream,[])
link(onEvent3,6578805:doConvert,[(536,230)(536,279)])
link(onEvent4,11497243:doClear,[(522,237)(522,132)])
}
Add(GetDataEx,6188669,791,176)
{
link(Data,2735362:Stream,[])
}
Add(Hub,954078,672,203)
{
OutCount=3
link(onEvent1,4443778:doData,[(704,209)(704,146)])
link(onEvent2,5461495:doConvert,[])
link(onEvent3,2735362:doClear,[(697,223)(697,132)])
}
Add(StreamConvertor,6578805,546,273)
{
Mode=6
Point(Data)
link(onResult,3076053:doWork3,[(872,279)])
link(Data,715005:Var2,[])
}
Add(HubEx,3076053,868,210)
{
link(onEvent,15350777:doAdd,[])
}
Add(DeCrypt,13922385,588,203)
{
Mode=7
Key="123"
Point(SrcStream)
Point(Count)
Point(DstStream)
Point(onError)
link(onDecrypt,954078:doEvent1,[])
link(SrcStream,715005:Var3,[(622,187)])
link(Count,11497243:Size,[(629,180)(559,180)])
link(DstStream,6188669:Var1,[(636,181)])
}
Add(Memo,15350777,889,210)
{
Left=550
Top=160
Align=5
ScrollBars=3
}
Add(ODialog,2882193,203,224)
{
Filter="Текстовые файлы|*.txt"
link(onExecute,16593950:doEvent1,[])
}
Add(GetDataEx,715005,546,182)
{
link(Data,11497243:Stream,[])
}
Add(DoData,8065872,483,133)
{
Data=Integer(0)
link(onEventData,11497243:doPosition,[])
}
Add(DoData,4443778,735,140)
{
Data=Integer(0)
link(onEventData,2735362:doPosition,[(774,146)(774,139)])
}
Add(Memory,4563025,301,168)
{
Default=String(D:\\1.txt)
AddHint(-5,-26,66,13,Default)
}

карма: 15

1
Голосовали:strannik_nebes
Ответов: 98
Рейтинг: 1
#14: 2024-08-06 15:19:05 ЛС | профиль | цитата
Тогда непонятно, почему так не работает, я так же сбросил позицию. Но в этом случае, она не требуется, судя по коду компонента, сброс там уже есть. Один и тот же текст, полученный разными способами, имеет разный код.

Add(MainForm,10393006,175,567)
{
link(onCreate,7131476:doEvent2,[(247,587)(247,594)])
}
Add(EnCrypt,3066723,518,567)
{
Mode=7
Key="123"
Point(onError)
Point(SrcStream)
Point(Count)
Point(DstStream)
link(onEncrypt,8812628:doEvent1,[])
link(SrcStream,11649981:Var2,[])
link(Count,339946:Var2,[(559,552)(468,552)])
link(DstStream,715005:Var1,[(566,544)])
}
Add(FileStream,16694208,329,581)
{
link(FileName,4563025:Value,[])
}
Add(Hub,7131476,287,581)
{
InCount=2
link(onEvent1,16694208:doOpen,[])
link(onEvent2,16694208:doClose,[])
}
Add(MemoryStream,16531468,693,476)
{
Point(doPosition)
Point(Position)
}
Add(StreamConvertor,15717684,938,567)
{
Mode=6
Point(Data)
link(onResult,12255551:doWork1,[(982,573)(982,603)(977,603)])
link(Data,4413154:Var2,[])
}
Add(MemoryStream,4778444,938,476)
{
Point(doPosition)
Point(Position)
}
Add(Hub,8812628,581,567)
{
OutCount=6
link(onEvent1,8065872:doData,[(613,573)(613,496)])
link(onEvent2,4377901:doConvert,[(609,580)(609,650)])
link(onEvent3,11673466:doConvert,[(644,587)(644,636)])
link(onEvent4,15970391:doData,[(665,594)(665,580)])
link(onEvent5,16531468:doClear,[(644,601)(644,489)])
}
Add(GetDataEx,4413154,938,533)
{
link(Data,4778444:Stream,[])
}
Add(Hub,699674,819,560)
{
OutCount=3
link(onEvent1,4443778:doData,[(857,566)(857,496)])
link(onEvent2,15717684:doConvert,[])
link(onEvent3,4778444:doClear,[(844,580)(844,489)])
}
Add(StreamConvertor,11673466,693,630)
{
Mode=6
Point(Data)
link(onResult,1178197:doWork2,[])
link(Data,715005:Var2,[])
}
Add(DeCrypt,5929542,735,560)
{
Mode=7
Key="123"
Point(SrcStream)
Point(Count)
Point(DstStream)
Point(onError)
link(onDecrypt,699674:doEvent1,[])
link(SrcStream,715005:Var3,[(769,544)])
link(Count,3355998:Var2,[(776,544)(706,544)])
link(DstStream,4413154:Var1,[(783,538)])
}
Add(Memo,15350777,1064,630)
{
Left=550
Top=160
Align=5
ScrollBars=3
}
Add(ODialog,2882193,231,567)
{
Filter="Текстовые файлы|*.txt"
}
Add(GetDataEx,715005,693,539)
{
link(Data,16531468:Stream,[])
}
Add(DoData,8065872,630,490)
{
Data=Integer(0)
link(onEventData,16531468:doPosition,[])
}
Add(DoData,4443778,882,490)
{
Data=Integer(0)
link(onEventData,4778444:doPosition,[])
}
Add(Memory,4563025,329,525)
{
Default=String(D:\\1.txt)
AddHint(-5,-26,66,13,Default)
}
Add(MemoryStream,2745207,364,679)
{
Point(doPosition)
Point(Position)
}
Add(Hub,16218668,224,693)
{
OutCount=5
link(onEvent1,16140376:doData,[])
link(onEvent2,2745207:doCopy,[(342,706)(342,685)])
link(onEvent3,3066723:doEncryptStream,[(378,713)(378,587)])
link(onEvent4,2745207:doClear,[(349,720)(349,692)])
}
Add(Button,1264575,14,693)
{
Left=300
Top=230
link(onClick,11219615:doData,[])
}
Add(DoData,11219615,77,693)
{
Data=String(1656565656ddd)
link(onEventData,11873539:doConvert,[])
}
Add(StreamConvertor,11873539,133,693)
{
Mode=7
Point(Data)
link(onResult,16218668:doEvent1,[])
}
Add(DoData,16140376,266,693)
{
Data=Integer(0)
link(onEventData,2745207:doPosition,[])
}
Add(StreamConvertor,4377901,623,644)
{
Mode=6
Point(Data)
link(onResult,1178197:doWork3,[(746,650)])
link(Data,11649981:Var3,[(629,558)])
}
Add(GetDataEx,11649981,546,553)
{
link(Data,2745207:Stream,[(552,547)(461,547)(461,730)(370,730)])
}
Add(HubEx,1178197,742,630)
{
link(onEvent,12255551:doWork2,[])
}
Add(FormatStr,10657660,994,630)
{
DataCount=4
Mask="%1 (%2;%3;%4)"
link(onFString,15350777:doAdd,[])
link(Str2,339946:Var3,[(1007,618)(680,618)(680,712)])
link(Str3,3355998:Var3,[(1014,523)])
link(Str4,4778444:Size,[(1021,569)(951,569)])
}
Add(GetDataEx,339946,462,707)
{
Angle=2
link(Data,2745207:Size,[(468,730)(377,730)])
}
Add(GetDataEx,3355998,700,518)
{
link(Data,16531468:Size,[])
}
Add(DoData,15970391,672,574)
{
link(onEventData,5929542:doDecryptStream,[])
}
Add(HubEx,12255551,973,630)
{
link(onEvent,10657660:doString,[])
}


Редактировалось 6 раз(а), последний 2024-08-06 16:00:08
карма: 0

0
Ответов: 783
Рейтинг: 168
#15: 2024-08-06 16:24:18 ЛС | профиль | цитата
strannik_nebes писал(а):
Тогда непонятно, почему так не работает, я так же сбросил позицию. Но в этом случае, она не требуется, судя по коду компонента, сброс там уже есть. Один и тот же текст, полученный разными способами, имеет разный код.

Ты же два раза читаешь MemoryStream, Нужно 2 раза возврашатся в начало.
Add(MemoryStream,16531468,700,77)
{
Point(doPosition)
Point(Position)
}
Add(MainForm,10393006,448,462)
{
link(onCreate,7131476:doEvent2,[(520,482)(520,489)])
}
Add(EnCrypt,3066723,511,168)
{
Mode=7
Key="123"
Point(onError)
Point(SrcStream)
Point(Count)
Point(DstStream)
link(onEncrypt,8812628:doEvent1,[])
link(SrcStream,9559385:Var1,[(545,152)(468,152)])
link(Count,13440516:Var1,[(552,159)(475,159)])
link(DstStream,715005:Var1,[(559,145)])
}
Add(FileStream,16694208,602,476)
{
link(FileName,4563025:Value,[])
}
Add(Hub,7131476,560,476)
{
InCount=2
link(onEvent1,16694208:doOpen,[])
link(onEvent2,16694208:doClose,[])
}
Add(StreamConvertor,15717684,945,175)
{
Mode=6
Point(Data)
link(onResult,12255551:doWork1,[(991,181)])
link(Data,4413154:Var2,[])
}
Add(MemoryStream,4778444,945,77)
{
Point(doPosition)
Point(Position)
}
Add(Hub,8812628,588,168)
{
OutCount=6
link(onEvent1,4735772:doWork2,[])
link(onEvent2,11673466:doConvert,[(613,181)(613,237)])
link(onEvent3,4735772:doWork3,[(620,188)])
link(onEvent4,15970391:doData,[])
link(onEvent5,16531468:doClear,[(627,202)(627,90)])
}
Add(GetDataEx,4413154,945,134)
{
link(Data,4778444:Stream,[])
}
Add(Hub,699674,826,175)
{
link(onEvent1,15717684:doConvert,[])
link(onEvent2,4778444:doClear,[(851,188)(851,90)])
}
Add(StreamConvertor,11673466,700,231)
{
Mode=6
Point(Data)
link(onResult,1178197:doWork2,[])
link(Data,715005:Var2,[])
}
Add(DeCrypt,5929542,742,175)
{
Mode=7
Key="123"
Point(SrcStream)
Point(Count)
Point(DstStream)
Point(onError)
link(onDecrypt,699674:doEvent1,[])
link(SrcStream,715005:Var3,[(776,145)])
link(Count,3355998:Var2,[(783,138)(713,138)])
link(DstStream,4413154:Var1,[(790,139)])
}
Add(Memo,15350777,1120,231)
{
Left=550
Top=160
Align=5
ScrollBars=3
}
Add(ODialog,2882193,504,462)
{
Filter="Текстовые файлы|*.txt"
}
Add(GetDataEx,715005,700,140)
{
link(Data,16531468:Stream,[])
}
Add(DoData,8065872,637,91)
{
Data=Integer(0)
link(onEventData,16531468:doPosition,[])
}
Add(Memory,4563025,602,420)
{
Default=String(D:\\1.txt)
AddHint(-5,-26,66,13,Default)
}
Add(MemoryStream,2745207,371,210)
{
Point(doPosition)
Point(Position)
link(onCopy,4377901:doConvert,[(410,216)(410,272)])
}
Add(Hub,16218668,231,210)
{
OutCount=5
link(onEvent1,2745207:doCopy,[])
link(onEvent2,16140376:doData,[(256,223)(256,258)])
link(onEvent3,3066723:doEncryptStream,[(263,230)(263,188)])
link(onEvent4,2745207:doClear,[(270,237)(270,223)])
}
Add(Button,1264575,63,210)
{
Left=300
Top=230
link(onClick,11219615:doData,[])
}
Add(DoData,11219615,126,210)
{
Data=String(1656565656ddd)
link(onEventData,11873539:doConvert,[])
}
Add(StreamConvertor,11873539,182,210)
{
Mode=7
Point(Data)
link(onResult,16218668:doEvent1,[])
}
Add(DoData,16140376,301,252)
{
Data=Integer(0)
link(onEventData,2745207:doPosition,[(361,258)(361,230)])
}
Add(StreamConvertor,4377901,630,266)
{
Mode=6
Point(Data)
link(onResult,1178197:doWork3,[(753,272)])
link(Data,9559385:Var3,[(636,250)])
}
Add(HubEx,1178197,749,231)
{
link(onEvent,12255551:doWork2,[])
}
Add(FormatStr,10657660,1050,231)
{
DataCount=4
Mask="%1 (%2;%3;%4)"
link(onFString,15350777:doAdd,[])
link(Str2,13440516:Var3,[(1063,222)(1042,222)(1042,327)])
link(Str3,3355998:Var3,[(1070,124)])
link(Str4,4778444:Size,[(1077,117)(958,117)])
}
Add(GetDataEx,3355998,707,119)
{
link(Data,16531468:Size,[])
}
Add(DoData,15970391,651,189)
{
link(onEventData,5929542:doDecryptStream,[])
}
Add(HubEx,12255551,987,231)
{
link(onEvent,10657660:doString,[])
}
Add(GetDataEx,9559385,462,245)
{
Angle=3
link(Data,2745207:Stream,[(377,250)])
}
Add(GetDataEx,13440516,469,322)
{
Angle=3
link(Data,2745207:Size,[(384,327)])
}
Add(HubEx,4735772,616,168)
{
Angle=3
link(onEvent,8065872:doData,[(620,97)])
}


Редактировалось 1 раз(а), последний 2024-08-06 16:25:08
карма: 15

0
Сообщение
...
Прикрепленные файлы
(файлы не залиты)