Make(delphi)
Add(MainForm,2071813,21,77)
{
 Left=20
 Top=105
 Width=684
 Height=806
 link(onCreate,4467852:doFor,[])
}
Add(For,4467852,63,91)
{
 End=500
 IncludeEnd=1
 link(onEvent,9394362:##add,[])
 link(onStop,8486116:doTimer,[(111,104)(111,160)])
}
Add(ChildPanelEx,9394362,224,91)
{
 Mode=1
}
BEGIN_SDK
  Add(EditMultiEx,13945947,21,21)
  {
   WorkCount=#5:##add|8:##select|
   VarCount=#7:##count|
   Height=186
   Point(##add)
   Point(##select)
   Point(##count)
   link(##add,4759330:doEvent1,[(42,27)(42,97)])
   link(##select,4258811:doRandom,[])
  }
  Add(Panel,8833565,175,84)
  {
   Width=66
   Height=15
   Point(doTop)
   Point(Height)
   Point(doLeft)
   Point(Width)
  }
  Add(LedLadder,6793563,112,28)
  {
   Width=66
   Height=15
   Spacing=0
  }
  Add(Hub,4759330,56,91)
  {
   link(onEvent1,3497065:doCalc,[])
   link(onEvent2,16459934:doCalc,[(100,104)(100,153)])
  }
  Add(MathParse,16459934,112,147)
  {
   MathStr="(%1 div 50) * %2"
   link(onResult,8833565:doLeft,[(160,153)(160,104)])
   link(X2,8833565:Width,[(125,131)(188,131)])
  }
  Add(MathParse,3497065,112,91)
  {
   MathStr="(%1 * %2) mod (%2 * 50)"
   link(onResult,8833565:doTop,[])
   link(X2,8833565:Height,[(125,79)(153,79)(153,128)(181,128)])
  }
  Add(Random,4258811,56,28)
  {
   link(onRandom,6793563:doPosition,[])
  }
END_SDK
Add(Timer,8486116,126,154)
{
 Enable=1
 link(onTimer,14399296:doFor,[])
}
Add(For,14399296,175,154)
{
 End=500
 IncludeEnd=1
 link(onEvent,9394362:##select,[(215,160)(215,104)])
 link(End,9394362:##count,[(188,138)(230,138)])
}