Add(MainForm,12961720,119,231)
{
 Width=363
 Height=252
 Caption="Пример использования BitsToInt"
}
Add(Edit,16011398,259,175)
{
 Left=218
 Top=40
 Text="1"
}
Add(Edit,9003239,252,133)
{
 Left=163
 Top=40
 Text="0"
}
Add(Edit,3613810,245,91)
{
 Left=108
 Top=40
 Text="0"
}
Add(Edit,2801242,238,49)
{
 Left=53
 Top=40
 Text="1"
}
Add(Edit,16124296,294,231)
{
 Left=138
 Top=85
}
Add(BitsToInt,1251328,238,231)
{
 link(onNumber,16124296:doText,[])
 link(Bit1,2801242:Text,[])
 link(Bit2,3613810:Text,[])
 link(Bit3,9003239:Text,[])
 link(Bit4,16011398:Text,[])
}
Add(Button,3718655,182,231)
{
 Left=133
 Top=120
 link(onClick,1251328:doNumber,[])
}