#sha
Add(PointHint,4007762,180,175)
{
Info=#9:Шифровать|
Transparent=0
VAlign=0
Height=60
}
Add(MainForm,2953706,33,112)
{
Width=408
BorderStyle=6
Position=1
Point(Handle)
link(onCreate,3752626:doData,[(81,132)(81,48)])
}
Add(ChildPanel,10164143,-16,112)
{
link(onEvent1,2953706:doMinimize,[(24,118)(24,132)])
link(onEvent2,2953706:doClose,[(21,125)(21,139)])
link(Data1,2953706:Handle,[(-10,106)(21,106)(21,149)(39,149)])
}
BEGIN_SDK
Add(EditMulti,14921415,21,49)
{
EventCount=2
DataCount=1
}
Add(Panel,10383375,35,147)
{
Width=408
Height=26
Color=-16777215
BevelWidth=2
Point(doColor)
link(onClick,10125777:doWork1,[(74,153)])
}
Add(Label,16487376,35,196)
{
Left=25
Top=5
Width=114
Height=17
Color=-16777215
Caption="Шифратор данных 1.4"
link(onClick,10125777:doWork2,[])
}
Add(Button,925320,168,91)
{
Left=377
Top=3
Width=20
Caption="X"
link(onClick,14921415:onEvent2,[(264,97)(264,62)])
}
Add(Button,8239750,168,56)
{
Left=357
Top=3
Width=20
Caption="_"
link(onClick,14921415:onEvent1,[(260,62)(260,55)])
}
Add(MoveWindow,16111218,91,196)
{
link(Handle,14921415:Data1,[(97,126)(27,126)])
}
Add(HubEx,10125777,70,189)
{
link(onEvent,16111218:doMove,[])
}
END_SDK
Add(Memo,12596398,453,189)
{
Top=45
Width=190
Height=130
Strings=#5:Текст|
}
Add(Memo,1399301,502,189)
{
Left=210
Top=45
Width=195
Height=130
Strings=#20:Закодированный текст|
ReadOnly=0
}
Add(Button,10545069,103,189)
{
Left=190
Top=45
Width=20
Height=130
Caption=">>"
link(onClick,9722868:doEvent1,[])
}
Add(Memo,1889212,852,322)
{
Left=210
Top=175
Width=195
Height=125
Strings=#5:Текст|
ReadOnly=0
}
Add(Memo,11854330,803,322)
{
Top=175
Width=190
Height=125
Strings=#20:Закодированный текст|
}
Add(Button,5992163,103,322)
{
Left=190
Top=175
Width=20
Height=125
Caption=">>"
link(onClick,2689786:doEvent1,[])
}
Add(Hub,9722868,145,189)
{
link(onEvent1,1399301:doClear,[(285,195)(285,202)])
link(onEvent2,310967:doConvert,[(177,202)(177,195)])
}
Add(Hub,2689786,145,322)
{
link(onEvent1,1889212:doClear,[(169,328)(169,335)])
link(onEvent2,1407734:doData,[(208,335)(208,328)])
}
Add(Edit,6490891,257,42)
{
Top=25
Width=405
Text="Пароль(по умолчанию "Пароль")"
link(onChange,6472772:doHashsum,[])
}
Add(EventFromData,6358957,299,140)
{
link(onEvent,5382443:doStrCat,[])
}
Add(StrCat,5382443,348,140)
{
Str2=""№"
link(onStrCat,6358957:doData,[(392,146)(392,134)(287,134)(287,146)])
link(Str1,2671059:Var2,[])
}
Add(Hashsum,6472772,306,42)
{
link(onResult,16659956:doValue,[])
link(Data,6490891:Text,[(312,35)(295,35)(295,84)(263,84)])
}
Add(Memory,16659956,348,42)
{
}
Add(If_else,3377515,481,322)
{
link(onTrue,925502:doData,[])
link(onFalse,15846552:doData,[(525,335)(525,370)])
link(Op1,8223419:Var2,[])
link(Op2,2671059:Var3,[(494,107)])
}
Add(GetDataEx,2671059,341,98)
{
link(Data,16659956:Value,[])
}
Add(DoData,925502,537,322)
{
link(onEventData,2592678:doReplace,[])
link(Data,2455247:Var3,[(543,314)(518,314)(518,366)])
}
Add(Memory,15782727,432,322)
{
link(onData,3377515:doCompare,[])
}
Add(EventFromData,4492956,481,273)
{
link(onEvent,4229007:doSplit,[])
}
Add(StrPart,4229007,530,273)
{
Char=""№"
link(onPart,12743528:doValue,[(570,286)(570,279)])
link(Str,2455247:Var1,[(536,261)(473,261)])
}
Add(GetDataEx,2455247,460,357)
{
Angle=3
link(Data,15782727:Value,[(438,366)])
}
Add(Replace,2592678,593,322)
{
link(onReplace,6646838:doDelete,[])
link(Sub_str,12743528:Value,[(606,311)(585,311)])
}
Add(GetDataEx,8223419,474,301)
{
link(Data,4492956:GetData,[])
}
Add(DoData,15846552,537,364)
{
link(onEventData,12196070:doWork3,[(793,370)])
link(Data,8223419:Var3,[(543,310)])
}
Add(Memory,12743528,579,273)
{
link(onData,4492956:doData,[(623,279)(623,267)(469,267)(469,279)])
}
Add(Delete,6646838,642,322)
{
Count=2
link(onDelete,328305:doValue,[])
}
Add(StrCat,5170947,299,189)
{
Str2=""№"
link(onStrCat,1399301:doAdd,[])
link(Str1,6358957:GetData,[])
link(Str2,310967:ConvertString,[(312,177)(264,177)(264,234)(200,234)])
}
Add(PointHint,3742779,558,217)
{
Info=#69:При введении неправильного пароля выдает ХЭШ сумму правильного пароля|
VAlign=0
Width=253
Height=39
}
Add(MultiElementEx,310967,194,189)
{
link(onConvert,5170947:doStrCat,[])
link(String,12596398:Text,[(200,177)(330,177)(330,246)(459,246)])
}
BEGIN_SDK
Add(EditMultiEx,13718751,21,21)
{
WorkCount=#24:doConvert=Шифрует строку|
EventCount=#83:onConvert=Событие происходит всякий раз после шифрования строки и выдает ее в поток|
VarCount=#38:ConvertString=Содержит полученный шифр|
DataCount=#28:String=Строка для шифрования|
Width=545
link(doConvert,2032964:doEvent1,[(31,27)(31,118)])
link(ConvertString,15965029:Var1,[(27,191)])
}
Add(Hub,2032964,42,112)
{
OutCount=3
link(onEvent1,13862437:doData,[(131,118)(131,41)])
link(onEvent2,15696093:doEnum,[])
}
Add(GetIndexData,1250216,210,35)
{
link(Data1,13718751:String,[(216,26)(27,26)])
link(Data2,15965029:Var3,[(223,26)(265,26)])
}
Add(DoData,13862437,147,35)
{
Data=Integer(0)
link(onEventData,12281444:doWork2,[])
}
Add(StrList,5552831,86,28)
{
Strings=#1:а|1:б|1:в|1:г|1:д|1:е|1:ё|1:ж|1:з|1:и|1:й|1:к|1:л|1:м|1:н|1:о|1:п|1:р|1:с|1:т|1:у|1:ф|1:х|1:ц|1:ч|1:ш|1:щ|1:ъ|1:ы|1:ь|1:э|1:ю|1:я|1:a|1:b|1:s|1:d|1:e|1:f|1:g|1:h|1:i|1:j|1:k|1:l|1:m|1:n|1:o|1:p|1:q|1:r|1:s|1:t|1:u|1:v|1:w|1:x|1:y|1:z|1:А|1:Б|1:В|1:Г|1:Д|1:Е|1:Ё|1:Ж|1:З|1:И|1:Й|1:К|1:Л|1:М|1:Н|1:О|1:П|1:Р|1:С|1:Т|1:У|1:Ф|1:Х|1:Ц|1:Ч|1:Ш|1:Щ|1:Ъ|1:Ы|1:Ь|1:Э|1:Ю|1:Я|1:A|1:B|1:C|1:D|1:E|1:F|1:G|1:H|1:I|1:J|1:K|1:L|1:M|1:N|1:O|1:P|1:Q|1:R|1:S|1:T|1:U|1:V|1:W|1:X|1:Y|1:Z|
}
Add(StrList,5461682,310,28)
{
Strings=#1:1|1:2|1:3|1:4|1:5|1:6|1:7|1:8|1:9|3: 10|3: 11|3: 12|3: 13|3: 14|3: 15|3: 16|3: 17|3: 18|3: 19|3: 20|3: 21|3: 22|3: 23|3: 24|3: 25|3: 26|3: 27|3: 28|3: 29|3: 30|3: 31|3: 32|3: 33|3: 41|3: 42|3: 43|3: 44|3: 45|3: 46|3: 47|3: 48|3: 49|3: 50|3: 51|3: 52|3: 53|3: 54|3: 55|3: 56|3: 57|3: 58|3: 59|3: 60|3: 61|3: 62|3: 63|3: 64|3: 65|3: 66|5: 101|5: 102|5: 103|5: 104|5: 105|5: 106|5: 107|5: 108|5: 109|5: 110|5: 111|5: 112|5: 113|5: 114|5: 115|5: 116|5: 117|5: 118|5: 119|5: 120|5: 121|5: 122|5: 123|5: 124|5: 125|5: 126|5: 127|5: 128|5: 129|5: 130|5: 131|5: 132|5: 133|5: 141|5: 142|5: 143|5: 144|5: 145|5: 146|5: 147|5: 148|5: 149|5: 150|5: 151|5: 152|5: 153|5: 154|5: 155|5: 156|5: 157|5: 158|5: 159|5: 160|5: 161|5: 162|5: 163|5: 164|5: 165|5: 166|
}
Add(Replace,3543657,373,119)
{
link(onReplace,2577152:doValue,[])
link(Str,2315649:Var2,[])
link(Sub_str,14456168:Var2,[(386,86)(437,86)(437,211)(106,211)])
link(Dest,8684753:Item,[(393,100)(361,100)(361,156)(330,156)])
}
Add(ArrayEnum,15696093,100,119)
{
link(onItem,2894673:doSearch,[])
link(onEndEnum,628010:doData,[(148,132)(148,174)])
link(Array,5552831:Array,[])
}
Add(ArrayRW,8684753,324,119)
{
link(onRead,3543657:doReplace,[])
link(Array,5461682:Array,[])
link(Index,15696093:Index,[(337,100)(288,100)(288,171)(113,171)])
}
Add(Position,2894673,156,119)
{
ZeroPos=0
link(onSearch,6505745:doCompare,[])
link(Str,2315649:Var1,[(162,86)])
link(Target,14456168:Var3,[(169,100)(140,100)(140,184)])
}
Add(GetDataEx,14456168,93,175)
{
link(Data,15696093:Item,[])
}
Add(GetDataEx,2315649,366,77)
{
link(Data,1250216:Var,[(379,77)(216,77)])
}
Add(If_else,6505745,212,119)
{
Type=2
Op2=Integer(0)
link(onTrue,8684753:doRead,[])
link(Op1,2894673:Position,[(218,95)(200,95)(200,156)(162,156)])
}
Add(Memory,2577152,434,119)
{
link(onData,6509355:doData,[])
}
Add(DoData,6509355,497,119)
{
Data=Integer(1)
link(onEventData,12281444:doWork3,[(541,125)(541,79)(186,79)])
}
Add(HubEx,12281444,182,28)
{
link(onEvent,1250216:doIndex,[])
}
Add(GetDataEx,15965029,252,182)
{
Angle=1
link(Data,2577152:Value,[(440,191)])
}
Add(DoData,628010,469,168)
{
Data=Integer(1)
link(onEventData,13718751:onConvert,[(534,174)(534,27)])
link(Data,15965029:Var2,[(475,156)(369,156)(369,198)(265,198)])
}
END_SDK
Add(MultiElementEx,12024763,747,322)
{
link(onConvert,12196070:doWork2,[])
link(String,328305:Value,[(753,310)(732,310)(732,364)(697,364)])
}
BEGIN_SDK
Add(EditMultiEx,13718751,21,21)
{
WorkCount=#24:doConvert=Шифрует строку|
EventCount=#83:onConvert=Событие происходит всякий раз после шифрования строки и выдает ее в поток|
VarCount=#38:ConvertString=Содержит полученный шифр|
DataCount=#28:String=Строка для шифрования|
Width=482
link(doConvert,2032964:doEvent1,[(31,27)(31,118)])
link(ConvertString,15965029:Var1,[(27,191)])
}
Add(Hub,2032964,42,112)
{
OutCount=3
link(onEvent1,13862437:doData,[(131,118)(131,41)])
link(onEvent2,15696093:doEnum,[(78,125)(78,132)])
}
Add(GetIndexData,1250216,210,35)
{
link(Data1,13718751:String,[(216,26)(27,26)])
link(Data2,15965029:Var3,[(223,26)(265,26)])
}
Add(DoData,13862437,147,35)
{
Data=Integer(0)
link(onEventData,12281444:doWork2,[])
}
Add(StrList,5552831,275,28)
{
Strings=#1:Z|1:Y|1:X|1:W|1:V|1:U|1:T|1:S|1:R|1:Q|1:P|1:O|1:N|1:M|1:L|1:K|1:J|1:I|1:H|1:G|1:F|1:E|1:D|1:C|1:B|1:A|1:Я|1:Ю|1:Э|1:Ь|1:Ы|1:Ъ|1:Щ|1:Ш|1:Ч|1:Ц|1:Х|1:Ф|1:У|1:Т|1:С|1:Р|1:П|1:О|1:Н|1:М|1:Л|1:К|1:Й|1:И|1:З|1:Ж|1:Ё|1:Е|1:Д|1:Г|1:В|1:Б|1:А|1:z|1:y|1:x|1:w|1:v|1:u|1:t|1:s|1:r|1:q|1:p|1:o|1:n|1:m|1:l|1:k|1:j|1:i|1:h|1:g|1:f|1:e|1:d|1:c|1:b|1:a|1:я|1:ю|1:э|1:ь|1:ы|1:ъ|1:щ|1:ш|1:ч|1:ц|1:х|1:ф|1:у|1:т|1:с|1:р|1:п|1:о|1:н|1:м|1:л|1:к|1:й|1:и|1:з|1:ж|1:ё|1:е|1:д|1:г|1:в|1:б|1:а|
}
Add(StrList,5461682,86,28)
{
Strings=#5: 166|5: 165|5: 164|5: 163|5: 162|5: 161|5: 160|5: 159|5: 158|5: 157|5: 156|5: 155|5: 154|5: 153|5: 152|5: 151|5: 150|5: 149|5: 148|5: 147|5: 146|5: 145|5: 144|5: 143|5: 142|5: 141|5: 133|5: 132|5: 131|5: 130|5: 129|5: 128|5: 127|5: 126|5: 125|5: 124|5: 123|5: 122|5: 121|5: 120|5: 119|5: 118|5: 117|5: 116|5: 115|5: 114|5: 113|5: 112|5: 111|5: 110|5: 109|5: 108|5: 107|5: 106|5: 105|5: 104|5: 103|5: 102|5: 101|3: 66|3: 65|3: 64|3: 63|3: 62|3: 61|3: 60|3: 59|3: 58|3: 57|3: 56|3: 55|3: 54|3: 53|3: 52|3: 51|3: 50|3: 49|3: 48|3: 47|3: 46|3: 45|3: 44|3: 43|3: 42|3: 41|3: 33|3: 32|3: 31|3: 30|3: 29|3: 28|3: 27|3: 26|3: 25|3: 24|3: 23|3: 22|3: 21|3: 20|3: 19|3: 18|3: 17|3: 16|3: 15|3: 14|3: 13|3: 12|3: 11|3: 10|1:9|1:8|1:7|1:6|1:5|1:4|1:3|1:2|1:1|
}
Add(Replace,3543657,317,126)
{
link(onReplace,2577152:doValue,[])
link(Str,1250216:Var,[(323,89)(216,89)])
link(Sub_str,15696093:Item,[(330,114)(246,114)(246,209)(106,209)])
link(Dest,8684753:Item,[(337,107)(305,107)(305,163)(274,163)])
}
Add(ArrayEnum,15696093,100,126)
{
link(onItem,8684753:doRead,[])
link(onEndEnum,628010:doData,[(148,139)(148,181)])
link(Array,5461682:Array,[])
}
Add(ArrayRW,8684753,268,126)
{
link(onRead,3543657:doReplace,[])
link(Array,5552831:Array,[(274,100)(295,100)])
link(Index,15696093:Index,[(281,107)(198,107)(198,170)(113,170)])
}
Add(Memory,2577152,378,126)
{
link(onData,6509355:doData,[])
}
Add(DoData,6509355,441,126)
{
Data=Integer(1)
link(onEventData,12281444:doWork3,[(485,132)(485,79)(186,79)])
}
Add(HubEx,12281444,182,28)
{
link(onEvent,1250216:doIndex,[])
}
Add(GetDataEx,15965029,252,182)
{
Angle=1
link(Data,2577152:Value,[(384,191)])
}
Add(DoData,628010,413,175)
{
Data=Integer(1)
link(onEventData,13718751:onConvert,[(492,181)(492,27)])
link(Data,15965029:Var2,[(419,156)(369,156)(369,198)(265,198)])
}
END_SDK
Add(HubEx,12196070,789,315)
{
link(onEvent,1889212:doAdd,[])
}
Add(DoData,1407734,257,322)
{
link(onEventData,15782727:doValue,[])
link(Data,11854330:Text,[(263,310)(397,310)(397,401)(809,401)])
}
Add(Memory,328305,691,322)
{
link(onData,12024763:doConvert,[])
}
Add(DoData,3752626,166,42)
{
Data=String(Пароль)
link(onEventData,6490891:doText,[])
}
Add(PointHint,13987394,726,308)
{
Info=#12:Расшифровать|
Transparent=0
VAlign=0
Width=78
Height=60
}
EcsTasY писал(а):
кстати.. юзай Код без подцветки , а то не удобно копировать код отсюда...А у меня внизу под лозунгом есть здесь: code 12456.txt!