Make(Delphi)
Pos(52,0)
Add(MainForm,7839043,-31,105)
{
 Left=20
 Top=105
}
Add(Button,3404827,130,98)
{
 Left=15
 Top=25
 Width=70
 Caption="Шифровать"
 link(onClick,2534399:doExecute,[])
}
Add(ODialog,2534399,193,98)
{
 StartDir="C:\Program Files\HiAsm160"
 link(onExecute,10607065:doEvent1,[])
}
Add(Hub,10607065,249,98)
{
 OutCount=4
 link(onEvent1,16739072:doValue,[])
 link(onEvent2,6897425:doOpen,[])
 link(onEvent3,6897425:doClose,[])
 link(onEvent4,6581010:doCompress,[(349,125)(349,188)])
}
Add(FileStream,6897425,354,105)
{
 link(onLoad,12945644:doCopy,[])
}
Add(MemoryStream,12945644,417,105)
{
}
Add(CryptRC6,2660616,466,182)
{
 Password="3042"
 link(onStream,847028:doCopyFromStream,[])
}
Add(Memory,16739072,522,98)
{
}
Add(FileStream,847028,522,168)
{
 Mode=1
 AutoCopy=0
 Point(doCopyFromStream)
 link(FileName,16739072:Value,[])
}
Add(Button,5678203,116,252)
{
 Left=90
 Top=25
 Width=100
 Caption="Расшифровать"
 link(onClick,6633391:doExecute,[])
}
Add(ODialog,6633391,179,252)
{
 StartDir="C:\Program Files\HiAsm160"
 link(onExecute,8344920:doEvent1,[])
}
Add(Hub,8344920,235,252)
{
 OutCount=4
 link(onEvent1,111768:doValue,[])
 link(onEvent2,44507:doOpen,[])
 link(onEvent3,44507:doClose,[])
 link(onEvent4,13775973:doUnpackStream,[(335,279)(335,349)])
}
Add(FileStream,44507,340,259)
{
 link(onLoad,4984175:doCopy,[])
}
Add(MemoryStream,4984175,403,259)
{
}
Add(CryptRC6,13775973,403,336)
{
 Password="3042"
 link(onStream,9032067:doDeCompress,[])
 link(Stream,4984175:Stream,[(409,314)(409,314)])
}
Add(Memory,111768,522,252)
{
}
Add(FileStream,9074828,522,315)
{
 Mode=1
 AutoCopy=0
 Point(doCopyFromStream)
 link(FileName,111768:Value,[])
}
Add(ZLIB,6581010,417,182)
{
 link(onStream,2660616:doPackStream,[])
 link(Stream,12945644:Stream,[])
}
Add(ZLIB,9032067,459,329)
{
 link(onStream,9074828:doCopyFromStream,[])
}