Вверх ↑
Ответов: 8960
Рейтинг: 824
#1: 2025-04-13 23:04:33 ЛС | профиль | цитата
Когда-то на картинке графики рисовал, как самопишущий прибор, ещё вариант


Add(MainForm,2953706,70,49)
{
Left=200
Top=100
}
Add(Button,10957715,119,91)
{
Left=15
Top=40
Caption=">>>"
link(onClick,11928225:doEvent1,[])
}
Add(Button,10272437,119,126)
{
Left=105
Top=40
Caption="II"
link(onClick,6651937:doEvent1,[])
}
Add(Edit,7019418,119,49)
{
Left=15
Top=5
Width=355
Font=[MS Sans Serif,10,0,0,1]
Text=" Да здравствует КПСС! (Нажать ENYER) "
ClearAfterEnter=1
link(onEnter,4436159:doEvent1,[])
}
Add(Image,2303820,266,84)
{
Left=10
Top=105
Width=365
ViewStyle=4
Point(doHeight)
}
Add(MultiElementEx,4199835,217,84)
{
link(onDrav,2303820:doLoad,[])
}
BEGIN_SDK
Add(EditMultiEx,8785457,21,21)
{
WorkCount=#6:doText|7:doStart|6:doStop|
EventCount=#6:onDrav|
Width=398
Height=228
link(doText,5891625:doValue,[(123,27)(123,55)])
link(doStart,4080300:doTimer,[(46,34)(46,181)])
link(doStop,4080300:doStop,[(39,41)(39,188)])
}
Add(Counter,1610300,140,175)
{
Point(Max)
Point(doMax)
link(onNext,7690878:doCopy,[(186,181)(186,174)])
link(Max,11698636:Result,[])
}
Add(Timer,4080300,56,175)
{
Interval=30
Enable=1
link(onTimer,1610300:doNext,[])
}
Add(Img_Text,6052688,238,49)
{
Font=[MS Sans Serif,12,1,0,1]
link(Bitmap,15973739:Var1,[(244,40)(230,40)(230,145)])
link(Text,5891625:Value,[(251,33)(209,33)(209,89)(146,89)])
}
Add(Bitmap,5170888,238,105)
{
FillColor=12639424
Point(doCreate)
Point(HWidth)
Point(HHeight)
Point(onCreate)
link(HWidth,592507:Var2,[])
link(HHeight,9324045:Var2,[])
}
Add(Hub,5964147,189,119)
{
OutCount=3
link(onEvent1,5170888:doCreate,[])
link(onEvent2,6052688:doDraw,[(214,132)(214,55)])
link(onEvent3,11698636:doOperation,[(214,139)(214,153)(130,153)(130,132)])
}
Add(GetDataEx,15973739,238,140)
{
link(Data,5170888:Bitmap,[])
}
Add(GetDataEx,592507,238,91)
{
link(Data,6052688:TextWidth,[])
}
Add(Math,11698636,140,126)
{
OpType=1
Op2=1
link(onResult,3585140:doEvent1,[(179,132)(179,167)(102,167)(102,195)])
link(Op1,592507:Var1,[(146,96)])
}
Add(Hub,3585140,112,189)
{
link(onEvent1,1610300:doReset,[])
link(onEvent2,1610300:doMax,[])
}
Add(Img_Shift,16144418,315,168)
{
DirectShift=1
Pixels=5
Point(Result)
link(onResult,495433:doEvent1,[])
link(Bitmap,15973739:Var3,[(321,145)])
link(ToShiftBmp,7690878:Result,[(328,159)(272,159)(272,215)(244,215)])
link(Pixels,12787943:Value,[(335,145)(356,145)])
}
Add(Img_Copy,7690878,238,168)
{
Width=1
Point(Height)
Point(Result)
link(onCopy,8555209:doEvent1,[])
link(Source,15973739:Var2,[])
link(X,11924462:Var1,[(251,154)])
link(Y,11924462:Var2,[])
link(Height,9324045:Var3,[(265,96)])
}
Add(GetDataEx,9324045,245,91)
{
link(Data,6052688:TextHeight,[])
}
Add(Memory,10571437,301,105)
{
Default=Integer(0)
}
Add(GetDataEx,11924462,252,149)
{
Angle=1
link(Data,10571437:Value,[(307,154)])
}
Add(Memory,12787943,350,105)
{
Default=Integer(1)
}
Add(Hub,495433,357,168)
{
link(onEvent1,5170888:doLoad,[(375,174)(375,90)(221,90)(221,111)])
link(onEvent2,8785457:onDrav,[(389,181)(389,27)])
}
Add(Hub,8555209,287,168)
{
link(onEvent1,16144418:doLoad,[])
link(onEvent2,16144418:doShift,[])
}
Add(Memory,5891625,140,49)
{
link(onData,5964147:doEvent1,[(179,55)(179,125)])
}
END_SDK
Add(Hub,4436159,161,56)
{
link(onEvent1,4199835:doText,[(205,62)(205,90)])
link(onEvent2,3441136:doText,[(200,69)(200,153)])
}
Add(Hub,11928225,161,91)
{
link(onEvent1,4199835:doStart,[])
link(onEvent2,3441136:doStart,[(193,104)(193,160)])
}
Add(Hub,6651937,161,126)
{
link(onEvent1,4199835:doStop,[(206,132)(206,104)])
link(onEvent2,3441136:doStop,[(186,139)(186,167)])
}
Add(Label,16421950,259,147)
{
Left=5
Top=145
Width=365
Height=25
Color=12639424
Font=[MS Sans Serif,12,1,0,1]
Caption=""
}
Add(MultiElementEx,3441136,210,147)
{
link(onDrav,16421950:doText,[])
}
BEGIN_SDK
Add(EditMultiEx,5868047,21,21)
{
WorkCount=#6:doText|7:doStart|6:doStop|
EventCount=#6:onDrav|
Width=349
Height=186
link(doText,7949374:doEvent1,[(46,27)(46,62)])
link(doStart,6192951:doTimer,[(39,34)(39,139)])
link(doStop,6192951:doStop,[(32,41)(32,146)])
}
Add(Timer,6192951,70,133)
{
Interval=270
Enable=1
link(onTimer,15068750:doCopy,[])
}
Add(Memory,2448467,147,63)
{
}
Add(Length,16009060,91,28)
{
}
Add(Copy,15068750,147,133)
{
Position=1
Count=1
link(onCopy,11929802:doValue,[])
link(Str,15947554:Var2,[])
}
Add(Insert,13225670,273,133)
{
link(onInsert,8421411:doEvent1,[])
link(SubStr,11929802:Value,[(286,124)(266,124)(266,175)(195,175)])
link(Position,16009060:Result,[(293,110)(97,110)])
}
Add(Delete,10540689,231,133)
{
Count=1
link(onDelete,13225670:doInsert,[])
link(Str,15947554:Var3,[(237,117)])
}
Add(Memory,11929802,189,133)
{
link(onData,10540689:doDelete,[])
}
Add(Hub,7949374,56,56)
{
link(onEvent1,16009060:doLength,[(74,62)(74,34)])
link(onEvent2,8306124:doWork2,[])
}
Add(GetDataEx,15947554,147,112)
{
link(Data,2448467:Value,[])
}
Add(HubEx,8306124,133,63)
{
link(onEvent,2448467:doValue,[])
}
Add(Hub,8421411,315,133)
{
link(onEvent1,8306124:doWork3,[(340,139)(340,104)(137,104)])
link(onEvent2,5868047:onDrav,[(347,146)(347,27)])
}
END_SDK

карма: 19

0