Форум профессиональных мебельщиков PROMEBELclub
 
PROMEBELclub - Форум для мебельщиков: конструкторов, дизайнеров, мастеров, технологов и всех, кто имеет отношение к производству и изготовлению мебели. Программы для конструирования и дизайна мебели. Мебельная литература и обучающие пособия.
 
 

Вернуться   Форум профессиональных мебельщиков PROMEBELclub > Программы для мебельщиков > Программы для конструирования и дизайна мебели > Система БАЗИС > Базис-мебельщик. Скрипты

Меню

Маркет


Ответ
 
Опции темы Опции просмотра
Старый 13.01.2014, 13:22  
БАЗИС 8 - Скрипты
 
Аватар для Igor_482
Igor_482
VIP
Регистрация: 03.09.2008
Сообщений: 174

Сказал(а) спасибо: 34
Поблагодарили 794 раз(а) в 113 сообщениях
Версия для печати Отправить по электронной почте
Igor_482 Igor_482 вне форума 13.01.2014, 13:22
Рейтинг: ()

ВНИМАНИЕ! Правила выкладывания скриптов.

1. Если в скрипте нет ссылок на фурнитуру, фрагменты и.т.д то достаточно его упаковать в архив и выложить.

2. Если в скрипте есть ссылки на фурнитуру, фрагменты и т.д. то архив должен содержать папку с самим скриптом и всеми файлами на которые есть ссылки в тексте скрипта.


Т.к. при запуске скрипта на другом компе возникает ошибка о не возможности открыть то или иной файл и скрипт до конца не отрабатывает свой текст. Не соблюдается "чистота проверки" работы скрипта.

__________________________________________________ _______________

Интересует информация по редактору скриптов в БМ8. Существует ли справочная документация и примеры использования скриптов в БМ8. Какие возможности дает данная функция? Владеющим информацией по данному вопросу просьба поделиться ею.

Новое в скриптописании для БМ:

Скрытый текст

while (true)
Вот полный список новшеств, добавленных в скрипты с момента их выхода:

14 декабря 2014

Добавлена поддержка эластичных блоков

List3D : {
IsElastic: new HDefinition("?Boolean:", 'Являетсяли объект эластичным'),
ElasticResize: new HDefinition("?Vector:newSize", 'Растянуть объект до требуемых размеров'),
}

27 ноября 2014

Вспомогательные геометрические алгоритмы, реализованы в глобальном объекте geometry

geometry : new HDefinition("Geometry2D", 'Вспомогательные геометрические функции'),

Geometry2D : {
Intersect: new HDefinition("?Array.<Point>:elem1,elem2", 'Вычислить точки пересечения двухмерных элементов'),
Compare: new HDefinition("?Boolean:elem1,elem2", 'Сравнить элементы'),
Distance: new HDefinition("?Number:elem1,elem2", 'Найти кратчайшее расстояние между элементами'),
Area: new HDefinition("?Number:contour", 'Найти площадь контура')
}

17 ноября 2014

Работа с пользовательскими свойствами

Object3 : {
UserPropCount: new HDefinition("Number", 'Количество пользовательских свойств'),
UserProperty: new HDefinition('Array.<Object>', 'Значение свойства по его имени или индексу'),
UserPropertyName: new HDefinition('Array.<String>', 'Названия свойств')
}

Новые элементы управления на панели свойств

ScriptProperty: {
NewColor: new HDefinition("?ScriptColorProperty:'Название'", 'Создать свойство типа цвет'),
NewSeparator: new HDefinition("?ScriptProperty", 'Создать разделитель')
}

ScriptColorProperty: {
Value: new HDefinition("Number")
},

----------------------------------------------------------------------------------------------------
29 сентября 2014

system.apiVersion = 90 -> Bazis9
system.apiVersion = 85 -> Bazis8

----------------------------------------------------------------------------------------------------
15 сентября 2014

Contour2D : {
Min: new HDefinition("Point", 'Левый нижний угол охватывающего прямоугольника'),
Max: new HDefinition("Point", 'Правый верхний угол охватывающего прямоугольника'),
AddEquidistant : new HDefinition("?undefined:contour,offset,false,false", 'Добавить эквидистанту контура. Последние 2 параметры отвечают за направление и скругление')
}

ScriptProperty: {
OnDeactivate : new HDefinition("Function", 'Обработчик деактивации свойства или меню'),
OnValueValidate : new HDefinition("Function", 'Проверка корректности значения'),
ValueValid: new HDefinition("Boolean", 'Флаг корректности введенного значения, выставляется обработчиком OnValueValidate'),
Validate: new HDefinition("?Boolean:", 'Проверить значение свойства и вложенных свойств')
}

----------------------------------------------------------------------------------------------------
2 сентября 2014

ScriptProperty: {
NameEditable: new HDefinition("Boolean", 'Разрешить редактирование имени (для создания таблиц)'),
NewSeparator: new HDefinition("?ScriptProperty", 'Создать разделитель')
}

----------------------------------------------------------------------------------------------------
9 августа 2014

Добавлены подменю в кнопки

InButton : {
NewSubMenu : new HDefinition('?InButton:"Меню"', 'Создать подменю'),
Combo: new Definition("Boolean", 'Отдельная стрелка для подменю')
},

Добавлены всплывающие меню и цвет фона для всех свойств. Созданы обработчики активации и изменения свойства.
Прежнее событие OnChange срабатывало не только при изменении самого параметра, но и при изменении дочерних свойств.
OnValueChange срабатывает только при изменении значения свойства.

ScriptProperty: {
BackColor: new HDefinition("Number", 'Цвет фона'),
PopupMenu: new HDefinition("ScriptMenu", 'Всплывающее меню'),
OnActivate : new HDefinition("Function", 'Обработчик активации свойства пользователем'),
OnValueChange : new HDefinition("Function", 'Обработчик изменения свойства')
Tag: new HDefinition("Number", 'Пользовательское число'),
}

Добавлено выпадающее меню:

ScriptProperty: {
DropDownMenu: new HDefinition("ScriptMenu", 'Выпадающее меню')
}

----------------------------------------------------------------------------------------------------
21 апреля 2014:

Добавлены свойства и методы:

ScriptMaterialProperty: {
Width: new HDefinition("Number", "Ширина листа"),
}

ScriptButtProperty: {
Thickness: new HDefinition("Number", "Толщина кромки"),
Width: new HDefinition("Number", "Ширина ленты"),
}

Contour2D : {
IsPointInside: new HDefinition("?Boolean:x,y", "Находится ли точка внутри контура?"),
IsInContour: new HDefinition("?Boolean:contour", "Находится ли контур внутри другого?"),
IsClosedContour: new HDefinition("?Boolean:", "Является ли контур замкнутым?"),
IsContourRectangle: new HDefinition("?Boolean:", "Является ли контур прямоугольным?"),
OrderContours: new HDefinition("?Boolean:true", "Упорядочить элементы контура в одном направлении")
}


----------------------------------------------------------------------------------------------------
6 февраля 2014

Реализовано подключение и вызов функций COM и OLE объектов

ScriptProperty : {
Expanded: new HDefinition("Boolean", 'Развернуты ли вложенные свойства')
}

Добавлен метод:
NewCOMObject: new HDefinition("?IDispatch:'CLSID'", 'Создать новый COM объект по его типу')
[свернуть]

Нажмите на изображение для увеличения
Название: Базис.jpg
Просмотров: 1498
Размер:	36.4 Кб
ID:	86248

Обратите внимание на полезные ответы в этой теме!


Последний раз редактировалось systland; 26.12.2017 в 11:52.. Причина: Добавил объявление.
Просмотров: 1394820
Ответить с цитированием Вверх
6 пользователя(ей) сказали cпасибо:
Старый 23.03.2020, 22:58   #1251
sergio1982
Местный
 
Регистрация: 01.09.2019
Сообщений: 424
Сказал(а) спасибо: 52
Поблагодарили 480 раз(а) в 147 сообщениях
Вес репутации: 195
sergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царстве
По умолчанию

Цитата:
Сообщение от Letos Посмотреть сообщение
Параметры, увы, передать не получится.
Спасибо , так как переменные видимы, то они и будут параметрами.
Теперь три простых скрипта для запуска с горячих клавиш:

Скрытый текст

Код:
var direction = "x";

system.include(путь);
И только один для редактирования.


Задумал подсчитать длину кромки, но не понимаю как получить длину контура той стороны, которая закромлена.
Код:
for (var i = 0; i < Model.SelectionCount; i++) {
    var obj = Model.Selections[i];
    var MtName = obj.MaterialName;
    var Contour = obj.Contour
    Butts = obj.Butts
    len = Butts.Count;
    for (var i2 = 0; i2 < len; ++i2) {
        var Butt = Butts[i2]
        bool = confirm(MtName
         + '  \n  ' + i2
         + '  \n  ' + Butts.Count
         + '  \n  ' + Butt.Sign
         + '  \n  ' + Contour.Height
         + '  \n  ' + Contour.Count );
         if (!bool)
            throw('Script Exit');
     }
}
[свернуть]

Последний раз редактировалось sergio1982; 24.03.2020 в 21:40.
sergio1982 вне форума   Ответить с цитированием Вверх
Старый 24.03.2020, 11:54   #1252
Letos
Консультант
 
Регистрация: 28.06.2017
Сообщений: 555
Сказал(а) спасибо: 127
Поблагодарили 1,032 раз(а) в 366 сообщениях
Вес репутации: 345
Letos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордится
По умолчанию

Цитата:
Сообщение от sergio1982 Посмотреть сообщение
Задумал подсчитать длину кромки, но не понимаю как получить длину контура той стороны, которая закромлена.
Написал функцию, которая возвращает длину кромки имея кромку и контур панели (там же закомментарен пример пользования):
PHP код:
/**
 * Получить длину кромки
 * @param {PanelButt} butt кромка панели
 * @param {Contour2D} contour контур панели
 */
function GetButtLength(buttcontour){
    var 
index butt.ElemIndex;
    var 
elem contour.Objects[index];
    return 
elem.ObjLength();
}

// Код вывода длины первой кромки выделенной панели
// var p = Model.Selected.AsPanel;
// alert(GetButtLength(p.Butts[0], p.Contour)); 
Letos вне форума   Ответить с цитированием Вверх
2 пользователя(ей) сказали cпасибо:
PravCom (21.03.2022), sergio1982 (24.03.2020)
Старый 24.03.2020, 12:31   #1253
sergio1982
Местный
 
Регистрация: 01.09.2019
Сообщений: 424
Сказал(а) спасибо: 52
Поблагодарили 480 раз(а) в 147 сообщениях
Вес репутации: 195
sergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царстве
По умолчанию

Спасибо большое, супер!

Цитата:
Сообщение от Letos Посмотреть сообщение
Путём перебора всех доступных методов и подбора параметров к методу, подходящему по имени. Иначе никак, при отсутствии документации.
А как Вы находите все доступные методы?
Такое ощущение что в справке и половины нет.
sergio1982 вне форума   Ответить с цитированием Вверх
Старый 24.03.2020, 14:57   #1254
Letos
Консультант
 
Регистрация: 28.06.2017
Сообщений: 555
Сказал(а) спасибо: 127
Поблагодарили 1,032 раз(а) в 366 сообщениях
Вес репутации: 345
Letos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордится
По умолчанию

Цитата:
Сообщение от sergio1982 Посмотреть сообщение
Спасибо большое, супер!


А как Вы находите все доступные методы?
Такое ощущение что в справке и половины нет.
Писал для себя скрипт по исследованию доступных свойств.
Чтобы работал в 8 версии, пришлось его перепилить слегка. Проверил в демке 8 - с глубиной вложенности больше 2 ошибки начинают сыпаться (не разбирался в каком объекте, если исследовать не глобальный объект, а какой-то отдельный - например Model, то допускаю, что вложенность можно и больше поставить).
Скрипт делает следующее - исследует свойства определённого объекта (если свойство является объектом, то и его свойства тоже - до указанного предела вложенности) и пишет результат в файл inspector.log.
При свойства с типом, который уже "разобран", скрипт в тип свойства пишет "circular structure <Тип свойства>", чтобы не зацикливаться.

Код скрипта

PHP код:
"use strict";
function 
MultiplyString(strcount) {
    if (
typeof str.repeat == 'function')
        return 
str.repeat(count);
    else{
        var 
result '';
        for (var 
0counti++){
            
result += str;
        }
        return 
result;
    }
}
var 
Inspector = (function () {
    function 
Inspector() {
        
/**
         * Массив исследованных объектов
         * (чтобы избежать рекурснивного исследования и зацикливвания)
         */
        
this.existedObjects = [];
    }
    
/**
     * Исследовать свойства и методы объекта
     * @param obj Объект исследования
     * @param depth Глубина исследования
     * (кол-во вложенных исследований)
     * @param excludeProps свойства, исключаемые из исследования
     * @param tabValue Начальная табуляция (кол-во пробелов) в логе
     */
    
Inspector.prototype.Inspect = function (objdepthexcludePropstabValue) {
        if (
typeof depth == 'number' && depth == 0) {
            return 
''//`\n${MultiplyString(' ', tabValue)}max depth reached`;
        
}
        
this.existedObjects.push(obj);
        var 
result '';
        if (!
tabValue)
            
tabValue 2;
        try {
            for (var 
key in obj) {
                if (
excludeProps.indexOf(key) >= 0) {
                    continue;
                }
                var 
value obj[key];
                
result += '\n' MultiplyString(' 'tabValue) + '► ' key;
                if (
value instanceof Object) {
                    try {
                        if (
this.existedObjects.indexOf(value) > -1) {
                            
result += ": circular structure " value.constructor.name;
                        }
                        else {
                            if (
value.constructor)
                                
result += ": " + (value.constructor.name || 'object');
                            
result += this.Inspect(valuedepth depth depthexcludePropstabValue 2);
                        }
                    }
                    catch (
e) {
                        
result += ": error: " e;
                    }
                }
                else {
                    
result += ": " typeof value;
                }
            }
        }
        catch (
e) {
            
result e;
        }
        return 
result;
    };
    
/**
     * Подготовка к исследованию объекта
     */
    
Inspector.prototype.Prepare = function () {
        
this.existedObjects = [];
    };
    return 
Inspector;
}());
var 
inspector = new Inspector();
inspector.Prepare();
// исследуем объект global
var data inspector.Inspect(this2, [
    
'PopupMenu',
    
'DropDownMenu'
]);
//require('fs').writeFileSync('inspector.log', data);
system.writeTextFile('inspector.log'data);
if (
typeof console != 'undefined')
    
console.log('done');
else
    
system.log('done'); 
[свернуть]
Letos вне форума   Ответить с цитированием Вверх
Пользователь сказал cпасибо:
sergio1982 (24.03.2020)
Старый 24.03.2020, 15:43   #1255
sergio1982
Местный
 
Регистрация: 01.09.2019
Сообщений: 424
Сказал(а) спасибо: 52
Поблагодарили 480 раз(а) в 147 сообщениях
Вес репутации: 195
sergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царстве
По умолчанию

Очень интересно, спасибо.
А в логе всё что есть в апи, или как то нужно настроить для получения ещё чего то?
Вроде нашёл. А что указывать в "Объект исследования", есть какой то пример кроме global?
/**
* Исследовать свойства и методы объекта
* @param obj Объект исследования
* @param depth Глубина исследования
* (кол-во вложенных исследований)
* @param excludeProps свойства, исключаемые из исследования
* @param tabValue Начальная табуляция (кол-во пробелов) в логе
*/


Написал расчёт кромки и площади заготовок для модели.
В синтаксисе JS теряюсь, как проще переделать чтобы опционально можно было брать только с выделенных панелей?
Т.е. forEachPanel "подменить" на Selections с перебором только панелей.
И как из данных создать и отобразить спецификацию (ldw)?

Скрытый текст

Код:
Materials = [];
MaterialsSquare = [];
Edges = [];
EdgesLength = [];

Model.forEachPanel(
    function(Obj) {
        MtName = Obj.MaterialName.replace("\r", " арт. ");
        Butts = Obj.Butts;
        Contour = Obj.Contour;
        Index = Materials.indexOf(MtName);

        if (Index < 0) {
            Index = Materials.push(MtName) - 1;
            MaterialsSquare[Index] = 0;
        }
        MaterialsSquare[Index] += (Contour.Height * Contour.Width / 1000000);

        for (var i = 0; i < Butts.Count; ++i) {
            Sign = Butts[i].Material.replace("\r", " арт. ");
            Index = Edges.indexOf(Sign);
            if (Index < 0) {
                Index = Edges.push(Sign) - 1;
                EdgesLength[Index] = 0;
            }
            Length = GetButtLength(Butts[i], Contour);
            EdgesLength[Index] += Length;
        }
    }
);

function GetButtLength(butt, contour){
    var index = butt.ElemIndex;
    var elem = contour.Objects[index];
    return elem.ObjLength();
};


var string = 'Кромка м:\n\n';

for (var i = 0; i < Edges.length; ++i) {
    string += Edges[i] + '  \t  = ' + (EdgesLength[i] / 1000).toFixed(1)+ '\n'
};

string += '\n\nПанели кв/м:\n\n';

for (var i = 0; i < Materials.length; ++i) {
    string += Materials[i] + '  \t  = ' + MaterialsSquare[i].toFixed(1) + '\n'
};

alert(string);
[свернуть]

Последний раз редактировалось sergio1982; 24.03.2020 в 21:40.
sergio1982 вне форума   Ответить с цитированием Вверх
Старый 24.03.2020, 16:27   #1256
Letos
Консультант
 
Регистрация: 28.06.2017
Сообщений: 555
Сказал(а) спасибо: 127
Поблагодарили 1,032 раз(а) в 366 сообщениях
Вес репутации: 345
Letos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордится
По умолчанию

Цитата:
Сообщение от sergio1982 Посмотреть сообщение
А в логе всё что есть в апи, или как то нужно настроить для получения ещё чего то?
Вроде нашёл. А что указывать в "Объект исследования", есть какой то пример кроме global?
в лог должно попасть всё, что доступно из скрипта.
"Объектом исследования" может быть любой интересующий вас объект в скрипте (Action, Model, Action.Control, Model.Selected и т.д.). Глубина исследования определяет уровень вложенности при исследовании (на большой вложенности может выскочить "out of memory").

Цитата:
Сообщение от sergio1982 Посмотреть сообщение
Написал расчёт кромки и площади заготовок для модели.
В синтаксисе JS теряюсь, как проще переделать чтобы опционально можно было брать только с выделенных панелей?
Т.е. forEachPanel "подменить" на Selections с перебором только панелей.
PHP код:
for (var 0Model.SelectionCounti++){
    var 
obj Model.Selections[i];
    
// Действия с объектом

Letos вне форума   Ответить с цитированием Вверх
Старый 24.03.2020, 17:08   #1257
sergio1982
Местный
 
Регистрация: 01.09.2019
Сообщений: 424
Сказал(а) спасибо: 52
Поблагодарили 480 раз(а) в 147 сообщениях
Вес репутации: 195
sergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царстве
По умолчанию

Цитата:
Сообщение от Letos Посмотреть сообщение
код:
Мне как то function(Obj) вынести из forEachPanel?
В for для Selections надо ещё как то проверять что это панель.
sergio1982 вне форума   Ответить с цитированием Вверх
Старый 24.03.2020, 17:58   #1258
Letos
Консультант
 
Регистрация: 28.06.2017
Сообщений: 555
Сказал(а) спасибо: 127
Поблагодарили 1,032 раз(а) в 366 сообщениях
Вес репутации: 345
Letos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордится
По умолчанию

Цитата:
Сообщение от sergio1982 Посмотреть сообщение
Мне как то function(Obj) вынести из forEachPanel?
В for для Selections надо ещё как то проверять что это панель.
Надо функцию вынести в основное тело скрипта и назвать её как-то, например:
PHP код:
function CheckObject(obj){
    
//код функции
}
//Вызов функции будет выглядеть так:
Model.forEachPanel(CheckObject
Проверить, является ли объект панелью можно так:
PHP код:
if (obj.AsPanel){
    
// obj - панель

Letos вне форума   Ответить с цитированием Вверх
Старый 24.03.2020, 19:06   #1259
sergio1982
Местный
 
Регистрация: 01.09.2019
Сообщений: 424
Сказал(а) спасибо: 52
Поблагодарили 480 раз(а) в 147 сообщениях
Вес репутации: 195
sergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царстве
По умолчанию

Получилось. Только почему то не работает в режиме выделенных, когда выделен блок или по Ctrl+A.
Видимо надо определить что это блок, и далее перебрать его, но в нём могут оказаться ещё вложены блоки. Рекурсию на JS я сам точно не сделаю.


Скрытый текст

Код:
var Selected = 1;    // инфо только о выделенных

Materials = [];
MaterialsSquare = [];
Edges = [];
EdgesLength = [];


if (!Selected)
    Model.forEachPanel(CheckObject)
else {
    for (var i = 0; i < Model.SelectionCount; i++){
        var obj = Model.Selections[i];
        if (obj.AsPanel){
            CheckObject(obj);
        }
    }
}

function CheckObject(Obj) {
    MtName = Obj.MaterialName.replace("\r", " арт. ");
    Butts = Obj.Butts;
    Contour = Obj.Contour;
    Index = Materials.indexOf(MtName);

    if (Index < 0) {
        Index = Materials.push(MtName) - 1;
        MaterialsSquare[Index] = 0;
    }
    MaterialsSquare[Index] +=
    (Contour.Height * Contour.Width / 1000000);

    for (var i = 0; i < Butts.Count; ++i) {
        Sign = Butts[i].Material.replace("\r", " арт. ");
        Index = Edges.indexOf(Sign);
        if (Index < 0) {
            Index = Edges.push(Sign) - 1;
            EdgesLength[Index] = 0;
        }
        Length = GetButtLength(Butts[i], Contour);
        EdgesLength[Index] += Length;
    }
}

function GetButtLength(butt, contour){
    var index = butt.ElemIndex;
    var elem = contour.Objects[index];
    return elem.ObjLength();
};


var string = 'Кромка м:\n\n';

for (var i = 0; i < Edges.length; ++i) {
    string += Edges[i] + '  \t  = '
     + (EdgesLength[i] / 1000).toFixed(1)+ '\n'
};

string += '\n\nПанели кв/м:\n\n';

for (var i = 0; i < Materials.length; ++i) {
    string += Materials[i] + '  \t  = '
     + MaterialsSquare[i].toFixed(1) + '\n'
};

alert(string);
[свернуть]


Ещё такой вопрос, в Базисе ужасная вещь, что у кромлёной панели нельзя изменить размеры в панели свойств. Есть ли какая таблетка от этого?

Последний раз редактировалось sergio1982; 24.03.2020 в 22:48.
sergio1982 вне форума   Ответить с цитированием Вверх
Старый 24.03.2020, 21:33   #1260
sergio1982
Местный
 
Регистрация: 01.09.2019
Сообщений: 424
Сказал(а) спасибо: 52
Поблагодарили 480 раз(а) в 147 сообщениях
Вес репутации: 195
sergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царстве
По умолчанию

Цитата:
Рекурсию на JS я сам точно не сделаю.
Получилось, вроде правильно считает. Хорошо если подскажете что в коде можно упростить.

Скрытый текст

Код:
// расчёт кромки и площади заготовок

var Selected = 0 // true - инфо только о выделенных

Materials = [];
MaterialsSquare = [];
Edges = [];
EdgesLength = [];


if (!Selected)
    Model.forEachPanel(CheckObject)
else {
    for (var i = 0; i < Model.SelectionCount; i++) {
        var obj = Model.Selections[i];
        if (obj.AsPanel)
            CheckObject(obj);
        else
            Panels(obj);
    }
}

function Panels(obj) {
    for (var i = 0; i < obj.Count; i++) {
        pan = obj.Objects[i]
        if (pan.List)
            Panels(pan);
        if (pan.AsPanel)
            CheckObject(pan);
    }
};

function CheckObject(Obj) {
    MtName = Obj.MaterialName.replace("\r", " арт. ");
    Butts = Obj.Butts;
    Contour = Obj.Contour;
    Index = Materials.indexOf(MtName);

    if (Index < 0) {
        Index = Materials.push(MtName) - 1;
        MaterialsSquare[Index] = 0;
    }
    MaterialsSquare[Index] +=
        (Contour.Height * Contour.Width / 1000000);

    for (var i = 0; i < Butts.Count; ++i) {
        Sign = Butts[i].Material.replace("\r", " арт. ");
        Index = Edges.indexOf(Sign);
        if (Index < 0) {
            Index = Edges.push(Sign) - 1;
            EdgesLength[Index] = 0;
        }
        Length = GetButtLength(Butts[i], Contour);
        EdgesLength[Index] += Length;
    }
}

function GetButtLength(butt, contour) {
    var index = butt.ElemIndex;
    var elem = contour.Objects[index];
    return elem.ObjLength();
};

var string = 'Кромка м:\n\n';

for (var i = 0; i < Edges.length; ++i) {
    string += Edges[i] + '  \t  = ' + (EdgesLength[i] / 1000).toFixed(1) + '\n'
};

string += '\n\nПанели кв/м:\n\n';

for (var i = 0; i < Materials.length; ++i) {
    string += Materials[i] + '  \t  = ' + MaterialsSquare[i].toFixed(1) + '\n'
};

if (!Edges.length && !Materials.length)
    if (Selected)
        alert('Нет выделенных панелей!');
    else
        alert('Панели не обнаружены!');
else
    alert(string);
[свернуть]
sergio1982 вне форума   Ответить с цитированием Вверх
Ответ

Нижняя навигация
Вернуться   Форум профессиональных мебельщиков PROMEBELclub > Программы для мебельщиков > Программы для конструирования и дизайна мебели > Система БАЗИС > Базис-мебельщик. Скрипты


Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
БАЗИС 9 - Скрипты Igor_482 Базис-мебельщик. Скрипты 1442 04.04.2024 11:28
БАЗИС 9 nayrogi Базис-мебельщик 9 785 01.10.2022 23:13
БАЗИС-ЧПУ 8 chingisnah Базис-мебельщик 8 119 21.12.2017 22:04
Заявки на скрипты dr_john Система БАЗИС 37 01.03.2016 10:36
Базис-7,"Народный Базис"и Windows-8 sergeyzak18 "НАРОДНЫЙ" базис 23 16.01.2014 00:37


Текущее время: 18:53. Часовой пояс GMT +3.


Powered by vBulletin® Version 3.8.12 by vBS
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
© 2007-2023 PROMEBEL

џндекс.Њетрика