попытка воспроизведения эффекта по скриншоту Cosinus
Add(MainForm,1447383,448,92)
{
Width=200
Height=200
Color=16777215
BorderStyle=1
TaskBar=1
Position=1
Point(Handle)
Point(Height)
Point(Width)
}
Add(Img_Copy,423875,434,196)
{
X=-5
Y=-10
DrawSource=1
Point(Height)
Point(Width)
link(onCopy,6991831:doEvent1,[])
link(Source,1447383:Handle,[(440,149)(454,149)])
link(Height,1447383:Height,[])
link(Width,6495496:Result,[])
}
Add(Img_Text,2286630,644,196)
{
X=15
Y=85
Font=[Tahoma,28,3,32768,204]
Point(doFont)
link(onDraw,2818762:doLoad,[])
link(Text,15425992:Var,[])
}
Add(Hub,6991831,497,196)
{
OutCount=3
link(onEvent1,2286630:doDraw,[])
link(onEvent2,13256847:doRandom,[(535,209)(535,146)])
link(onEvent3,16288053:doFont,[])
}
Add(Font,16288053,553,210)
{
Font=[Tahoma,26,3,65280,204]
link(onFont,2286630:doFont,[(615,216)(615,209)])
link(Color,13256847:Random,[])
}
Add(Random,13256847,560,140)
{
Min=100000
Max=2000000
link(onRandom,9392504:doRandom,[])
}
Add(VisualStrings,8755173,665,105)
{
Lines=#5:HiAsm|
Width=10
}
Add(Random,9392504,608,140)
{
link(onRandom,15425992:doIndex,[])
}
Add(GetIndexData,15425992,651,140)
{
Count=7
link(Data1,2930078:Text,[])
link(Data2,15271252:Var1,[(664,131)])
link(Data3,8755173:Text,[])
link(Data4,15271252:Var2,[])
link(Data5,3188360:Var2,[])
link(Data6,6067344:Var2,[])
link(Data7,6067344:Var3,[(699,131)])
}
Add(VisualStrings,2930078,651,105)
{
Lines=#6:foksov|
Width=11
}
Add(Time,488481,672,91)
{
Format="h:m:s"
}
Add(GetDataEx,15271252,672,126)
{
link(Data,488481:FormatTime,[])
}
Add(GetDataEx,3188360,679,126)
{
Angle=3
link(Data,15271252:Var3,[])
}
Add(GetDataEx,6067344,686,126)
{
Angle=3
link(Data,3188360:Var3,[])
}
Add(Timer,14137203,183,189)
{
@Hint=#4:Такт|18:Подбирать по вкусу|
Interval=60
link(onTimer,10485054:doEvent1,[])
AddHint(-40,42,101,26,@Hint)
}
Add(Image,2818762,700,196)
{
Width=200
Height=200
Align=5
Font=[MS Sans Serif,8,0,-16777203,1]
ViewStyle=1
Point(onMouseDown)
Point(Width)
}
Add(Hub,10485054,231,189)
{
link(onEvent1,3567457:doNext,[(260,195)(260,160)])
link(onEvent2,423875:doCopy,[])
}
Add(Math,6495496,462,154)
{
ResultType=0
link(Op1,1447383:Width,[])
}
Add(CounterEx,3567457,282,154)
{
Max=50
Point(doDirect)
link(onNext,12875787:doCase,[])
}
Add(Switch,1153271,378,161)
{
DataOn=Integer(1)
DataOff=Integer(0)
link(onSwitch,3567457:doDirect,[(425,167)(425,148)(270,148)(270,167)])
}
Add(Case,12875787,329,154)
{
link(onNextCase,6495496:doOperation,[])
link(onTrue,1153271:doSwitch,[])
}
попытка воспроизведения эффекта по скриншоту Cosinus №2
Add(MainForm,1447383,448,92)
{
Width=200
Height=200
Color=16777215
BorderStyle=1
TaskBar=1
Position=1
Point(Handle)
Point(Height)
Point(Width)
}
Add(Img_Copy,423875,434,196)
{
X=-5
Y=-10
DrawSource=1
Point(Height)
Point(Width)
link(onCopy,6991831:doEvent1,[])
link(Source,1447383:Handle,[(440,149)(454,149)])
link(Height,1447383:Height,[])
link(Width,6495496:Result,[])
}
Add(Img_Text,2286630,644,196)
{
X=15
Y=85
Font=[Tahoma,28,3,32768,204]
Point(doFont)
link(onDraw,2818762:doLoad,[])
link(Text,15425992:Var,[])
}
Add(Hub,6991831,497,196)
{
OutCount=3
link(onEvent1,2286630:doDraw,[])
link(onEvent2,13256847:doRandom,[(535,209)(535,146)])
link(onEvent3,16288053:doFont,[])
}
Add(Font,16288053,553,210)
{
Font=[Tahoma,26,3,65280,204]
link(onFont,2286630:doFont,[(615,216)(615,209)])
link(Color,13256847:Random,[])
}
Add(Random,13256847,560,140)
{
Min=100000
Max=2000000
link(onRandom,9392504:doRandom,[])
}
Add(VisualStrings,8755173,665,105)
{
Lines=#5:HiAsm|
Width=10
}
Add(Random,9392504,608,140)
{
Max=40
link(onRandom,15425992:doIndex,[])
}
Add(GetIndexData,15425992,651,140)
{
Count=7
link(Data1,2930078:Text,[])
link(Data2,15271252:Var1,[(664,131)])
link(Data3,8755173:Text,[])
link(Data4,15271252:Var2,[])
link(Data5,3188360:Var2,[])
link(Data6,6067344:Var2,[])
link(Data7,6067344:Var3,[(699,131)])
}
Add(VisualStrings,2930078,651,105)
{
Lines=#6:foksov|
Width=11
}
Add(Time,488481,672,91)
{
Format="h:m:s"
}
Add(GetDataEx,15271252,672,126)
{
link(Data,488481:FormatTime,[])
}
Add(GetDataEx,3188360,679,126)
{
Angle=3
link(Data,15271252:Var3,[])
}
Add(GetDataEx,6067344,686,126)
{
Angle=3
link(Data,3188360:Var3,[])
}
Add(Timer,14137203,183,189)
{
@Hint=#4:Такт|18:Подбирать по вкусу|
Interval=75
link(onTimer,10485054:doEvent1,[])
AddHint(-40,42,101,26,@Hint)
}
Add(Image,2818762,700,196)
{
Width=200
Height=200
Align=5
Font=[MS Sans Serif,8,0,-16777203,1]
Point(onMouseDown)
Point(Width)
}
Add(Hub,10485054,231,189)
{
link(onEvent1,3567457:doNext,[(260,195)(260,160)])
link(onEvent2,423875:doCopy,[])
}
Add(Math,6495496,462,154)
{
ResultType=0
link(Op1,1447383:Width,[])
}
Add(CounterEx,3567457,282,154)
{
Max=50
Point(doDirect)
link(onNext,12875787:doCase,[])
}
Add(Switch,1153271,378,161)
{
DataOn=Integer(1)
DataOff=Integer(0)
link(onSwitch,3567457:doDirect,[(425,167)(425,148)(270,148)(270,167)])
}
Add(Case,12875787,329,154)
{
link(onNextCase,6495496:doOperation,[])
link(onTrue,1153271:doSwitch,[])
}