Вверх ↑
Разработчик
Ответов: 26073
Рейтинг: 2122
#1: 2008-08-11 15:23:17 ЛС | профиль | цитата
Леонид, например так


Add(MainForm,9226556,210,308)
{
Left=20
Top=105
Caption="D-триггер"
link(onCreate,14177618:doEvent1,[])
}
Add(Button,1569101,210,266)
{
Left=15
Top=15
Caption="+1"
link(onClick,70847:doSwitch,[])
}
Add(Edit,8361309,553,210)
{
Left=85
Top=35
Text=""
}
Add(Edit,6602129,553,252)
{
Left=160
Top=35
Text=""
}
Add(Edit,6500786,553,294)
{
Left=225
Top=35
Text=""
DataType=2
}
Add(Button,15223584,210,357)
{
Left=15
Top=55
Caption="R"
Data=Integer(0)
link(onClick,14177618:doEvent2,[(272,363)(272,335)])
}
Add(Edit,16067180,553,336)
{
Left=290
Top=35
Text=""
}
Add(Switch,70847,301,266)
{
DataOn=Integer(1)
DataOff=Integer(0)
Point(doOn)
link(onSwitch,7887022:doOperation,[])
}
Add(IntToBits,11304570,469,210)
{
Count=4
Data_0=Integer(0)
Data_1=Integer(1)
link(onBit1,8361309:doText,[])
link(onBit2,6602129:doText,[(527,223)(527,258)])
link(onBit3,6500786:doText,[(527,230)(527,300)])
link(onBit4,16067180:doText,[(527,237)(527,342)])
}
Add(Math,7887022,385,266)
{
Op2=1
ResultType=0
Point(doClear)
link(onResult,12538198:doValue,[(429,272)(429,244)(373,244)(373,216)])
link(Op1,12538198:Value,[])
}
Add(Hub,14177618,301,322)
{
InCount=2
OutCount=4
link(onEvent1,70847:doReset,[(345,328)(345,304)(289,304)(289,279)])
link(onEvent2,12538198:doClear,[(359,335)(359,223)])
link(onEvent3,7887022:doClear,[(370,342)(370,279)])
link(onEvent4,8942780:doWork3,[(445,349)])
}
Add(HubEx,8942780,441,203)
{
link(onEvent,11304570:doBits,[])
}
Add(Memory,12538198,385,210)
{
link(onData,8942780:doWork2,[])
}
карма: 22

1
Голосовали:bestsponsor