*Обновление среды HiAsm
Make(delphi)
ver(4.02 build 179)
Add(MainForm,2953706,63,147)
{
 Width=408
 Height=318
 Font=[Arial,8,0,0,204]
 Caption="Обновление HiAsm"
 BorderStyle=1
 Position=1
 link(onCreate,6899803:doStart,[(103,167)(103,153)])
}
Add(MultiElementEx,9986156,294,154)
{
 @Hint=#43:Чтение списка файлов и их контрольных сумм |
 link(onStop,13672992:doWork1,[])
 link(onEndEnum,13672992:doWork2,[])
}
BEGIN_SDK
  Add(EditMultiEx,13606272,21,7)
  {
   WorkCount=#19:Start=начало работы|
   EventCount=#24:onStop=Закачка завершена|9:onEndEnum|
   VarCount=#37:Result=http://hiasm.narod.ru/hi_zvcs/|5:Array|
   Width=328
   Height=137
   VOffset=35
   HOffset=14
   link(Start,1648562:doClear,[])
   link(Result,1648562:Value,[])
   link(Array,1180663:Var1,[(48,86)])
  }
  Add(HTTP_Get,16180479,133,35)
  {
   link(onDownload,9579638:doDeCompress,[])
   link(onStop,14881333:doEnum,[(178,62)(178,104)])
  }
  Add(Convertor,7093061,224,35)
  {
   Mode=11
   link(onResult,16036371:doText,[])
  }
  Add(StrList,16036371,266,14)
  {
   Point(doSort)
  }
  Add(ZLIB,9579638,182,35)
  {
   link(onStream,7093061:doConvert,[])
  }
  Add(ArrayEnum,14881333,280,98)
  {
   link(onItem,13606272:onStop,[(322,104)(322,48)])
   link(onEndEnum,13606272:onEndEnum,[(330,111)(330,55)])
   link(Array,1180663:Var2,[])
  }
  Add(Memory,1648562,35,35)
  {
   Default=String(http://hiasm.narod.ru/hi_zvcs/)
   link(onData,13715317:doStrCat,[])
  }
  Add(StrCat,13715317,84,35)
  {
   Str2="hashed.txt"
   link(onStrCat,16180479:doDownload,[])
  }
  Add(GetDataEx,1180663,273,77)
  {
   link(Data,16036371:Array,[])
  }
END_SDK
Add(ChildGroupBox,13672992,343,154)
{
 @Hint=#24:Отбор файлов для закачки|
 link(onEvent1,6503252:doData,[])
 link(onEvent2,11921051:doWork1,[(383,167)(383,93)(39,93)])
 link(Data1,14008469:Var1,[(349,135)])
 link(Data2,1630000:Result,[(356,142)(464,142)(464,191)(573,191)])
}
BEGIN_SDK
  Add(EditMulti,12520503,21,21)
  {
   EventCount=2
   WorkCount=4
   DataCount=2
   VarCount=2
   Width=727
   Height=361
   link(doWork1,14575946:doSplit,[(136,27)(136,34)])
   link(doWork2,13997186:doEvent1,[(120,34)(120,251)])
   link(doWork3,5227799:doEvent1,[(42,41)(42,328)])
   link(doWork4,7165980:doData,[(36,48)(36,209)])
   link(Var1,6547804:Array,[(27,179)(286,179)])
   link(Var2,10834792:Var1,[(34,191)])
  }
  Add(GroupBox,4919579,56,98)
  {
   Left=10
   Top=10
   Width=243
   Height=271
   Font=[MS Sans Serif,12,1,0,1]
   Caption="Новые файлы"
  }
  Add(ListBox,6547804,266,119)
  {
   Left=15
   Top=25
   Width=210
   Height=235
   Font=[Arial,12,0,0,204]
   Name="listbox"
   Hint="Двойной клик удаляет пункт"
   HintManager="parent.H1"
   IndexManager="idx"
   BoxDrawManager="draw"
   IconsManager="icm"
   Point(Index)
   Point(onDblClick)
   link(Str,16044222:Var2,[])
   link(onDblClick,13194590:doData,[(331,139)(331,236)(268,236)(268,202)])
  }
  Add(StrPart,14575946,189,28)
  {
   Char=" "
   Point(Left)
   Point(Right)
   link(onSplit,14830115:doFileHashsum,[(234,34)(234,71)(126,71)(126,111)])
  }
  Add(Hashsum,14830115,140,98)
  {
   link(onResult,4562575:doCompare,[])
  }
  Add(If_else,4562575,182,98)
  {
   link(onFalse,919687:doEvent1,[])
   link(Op2,14575946:Left,[])
  }
  Add(If_else,6532100,273,252)
  {
   Op2=Integer(0)
   link(onTrue,12520503:onEvent1,[(708,258)(708,27)])
   link(onFalse,12520503:onEvent2,[(715,265)(715,34)])
   link(Op1,10834792:Var2,[])
  }
  Add(BoxDrawManager,1605173,266,28)
  {
   Name="draw"
   Gutter=1
   DarkColor=15780518
  }
  Add(IconsManager,138289,308,28)
  {
   Name="icm"
   Icons=[]
  }
  Add(IndexManager,3243842,644,84)
  {
   Name="idx"
   Index=[]
  }
  Add(WorkIconsManager,14658570,560,84)
  {
   IconsManager="icm"
   Point(doMT_InsertIcon)
   Point(EndIdxIcons)
   Point(doDeleteIcon)
  }
  Add(FileAttributes,8812294,385,133)
  {
   Point(doGetFileIcon)
   Point(onGetFileIcon)
   link(FileName,16044222:Var3,[(391,86)])
   link(onGetFileIcon,5469774:doCase,[])
  }
  Add(MT_Add,4384211,567,140)
  {
   InputMT=1
   link(onAdd,8221825:doEvent1,[])
   link(Data,14658570:CountIcons,[])
  }
  Add(Hub,8221825,609,140)
  {
   link(onEvent1,14658570:doMT_InsertIcon,[(633,146)(633,70)(547,70)(547,97)])
   link(onEvent2,7081257:doAdd,[])
  }
  Add(Hub,919687,231,105)
  {
   link(onEvent1,8812294:doGetFileIcon,[(365,111)(365,160)])
   link(onEvent2,6547804:doAdd,[(255,118)(255,125)])
  }
  Add(ArrayRW,7081257,644,133)
  {
   link(Array,3243842:Indexes,[])
   link(Value,14658570:EndIdxIcons,[(664,125)(580,125)])
  }
  Add(Hub,13997186,175,245)
  {
   link(onEvent1,2873594:doRedraw,[(199,251)(199,223)])
   link(onEvent2,6532100:doCompare,[])
  }
  Add(RedrawManager,2873594,210,217)
  {
   ControlManager="listbox"
  }
  Add(GetDataEx,16044222,259,77)
  {
   Angle=3
   link(Data,14575946:Right,[(202,86)])
  }
  Add(DoData,13194590,287,196)
  {
   link(onEventData,15585238:doEvent1,[])
   link(Data,6547804:Index,[])
  }
  Add(Hub,15585238,350,196)
  {
   InCount=2
   OutCount=3
   link(onEvent1,6547804:doDelete,[(386,202)(386,243)(251,243)(251,139)])
   link(onEvent2,14658570:doDeleteIcon,[(547,209)(547,104)])
  }
  Add(DoData,7165980,63,203)
  {
   Data=Integer(0)
   link(onEventData,15585238:doEvent2,[])
  }
  Add(GetDataEx,10834792,266,182)
  {
   link(Data,6547804:Count,[])
  }
  Add(StrList,13488926,315,287)
  {
   Point(doAppend)
  }
  Add(FormatStr,10483093,105,329)
  {
   DataCount=1
   Mask="%1\HiUpdate.txt"
   link(onFString,13488926:doAppend,[])
   link(Str1,12520503:Data1,[(111,165)(27,165)])
  }
  Add(Hub,5227799,56,322)
  {
   link(onEvent1,1945912:doConvert,[(91,328)(91,314)])
   link(onEvent2,10483093:doString,[])
  }
  Add(Case,5469774,434,140)
  {
   link(onNextCase,14771119:doWork2,[])
   link(onTrue,14068554:doData,[(474,153)(474,167)])
  }
  Add(Icon,13308325,483,105)
  {
   Icon=[ZIP7E03000078DA63606004420101062029C190C1CCC020C6C0C0A001C44021060506883808383033501FFC474503AE9ECEEE1F2A5AB04A11AFFE3F1161F59F1022493DF1DEA42855FC07821FF6080CE7CBFFFFFF87FFFFFF7FEC4001E6FFFF0F36FFFF7F00881F00D90F80623FF8216A010D01924B]
  }
  Add(DoData,14068554,483,161)
  {
   link(onEventData,14771119:doWork3,[(529,167)])
   link(Data,13308325:Icon,[])
  }
  Add(HubEx,14771119,525,133)
  {
   link(onEvent,4384211:doAdd,[])
  }
  Add(FormatStr,13150815,259,308)
  {
   Mask="%1\13\10\13\10%2\13\10\13\10\13\10"
   link(onFString,13488926:doText,[])
   link(Str2,6547804:Text,[])
  }
  Add(DateConvertor,1945912,210,308)
  {
   Mode=9
   Format="=== dd.MM.yyyy HH:mm ==="
   Point(Data)
   link(onResult,13150815:doString,[])
   link(Data,12520503:Data2,[(216,172)(34,172)])
  }
END_SDK
Add(Hub,2630176,217,147)
{
 link(onEvent1,7949789:doValue,[])
 link(onEvent2,9986156:Start,[])
}
Add(Button,13883676,63,231)
{
 Left=321
 Top=260
 Width=70
 Enabled=1
 TabOrder=-1
 Caption="Обновить"
 Point(doEnabled)
 link(onClick,6880873:doEvent1,[])
}
Add(Label,14404991,455,413)
{
 Left=265
 Top=110
 Width=125
 Height=80
 Font=[MS Sans Serif,12,1,255,1]
 Caption=""
 AutoSize=1
 Alignment=2
}
Add(Hub,8282336,196,336)
{
 OutCount=6
 link(onEvent1,10451217:doDelete,[(220,342)(220,314)])
 link(onEvent2,1826881:doWork1,[(767,349)])
 link(onEvent3,16197283:doValue,[])
 link(onEvent4,2048370:doStrCat,[])
 link(onEvent5,13672992:doWork4,[(278,370)(278,181)])
 link(onEvent6,7806920:doCompare,[])
}
Add(Time,12591192,497,91)
{
 Format="YMD_hm"
}
Add(HTTP_Get,13142930,546,427)
{
 Wait=0
 link(onStatus,8583053:doEvent1,[(712,433)(712,440)])
 link(onDownload,7764181:doWork,[(590,440)(590,412)])
 link(onURLSize,9907604:doEvent1,[])
}
Add(StrCat,2048370,294,357)
{
 link(onStrCat,7664994:doEvent1,[(498,363)(498,447)])
 link(Str1,9986156:Result,[])
}
Add(ZLIB,13547628,665,399)
{
 link(onStream,6242335:doCopyFromStream,[(709,405)(709,419)])
}
Add(FileStream,6242335,721,399)
{
 Mode=1
 AutoCopy=0
 Point(doCopyFromStream)
 link(FileName,16197283:Value,[])
}
Add(Hub,7664994,511,441)
{
 OutCount=3
 link(onEvent1,13142930:GetURLSize,[])
 link(onEvent2,13142930:doDownload,[(535,454)(535,433)])
 link(onEvent3,16234405:doWork2,[(535,461)(535,475)])
}
Add(Application,8686078,784,469)
{
 Wait=1
}
Add(Hub,9907604,602,441)
{
 link(onEvent1,15208502:doWork2,[])
 link(onEvent2,3907874:doMax,[])
}
Add(DoData,13298349,392,413)
{
 Data=String(Обновление закончено)
 link(onEventData,15168872:doWork2,[])
}
Add(CheckBox,4677750,161,189)
{
 Left=265
 Top=20
 Width=130
 Hint="Сохрнять список обновленных файлов в журнале"
 HintManager="H1"
 Checked=0
 Caption="Сохранять в журнале "
}
Add(Hub,6880873,112,231)
{
 OutCount=4
 link(onEvent1,10684532:doEnum,[])
 link(onEvent2,9877102:doEvent,[])
 link(onEvent3,6029312:doProcessMessages,[(144,251)(144,286)])
 link(onEvent4,5638381:doWork1,[(137,258)])
}
Add(DoData,16400650,336,420)
{
 Data=Integer(0)
 link(onEventData,11921051:doWork3,[(377,426)(377,458)(39,458)])
}
Add(HubEx,11921051,35,224)
{
 link(onEvent,13883676:doEnabled,[])
}
Add(Hub,9406442,294,413)
{
 OutCount=4
 link(onEvent1,13298349:doData,[])
 link(onEvent2,16400650:doData,[])
 link(onEvent3,15208502:doWork3,[(326,433)(326,482)(648,482)])
 link(onEvent4,1570338:doData,[(319,440)(319,489)])
}
Add(DoData,6503252,392,154)
{
 Data=String(Нет файлов для обновления)
 link(onEventData,14919136:doWork1,[(438,160)])
}
Add(HubEx,15168872,434,406)
{
 link(onEvent,14404991:doText,[])
}
Add(HintManager,6890594,63,105)
{
 Name="H1"
 Font=[Tahoma,8,0,0,1]
 HintStyle=0
}
Add(Dir,11138793,700,231)
{
}
Add(FileTools,2007639,483,280)
{
 link(NewFileName,15999216:FString,[])
}
Add(Memory,7949789,497,147)
{
 Point(Data)
 link(onData,1630000:doConvert,[])
 link(Data,12591192:FormatTime,[])
}
Add(FormatStr,15999216,490,231)
{
 DataCount=3
 Mask="%3\%2\%1"
 Point(FString)
 link(onFString,9781185:doPart,[])
 link(Str2,7949789:Value,[])
 link(Str3,14008469:Var2,[(510,198)(559,198)])
}
Add(HubEx,15208502,644,434)
{
 link(onEvent,8065460:doData,[])
}
Add(DoData,8065460,665,441)
{
 Data=Integer(0)
 link(onEventData,8583053:doEvent2,[])
}
Add(IndexToChanel,9877102,161,238)
{
 Point(Index)
 link(onEvent2,13672992:doWork3,[(215,251)(215,174)])
 link(Index,4677750:Checked,[])
}
Add(Memory,16197283,721,350)
{
}
Add(GetDataEx,14008469,546,126)
{
 link(Data,3179668:GetData,[])
}
Add(Check,7764181,602,406)
{
 link(onEvent,13547628:doDeCompress,[])
}
Add(FilePartElm,9781185,567,231)
{
 Mode=0
 link(onPart,14606619:doWork2,[])
}
Add(Hub,2753819,448,231)
{
 link(onEvent1,15999216:doString,[])
 link(onEvent2,2007639:doCopy,[(472,244)(472,293)])
}
Add(ArrayEnum,10684532,301,231)
{
 link(onItem,15572327:doSplit,[])
 link(Array,9986156:Array,[])
}
Add(MultiStrData,15572327,392,231)
{
 Char=" "
 From=1
 Count=1
 link(onPart1,2753819:doEvent1,[])
}
Add(FileTools,10451217,231,294)
{
 DelToRecycle=1
}
Add(Thread,6899803,112,147)
{
 Delay=100
 FastStop=0
 link(onSyncExec,14480880:doPing,[(153,160)(153,153)])
}
Add(HubEx,14919136,434,182)
{
 Angle=1
 link(onEvent,15168872:doWork1,[])
}
Add(StatusBarEx,3907874,784,420)
{
 SizeGrip=1
 EnablePBar=0
 PanelPBar=1
 VisiblePBar=0
 PanelHintPBar=0
 Smooth=1
 ColorPBar=16711680
 Panels=#5: =150|5: =256|0:|
 Point(doWidth)
 Point(doPosPBar)
 Point(doMax)
}
Add(ArrayRW,5660408,154,336)
{
 link(onRead,8282336:doEvent1,[])
 link(Array,13672992:Var1,[(160,273)(349,273)])
 link(Index,11049341:Value,[])
}
Add(If_else,7806920,231,371)
{
 Op2=Integer(0)
 link(onTrue,9406442:doEvent1,[(278,377)(278,419)])
 link(onFalse,5638381:doWork3,[(271,384)(271,410)(137,410)])
 link(Op1,13672992:Var2,[(237,342)(356,342)])
}
Add(HubEx,5638381,133,329)
{
 link(onEvent,5660408:doRead,[])
}
Add(Memory,11049341,161,294)
{
 Default=Integer(0)
}
Add(Ping,14480880,162,147)
{
 Name="http://hiasm.narod.ru"
 TimeOut=5000
 link(onFind,2630176:doEvent1,[])
 link(onFailed,3997543:doData,[(206,160)(206,195)])
}
Add(DoData,3997543,393,189)
{
 Data=String(Сервер не найден)
 link(onEventData,14919136:doWork2,[])
}
Add(Application,6029312,301,280)
{
 Wait=1
}
Add(DoData,1570338,665,483)
{
 Data=String()
 link(onEventData,1826881:doWork3,[(767,489)])
}
Add(HubEx,1826881,763,413)
{
 link(onEvent,3907874:doText,[])
}
Add(Hub,8583053,728,434)
{
 InCount=2
 link(onEvent1,3907874:doPosPBar,[(763,440)(763,447)])
 link(onEvent2,16234405:doWork1,[(753,447)])
}
Add(HubEx,16234405,749,462)
{
 link(onEvent,8686078:doProcessMessages,[])
}
Add(DateConvertor,1630000,567,147)
{
 Mode=8
 Format="yyyyMMdd_HHmm"
 Point(Data)
 Point(Result)
 link(onResult,1945912:doConvert,[])
}
Add(DateConvertor,1945912,616,147)
{
 Mode=9
 Format="dd.MM.yyyy  HH:mm"
 Point(Data)
 link(onResult,15036756:doStrCat,[])
}
Add(StrCat,15036756,700,147)
{
 Str1="Обновление HiAsm  на  "
 link(onStrCat,2953706:doCaption,[(745,153)(745,64)(51,64)(51,153)])
}
Add(EventFromData,3179668,553,91)
{
 link(onEvent,3072198:doString,[])
}
Add(FormatStr,3072198,602,91)
{
 DataCount=1
 Mask="%1\HiBackUp"
 link(onFString,1471501:doEvent1,[])
 link(Str1,11138793:CurrentDir,[(608,79)(657,79)(657,275)(706,275)])
}
Add(Hub,1471501,651,91)
{
 link(onEvent1,14606619:doWork1,[(683,97)])
 link(onEvent2,3179668:doData,[(677,104)(677,72)(541,72)(541,97)])
}
Add(HubEx,14606619,679,224)
{
 link(onEvent,11138793:doDir,[])
}