Make(Delphi)
Pos(0,0)
Add(MainForm,828416,28,154)
{
 Left=20
 Top=105
 Width=229
 Height=139
 Caption="Crypt"
 link(onCreate,1056800:doWork3,[(74,195)])
}
Add(Button,10540971,84,21)
{
 Left=35
 Top=15
 Width=65
 Caption="Load"
 link(onClick,13050148:doExecute,[])
}
Add(ODialog,13050148,147,21)
{
 link(onExecute,7538199:doEvent1,[])
}
Add(FileStream,10191927,252,28)
{
 link(onLoad,336576:doCopy,[])
}
Add(Hub,7538199,203,21)
{
 OutCount=3
 link(onEvent1,7855367:doText,[])
 link(onEvent2,10191927:doOpen,[])
 link(onEvent3,10191927:doClose,[])
}
Add(MemoryStream,336576,308,28)
{
 Point(doPosition)
}
Add(DataToFile,14399683,364,98)
{
 link(Stream,7675311:Var3,[(370,79)])
}
Add(For,15345908,252,147)
{
 IncludeEnd=1
 link(onEvent,14949712:doRandom,[])
 link(onStop,13044440:doData,[(291,160)(291,97)])
 link(End,336576:Size,[(265,73)(321,73)])
}
Add(Random,14949712,308,147)
{
 Max=255
 Point(RandSeed)
 Point(doRandSeed)
 link(onRandom,1152278:doOperation,[(348,153)(348,153)])
}
Add(GetDataEx,7675311,301,70)
{
 link(Data,336576:Stream,[(314,64)(314,64)])
}
Add(Math,1152278,357,147)
{
 OpType=6
 ResultType=0
 link(onResult,7213208:doEvent1,[])
 link(Op2,14399683:Data,[])
}
Add(Hub,7213208,399,147)
{
 link(onEvent1,14225644:doData,[])
 link(onEvent2,14399683:doPut,[(438,160)(438,122)(354,122)(354,104)])
}
Add(StyleXP,13178188,28,21)
{
}
Add(Button,12047601,91,154)
{
 Left=120
 Top=15
 Width=65
 Caption="Crypt"
 Data=Integer(0)
 link(onClick,5435442:doEvent1,[])
}
Add(Edit,598918,203,91)
{
 Left=120
 Top=40
 Width=65
 Font=[Courier New,8,0,0,204]
 Text="DA03DE1D"
 DataType=3
}
Add(Hub,5435442,147,154)
{
 OutCount=3
 link(onEvent1,4383444:doWork2,[(186,160)(186,48)])
 link(onEvent2,5591650:doData,[])
 link(onEvent3,15345908:doFor,[(193,174)(193,153)])
}
Add(DoData,5591650,203,161)
{
 link(onEventData,14949712:doRandSeed,[])
 link(Data,598918:Text,[])
}
Add(Button,13466488,28,84)
{
 Left=35
 Top=40
 Width=65
 Caption="Randomize"
 link(onClick,1056800:doWork2,[])
}
Add(Hub,7212954,91,84)
{
 link(onEvent1,14949712:doRandomize,[(297,90)(297,160)])
 link(onEvent2,16147120:doConvert,[])
}
Add(Convertor,16147120,147,91)
{
 Mode=6
 Digits=8
 link(onResult,598918:doText,[])
 link(Data,14949712:RandSeed,[(153,81)(243,81)(243,186)(321,186)])
}
Add(DoData,14225644,448,147)
{
 link(onEventData,4383444:doWork3,[(491,153)(491,66)(291,66)])
 link(Data,15345908:Position,[(454,137)(465,137)(465,197)(258,197)])
}
Add(HubEx,1056800,70,77)
{
 link(onEvent,7212954:doEvent1,[])
}
Add(FileStream,14658612,413,77)
{
 Mode=1
 AutoCopy=0
 Point(doCopyFromStream)
 link(FileName,7855367:Text,[])
}
Add(HubEx,4383444,287,35)
{
 link(onEvent,336576:doPosition,[])
}
Add(DoData,13044440,308,91)
{
 link(onEventData,14658612:doCopyFromStream,[])
 link(Data,7675311:Var2,[])
}
Add(Edit,7855367,413,21)
{
 Top=80
 Width=221
 Height=25
 Align=4
 Ctl3D=1
 Font=[MS Sans Serif,10,0,0,1]
 Text="nul"
}