Add(MainForm,2595057,-540,105)
{
Left=20
Top=105
Width=580
Height=308
Position=1
}
Add(Memo,14471888,-491,105)
{
Left=15
Top=10
Width=540
Height=225
Font=[Courier New,10,0,0,204]
Strings=#45:sfsfds sdfszds dgdsgtdsgtd dgdxgdxgtdgtd dgdf|46:zDSs fdszfr fz dszfds zf dgffxgdx dgfdgdz|51:dzgfdxgd dfgdx dgfdxg dxgdxgdszftgd dgfdghdxgd dgdx|60:ertestse ytsetsrtests tsrgggyrytrd seggtrsetrre rstrstsr fdg|
}
Add(CharArray,16696592,-344,189)
{
link(onLoad,1241815:doEvent1,[])
}
Add(Hub,2755560,-540,161)
{
link(onEvent1,5149576:doClear,[(130,167)(130,594)])
link(onEvent2,13633010:doEnum,[(-495,174)(-495,370)])
}
Add(Button,3148157,-589,161)
{
Left=15
Top=245
link(onClick,2755560:doEvent1,[])
}
Add(StrList,5149576,762,581)
{
}
Add(ArrayEnum,405513,-344,245)
{
link(onItem,10021151:doCompare,[])
link(onEndEnum,7114059:doEvent1,[(-209,258)(-209,307)])
link(Array,16696592:Array,[])
}
Add(Memory,6979509,-8,252)
{
}
Add(Hub,16034716,-64,245)
{
link(onEvent1,6221036:doWork3,[(-20,251)(-20,225)(-186,225)])
link(onEvent2,6979509:doValue,[])
}
Add(DoData,11507463,-232,189)
{
link(onEventData,6221036:doWork2,[])
link(Data,16696592:Str,[(-226,177)(-278,177)(-278,233)(-331,233)])
}
Add(Hub,1241815,-288,189)
{
link(onEvent1,11507463:doData,[])
link(onEvent2,405513:doEnum,[(-244,202)(-244,226)(-356,226)(-356,251)])
}
Add(GetDataEx,5966179,139,315)
{
link(Data,11839667:Text,[])
}
Add(If_else,10021151,-288,245)
{
Op2=String( )
link(onTrue,174506:doSplit,[])
}
Add(HubEx,6221036,-190,182)
{
link(onEvent,7383582:doValue,[])
}
Add(Memory,7383582,-169,189)
{
}
Add(StrPart,174506,-169,245)
{
Char=" "
link(onSplit,10823313:doTrim,[])
link(onPart,14145308:doTrim,[])
link(Str,7383582:Value,[])
}
Add(ArrayEnum,11627881,-477,175)
{
link(onItem,13409085:doEvent1,[])
link(onEndEnum,2891027:doData,[(159,188)(159,650)])
link(Array,1710769:Var2,[])
}
Add(Trim,10823313,-113,245)
{
link(onTrim,16034716:doEvent1,[])
}
Add(DoData,11498653,146,364)
{
link(onEventData,10678889:doReplace,[])
link(Data,5966179:Var2,[])
}
Add(Replace,10678889,195,364)
{
SubStr="\n\r"
link(onReplace,3072295:doLength,[])
}
Add(Hub,7114059,-71,301)
{
link(onEvent1,15647644:doLength,[])
link(onEvent2,11498653:doData,[(36,314)(36,370)])
}
Add(Length,3072295,244,364)
{
link(onLength,6314224:doOperation,[])
}
Add(Math,6314224,293,364)
{
OpType=1
Op1=60
ResultType=0
link(onResult,10195629:doCompare,[])
link(Op1,11659583:Var3,[(299,352)])
}
Add(Math,7823163,391,364)
{
OpType=7
ResultType=0
link(onResult,10883389:doCompare,[])
link(Op2,11839667:Count,[(404,316)(159,316)])
}
Add(For,5121559,496,364)
{
IncludeEnd=1
link(onEvent,14400060:doData,[])
link(onStop,4168334:doWork2,[(540,377)(540,426)])
link(End,7823163:Result,[(509,352)(428,352)(428,408)(397,408)])
}
Add(StrList,11839667,146,252)
{
}
Add(ArrayEnum,13618971,160,441)
{
link(onItem,5607618:doStrCat,[])
link(onEndEnum,8119062:doEnum,[(207,454)(207,517)])
link(Array,7228113:Var2,[])
}
Add(StrCat,826314,594,364)
{
Str1=" "
link(onStrCat,11781660:doValue,[(638,370)(638,307)(589,307)(589,272)])
link(Str2,15819849:Var2,[])
}
Add(Memory,11781660,601,266)
{
}
Add(Trim,14145308,48,252)
{
link(onTrim,11839667:doAdd,[])
}
Add(GetDataEx,15819849,594,336)
{
link(Data,11781660:Value,[])
}
Add(StrCat,5607618,216,441)
{
link(onStrCat,441992:doWrite,[(260,447)(260,479)(148,479)(148,510)])
link(Str2,15819849:Var1,[(229,345)])
}
Add(DoData,14400060,545,364)
{
link(onEventData,826314:doStrCat,[])
}
Add(If_else,10883389,440,364)
{
Type=5
link(onTrue,5121559:doFor,[])
link(onFalse,4168334:doWork1,[(486,377)])
}
Add(HubEx,4168334,482,413)
{
Angle=2
link(onEvent,13618971:doEnum,[(148,426)(148,447)])
}
Add(ArrayEnum,8119062,307,511)
{
link(onItem,4668477:doEvent1,[])
link(Array,624238:Var2,[])
}
Add(DoData,14294915,293,567)
{
link(onEventData,15627899:doReplace,[])
link(Data,8481129:Var2,[])
}
Add(Replace,15627899,342,567)
{
SubStr="\n\r"
link(onReplace,3360119:doLength,[])
}
Add(Length,3360119,391,567)
{
link(onLength,9006357:doOperation,[])
}
Add(Math,9006357,440,567)
{
OpType=1
Op1=60
ResultType=0
link(onResult,5668849:doCompare,[])
link(Op1,11659583:Var2,[(446,461)(257,461)])
}
Add(If_else,10195629,342,364)
{
Type=2
Op2=Integer(0)
link(onTrue,7823163:doOperation,[])
}
Add(Hub,4668477,384,511)
{
link(onEvent1,14294915:doData,[(428,517)(428,545)(281,545)(281,573)])
}
Add(If_else,5668849,489,567)
{
Type=2
Op2=Integer(0)
link(onTrue,2490496:doStrCat,[(533,573)(533,625)(190,625)(190,678)])
link(onFalse,8194583:doEvent1,[])
}
Add(ArrayRW,5887214,251,665)
{
link(Array,624238:Var1,[(257,499)])
link(Index,8119062:Index,[(264,604)(320,604)])
}
Add(GetDataEx,624238,300,490)
{
link(Data,3430384:Var2,[])
}
Add(StrCat,2490496,202,672)
{
Str2=" "
link(onStrCat,5887214:doWrite,[])
link(Str1,8119062:Item,[(208,608)(313,608)])
}
Add(Replace,8830533,650,581)
{
SubStr="\n\r"
link(onReplace,14296079:doStrCat,[])
}
Add(DoData,15845435,601,581)
{
link(onEventData,8830533:doReplace,[])
link(Data,8481129:Var3,[(607,513)])
}
Add(GetDataEx,8481129,286,504)
{
link(Data,5966179:Var3,[(299,324)])
}
Add(Hub,8194583,545,574)
{
link(onEvent1,8119062:doStop,[(589,580)(589,552)(295,552)(295,524)])
link(onEvent2,15845435:doData,[])
}
Add(GetDataEx,11659583,244,343)
{
Angle=3
link(Data,9957549:Result,[(54,352)])
}
Add(StrCat,14296079,699,581)
{
link(onStrCat,5149576:doAdd,[])
link(Str2,16579042:Var3,[(712,289)])
}
Add(Hub,13409085,-428,175)
{
OutCount=4
link(onEvent1,11839667:doClear,[(98,181)(98,265)])
link(onEvent2,7383582:doClear,[(-282,188)(-282,202)])
link(onEvent3,11781660:doClear,[(102,195)(102,279)])
link(onEvent4,16696592:doLoad,[(-370,202)(-370,195)])
}
Add(Length,15647644,-8,301)
{
link(onLength,9957549:doOperation,[])
link(Str,16579042:Var2,[])
}
Add(GetDataEx,16579042,-15,280)
{
link(Data,6979509:Value,[])
}
Add(Math,9957549,48,301)
{
OpType=1
Op1=60
ResultType=0
link(Op1,11976202:Var3,[(54,289)(-132,289)(-132,345)])
}
Add(ArrayEnum,13633010,-449,364)
{
link(onItem,14311101:doLength,[])
link(onEndEnum,11627881:doEnum,[(-405,377)(-405,279)(-489,279)(-489,181)])
link(Array,1710769:Var3,[(-443,163)])
}
Add(GetDataEx,1710769,-484,154)
{
link(Data,14471888:Array,[])
}
Add(Length,14311101,-393,364)
{
link(onLength,10481043:doCompare,[])
}
Add(GetDataEx,11976202,-337,336)
{
link(Data,12683077:Value,[])
}
Add(Memory,12683077,-330,301)
{
Default=Integer(0)
}
Add(If_else,10481043,-337,364)
{
Type=2
link(onTrue,12683077:doValue,[(-293,370)(-293,346)(-342,346)(-342,307)])
link(Op2,11976202:Var2,[])
}
Add(ArrayRW,441992,160,497)
{
link(Array,3430384:Var1,[(166,436)])
link(Index,13618971:Index,[])
}
Add(GetDataEx,7228113,153,322)
{
link(Data,11839667:Array,[])
}
Add(GetDataEx,3430384,300,427)
{
link(Data,7228113:Var3,[(313,331)])
}
Add(DoData,2891027,762,644)
{
link(onEventData,14471888:doText,[(806,650)(806,391)(-503,391)(-503,132)])
link(Data,5149576:Text,[])
}
------------ Дoбавленo:
Эдик писал(а):
нужно сделать хотябы мультик и выложить в Уплоед. Или ещё лучше - компонент и на SVNЯ просто показал, что все это можно реализовать на HiAsm'e, причем, довольно быстро. А в мультик сами запихивайте, если нужно, в чем проблема-то