
Add(MainForm,2953706,406,161)
{
Left=-500
Top=-500
Caption="Smile!"
Position=1
link(onCreate,5079431:doEvent1,[])
}
Add(ChildPanelEx,4126629,658,140)
{
Mode=1
link(FileName,6079127:Item,[(671,128)(724,128)(724,333)(643,333)])
}
BEGIN_SDK
Add(EditMultiEx,6184921,14,14)
{
WorkCount=#5:##add|8:##select|14:doLoadFromFile|
DataCount=#4:Data|8:FileName|
Width=482
Height=319
Point(##add)
Point(##select)
link(doLoadFromFile,10973663:doEvent1,[(60,34)(60,153)])
}
Add(Panel,8927933,287,196)
{
Width=64
Height=64
Layout="parent.asd"
BevelInner=1
BevelWidth=0
Point(doLeft)
Point(doTop)
Point(doWidth)
Point(doHeight)
Point(Handle)
}
Add(Gif,7138988,161,147)
{
DefaultDelay=0
Point(GIFWidth)
Point(GIFHeight)
link(onDraw,1303892:doRefresh,[(209,160)(209,153)])
link(FileName,6184921:FileName,[(167,46)(27,46)])
link(Bitmap,1303892:Bitmap,[(174,135)(202,135)(202,191)(230,191)])
}
Add(Hub,10973663,105,147)
{
OutCount=3
link(onEvent1,7138988:doLoadFromFile,[])
link(onEvent2,10124528:doData,[(140,160)(140,202)])
link(onEvent3,4139801:doData,[(133,167)(133,244)])
}
Add(DoData,10124528,161,196)
{
link(onEventData,8927933:doWidth,[(240,202)(240,223)])
link(Data,7138988:GIFWidth,[])
}
Add(DoData,4139801,168,238)
{
link(onEventData,8927933:doHeight,[(244,244)(244,230)])
link(Data,7138988:GIFHeight,[])
}
Add(PaintBox,1303892,224,147)
{
Width=64
Height=64
Align=5
Point(Handle)
}
END_SDK
Add(Counter,16304328,168,133)
{
Max=200000
Step=21
Point(doValue)
link(onNext,4322541:doEvent1,[])
}
Add(Counter,15548539,259,203)
{
Max=5
link(onNext,11300283:doCompare,[])
}
Add(Hub,4322541,217,133)
{
OutCount=3
link(onEvent1,2957322:doWork2,[])
link(onEvent2,13981233:doCalc,[])
link(onEvent3,15548539:doNext,[(245,153)(245,209)])
}
Add(If_else,11300283,308,203)
{
Op2=Integer(5)
link(onTrue,12568878:doData,[])
}
Add(DoData,12568878,364,203)
{
Data=Integer(-20)
link(onEventData,16304328:doValue,[(450,209)(450,274)(157,274)(157,160)])
}
Add(FileSearch,16142951,560,224)
{
Ext="*.gif"
SubDir=1
link(onSearch,7169424:doAdd,[])
link(Dir,5830974:FString,[])
}
Add(StrList,7169424,623,224)
{
}
Add(ArrayRW,6079127,637,287)
{
Point(Count)
link(onRead,4126629:doLoadFromFile,[(681,293)(681,227)(646,227)(646,160)])
link(Array,7169424:Array,[])
link(Index,13981233:Result,[(650,277)(258,277)])
}
Add(FastMathParse,13981233,252,140)
{
MathStr="%0 + 1"
ResultType=0
link(onResult,6186810:doWork2,[])
}
Add(FormatStr,5830974,567,175)
{
DataCount=1
Mask="%1img"
Point(FString)
link(onFString,16142951:doSearch,[(610,181)(610,213)(548,213)(548,230)])
}
Add(Hub,3403477,308,140)
{
PColor(onEvent1,12615808)
link(onEvent1,6079127:doRead,[(351,146)(351,293)])
link(onEvent2,4126629:##select,[])
}
Add(Hub,5079431,469,175)
{
OutCount=5
link(onEvent1,5830974:doString,[])
link(onEvent2,2957322:doWork3,[(536,188)])
link(onEvent3,6186810:doWork3,[(498,195)(498,159)(298,159)])
link(onEvent4,10792067:doCalc,[(529,202)(529,384)])
}
Add(HubEx,6186810,294,133)
{
link(onEvent,3403477:doEvent1,[])
}
Add(HubEx,2957322,532,126)
{
link(onEvent,4126629:##add,[(599,139)(599,146)])
}
Add(For,2413611,707,378)
{
link(onEvent,16304328:doNext,[(747,384)(747,433)(146,433)(146,139)])
link(End,10792067:Result,[(720,366)(685,366)(685,422)(650,422)])
}
Add(FastMathParse,10792067,644,378)
{
MathStr="%1 - 2"
link(onResult,2413611:doFor,[])
link(X1,6079127:Count,[])
}
Add(ToolBarLayout,13854516,658,77)
{
Name="asd"
Space=1
Padding=5
AutoSize=0
}
Мне аж самому понравилось

особенно когда смайлов > 40.