Flapiotun, А вы проверяли код? Я проверил, во первых он выдаёт неверный результат(реверс). Во вторых, он дольше варианта замены в лоб в 25 раз. Add(MainForm,5550036,588,238) { Width=428 Height=136 } Add(Edit,5460572,1015,392) { Left=5 Top=35 Width=305 Text="" } Add(StrList,9551083,637,245) { Strings=#4: =20|4:!=21|4:"=22|4:#=23|4:№=24|4:%=25|4:&=26|4:’=27|4:(=28|4:)=29|4:*=2A|4:+=2B|4:,=2C|4:-=2D|4:.=2E|4:/=2F|4:0=30|4:1=31|4:2=32|4:3=33|4:4=34|4:5=35|4:6=36|4:7=37|4:8=38|4:9=39|4::=3A|4:;=3B|4:‹=3C|4:==3D|4:›=3E|4:?=3F|4:@=40|4:A=41|4:B=42|4:C=43|4:D=44|4:E=45|4:F=46|4:G=47|4:H=48|4:I=49|4:J=4A|4:K=4B|4:L=4C|4:M=4D|4:N=4E|4:O=4F|4:P=50|4:Q=51|4:R=52|4:S=53|4:T=54|4:U=55|4:V=56|4:W=57|4:X=58|4:Y=59|4:Z=5A|4:[=5B|4:\=5C|4:]=5D|4:^=5E|4:_=5F|4:`=60|4:a=61|4:b=62|4:c=63|4:d=64|4:e=65|4:f=66|4:g=67|4:h=68|4:i=69|4:j=6A|4:K=6B|4:l=6C|4:m=6D|4:n=6E|4:o=6F|4:p=70|4:q=71|4:r=72|4:s=73|4:t=74|4:u=75|4:v=76|4:w=77|4:x=78|4:y=79|4:z=7A|4:{=7B|4:|=7C|4:}=7D|4:~=7E|4:А=80|4:Б=81|4:В=82|4:Г=83|4:Д=84|4:Е=85|4:Ж=86|4:З=87|4:И=88|4:Й=89|4:К=8A|4:Л=8B|4:М=8C|4:Н=8D|4:О=8E|4:П=8F|4:Р=90|4:С=91|4:Т=92|4:У=93|4:Ф=94|4:Х=95|4:Ц=96|4:Ч=97|4:Ш=98|4:Щ=99|4:Ъ=9A|4:Ы=9B|4:Ь=9C|4:Э=9D|4:Ю=9E|4:Я=9F|4:а=A0|4:б=A1|4:в=A2|4:г=A3|4:д=A4|4:е=A5|4:ж=A6|4:з=A7|4:и=A8|4:й=A9|4:к=AA|4:л=AB|4:м=AC|4:н=AD|4:о=AE|4:п=AF|4:-=B0|4:-=B1|4:-=B2|4:¦=B3|4:+=B4|4:¦=B5|4:¦=B6|4:¬=B7|4:¬=B8|4:¦=B9|4:¦=BA|4:¬=BB|4:-=BC|4:-=BD|4:-=BE|4:¬=BF|4:L=C0|4:+=C1|4:T=C2|4:+=C3|4:-=C4|4:+=C5|4:¦=C6|4:¦=C7|4:L=C8|4:г=C9|4:¦=CA|4:T=CB|4:¦=CC|4:+=CE|4:¦=CF|4:¦=D0|4:T=D1|4:T=D2|4:L=D3|4:L=D4|4:-=D5|4:г=D6|4:+=D7|4:+=D8|4:-=D9|4:-=DA|4:-=DB|4:-=DC|4:¦=DD|4:¦=DE|4:-=DF|4:р=E0|4:с=E1|4:т=E2|4:у=E3|4:ф=E4|4:х=E5|4:ц=E6|4:ч=E7|4:ш=E8|4:щ=E9|4:ъ=EA|4:ы=EB|4:ь=EC|4:э=ED|4:ю=EE|4:я=EF|4:Ё=F0|4:ё=F1|4:€=F2|3:=FA|4:$=FC|4:¦=FF| } Add(Copy,16064903,539,322) { Count=1 link(onCopy,4814907:doValue,[]) link(Str,12277334:Var3,[(545,313)(531,313)(531,369)]) } Add(For,836090,483,322) { Start=1 link(onEvent,16064903:doCopy,[]) link(onStop,15548081:doData,[(522,335)(522,391)]) link(End,6988335:Result,[(496,313)(468,313)(468,362)(433,362)]) } Add(If_else,11368991,749,329) { link(onTrue,2218130:doEvent1,[]) link(Op1,4814907:Value,[(755,320)(691,320)(691,368)(601,368)]) } Add(ArrayEnum,15904300,651,322) { link(onItem,13116458:doSplit,[]) link(Array,9551083:Array,[]) } Add(Length,6988335,427,322) { link(onLength,836090:doFor,[]) link(Str,12277334:Var1,[(433,313)(405,313)]) } Add(Memory,4814907,595,322) { link(onData,15904300:doEnum,[]) } Add(StrPart,13116458,700,322) { Char="=" Point(Right) link(onPart,11368991:doCompare,[]) } Add(StrCatDelim,12864472,889,329) { Point(doClear) link(onStrCatDlm,2900536:doValue,[]) link(Str2,12864472:Result,[(902,317)(884,317)(884,372)(895,372)]) } Add(Memory,2900536,938,329) { } Add(Memory,2176649,833,329) { Point(Data) link(onData,12864472:doStrCatDlm,[]) link(Data,13116458:Right,[(839,320)(792,320)(792,368)(706,368)]) } Add(Hub,16220773,385,315) { link(onEvent1,12864472:doClear,[(410,321)(410,307)(872,307)(872,342)]) link(onEvent2,6988335:doLength,[]) } Add(DoData,15548081,938,385) { link(onEventData,9084977:doEvent1,[]) link(Data,2900536:Value,[]) } Add(GetDataEx,12277334,399,364) { Angle=3 link(Data,11241415:Value,[(342,369)]) } Add(Hub,2218130,798,329) { link(onEvent1,2176649:doValue,[]) link(onEvent2,15904300:doStop,[(823,342)(823,377)(641,377)(641,335)]) } Add(StrList,12481905,693,539) { Strings=#1: |1:!|1:"|1:#|1:№|1:%|1:&|1:’|1:(|1:)|1:*|1:+|1:,|1:-|1:.|1:/|1:0|1:1|1:2|1:3|1:4|1:5|1:6|1:7|1:8|1:9|1::|1:;|1:‹|1:=|1:›|1:?|1:@|1:A|1:B|1:C|1:D|1:E|1:F|1:G|1:H|1:I|1:J|1:K|1:L|1:M|1:N|1:O|1:P|1:Q|1:R|1:S|1:T|1:U|1:V|1:W|1:X|1:Y|1:Z|1:[|1:\|1:]|1:^|1:_|1:`|1:a|1:b|1:c|1:d|1:e|1:f|1:g|1:h|1:i|1:j|1:K|1:l|1:m|1:n|1:o|1:p|1:q|1:r|1:s|1:t|1:u|1:v|1:w|1:x|1:y|1:z|1:{|1:||1:}|1:~|1:А|1:Б|1:В|1:Г|1:Д|1:Е|1:Ж|1:З|1:И|1:Й|1:К|1:Л|1:М|1:Н|1:О|1:П|1:Р|1:С|1:Т|1:У|1:Ф|1:Х|1:Ц|1:Ч|1:Ш|1:Щ|1:Ъ|1:Ы|1:Ь|1:Э|1:Ю|1:Я|1:а|1:б|1:в|1:г|1:д|1:е|1:ж|1:з|1:и|1:й|1:к|1:л|1:м|1:н|1:о|1:п|1:-|1:-|1:-|1:¦|1:+|1:¦|1:¦|1:¬|1:¬|1:¦|1:¦|1:¬|1:-|1:-|1:-|1:¬|1:L|1:+|1:T|1:+|1:-|1:+|1:¦|1:¦|1:L|1:г|1:¦|1:T|1:¦|1:+|1:¦|1:¦|1:T|1:T|1:L|1:L|1:-|1:г|1:+|1:+|1:-|1:-|1:-|1:-|1:¦|1:¦|1:-|1:р|1:с|1:т|1:у|1:ф|1:х|1:ц|1:ч|1:ш|1:щ|1:ъ|1:ы|1:ь|1:э|1:ю|1:я|1:Ё|1:ё|1:€|1:=|1:$|1:¦| Point(doGetIndex) Point(onGetIndex) link(onGetIndex,3589110:doGetString,[]) } Add(Button,12465135,217,308) { Left=20 Top=10 Data=String( !"#№%&’()*+,-./0123456789:;‹=›?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijKlmnopqrstuvwxyz{|}~АБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯабвгдежзийклмноп---¦+¦¦¬¬¦¦¬---¬L+T+-+¦¦Lг¦T¦+¦¦TTLL-г++----¦¦-рстуфхцчшщъыьэюяЁё€=$¦ !"#№%&’()*+,-./0123456789:;‹=›?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijKlmnopqrstuvwxyz{|}~АБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯабвгдежзийклмноп---¦+¦¦¬¬¦¦¬---¬L+T+-+¦¦Lг¦T¦+¦¦TTLL-г++----¦¦-рстуфхцчшщъыьэюяЁё€=$¦ !"#№%&’()*+,-./0123456789:;‹=›?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijKlmnopqrstuvwxyz{|}~АБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯабвгдежзийклмноп---¦+¦¦¬¬¦¦¬---¬L+T+-+¦¦Lг¦T¦+¦¦TTLL-г++----¦¦-рстуфхцчшщъыьэюяЁё€=$¦ !"#№%&’()*+,-./0123456789:;‹=›?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijKlmnopqrstuvwxyz{|}~АБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯабвгдежзийклмноп---¦+¦¦¬¬¦¦¬---¬L+T+-+¦¦Lг¦T¦+¦¦TTLL-г++----¦¦-рстуфхцчшщъыьэюяЁё€=$¦ !"#№%&’()*+,-./0123456789:;‹=›?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijKlmnopqrstuvwxyz{|}~АБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯабвгдежзийклмноп---¦+¦¦¬¬¦¦¬---¬L+T+-+¦¦Lг¦T¦+¦¦TTLL-г++----¦¦-рстуфхцчшщъыьэюяЁё€=$¦ !"#№%&’()*+,-./0123456789:;‹=›?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijKlmnopqrstuvwxyz{|}~АБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯабвгдежзийклмноп---¦+¦¦¬¬¦¦¬---¬L+T+-+¦¦Lг¦T¦+¦¦TTLL-г++----¦¦-рстуфхцчшщъыьэюяЁё€=$¦ !"#№%&’()*+,-./0123456789:;‹=›?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijKlmnopqrstuvwxyz{|}~АБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯабвгдежзийклмноп---¦+¦¦¬¬¦¦¬---¬L+T+-+¦¦Lг¦T¦+¦¦TTLL-г++----¦¦-рстуфхцчшщъыьэюяЁё€=$¦ !"#№%&’()*+,-./0123456789:;‹=›?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijKlmnopqrstuvwxyz{|}~АБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯабвгдежзийклмноп---¦+¦¦¬¬¦¦¬---¬L+T+-+¦¦Lг¦T¦+¦¦TTLL-г++----¦¦-рстуфхцчшщъыьэюяЁё€=$¦ !"#№%&’()*+,-./0123456789:;‹=›?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijKlmnopqrstuvwxyz{|}~АБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯабвгдежзийклмноп---¦+¦¦¬¬¦¦¬---¬L+T+-+¦¦Lг¦T¦+¦¦TTLL-г++----¦¦-рстуфхцчшщъыьэюяЁё€=$¦ !"#№%&’()*+,-./0123456789:;‹=›?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijKlmnopqrstuvwxyz{|}~АБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯабвгдежзийклмноп---¦+¦¦¬¬¦¦¬---¬L+T+-+¦¦Lг¦T¦+¦¦TTLL-г++----¦¦-рстуфхцчшщъыьэюяЁё€=$¦ !"#№%&’()*+,-./0123456789:;‹=›?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijKlmnopqrstuvwxyz{|}~АБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯабвгдежзийклмноп---¦+¦¦¬¬¦¦¬---¬L+T+-+¦¦Lг¦T¦+¦¦TTLL-г++----¦¦-рстуфхцчшщъыьэюяЁё€=$¦ !"#№%&’()*+,-./0123456789:;‹=›?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijKlmnopqrstuvwxyz{|}~АБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯабвгдежзийклмноп---¦+¦¦¬¬¦¦¬---¬L+T+-+¦¦Lг¦T¦+¦¦TTLL-г++----¦¦-рстуфхцчшщъыьэюяЁё€=$¦ !"#№%&’()*+,-./0123456789:;‹=›?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijKlmnopqrstuvwxyz{|}~АБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯабвгдежзийклмноп---¦+¦¦¬¬¦¦¬---¬L+T+-+¦¦Lг¦T¦+¦¦TTLL-г++----¦¦-рстуфхцчшщъыьэюяЁё€=$¦ !"#№%&’()*+,-./0123456789:;‹=›?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijKlmnopqrstuvwxyz{|}~АБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯабвгдежзийклмноп---¦+¦¦¬¬¦¦¬---¬L+T+-+¦¦Lг¦T¦+¦¦TTLL-г++----¦¦-рстуфхцчшщъыьэюяЁё€=$¦ !"#№%&’()*+,-./0123456789:;‹=›?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijKlmnopqrstuvwxyz{|}~АБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯабвгдежзийклмноп---¦+¦¦¬¬¦¦¬---¬L+T+-+¦¦Lг¦T¦+¦¦TTLL-г++----¦¦-рстуфхцчшщъыьэюяЁё€=$¦) link(onClick,10333670:doEvent1,[]) } Add(Memory,11241415,336,315) { link(onData,16220773:doEvent1,[]) } Add(StrList,3589110,735,504) { Strings=#2:20|2:21|2:22|2:23|2:24|2:25|2:26|2:27|2:28|2:29|2:2A|2:2B|2:2C|2:2D|2:2E|2:2F|2:30|2:31|2:32|2:33|2:34|2:35|2:36|2:37|2:38|2:39|2:3A|2:3B|2:3C|2:3D|2:3E|2:3F|2:40|2:41|2:42|2:43|2:44|2:45|2:46|2:47|2:48|2:49|2:4A|2:4B|2:4C|2:4D|2:4E|2:4F|2:50|2:51|2:52|2:53|2:54|2:55|2:56|2:57|2:58|2:59|2:5A|2:5B|2:5C|2:5D|2:5E|2:5F|2:60|2:61|2:62|2:63|2:64|2:65|2:66|2:67|2:68|2:69|2:6A|2:6B|2:6C|2:6D|2:6E|2:6F|2:70|2:71|2:72|2:73|2:74|2:75|2:76|2:77|2:78|2:79|2:7A|2:7B|2:7C|2:7D|2:7E|2:80|2:81|2:82|2:83|2:84|2:85|2:86|2:87|2:88|2:89|2:8A|2:8B|2:8C|2:8D|2:8E|2:8F|2:90|2:91|2:92|2:93|2:94|2:95|2:96|2:97|2:98|2:99|2:9A|2:9B|2:9C|2:9D|2:9E|2:9F|2:A0|2:A1|2:A2|2:A3|2:A4|2:A5|2:A6|2:A7|2:A8|2:A9|2:AA|2:AB|2:AC|2:AD|2:AE|2:AF|2:B0|2:B1|2:B2|2:B3|2:B4|2:B5|2:B6|2:B7|2:B8|2:B9|2:BA|2:BB|2:BC|2:BD|2:BE|2:BF|2:C0|2:C1|2:C2|2:C3|2:C4|2:C5|2:C6|2:C7|2:C8|2:C9|2:CA|2:CB|2:CC|2:CD|2:CE|2:CF|2:D0|2:D1|2:D2|2:D3|2:D4|2:D5|2:D6|2:D7|2:D8|2:D9|2:DA|2:DB|2:DC|2:DD|2:DE|2:DF|2:E0|2:E1|2:E2|2:E3|2:E4|2:E5|2:E6|2:E7|2:E8|2:E9|2:EA|2:EB|2:EC|2:ED|2:EE|2:EF|2:F0|2:F1|2:F2|2:FA|2:FC|2:FF| Point(onGetString) Point(doGetString) link(onGetString,654926:doStrCat,[]) } Add(Str_Enum,16235942,651,581) { Delimiter="" OnlyDivGroup=1 link(onEnum,12481905:doGetIndex,[]) link(onEndEnum,6249297:doEvent1,[]) } Add(Hub,10333670,266,308) { link(onEvent1,3303413:doEvent1,[]) link(onEvent2,4834161:doEvent1,[(286,321)(286,580)]) } Add(StrCat,654926,784,511) { Point(doClear) link(Str1,15244069:Var1,[(790,499)(778,499)(778,551)]) } Add(DoData,4144134,784,588) { link(onEventData,16119314:doEvent1,[]) link(Data,15244069:Var2,[]) } Add(GetDataEx,15244069,784,546) { link(Data,654926:Result,[]) } Add(Hub,6249297,749,588) { link(onEvent1,4144134:doData,[]) link(onEvent2,654926:doClear,[(773,601)(773,524)]) } Add(Edit,16048916,854,595) { Left=5 Top=65 Width=305 Text="" } Add(Label,14744663,1064,210) { Left=340 Top=35 } Add(Label,2328298,910,497) { Left=340 Top=70 } Add(TimeCounter,2197787,1022,203) { link(onStop,14744663:doText,[]) } Add(TimeCounter,878263,854,490) { link(onStop,2328298:doText,[]) } Add(Hub,3303413,308,308) { link(onEvent1,2197787:doStart,[(342,314)(342,209)]) link(onEvent2,11241415:doValue,[]) } Add(Hub,9084977,987,385) { link(onEvent1,2197787:doStop,[(1011,391)(1011,216)]) link(onEvent2,5460572:doText,[]) } Add(Hub,4834161,623,574) { link(onEvent1,878263:doStart,[(645,580)(645,496)]) link(onEvent2,16235942:doEnum,[]) } Add(Hub,16119314,826,588) { link(onEvent1,878263:doStop,[(845,594)(845,503)]) link(onEvent2,16048916:doText,[]) }
Редактировалось 4 раз(а), последний 2018-07-14 09:21:30
|