Add(MainForm,4882624,28,91)
{
 Width=401
}
Add(Button,14104962,126,70)
{
 Left=10
 Top=30
 Caption="HiAsm"
 link(onClick,3475327:doStart,[])
}
Add(For,15779022,266,70)
{
 End=5000000
 link(onEvent,13777634:doCalc,[])
 link(onStop,3475327:doStop,[(310,83)(310,55)(176,55)(176,83)])
}
Add(MathParse,13777634,350,70)
{
 MathStr="sqrt(%1 + %2)"
 link(X1,8571906:Var1,[(356,58)(339,58)(339,128)])
 link(X2,15779022:Position,[(363,38)(318,38)(318,114)(272,114)])
}
Add(Message,8555818,420,154)
{
 link(Caption,8571906:Var3,[(433,128)])
}
Add(GetDataEx,8571906,343,119)
{
 link(Data,13777634:Result,[])
}
Add(TimeCounter,3475327,189,70)
{
 link(onStart,15779022:doFor,[])
 link(onStop,8555818:doMessage,[(244,83)(244,160)])
}
Add(Button,6585019,84,245)
{
 Left=10
 Top=75
 Caption="VBScript"
 link(onClick,8287669:doEvent1,[])
}
Add(Hub,8287669,147,245)
{
 link(onEvent1,12815455:doStart,[])
 link(onEvent2,12815455:doStop,[])
}
Add(VBJScript,13649343,266,245)
{
 WorkPoints=#9:Raschitat|
 Script=#27:function doWork(Data,Index)|29:  If Index = "Raschitat" Then|24:    For a = 1 to 5000000|22:      b = sqr (a + b) |8:    Next|13:    'MsgBox b|8:  End if|12:End function|
 UseName=0
}
Add(TimeCounter,12815455,203,245)
{
 link(onStart,13649343:Raschitat,[])
 link(onStop,15942785:doMessage,[])
}
Add(Message,15942785,371,252)
{
}