Add(MainForm,89572,434,105)
{
 Left=50
 Top=50
 Width=530
 Height=436
 Font=[Arial,8,0,0,1]
 Caption="Coordinator"
 BorderStyle=1
 Icon=[ZIP7E03000078DA8D93310F014110859F289454A2A320F103844A222AA151A9B4128944A341E5A2A015B59A8E4E7414A2D0FA01C41F506A249E4C32D9ECDEC9EDEDEEDDBD7DDFCDDCEC1D10E1914880730ADD28900490E7A0840C44FFB54A1401AD56CC4A0FB3542FE516FDE67ADEBB9DF716C2DBED72C86E2E89DF45784145CC9C4DFFA055A66821A37675356E2B62A5E4229D464111F7D504E1A304A1818A20BE7550C40C4125C8AC88D8DC9C7D8BAC05FC8350B91E36EC6290EA492CDFCAD0C9592EDCAD51C5144DD6DC1A13F1CD4D10CB2F1986F46B082BAEEAAE5FA368E65AF9A0AF5A5FF3F204A627C0F38009C791FFC83D06BCE2C03BCD7B9E27331AE9D9DDA9FDC68BEB6FE0F101BE3C65CEAB]
 SavePosName="Coordinator.ini\Coordinator"
 Point(Close)
 Point(Left)
 Point(Top)
 Point(Width)
 Point(Height)
}
Add(InfoTip,18582,319,35)
{
 Info=#37:Last modification 09:03:2019 17:51:55|
 Font=[Arial,8,0,0,1]
 Frame=1
 Width=197
 Height=18
}
Add(InfoTip,3786,312,22)
{
 Info=#26:Coordinator version  0.503|
 Font=[Arial,8,0,0,1]
 Frame=1
 Width=204
 Height=18
}
Add(Version,11511461,245,77)
{
 Version="0.503"
 Description="Tools of Coordinator Prepress"
 InternalName="Coordinator"
 E-mail="nic@savelovo.net"
 AddHint(-75,34,42,13,Version)
}
Add(Memory,4061237,385,105)
{
 Default=String(0.503)
}
Add(Memory,12774542,371,91)
{
 Default=String(Coordinator)
}
Add(ChildForm,990376,420,168)
{
 link(Data1,12774542:Value,[(426,154)(377,154)])
 link(Data2,4061237:Value,[(433,149)(391,149)])
 link(Data3,89572:Left,[])
 link(Data4,89572:Top,[])
 link(Data5,89572:Width,[])
 link(Data6,89572:Height,[])
}
BEGIN_SDK
  Add(EditMulti,2210700,10,10)
  {
   WorkCount=1
   DataCount=6
   Width=356
   Height=277
   link(doWork1,55042:doEvent1,[])
  }
  Add(MainForm,15446549,308,154)
  {
   Left=40
   Top=110
   Width=246
   Height=256
   Color=-16777192
   Visible=1
   Caption="About"
   BorderStyle=0
   TaskBar=1
   ClientSize=0
   Point(doVisible)
   Point(doLeft)
   Point(doTop)
   Point(Width)
   Point(Height)
   link(onCreate,14876248:doString,[(348,174)(348,148)(102,148)(102,104)])
  }
  Add(VBScript,1136173,154,98)
  {
   WorkPoints=#5:Input|
   EventPoints=#6:Output|
   DataPoints=#7:_String|
   Script=#27:function doWork(Data,Index)|17:Dim ver as String|19:Dim Title as String|22:Dim strTitle as String|20:ver = GetData(Index)|23:Data = Data + " " + ver|19:onEvent(Index,Data)|12:End function|
   link(Output,1444614:doAdd,[])
   link(_String,2210700:Data2,[(160,50)])
  }
  Add(Case,9896524,140,161)
  {
   Value=String(close)
   link(onTrue,6557163:doEvent1,[(191,174)(191,174)])
  }
  Add(FormatStr,14876248,112,98)
  {
   DataCount=1
   Mask="        %1 version "
   link(onFString,1136173:Input,[])
   link(Str1,2210700:Data1,[(118,40)])
  }
  Add(MultiElementEx,1831536,98,203)
  {
   link(ASHandle,12448163:ASHandle,[])
   link(Text,1444614:Text,[(111,198)(202,198)])
  }
  BEGIN_SDK
    Add(EditMultiEx,12125861,3,3)
    {
     WorkCount=#6:doInit|6:doStop|
     DataCount=#8:ASHandle|4:Text|
     Width=780
     Height=564
     link(doInit,7759138:doEvent1,[])
     link(doStop,8509903:doStop,[])
    }
    Add(Timer,8509903,161,84)
    {
     Interval=50
     Enable=1
     link(onTimer,13259658:doRefresh,[])
    }
    Add(AS_DrawRect,13259658,203,84)
    {
     Name="info"
     link(onPaint,8779013:doSet,[(242,90)(242,122)(64,122)(64,139)])
     link(ASHandle,12125861:ASHandle,[])
    }
    Add(LineBreak,13213330,518,273)
    {
     Caption="6"
     Type=1
     link(Data,8565567:Value,[])
     Primary=[8297954,-217,91]
    }
    Add(Img_Text,12256,203,182)
    {
     X=2
     Font=[Times New Roman,9,1,8388608,204]
     Text="1 - Система визуального проектирования"
     link(Bitmap,4330895:Var2,[])
     link(Text,8776464:Var,[(216,178)(251,178)])
    }
    Add(Hub,16433178,287,154)
    {
     OutCount=4
     link(onEvent1,8344649:doReset,[(328,160)(328,139)])
     link(onEvent2,8344649:doMax,[(332,167)(332,146)])
     link(onEvent3,996308:doReset,[(342,174)(342,174)])
     link(onEvent4,8344649:doPrev,[(341,181)(341,132)])
    }
    Add(InlineCode,8779013,70,133)
    {
     @Hint=#41:Выравнивание по центру родительского окна|
     WorkPoints=#5:doSet|6:doInit|
     EventPoints=#4:next|6:intStr|5:value|
     Code=#15:unit HiAsmUnit;|0:|9:interface|0:|21:uses KOL,Share,Debug;|0:|4:type|28: THiAsmClass = class(TDebug)|7:private|6:public|33: intStr, value, next : THI_Event;|46: procedure doSet(var _Data:TData; Index:word);|47: procedure doInit(var _Data:TData; Index:word);|4:end;|0:|14:implementation|3:var|34: intTemp : Array[0..8] of integer;|0:|28:procedure THiAsmClass.doSet;|19:var i, j : integer;|5:begin|27:   For i := 0 To 8 Do Begin|20:    Inc(intTemp[i]);|36:    j := 120 - (intTemp[i] mod 135);|27:    _hi_onEvent(intStr, i);|26:    _hi_onEvent(value, j);|41:    If j = -14 Then _hi_onEvent(next, 1);|15:   end; { For }|4:end;|0:|29:procedure THiAsmClass.doInit;|16:var i : integer;|5:begin|19:   intTemp[0] := 0;|21:   intTemp[1] := -15;|21:   intTemp[2] := -30;|21:   intTemp[3] := -45;|21:   intTemp[4] := -60;|21:   intTemp[5] := -75;|21:   intTemp[6] := -90;|22:   intTemp[7] := -105;|22:   intTemp[8] := -120;|43:   For i := 0 To 8 Do _hi_onEvent(next, 1);|4:end;|4:end.|
     link(next,10578504:doEvent1,[(111,139)(111,125)])
     link(intStr,9850800:doValue,[])
     link(value,3762352:doEvent,[(110,153)(110,188)])
    }
    Add(Img_Text,16062379,196,224)
    {
     X=2
     Font=[Times New Roman,9,1,8388608,204]
     Text="2 - Система визуального проектирования"
     link(Bitmap,4330895:Var1,[(202,163)])
     link(Text,12426787:Var,[(209,220)(251,220)])
    }
    Add(GetDataEx,4330895,203,158)
    {
     link(Data,13259658:Bitmap,[])
    }
    Add(Math,16586927,392,119)
    {
     OpType=1
     Op2=1
     ResultType=0
     link(onResult,16522694:doRead,[])
    }
    Add(Hub,7759138,21,56)
    {
     OutCount=5
     link(onEvent1,10455765:doClear,[])
     link(onEvent2,11500511:doData,[(282,69)(282,76)])
     link(onEvent3,16433178:doEvent1,[(279,76)(279,160)])
     link(onEvent4,8779013:doInit,[(59,83)(59,146)])
     link(onEvent5,8509903:doTimer,[(103,90)(103,90)])
    }
    Add(Counter,8344649,350,119)
    {
     Min=1
     Point(Max)
     Point(doMax)
     link(onNext,16586927:doOperation,[])
     link(Max,10455765:Count,[(356,114)(356,114)])
    }
    Add(Img_Text,13422919,231,266)
    {
     X=2
     Font=[Times New Roman,9,1,8388608,204]
     Text="3 - Система визуального проектирования"
     link(Bitmap,5270102:Var2,[])
     link(Text,10645999:Var,[(244,262)(279,262)])
    }
    Add(LineBreak,8538683,392,294)
    {
     Caption="9"
     Type=1
     link(Data,5529231:Value,[])
     Primary=[153828,-70,196]
    }
    Add(Img_Text,11975597,224,308)
    {
     X=2
     Font=[Times New Roman,9,1,8388608,204]
     Text="4 - Система визуального проектирования"
     link(Bitmap,5270102:Var1,[(230,233)])
     link(Text,10296896:Var,[(237,304)(286,304)])
    }
    Add(GetDataEx,5270102,231,228)
    {
     link(Data,4330895:Var3,[(237,163)])
    }
    Add(Img_Text,80230,259,350)
    {
     X=2
     Font=[Times New Roman,9,1,8388608,204]
     Text="5 - Система визуального проектирования"
     link(Bitmap,9138691:Var2,[])
     link(Text,11657824:Var,[(272,346)(300,346)])
    }
    Add(LineBreak,15991438,434,287)
    {
     Caption="8"
     Type=1
     link(Data,3508024:Value,[])
     Primary=[10384774,-98,161]
    }
    Add(Img_Text,14441939,252,392)
    {
     X=2
     Font=[Times New Roman,9,1,8388608,204]
     Text="6 - Система визуального проектирования"
     link(Bitmap,9138691:Var1,[(258,324)])
     link(Text,8297954:Var,[(265,388)(307,388)])
    }
    Add(GetDataEx,9138691,259,319)
    {
     link(Data,5270102:Var3,[(265,233)])
    }
    Add(Img_Text,480395,287,434)
    {
     X=2
     Font=[Times New Roman,9,1,8388608,204]
     Text="7 - Система визуального проектирования"
     link(Bitmap,15574659:Var2,[])
     link(Text,15207012:Var,[(300,430)(328,430)])
    }
    Add(LineBreak,16155201,476,280)
    {
     Caption="7"
     Type=1
     link(Data,4314296:Value,[])
     Primary=[15207012,-154,126]
    }
    Add(Img_Text,5577535,280,476)
    {
     X=2
     Font=[Times New Roman,9,1,8388608,204]
     Text="8 - Система визуального проектирования"
     link(Bitmap,15574659:Var1,[(286,408)])
     link(Text,10384774:Var,[(293,472)(342,472)])
    }
    Add(Img_Text,7036096,315,518)
    {
     X=2
     Font=[Times New Roman,9,1,8388608,204]
     Text="9 - Система визуального проектирования"
     link(Bitmap,15574659:Var3,[(321,408)])
     link(Text,153828:Var,[])
    }
    Add(GetDataEx,15574659,287,403)
    {
     link(Data,9138691:Var3,[(293,324)])
    }
    Add(StrList,10455765,343,49)
    {
    }
    Add(ArrayRW,16522694,434,119)
    {
     link(onRead,5361857:doEvent,[(476,125)(476,190)(340,190)(340,202)])
     link(Array,10455765:Array,[(440,107)(363,107)])
    }
    Add(Hub,10578504,287,119)
    {
     link(onEvent1,8344649:doNext,[])
     link(onEvent2,996308:doNext,[(336,132)(336,160)])
    }
    Add(IndexToChanel,5361857,350,196)
    {
     Count=9
     Point(Index)
     link(onEvent1,12544423:doValue,[])
     link(onEvent2,1632972:doValue,[])
     link(onEvent3,13283275:doValue,[])
     link(onEvent4,16143602:doValue,[])
     link(onEvent5,15065847:doValue,[])
     link(onEvent6,8565567:doValue,[])
     link(onEvent7,4314296:doValue,[])
     link(onEvent8,3508024:doValue,[])
     link(onEvent9,5529231:doValue,[])
     link(Index,996308:Count,[])
    }
    Add(Memory,5529231,392,252)
    {
    }
    Add(Memory,3508024,434,245)
    {
    }
    Add(Memory,4314296,476,238)
    {
    }
    Add(Memory,8565567,518,231)
    {
    }
    Add(Memory,15065847,560,224)
    {
    }
    Add(Memory,16143602,602,217)
    {
    }
    Add(Memory,13283275,644,210)
    {
    }
    Add(Memory,1632972,686,203)
    {
    }
    Add(Memory,12544423,728,196)
    {
    }
    Add(LineBreak,3591969,728,238)
    {
     Caption="1"
     Type=1
     link(Data,12544423:Value,[])
     Primary=[8776464,-483,-84]
    }
    Add(LineBreak,452471,686,245)
    {
     Caption="2"
     Type=1
     link(Data,1632972:Value,[])
     Primary=[12426787,-441,-49]
    }
    Add(LineBreak,14297320,644,252)
    {
     Caption="3"
     Type=1
     link(Data,13283275:Value,[])
     Primary=[10645999,-371,-14]
    }
    Add(LineBreak,15296241,602,259)
    {
     Caption="4"
     Type=1
     link(Data,16143602:Value,[(608,254)(608,261)])
     Primary=[10296896,-322,21]
    }
    Add(LineBreak,12959556,560,266)
    {
     Caption="5"
     Type=1
     link(Data,15065847:Value,[])
     Primary=[11657824,-266,56]
    }
    Add(Counter,996308,350,154)
    {
     Max=8
    }
    Add(Memory,9850800,119,140)
    {
    }
    Add(IndexToChanel,3762352,119,182)
    {
     Count=9
     Point(Index)
     link(onEvent1,12256:doDraw,[(180,188)(180,188)])
     link(onEvent2,16062379:doDraw,[(190,195)(190,230)])
     link(onEvent3,13422919:doDraw,[(186,202)(186,272)])
     link(onEvent4,11975597:doDraw,[(182,209)(182,314)])
     link(onEvent5,80230:doDraw,[(177,216)(177,356)])
     link(onEvent6,14441939:doDraw,[(172,223)(172,398)])
     link(onEvent7,480395:doDraw,[(167,230)(167,440)])
     link(onEvent8,5577535:doDraw,[(162,237)(162,482)])
     link(onEvent9,7036096:doDraw,[(157,244)(157,524)])
     link(Index,9850800:Value,[])
    }
    Add(DoData,11500511,287,70)
    {
     link(onEventData,10455765:doText,[(336,76)(336,76)])
     link(Data,12125861:Text,[(293,64)])
    }
  END_SDK
  Add(InlineCode,8779013,245,231)
  {
   @Hint=#41:Выравнивание по центру родительского окна|
   WorkPoints=#5:doSet|
   EventPoints=#6:onLeft|5:onTop|
   DataPoints=#1:L|1:T|1:W|1:H|2:LW|2:LH|
   Code=#15:unit HiAsmUnit;|0:|9:interface|0:|21:uses KOL,Share,Debug;|0:|4:type|28: THiAsmClass = class(TDebug)|7:private|6:public|31: L, T, W, H, LW, LH: THI_Event;|18: onTop: THI_Event;|19: onLeft: THI_Event;|46: procedure doSet(var _Data:TData; Index:word);|4:end;|0:|14:implementation|3:var|32: ParentLeft, ParentTop: Integer;|36: ParentWidth, ParentHeight: Integer;|34: LocalWidth, LocalHeight: Integer;|0:|28:procedure THiAsmClass.doSet;|3:var|20:   ResW, ResH: Real;|15:   Data: TData;|5:begin|30:   Data.Data_type := data_int;|19:   Data.idata := 0;|39:   ParentLeft := ReadInteger(data,L,0);|38:   ParentTop := ReadInteger(data,T,0);|40:   ParentWidth := ReadInteger(data,W,0);|41:   ParentHeight := ReadInteger(data,H,0);|40:   LocalWidth := ReadInteger(data,LW,0);|41:   LocalHeight := ReadInteger(data,LH,0);|51:   ResW := (ParentWidth-LocalWidth)/2 + ParentLeft;|52:   ResH := (ParentHeight-LocalHeight)/2 + ParentTop;|27:   _hi_onEvent(onTop,ResH);|28:   _hi_onEvent(onLeft,ResW);|4:end;|4:end.|
   link(onLeft,15446549:doLeft,[(295,237)(295,195)])
   link(onTop,15446549:doTop,[(302,244)(302,202)])
   link(L,2210700:Data3,[(251,75)])
   link(T,2210700:Data4,[(258,71)])
   link(W,2210700:Data5,[(265,66)])
   link(H,2210700:Data6,[(272,60)])
   link(LW,15446549:Width,[(279,219)(314,219)])
   link(LH,15446549:Height,[(286,223)(321,223)])
  }
  Add(ActionSkin,12448163,98,161)
  {
   Width=256
   Height=256
   SkinFile="About_Main_Normal.bmp"
   ActiveSkinFile="About_Main_Up.bmp"
   DownSkinFile="About_Main_Down.bmp"
   HandPoint=1
   Point(doVisible)
   Point(onRMouseDown)
   link(onRMouseUp,9896524:doCase,[])
  }
  BEGIN_SDK
    Add(DEBackground,13865547,0,0)
    {
     Width=256
     Height=256
    }
    Add(AS_Control,9129735,97,215)
    {
     Width=62
     Height=28
     Name="close"
     Cursor=2
    }
    Add(AS_Control,15821697,28,63)
    {
     Width=200
     Height=113
     Name="info"
     Type=1
    }
  END_SDK
  Add(Hub,55042,35,77)
  {
   OutCount=3
   link(onEvent1,8779013:doSet,[(236,83)(236,237)])
   link(onEvent2,1831536:doInit,[(82,90)(82,209)])
   link(onEvent3,15446549:doVisible,[(300,97)(300,188)])
  }
  Add(Memo,1444614,196,98)
  {
   Left=265
   Top=5
   Width=200
   Height=113
   Visible=1
   Strings=#33:    Coordinator  - программа для |32:ленивых координаторов Препресс. |35:Делает за них их работу. Позволяет |31:контролировать работу Workflow |28:и автоматизировать рутинные |27:процедуры его обслуживания.|32:Осуществляет мониторинг загрузки|31:процессоров других компьютеров |30:системы. Позволяет оперативно |30:освобождать полезное дисковое |24:пространство. Выполняет |33:администрирование интранет сайта.|0:|0:|0:|0:|
   AddType=1
   ReadOnly=0
  }
  Add(Hub,6557163,259,168)
  {
   link(onEvent1,1831536:doStop,[(296,174)(296,158)(88,158)(88,216)])
   link(onEvent2,15446549:doClose,[])
  }
END_SDK
Add(InfoTip,1154186,363,74)
{
 Info=#5:About|
 Font=[Arial,8,0,0,1]
 HAlign=0
 Width=127
 Height=136
}
Add(Button,15785415,378,168)
{
 Left=25
 Top=20
 Width=45
 Font=[Arial,8,0,0,1]
 Caption="About"
 link(onClick,990376:doWork1,[])
}
Add(InfoTip,3927081,319,49)
{
 Info=#28:HiAsm version 4.05 build 186|
 Font=[Arial,8,0,0,1]
 Frame=1
 Width=197
 Height=18
}
Add(SDKBtn,2695686,245,112)
{
 Width=65
 Script=#15:function Load()|3:end|0:|15:function Save()|3:end|0:|21:function SaveBefore()|21:  Dim _Date as String|22:  Dim _Title as String|25:  Dim _strTitle as String|51:  'Date = net_Text("http://localhost/callDate.asp")|29:  _Date = Time("D:M:Y h:m:s")|37:  _Title = SDK.GetProp(18582, "Info")|84:  _strTitle = Delete(_Title, Len(_Title) - Len(_Date), Len(_Date) + 1) + " " + _Date|39:  sdk.SetProp(18582, "Info", _strTitle)|3:end|0:|16:function Click()|17:  Dim num as Real|19:  Dim ver as String|21:  Dim Title as String|24:  Dim strTitle as String|46:  num = Real(SDK.GetProp(11511461, "Version"))|50:  SDK.SetProp(11511461, "Version", Str(num+0.001))|40:  ver = SDK.GetProp(11511461, "Version")|49:  SDK.SetProp(4061237, "Default", Str(num+0.001))|46:  Name = SDK.GetProp(11511461, "InternalName")|45:  SDK.SetProp(12774542, "Default", Str(Name))|35:  Title = SDK.GetProp(3786, "Info")|75:  strTitle = Delete(Title, Len(Title) - Len(ver), Len(ver) + 1) + " " + ver|37:  SDK.SetProp(3786, "Info", strTitle)|57:  SDK.SetProp(3927081, "Info", "HiAsm version " + CurVer)|3:end|
 Caption="IncVersion"
}