Make(delphi)
ver(4.04 build 184)
Add(MainForm,2953706,14,21)
{
 Width=609
 Height=617
 Color=16776960
 Caption=""
}
Add(Button,16506738,91,140)
{
 Left=190
 Top=70
 Width=90
 Caption="Clear"
 link(onClick,4979067:doMessage,[])
}
Add(ListBox,4993121,283,140)
{
 Left=10
 Top=65
 Width=170
 Height=505
 FileName="Тревоги.txt"
 DataType=1
 ItemHeight=50
 Point(doColor)
 link(onChange,16146233:doCount,[(364,146)(364,153)])
 link(onClick,3285873:doValue,[(347,153)(347,223)])
}
Add(Edit,15677004,196,98)
{
 Left=10
 Top=40
 Width=170
 Text=""
 link(onEnter,4993121:doAdd,[(259,111)(259,146)])
}
Add(Button,4702248,91,182)
{
 Left=190
 Top=110
 Width=90
 Caption="Save"
 link(onClick,8499950:doMessage,[])
}
Add(Button,14119448,91,224)
{
 Left=190
 Top=150
 Width=90
 Caption="Load"
 link(onClick,15583425:doMessage,[])
}
Add(Message,4979067,161,140)
{
 Message="Вы уверены ?"
 Type=2
 Point(onYES)
 link(onYES,4993121:doClear,[])
}
Add(Message,8499950,161,182)
{
 Message="Вы уверены ?"
 Type=2
 Point(onYES)
 link(onYES,4993121:doSave,[(238,195)(238,181)])
}
Add(Message,15583425,161,224)
{
 Message="Вы уверены ?"
 Type=2
 Point(onYES)
 link(onYES,4993121:doLoad,[(238,237)(238,174)])
}
Add(ListBox,10473802,280,343)
{
 Left=295
 Top=60
 Width=175
 Height=510
 FileName="Тревоги 1.txt"
 ItemHeight=50
}
Add(Button,4459562,203,245)
{
 Left=190
 Top=190
 Width=90
 Caption="Print"
 link(onClick,996049:doPrint,[])
}
Add(Printer,996049,252,245)
{
 Point(doSettings)
 link(Text,4993121:Text,[(258,229)(289,229)])
}
Add(Button,2858266,91,336)
{
 Left=480
 Top=70
 Width=90
 Caption="Clear"
 link(onClick,9624080:doMessage,[])
}
Add(Button,4691858,91,378)
{
 Left=480
 Top=110
 Width=90
 Caption="Save"
 link(onClick,14884892:doMessage,[])
}
Add(Button,4320430,91,420)
{
 Left=480
 Top=150
 Width=90
 Caption="Load"
 link(onClick,6110733:doMessage,[])
}
Add(Message,9624080,161,336)
{
 Message="Вы уверены ?"
 Type=2
 Point(onYES)
 link(onYES,10473802:doClear,[(237,349)(237,356)])
}
Add(Message,14884892,161,378)
{
 Message="Вы уверены ?"
 Type=2
 Point(onYES)
 link(onYES,10473802:doSave,[(237,391)(237,384)])
}
Add(Message,6110733,161,420)
{
 Message="Вы уверены ?"
 Type=2
 Point(onYES)
 link(onYES,10473802:doLoad,[(237,433)(237,377)])
}
Add(Button,12870217,231,434)
{
 Left=480
 Top=190
 Width=90
 Caption="Print"
 link(onClick,8056838:doPrint,[])
}
Add(Printer,8056838,280,434)
{
 Point(doSettings)
 link(Text,10473802:Text,[])
}
Add(Button,2274043,329,259)
{
 Left=210
 Top=230
 Caption=">>>"
 link(onClick,2626861:doAdd,[])
}
Add(MT_Add,2626861,378,259)
{
 InputMT=2
 link(onAdd,9666624:doWork1,[(417,265)])
 link(Data,3285873:Value,[])
}
Add(MT_Memory,3285873,378,217)
{
}
Add(If_else,14179444,511,147)
{
 Type=2
 Op2=Integer(2)
 link(onTrue,4940299:doData,[(555,153)(555,244)(457,244)(457,335)])
}
Add(MT_MultiData,5545014,511,203)
{
 link(onData1,4460907:doValue,[])
 link(onData2,14179444:doCompare,[(555,216)(555,184)(499,184)(499,153)])
}
Add(ArrayCountRepeats,16146233,413,147)
{
 link(onCount,5545014:doSeparateMT,[(450,153)(450,209)])
 link(Array,4993121:Array,[(419,135)(361,135)(361,204)(303,204)])
}
Add(DoData,4940299,469,329)
{
 link(onEventData,9666624:doWork2,[(513,335)(513,342)])
 link(Data,4460907:Value,[(475,272)(594,272)])
}
Add(Memory,4460907,588,203)
{
}
Add(HubEx,9666624,413,336)
{
 Angle=2
 link(onEvent,10473802:doAdd,[(268,342)(268,349)])
}