Вверх ↑
Ответов: 5227
Рейтинг: 587
#1: 2010-01-05 10:52:36 ЛС | профиль | цитата
Леонид, ностальгия по приборам типа КСП?
Вот такой примитив

Add(MainForm,2953706,63,49)
{
Width=569
Height=362
}
Add(Image,14385784,294,238)
{
Left=150
Top=10
Width=400
Height=300
ViewStyle=4
Picture=[ZIPF6D5010078DAEDDBB10D84301004403BFB520888895F9FD30F65501245404E159F1AC34146079E93AC93CE136DBEBFF1BFE574CE505757F75C775F5F4E9FEBBEACF17FCEF77EA59454F6299967F2CB705C9B4E061CC7711CC7711CC7711CC7711CC7711CC7711CC7711CF7769515C7711CC7711CC7711CC7711CC7711CC7711CC7711CD79E9301C7711CC7711CC7711CC7711CC7711CC7711CC7711CC7E99F731CC7711CC7711CC7711CC7711CC7711CC7711CC7719CFE39C7711CC7711CC7711CC7711CC7711CC7711CC7711CC7859301C7711CC7711CC7711CC7711CC7711CC7711CC7711CC7E99F731CC7711CC7711CC7711CC7711CC7711CC7711CC7719CFE39C7711CC7711CC7711CC7711CC7711CC7711CC7711CC7859301C7711CC7711CC7711CC7711CC7711CC7711CC7711CC7E99F731CC7711CC7711CC7711CC7711CC7711CC7711CC7719CFE39C7711CC7711CC7711CC7711CC7711CC7711CC7711CC7859301C7711CC7711CC7711CC7711CC7711CC7711CC7711CC7E99F731CC7711CC7711CC7711CC7711CC7711CC7711CC7719CFE39C7711CC7711CC7711CC7711CC7711CC7711CC7711CC7859301C7711CC7711CC7711CC7711CC7711CC7711CC7B5E30EAD67F54B]
Point(doRefresh)
Point(Handle)
}
Add(Img_Line,14909924,336,294)
{
Size=2
Color=255
Point(Point1)
Point(Point2)
link(onDraw,15029343:doEvent1,[])
link(Bitmap,13036279:Var2,[])
link(Point1,8887732:Point,[])
link(Point2,10326601:Point,[(356,276)(398,276)])
}
Add(PointXY,8887732,343,238)
{
link(X,6134888:Value,[])
link(Y,6727949:Value,[])
}
Add(PointXY,10326601,392,238)
{
link(X,3360995:Var2,[])
link(Y,11027009:Var2,[])
}
Add(Memory,6219555,399,98)
{
Default=Integer(0)
}
Add(Memory,12906975,392,161)
{
Default=Integer(0)
}
Add(Memory,6727949,350,126)
{
Default=Integer(0)
Point(Data)
link(Data,11027009:Var1,[(356,116)(390,116)(390,142)])
}
Add(Memory,6134888,343,182)
{
Default=Integer(0)
Point(Data)
link(Data,3360995:Var1,[(349,173)(385,173)(385,205)])
}
Add(GetDataEx,11027009,392,133)
{
link(Data,6219555:Value,[])
}
Add(GetDataEx,3360995,385,196)
{
link(Data,12906975:Value,[])
}
Add(Hub,5171458,308,126)
{
link(onEvent1,6727949:doValue,[])
link(onEvent2,6134888:doValue,[(331,139)(331,188)])
}
Add(Hub,15029343,385,294)
{
OutCount=3
link(onEvent1,7550935:doDraw,[])
link(onEvent2,14385784:doRefresh,[(411,307)(411,330)(282,330)(282,258)])
link(onEvent3,5171458:doEvent1,[(421,314)(421,346)(261,346)(261,132)])
}
Add(Counter,12579587,175,161)
{
Max=1000
Step=10
link(onNext,12906975:doValue,[])
}
Add(Random,3864924,175,98)
{
Min=10
Max=300
link(onRandom,6219555:doValue,[])
}
Add(Hub,1460940,119,98)
{
OutCount=3
link(onEvent1,3864924:doRandom,[])
link(onEvent2,12579587:doNext,[(159,111)(159,167)])
link(onEvent3,14909924:doDraw,[(149,118)(149,300)])
}
Add(Button,14985856,63,98)
{
Left=35
Top=10
link(onClick,1460940:doEvent1,[])
}
Add(Img_Point,7550935,434,294)
{
Color=16711680
Size=7
Point(X)
Point(Y)
link(Bitmap,13036279:Var3,[(440,282)])
link(X,3360995:Var3,[(447,205)])
link(Y,11027009:Var3,[(454,142)])
}
Add(GetDataEx,13036279,329,273)
{
Angle=3
link(Data,14385784:ImageBitmap,[(300,282)])
}
Add(InfoTip,13357594,168,147)
{
Info=#3:Шаг|
Width=50
Height=53
}
Add(InfoTip,8549001,168,77)
{
Info=#8:Значение|
Height=60
}

карма: 4
Мой форум - http://hiasm.bbtalk.me/ схемы, компоненты...
0