Make(delphi)
ver(4.04 build 184)
Add(MainForm,12589589,56,161)
{
}
Add(StrList,9043186,378,98)
{
 FileName="ID.txt"
 Strings=#1:1|1:2|1:3|1:4|1:5|1:6|1:7|1:8|1:9|
 Point(onGetString)
 Point(doGetString)
 Point(String)
 link(onGetString,6537556:doAdd,[])
}
Add(Hub,7133077,238,175)
{
 link(onEvent1,5543471:doFor,[])
 link(onEvent2,16582955:doOn,[(266,188)(266,230)])
}
Add(Sleep,8829871,490,105)
{
 Delay=1000000
 link(onSleep,6278517:doAdd,[])
}
Add(ListBox,6537556,441,105)
{
 Left=50
 Top=25
 Height=225
 Transparent=0
 link(onChange,8829871:doSleepMks,[])
 link(Str,1801693:Var2,[])
}
Add(ListBox,6278517,539,105)
{
 Left=120
 Top=25
 Height=230
 link(Str,1801693:Var3,[(545,91)])
}
Add(GetDataEx,1801693,441,86)
{
 Angle=3
 link(Data,9043186:String,[(424,91)(424,162)(405,162)])
}
Add(LED,16582955,280,210)
{
 Left=260
 Top=25
}
Add(Button,14927027,189,175)
{
 Left=195
 Top=25
 Caption="Ïóñê"
 link(onClick,7133077:doEvent1,[])
}
Add(For,5543471,280,175)
{
 IncludeEnd=1
 link(onEvent,10803139:doEvent1,[])
 link(End,9043186:Count,[(293,163)(391,163)])
}
Add(Application,8406712,441,182)
{
}
Add(Hub,10803139,343,175)
{
 link(onEvent1,9043186:doGetString,[(369,181)(369,146)])
 link(onEvent2,8406712:doProcessMessages,[])
}