Вверх ↑
Ответов: 1536
Рейтинг: 176
#1: 2013-01-15 14:15:31 ЛС | профиль | цитата
deman, вот вариант, но без тормозов:
Add(MainForm,3511236,77,84)
{
Width=198
Height=164
Caption="Барабан"
}
Add(Bitmap,6351460,322,70)
{
Picture=[ZIPD623000078DAED593172C230104C5E903685BBB8C80BF200F779021D7FE0017C8027848E2FB88987969A4903AD4BFF211A8EB9D19C4EA7958D4986112337B0C2276957B73A359F3F6F4F97CF877BDEDDF3E29E6FF73C3FBD5EBEFFBAFEEE7FBA538BB707C3EF4E6DDD1CEB6A706D510DDDE960E07D30B5C675E98E31FCAA6BEBAA674CB3DEBB2E9BE500C6BF71AFABCE22AA105F2F0F14CC6A39B8F0444876FCD4BAED59C52FB6AD3F468ADFC01360D5B880F71CBF118F8A37C6ABC6C3DDA7AF9798CF10FC78FCFF87789EFF502C089F0D7D911E99C0824E31BE3121899F06FF05407457C74B989818433CBF22B665A9F3B35BF7885E846069BA8CF83918FFFFEDF1F21EC28DFA827C10E0A297BBE54741CB243E5C297B7D43A5C7F024194163032FB270126F0F419D4F55E906DE78456CBD62AF30D69726D6D07BB8F9207E00C7177DCD81E72C86F0275C3263BF15B44CE62F9120927E2F17CFC183F954E567D20F3881D4CB23329FAA4145FC09EE07FCC505F3A3DFC5F64B455F73E07D4B93D463E87F0C7E0A7F95EB57D5DC6D8C57CD4A863F14F204FDB9918F84D943F8AC9EA90D3C4B5E350F49BF9DD46F38E4E4F9BDE86B0EBC9A5C26E2053955964EC193A0E857241E5FE0E07899FF9BD31E9C9FEBB171DD83785F02E0FCF34E82AF17CDED6DD7B7E86BEEFC189E22A7D407D8F980F507B59E63E4538442061EF17B6220203F191F26B2E47910F11BB44C49BCBAC5D9F52BD125C987A2AF1BE24371D9FE2D3C8C24CFFBB4B8C61129E697625D8CFC32A2DE82D74FB80B7E5FA3169A6E5E4FB6F79F508FC9F87D5694F3E39FE073EB81056FF86187C9C293A6EAA607E319711FC1FE16AFF7D25BCA7DC7FDF17E1531E94FB2EEEF72EFE3444249DEC78DABAFE2F928173FAE3E8C8F37773E47DCB7E6F2610E7EFE0209AEABB1]
Point(Width)
}
Add(Img_Shift,13148972,322,140)
{
DirectShift=2
link(onResult,6351460:doLoad,[(369,146)(369,61)(310,61)(310,76)])
link(Bitmap,4150812:Var2,[])
link(ToShiftBmp,5602322:Result,[(335,130)(362,130)(362,180)(258,180)])
}
Add(Img_Copy,5602322,252,140)
{
Height=1
Point(Result)
Point(Width)
link(onCopy,5911101:doEvent1,[])
link(Source,4150812:Var1,[(258,124)])
link(Width,6351460:Width,[(279,114)(335,114)])
}
Add(Hub,5911101,294,140)
{
OutCount=3
link(onEvent1,13148972:doLoad,[])
link(onEvent2,13148972:doShift,[])
link(onEvent3,11128574:doEvent1,[])
}
Add(Timer,11313029,203,140)
{
Interval=10
Enable=1
link(onTimer,5602322:doCopy,[])
}
Add(Button,6476816,77,140)
{
Left=35
Top=35
Width=30
Height=45
Caption="^"
link(onClick,3935107:doNext,[])
}
Add(Image,10813854,588,287)
{
Left=90
Top=10
Width=15
Height=100
Color=15780518
ViewStyle=4
Point(Height)
link(Bitmap,14873455:Var3,[(594,194)])
}
Add(Img_Copy,10968170,406,238)
{
Width=15
Height=10
Point(Result)
link(onCopy,5013662:doResize,[])
link(Source,4150812:Var3,[(412,124)])
link(X,6209455:Var1,[(419,215)])
link(Y,14846525:Position,[(426,226)(342,226)(342,278)(286,278)])
}
Add(For,14846525,280,238)
{
End=180
Step=10
link(onEvent,15102056:doCalc,[])
link(onStop,7451333:doEvent1,[(320,251)(320,293)])
}
Add(Memory,14635669,469,168)
{
Default=Integer(0)
}
Add(Bitmap,14635598,553,140)
{
HWidth=15
HHeight=300
Point(doCreate)
}
Add(Hub,11128574,371,154)
{
link(onEvent1,14635598:doCreate,[])
link(onEvent2,14846525:doFor,[(397,167)(397,205)(268,205)(268,244)])
}
Add(Img_Bmp,3474644,553,238)
{
Point(Y)
Point(X)
link(Bitmap,14873455:Var2,[])
link(SourceBitmap,5013662:Result,[(566,228)(544,228)(544,282)(454,282)])
link(X,6209455:Var3,[(580,215)])
}
Add(GetDataEx,14873455,553,189)
{
link(Data,14635598:Bitmap,[])
}
Add(Resize,5013662,448,238)
{
Width=15
Point(Result)
link(onResult,6167979:doWork1,[])
link(Height,16738600:Var2,[])
}
Add(MathParse,15102056,364,238)
{
DataCount=1
MathStr="((%1<100)*(%0+1))+
((%1>=100)*(%0-1))"
ResultType=0
Point(doClear)
link(onResult,10968170:doCopy,[])
}
Add(GetDataEx,4150812,322,119)
{
link(Data,6351460:Bitmap,[])
}
Add(Hub,7451333,329,287)
{
OutCount=3
PColor(onEvent1,11184640)
link(onEvent1,10813854:doLoad,[])
link(onEvent2,15102056:doClear,[(353,300)(353,251)])
link(onEvent3,6167979:doWork2,[(495,307)(495,251)])
}
Add(MultiElement,6167979,504,238)
{
link(onEvent1,3474644:doDraw,[])
link(Data1,16738600:Var3,[(510,226)])
}
BEGIN_SDK
Add(EditMulti,4100601,21,21)
{
EventCount=1
WorkCount=2
DataCount=1
Width=363
Height=277
link(doWork1,16658395:doCompare,[(66,27)(66,174)])
link(doWork2,2752047:doEvent1,[(39,34)(39,55)])
}
Add(If_else,16658395,119,168)
{
Type=2
link(onTrue,6170454:doEvent1,[])
link(onFalse,11061469:doEvent1,[(167,181)(167,216)])
link(Op1,14455343:Var2,[(125,130)(27,130)])
link(Op2,15850465:Var2,[])
}
Add(Memory,201036,126,84)
{
Default=Integer(0)
Point(Data)
link(Data,14455343:Var3,[(132,47)])
}
Add(HubEx,11494134,212,168)
{
Angle=3
link(onEvent,201036:doValue,[(216,73)(117,73)(117,90)])
}
Add(Hub,6170454,182,168)
{
link(onEvent1,11494134:doWork2,[])
link(onEvent2,7839504:doCalc,[])
}
Add(Hub,11061469,182,210)
{
link(onEvent1,11494134:doWork3,[(216,216)])
link(onEvent2,11341691:doCalc,[])
}
Add(Memory,313778,245,42)
{
Default=Integer(0)
link(onData,4100601:onEvent1,[(355,48)(355,27)])
}
Add(GetDataEx,15850465,126,140)
{
link(Data,201036:Value,[])
}
Add(HubEx,8400011,320,175)
{
Angle=3
link(onEvent,313778:doValue,[(324,95)(233,95)(233,48)])
}
Add(GetDataEx,14455343,21,42)
{
link(Data,4100601:Data1,[])
}
Add(Hub,2752047,84,49)
{
link(onEvent1,313778:doClear,[])
link(onEvent2,201036:doClear,[(105,62)(105,97)])
}
Add(GetDataEx,5690052,252,140)
{
Angle=3
link(Data,15850465:Var3,[])
}
Add(GetDataEx,7928851,245,154)
{
link(Data,313778:Value,[])
}
Add(MathParse,7839504,245,175)
{
MathStr="(%1 + %2)-1"
link(onResult,8400011:doWork2,[])
link(X1,7928851:Var2,[])
link(X2,5690052:Var2,[])
}
Add(MathParse,11341691,287,217)
{
MathStr="(%1 + %2)+1"
link(onResult,8400011:doWork3,[(324,223)])
link(X1,7928851:Var3,[(293,159)])
link(X2,5690052:Var3,[(300,145)])
}
END_SDK
Add(GetDataEx,6209455,469,210)
{
link(Data,14635669:Value,[])
}
Add(CounterEx,3935107,119,140)
{
Max=1
Default=1
link(onNext,15869616:doEvent,[])
}
Add(IndexToChanel,15869616,161,140)
{
link(onEvent1,11313029:doTimer,[])
link(onEvent2,11313029:doStop,[])
}
Add(GetDataEx,16738600,462,221)
{
Angle=3
link(Data,15102056:Result,[(443,226)(443,281)(370,281)])
}
карма: 1
Не так страшна ошибка, как опасность её не заметить.

0