Вверх ↑
Этот топик читают: Гость
Ответов: 172
Рейтинг: 1
#1: 2025-07-27 15:55:14 ЛС | профиль | цитата
Привет всем.
Подскажите, есть ли менее замороченный способ подсчета значений правого столбца в таблице.
Я набросал, работает, но уверен что есть решение гораздо проще))))

Add(MainForm,2953706,77,105)
{
Width=742
Height=454
link(onCreate,1370606:doEnum,[])
}
Add(StrList,13965242,133,70)
{
Strings=#10:йцукенг;11|5:цук;5|6:фыва;8|9:йцукенг;4|9:йцукенг;5|6:фыва;3|8:ячсми;22|9:ячсми;115|10:пролдж;265|9:йцукен;44|9:пролдж;25|7:фыва;74|
}
Add(StrMask,11150096,623,266)
{
Point(doMask)
link(onTrue,3668206:doRead,[])
}
Add(ArrayEnum,14449548,224,175)
{
link(onItem,12526119:doSplit,[])
link(onEndEnum,11510733:doEvent1,[(272,188)(272,279)])
link(Array,9725226:Strings,[])
}
Add(StrList,4616048,427,182)
{
}
Add(MultiStrData,12526119,294,175)
{
link(onPart1,9059765:doEvent1,[])
link(onPart2,10247179:doAdd,[(351,188)(351,223)])
}
Add(StrList,10247179,679,217)
{
}
Add(ArrayEnum,3406654,441,273)
{
link(onItem,1250366:doEvent1,[])
link(Array,4616048:Array,[])
}
Add(ArrayEnum,16484304,525,280)
{
link(onItem,11150096:doCompare,[(568,286)(568,272)])
link(onEndEnum,15275605:doEvent1,[])
link(Array,15207437:Array,[])
}
Add(StrList,15207437,511,175)
{
}
Add(Hub,9059765,385,175)
{
link(onEvent1,15207437:doAdd,[])
link(onEvent2,4616048:doAdd,[])
}
Add(Hub,1250366,490,273)
{
link(onEvent1,11150096:doMask,[])
link(onEvent2,16484304:doEnum,[])
}
Add(ArrayRW,3668206,693,273)
{
link(onRead,8254983:doOperation,[(786,279)(786,293)])
link(Array,10247179:Array,[])
link(Index,16484304:Index,[(706,263)(673,263)(673,322)(538,322)])
}
Add(StringTable,14508183,875,455)
{
Left=375
Top=40
Width=285
Height=225
Columns=#11:позиция=100|8:колич=50|
}
Add(Math,8254983,805,287)
{
Point(doClear)
link(Op1,14659791:Var1,[(811,275)(799,275)(799,331)])
}
Add(FormatStr,14390798,735,406)
{
Mask="%1;%2"
link(onFString,15420804:doAdd,[])
link(Str1,3406654:Item,[(741,332)(447,332)])
link(Str2,14659791:Var2,[(748,370)(811,370)])
}
Add(Hub,15275605,574,287)
{
link(onEvent1,14390798:doString,[(603,293)(603,412)])
link(onEvent2,8254983:doClear,[])
}
Add(StrList,15420804,805,406)
{
}
Add(ArrayFilterRepeats,11096402,819,455)
{
link(onFilter,14508183:doAdd,[])
link(Array,15420804:Array,[])
}
Add(Hub,11510733,287,273)
{
link(onEvent1,3406654:doEnum,[])
link(onEvent2,12078457:In,[])
}
Add(LineBreak,6811689,714,455)
{
Caption="on_end_enum"
link(Out,11096402:doFilter,[])
Primary=[12078457,-399,-175]
}
Add(GetDataEx,14659791,805,326)
{
link(Data,8254983:Result,[])
}
Add(StringTable,9725226,210,119)
{
Left=50
Top=40
Width=285
Height=225
Columns=#11:позиция=100|8:колич=50|
Point(Strings)
}
Add(ArrayEnum,1370606,147,119)
{
link(onItem,9725226:doAdd,[])
link(Array,13965242:Array,[])
}
Add(Button,1690297,140,175)
{
Left=275
Top=300
Width=155
Caption="посчитать"
link(onClick,14449548:doEnum,[])
}

карма: 1

0
Ответов: 933
Рейтинг: 197
#2: 2025-07-27 16:39:45 ЛС | профиль | цитата
Gitarist писал(а):
Подскажите, есть ли менее замороченный способ подсчета значений правого столбца в таблице.

Add(MainForm,9097428,91,154)
{
Width=742
Height=454
Point(onClose)
link(onCreate,11171972:doOpen,[])
link(onClose,11171972:doClose,[])
}
Add(StrList,13965242,238,119)
{
Strings=#10:йцукенг;11|5:цук;5|6:фыва;8|9:йцукенг;4|9:йцукенг;5|6:фыва;3|8:ячсми;22|9:ячсми;115|10:пролдж;265|9:йцукен;44|9:пролдж;25|7:фыва;74|
}
Add(StringTable,14508183,329,231)
{
Left=375
Top=40
Width=285
Height=225
Columns=#11:позиция=100|8:колич=50|
Point(doAddColumn)
}
Add(StringTable,9725226,357,112)
{
Left=50
Top=40
Width=285
Height=225
Columns=#11:позиция=100|8:колич=50|
Point(Strings)
}
Add(ArrayEnum,1370606,252,168)
{
link(onItem,2341561:doEvent1,[])
link(Array,13965242:Array,[])
}
Add(Button,1690297,91,224)
{
Left=275
Top=300
Width=155
Caption="посчитать"
link(onClick,11185442:doEvent1,[])
}
Add(DS_SQLite,11171972,147,168)
{
Name="bd"
FileName=":memory:"
link(onOpen,7933638:doExec,[])
}
Add(DSC_Exec,7933638,196,168)
{
SQL="CREATE TABLE [list](\r\n [Poz] CHAR(30), \r\n [Qt] INTEGER);"
DSManager="bd"
link(onExec,1370606:doEnum,[])
}
Add(DSC_Exec,13859579,455,161)
{
DSManager="bd"
}
Add(MT_String,9368895,357,161)
{
link(onResult,653926:doString,[])
}
Add(FormatStr,653926,406,161)
{
Mask="INSERT\r\nINTO [list](\r\n [Poz], \r\n [Qt])\r\nVALUES('%1',%2); \r\n"
link(onFString,13859579:doExec,[])
}
Add(Hub,2341561,308,168)
{
link(onEvent1,9725226:doAdd,[(333,174)(333,118)])
link(onEvent2,9368895:doMTString,[])
}
Add(DSC_Query,9807701,189,231)
{
SQL="SELECT\r\n Poz,\r\n SUM(Qt)\r\nFROM\r\n list\r\nGROUP BY\r\n Poz;\r\n "
DSManager="bd"
link(onQuery,2535870:doStr,[])
}
Add(MT_String,2535870,252,231)
{
link(onResult,14508183:doAdd,[])
}
Add(Hub,11185442,154,224)
{
link(onEvent1,14508183:doClear,[(291,230)(291,244)])
link(onEvent2,9807701:doQuery,[])
}


Можно даже так
Add(MainForm,9097428,98,147)
{
Width=742
Height=454
Point(onClose)
link(onCreate,11171972:doOpen,[])
link(onClose,11171972:doClose,[])
}
Add(StrList,13965242,245,112)
{
Strings=#10:йцукенг;11|5:цук;5|6:фыва;8|9:йцукенг;4|9:йцукенг;5|6:фыва;3|8:ячсми;22|9:ячсми;115|10:пролдж;265|9:йцукен;44|9:пролдж;25|7:фыва;74|
}
Add(StringTable,14508183,322,224)
{
Left=375
Top=40
Width=285
Height=225
Point(doAddColumn)
}
Add(StringTable,9725226,364,105)
{
Left=50
Top=40
Width=285
Height=225
Columns=#11:позиция=100|8:колич=50|
Point(Strings)
}
Add(ArrayEnum,1370606,259,161)
{
link(onItem,2341561:doEvent1,[])
link(Array,13965242:Array,[])
}
Add(Button,1690297,98,217)
{
Left=275
Top=300
Width=155
Caption="посчитать"
link(onClick,11185442:doEvent1,[])
}
Add(DS_SQLite,11171972,154,161)
{
Name="bd"
FileName=":memory:"
link(onOpen,7933638:doExec,[])
}
Add(DSC_Exec,7933638,203,161)
{
SQL="CREATE TABLE [list](\r\n [Poz] CHAR(30), \r\n [Qt] INTEGER);"
DSManager="bd"
link(onExec,1370606:doEnum,[])
}
Add(DSC_Exec,13859579,462,154)
{
DSManager="bd"
}
Add(MT_String,9368895,364,154)
{
link(onResult,653926:doString,[])
}
Add(FormatStr,653926,413,154)
{
Mask="INSERT\r\nINTO [list](\r\n [Poz], \r\n [Qt])\r\nVALUES('%1',%2); \r\n"
link(onFString,13859579:doExec,[])
}
Add(Hub,2341561,315,161)
{
link(onEvent1,9725226:doAdd,[(340,167)(340,111)])
link(onEvent2,9368895:doMTString,[])
}
Add(DSC_Query,13549371,203,224)
{
SQL="SELECT\r\n Poz AS "Позиция",\r\n MAX(Qt) AS "Максимальное",\r\n MIN(Qt) AS "Минимальное",\r\n SUM(Qt) AS "Сумма",\r\n AVG(Qt) AS "Среднее",\r\n COUNT(Qt) AS "Количество",\r\n GROUP_CONCAT(Qt, ", ") AS "Все значения"\r\nFROM\r\n list\r\nGROUP BY\r\n Poz;\r\n "
DSManager="bd"
link(onQuery,2535870:doStr,[])
link(onColumns,10003028:doEnum,[(249,237)(249,272)])
}
Add(MT_String,2535870,259,224)
{
link(onResult,14508183:doAdd,[])
}
Add(Hub,11185442,161,217)
{
link(onEvent1,14508183:doClear,[(298,223)(298,237)])
link(onEvent2,13549371:doQuery,[])
}
Add(MT_Enum,10003028,259,266)
{
link(onItem,14508183:doAddColumn,[(298,272)(298,251)])
}


Редактировалось 1 раз(а), последний 2025-07-27 16:45:54
карма: 19

1
Голосовали:Gitarist
Ответов: 172
Рейтинг: 1
#3: 2025-07-27 16:50:11 ЛС | профиль | цитата
Смысл понятен)) через бд.
карма: 1

0
Ответов: 8961
Рейтинг: 824
#4: 2025-07-27 18:35:18 ЛС | профиль | цитата
Gitarist, если изначально данные хранятся в БД (чего и советую), То конечно. А без БД можно и на рассыпухе:
рассыпуха


Add(MainForm,14297584,98,112)
{
Width=742
Height=454
link(onCreate,1370606:doEnum,[])
}
Add(StrList,13965242,154,70)
{
Strings=#10:йцукенг;11|5:цук;5|6:фыва;8|9:йцукенг;4|9:йцукенг;5|6:фыва;3|8:ячсми;22|9:ячсми;115|10:пролдж;265|9:йцукен;44|9:пролдж;25|7:фыва;74|
}
Add(ArrayEnum,14449548,245,245)
{
link(onItem,12526119:doSplit,[])
link(onEndEnum,1699993:doWork1,[(284,258)(284,377)(508,377)])
link(Array,9725226:Strings,[])
}
Add(MultiStrData,12526119,315,245)
{
link(Str,14449548:Item,[(321,236)(309,236)(309,295)(251,295)])
link(onPart1,6489124:doValue,[])
link(onPart2,9375678:doValue,[])
}
Add(StringTable,14508183,672,385)
{
Left=375
Top=40
Width=285
Height=225
Columns=#11:позиция=100|8:колич=50|
}
Add(StringTable,9725226,231,126)
{
Left=50
Top=40
Width=285
Height=225
Columns=#11:позиция=100|8:колич=50|
Point(Strings)
Point(doSort)
}
Add(ArrayEnum,1370606,154,126)
{
link(onItem,9725226:doAdd,[])
link(Array,13965242:Array,[(160,110)(174,110)])
}
Add(Button,1690297,154,189)
{
Left=275
Top=300
Width=155
Caption="посчитать"
Data=Integer(0)
link(onClick,2541441:doEvent1,[])
}
Add(Hub,2541441,196,189)
{
OutCount=6
link(onEvent1,9725226:doSort,[(221,195)(221,167)])
link(onEvent2,14508183:doClear,[(634,202)(634,398)])
link(onEvent3,11072110:doWork1,[(592,209)])
link(onEvent4,6489124:doClear,[(403,216)(403,258)])
link(onEvent5,9375678:doClear,[(340,223)(340,265)])
link(onEvent6,14449548:doEnum,[(235,230)(235,251)])
}
Add(MemFifo,6489124,434,245)
{
Default=String('')
}
Add(MemFifo,9375678,371,252)
{
Default=Integer(0)
link(onData,4391637:doCompare,[(410,258)(410,279)])
}
Add(MathParse,8931150,602,273)
{
DataCount=1
MathStr="%1 + %0"
ResultType=0
Point(doClear)
}
Add(If_else,4391637,483,273)
{
Op2=Integer(0)
link(onTrue,15034834:doData,[])
link(onFalse,8265293:doCompare,[(522,286)(522,314)(424,314)(424,342)])
link(Op1,14449548:Index,[(489,229)(302,229)(302,284)(258,284)])
}
Add(DoData,15034834,532,273)
{
link(onEventData,10410428:doWork2,[])
link(Data,3532457:Var1,[(538,264)(475,264)])
}
Add(If_else,8265293,434,336)
{
link(onTrue,15380985:doData,[])
link(onFalse,49999:doEvent1,[(480,349)(480,391)])
link(Op1,6489124:Value1,[])
link(Op2,3355562:Var2,[])
}
Add(DoData,15380985,525,336)
{
link(onEventData,12907889:doWork2,[])
link(Data,3532457:Var2,[(531,319)(475,319)])
}
Add(GetDataEx,3532457,469,287)
{
Angle=3
link(Data,4472821:Var3,[])
}
Add(HubEx,10410428,574,273)
{
link(onEvent,8931150:doCalc,[])
}
Add(Hub,49999,483,385)
{
OutCount=3
link(onEvent1,1699993:doWork2,[])
link(onEvent2,11072110:doWork3,[(592,398)])
link(onEvent3,6288697:doData,[(515,405)(515,440)])
}
Add(FormatStr,16184880,525,385)
{
Mask="%1;%2"
link(onFString,14508183:doAdd,[])
link(Str1,3355562:Var3,[(531,376)(517,376)(517,327)])
link(Str2,8931150:Result,[(538,376)(608,376)])
}
Add(GetDataEx,3355562,441,322)
{
link(Data,6489124:Value2,[])
}
Add(HubEx,11072110,588,280)
{
link(onEvent,8931150:doClear,[])
}
Add(DoData,6288697,525,434)
{
link(onEventData,12907889:doWork3,[(578,440)])
link(Data,4472821:Var2,[(531,425)(377,425)])
}
Add(GetDataEx,4472821,371,287)
{
link(Data,9375678:Value1,[])
}
Add(HubEx,12907889,574,336)
{
Angle=3
link(onEvent,10410428:doWork3,[])
}
Add(HubEx,1699993,504,385)
{
link(onEvent,16184880:doString,[])
}

карма: 19

0
Ответов: 172
Рейтинг: 1
#5: 2025-07-27 19:09:12 ЛС | профиль | цитата
нет, данные храню в тексте... до бд не созрел еще. больно уж много придется переделывать в большом проекте.
карма: 1

0
Ответов: 933
Рейтинг: 197
#6: 2025-07-27 19:36:32 ЛС | профиль | цитата
Вот ещё вариант

Add(MainForm,9097428,91,112)
{
Width=742
Height=454
Point(onClose)
link(onCreate,1370606:doEnum,[])
}
Add(StrList,13965242,140,63)
{
Strings=#9:col1;col2|10:йцукенг;11|5:цук;5|6:фыва;8|9:йцукенг;4|9:йцукенг;5|6:фыва;3|8:ячсми;22|9:ячсми;115|10:пролдж;265|9:йцукен;44|9:пролдж;25|7:фыва;74|
}
Add(StringTable,14508183,497,210)
{
Left=375
Top=40
Width=285
Height=225
Columns=#7:Позиция|10:Количество|
}
Add(StringTable,9725226,273,126)
{
Left=50
Top=40
Width=285
Height=225
Columns=#11:позиция=100|8:колич=50|
Point(ExtCmp)
Point(doSortExtCmp)
}
Add(ArrayEnum,1370606,154,126)
{
link(onItem,9725226:doAdd,[])
link(onEndEnum,3893125:doData,[(200,139)(200,146)])
link(Array,13965242:Array,[])
}
Add(FormatStr,13876708,140,210)
{
DataCount=1
Mask="$data = @'\r\n%1\r\n'@\r\n\r\n$csvData = $data | ConvertFrom-Csv -Delimiter ';' \r\n$results = @{}\r\nforeach ($row in $csvData) {\r\n $key = $row.col1\r\n $value = [int]$row.col2\r\n if ($results.ContainsKey($key)) {\r\n $results[$key] += $value\r\n } else {\r\n $results[$key] = $value\r\n }\r\n}\r\n\r\n$outputData = @()\r\n\r\nforeach ($key in $results.Keys) {\r\n $outputData += [PSCustomObject]@{\r\n 'Позиция' = $key\r\n 'Количество' = $results[$key]\r\n }\r\n}\r\n\r\n$outputData | ConvertTo-Csv -Delimiter ';' -NoTypeInformation\r\n"
link(onFString,7233623:doConsoleExec,[])
link(Str1,13965242:Text,[])
}
Add(WinExec,7233623,189,196)
{
FileName="powershell"
Mode=0
Point(onConsoleResult)
Point(onConsoleError)
Point(doConsoleExec)
link(onConsoleResult,7509309:doWork2,[])
link(onConsoleError,7509309:doWork3,[(242,223)])
}
Add(Charset,16279033,266,210)
{
link(onCharset,357196:doEnum,[])
}
Add(HubEx,7509309,238,210)
{
link(onEvent,16279033:doCharset,[])
}
Add(DoData,3893125,210,140)
{
Data=Integer(0)
link(onEventData,9725226:doDelete,[])
}
Add(Button,1690297,91,210)
{
Left=275
Top=300
Width=155
Caption="посчитать"
link(onClick,13876708:doString,[])
}
Add(Str_Enum,357196,336,210)
{
Delimiter="\n"
link(onEnum,10732955:doReplace,[])
link(onEndEnum,10779511:doData,[(389,223)(389,230)])
}
Add(DoData,10779511,448,224)
{
Data=Integer(0)
link(onEventData,14508183:doDelete,[])
}
Add(Replace,10732955,392,210)
{
SubStr="""
link(onReplace,14508183:doAdd,[])
}


--- Добавлено в 2025-07-27 20:12:40

И ещё один

Add(MainForm,9097428,91,112)
{
Width=742
Height=454
Point(onClose)
link(onCreate,1370606:doEnum,[])
}
Add(StrList,13965242,147,63)
{
Strings=#10:йцукенг;11|5:цук;5|6:фыва;8|9:йцукенг;4|9:йцукенг;5|6:фыва;3|8:ячсми;22|9:ячсми;115|10:пролдж;265|9:йцукен;44|9:пролдж;25|7:фыва;74|
}
Add(StringTable,14508183,217,189)
{
Left=375
Top=40
Width=285
Height=225
Columns=#7:Позиция|10:Количество|
}
Add(StringTable,9725226,217,126)
{
Left=50
Top=40
Width=285
Height=225
Columns=#11:позиция=100|8:колич=50|
Point(ExtCmp)
Point(doSortExtCmp)
}
Add(ArrayEnum,1370606,161,126)
{
link(onItem,9725226:doAdd,[])
link(Array,13965242:Array,[])
}
Add(VBJScript,279962,147,189)
{
@Hint=#7:SendKey|
WorkPoints=#6:onWork|
EventPoints=#3:out|
DataPoints=#3:csv|
Script=#23:Sub doWork(Data, Index)|42:Dim dictSum, arrLines, i, strKey, strValue|50:Set dictSum = CreateObject("Scripting.Dictionary")|36:arrLines = Split(sys.csv, vbNewLine)|31:For i = 0 To UBound(arrLines)-1|39: arrFields = Split(arrLines(i), ";")|25: strKey = arrFields(0)|27: strValue = arrFields(1)|34: If dictSum.Exists(strKey) Then|58: dictSum(strKey) = dictSum(strKey) + CDbl(strValue)|8: Else|42: dictSum.Add strKey, CDbl(strValue)|10: End If|4:Next|31:For Each strKey In dictSum.Keys|42: sys.out strKey & ";" & dictSum(strKey)|4:Next|7:End Sub|
UseName=0
link(out,14508183:doAdd,[])
link(csv,13965242:Text,[])
}
Add(Button,1690297,91,189)
{
Left=275
Top=300
Width=155
Caption="посчитать"
link(onClick,279962:onWork,[])
}


Редактировалось 1 раз(а), последний 2025-07-27 20:12:40
карма: 19

0
Ответов: 933
Рейтинг: 197
#7: 2025-07-28 15:19:18 ЛС | профиль | цитата
Ради эксперимента решил использовать ту группу элементов, которые практически никто не применяет.
Add(Type_RW,15223324,357,273)
{
Point(onError)
link(GType,14299309:Var2,[])
link(Name,3478416:Var2,[])
link(Value,1541832:Var2,[])
link(onRead,15817188:doConvert,[])
link(onError,8767035:doCompare,[(396,286)(396,314)(284,314)(284,279)])
}
Add(Type_Array,7620758,651,266)
{
UseName=0
Point(NameArray)
link(GType,13209390:Var2,[])
link(onLoad,15929848:doEnum,[])
}
Add(ArrayEnum,15929848,700,266)
{
link(onItem,4207172:doRead,[])
link(Array,7620758:NameArray,[(706,257)(692,257)(692,306)(671,306)])
}
Add(FormatStr,9854593,805,266)
{
Mask="%1;%2"
link(onFString,14508183:doAdd,[])
link(Str1,15929848:Item,[(811,257)(797,257)(797,306)(706,306)])
}
Add(Type_Create,15088314,224,189)
{
Point(doClear)
link(onCreate,1370606:doEnum,[])
}
Add(StrList,13965242,259,140)
{
Strings=#10:йцукенг;11|5:цук;5|6:фыва;8|9:йцукенг;4|9:йцукенг;5|6:фыва;3|8:ячсми;22|9:ячсми;115|10:пролдж;265|9:йцукен;44|9:пролдж;25|7:фыва;74|
}
Add(ArrayEnum,1370606,273,189)
{
link(onItem,9250184:doEvent1,[])
link(Array,13965242:Array,[])
}
Add(If_else,8767035,294,273)
{
Op1=Integer(3)
link(onTrue,15223324:doRead,[])
}
Add(MultiStrPart,6863202,364,196)
{
}
Add(GetDataEx,14299309,357,238)
{
Angle=3
link(Data,15088314:FType,[(230,243)])
}
Add(Convertor,15817188,413,273)
{
Mode=1
link(onResult,3574868:doOperation,[])
}
Add(Type_RW,10004917,511,266)
{
Point(onError)
link(GType,5332732:Var2,[])
link(Name,3478416:Var3,[(524,250)])
}
Add(Math,3574868,462,273)
{
link(onResult,10004917:doWrite,[])
link(Op2,1541832:Var3,[(475,257)])
}
Add(GetDataEx,5332732,511,238)
{
Angle=3
link(Data,14299309:Var3,[])
}
Add(GetDataEx,3478416,364,245)
{
link(Data,6863202:Part1,[])
}
Add(MainForm,9097428,168,175)
{
Width=742
Height=454
Point(onClose)
link(onCreate,15088314:doCreate,[])
}
Add(StringTable,14508183,854,266)
{
Left=375
Top=40
Width=285
Height=225
Columns=#7:Позиция|10:Количество|
}
Add(StringTable,9725226,364,147)
{
Left=50
Top=40
Width=285
Height=225
Columns=#11:позиция=100|8:колич=50|
Point(ExtCmp)
Point(doSortExtCmp)
Point(EndIdx)
Point(Matrix)
}
Add(Button,1690297,602,266)
{
Left=275
Top=300
Width=155
Caption="посчитать"
link(onClick,7620758:doLoad,[])
}
Add(Hub,9250184,315,189)
{
OutCount=3
link(onEvent1,9725226:doAdd,[(340,195)(340,153)])
link(onEvent2,6863202:doSplit,[])
link(onEvent3,15223324:doAdd,[(340,209)(340,293)])
}
Add(GetDataEx,1541832,371,252)
{
link(Data,6863202:Part2,[])
}
Add(Type_RW,4207172,749,266)
{
link(GType,13209390:Var3,[(755,243)])
link(onRead,9854593:doString,[])
}
Add(GetDataEx,13209390,651,238)
{
Angle=3
link(Data,5332732:Var3,[])
}


Редактировалось 3 раз(а), последний 2025-07-31 07:05:48
карма: 19

0
7
Сообщение
...
Прикрепленные файлы
(файлы не залиты)