БАЗИС 8 - Скрипты

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

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 объект по его типу')

[свернуть]

[Letos]

Сообщение от Максим Геннадьевич

Подскажите, есть функция построения дуги по двум точкам и радиусу?

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

UPD: Посмотрел Базисную функцию - там надо выбрать ещё и с какой стороны дуга будет находиться. И если брать за основу эту функцию, то радиус указывать не надо - он не может быть отличным от половины расстояния между указанными точками

[sannykSV]

UPD: Посмотрел Базисную функцию - там надо выбрать ещё и с какой стороны дуга будет находиться. И если брать за основу эту функцию, то радиус указывать не надо - он не может быть отличным от половины расстояния между указанными точками[/QUOTE]

Радиус может быль любой, но не меньше половины расстояния между точками.
Задается от руки на клавиатуре.

[Максим Геннадьевич]

Сообщение от Letos

Только не понятно, какие две точки вы собираетесь указывать, чтобы вкупе с радиусом можно было однозначно построить дугу.

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

Угол и радиус

pan = AddPanel(600, 600);
var sf = 0;
var l = 402; //гипотенуза
var a = 45; //угол
var x1 = pan.GMin.x;
var y1 = pan.GMin.y;
var y2 = y1 + Math.round(l * Math.cos(Math.PI/180*a));//сторона по гипотенузе
var x2 = x1 + Math.round(l * Math.sin(Math.PI/180*a));//сторона по гипотенузе
var x3 = pan.GMax.x;
var y3 = pan.GMax.y;
var cd = pan.Contour;
var cont = NewContour();
var r = 300; //радиус
var hs = r - Math.sqrt((Math.pow(r,2))-(Math.pow(l,2)/4));//высота сегмента
var lt = Math.sqrt(Math.pow(hs,2)/2);//сторона по гипотенузе *высота сегмента*
//ищем среднюю точку дуги
var x4 = x1 + (x2 - x1)/2;
var y4 = y1 + (y2 - y1)/2;

//под углом
/* cont.AddLine(x1,y1,x1,y2+sf);
cont.AddLine(x1,y2+sf,x2+sf,y1);
cont.AddLine(x2+sf,y1,x1,y1);
*/
// с радиусом если (- lt) дуга в другую сторону
x4 = x4 + lt;
y4 = y4 + lt;
cont.AddLine(x1,y1,x1,y2);
cont.AddArc3(x1, y2 ,x4, y4,x2, y1);
cont.AddLine(x2,y1,x1,y1);

cd.Subtraction(cont);

[свернуть]

Если есть, что добавить, готов выслушать.

[Максим Геннадьевич]

Существует скрипт или направление по построению гнутой панели или варианты замены. Спасибо

[Letos]

Сообщение от Максим Геннадьевич

Существует скрипт или направление по построению гнутой панели или варианты замены. Спасибо

Вот вариант построения гнутой панели:

// Свойство, для задания материала на пластик панели
var mat = Action.Properties.NewMaterial('Материал');
var panel = AddPanel(0, 0);
/** Траектория гнутой панели */
var c = NewContour();
c.Clear();
c.AddArc({x: 0, y: 0}, {x: 300, y: 0}, {x: 150, y: 0});
// Задаём траекторию
panel.BentContour = c;
// Указываем, что панель гнутая
panel.Bent = true;
panel.Contour.Clear();
// Задаём контур панели.
// Ширина равна длине траектории гнутой панели
panel.Contour.AddRectangle(0, 0, c.ObjLength(), 800)
// Второй слой панели
panel.AddPlastic(mat, true);
// направление выдавливания
panel.BentDirection = 1;
panel.Build();

[roollz]

Всем привет! Стала перед мной задача присвоить наименованиям панелей их позицию и наоборот, позициям наименование. Чувствую что можно это сделать скриптом, но к сожалению не дается мне это дело. Пожалуйста, помогите добрые люди Думаю что такой скрипт для многих будет полезным. Как вариант использования прямо на сборочном чертеже вместо позиций можно ставить надписи например "Боковина" А еще круто было бы чтобы это скрипт умел и объединять позиции и наименования.

[Letos]

Сообщение от roollz

Всем привет! Стала перед мной задача присвоить наименованиям панелей их позицию и наоборот, позициям наименование. Чувствую что можно это сделать скриптом, но к сожалению не дается мне это дело. Пожалуйста, помогите добрые люди Думаю что такой скрипт для многих будет полезным. Как вариант использования прямо на сборочном чертеже вместо позиций можно ставить надписи например "Боковина" А еще круто было бы чтобы это скрипт умел и объединять позиции и наименования.

То есть, нужно 3 варианта:
1. Дублировать наименование в позицию.
2. Дублировать позицию в наименование.
3. Объединить наименование и позицию и записать полученное и туда и туда.
Я вас верно понял?

[roollz]

Сообщение от Letos

То есть, нужно 3 варианта:
1. Дублировать наименование в позицию.
2. Дублировать позицию в наименование.
3. Объединить наименование и позицию и записать полученное и туда и туда.
Я вас верно понял?

Да, Вы все правильно поняли.

[Letos]

Сообщение от roollz

задача присвоить наименованиям панелей их позицию и наоборот, позициям наименование. А еще круто было бы чтобы это скрипт умел и объединять позиции и наименования.

Вот вариант решения задачи:

// Разделитель между наименованием и позицией
const separator = '';
// Функция обхода всех объектов в блоке и вызова переданной функции для их
// обработки
function forEachInList(list, func) {
    if (!func)
        return;
    for (var i = 0; i < list.Count; i++) {
        var obj = list.Objects[i];
        func(obj);
        if (obj.List) {
            forEachInList(obj.AsList(), func);
        }
    }
}
// имя в поз
function NameToPos(obj){
    obj.ArtPos = obj.Name;
}
// поз в имя
function PosToName(obj){
    obj.Name = obj.ArtPos;
}
// имя и поз
function NameAndPos(obj){
    var value = obj.Name + separator + obj.ArtPos;
    obj.Name = value;
    obj.ArtPos = value;
}
// вызов продолжения скрипта после того, как весь код отработает.
Action.Continue();
// Комбобокс для выбора типа выполнения скрипта
var combo = Action.Properties.NewCombo('Тип',
    'Наименование в поз.\nПоз. в наименование\nОбъединить наименование и поз.');
// Кнопка запуска основного кода скрипта
Action.Properties.NewButton('Применить').OnClick = function () {
    // переменная для хранения функции, которая будет обрабатывать объекты
    var func;
    // Запись в историю, что скрипт собирается менять модель и все объекты, 
    // находящиеся в ней
    Undo.RecursiveChanging(Model);
    // В зависимости от выбранного типа назначаем нужную функцию для обработки
    // объектов
    switch(combo.ItemIndex){
        case 0: 
            func = NameToPos;
            break;
        case 1:
            func = PosToName;
            break;
        case 2:
            func = NameAndPos;
            break;
    }
    // запускаем обход всех объектов в модели с нужной функцией обработки
    forEachInList(Model, func);
    // Вызов завершения скрипта
    Action.Finish();
}

Ещё решил, что было бы неплохо иметь разделитель между позицией, но сделал его по умолчанию пустым. Если нужен разделитель, в строке "const separator = '';" напишите необходимый разделитель между одинарными кавычками.

[roollz]

Сообщение от Letos

Вот вариант решения задачи:
Ещё решил, что было бы неплохо иметь разделитель между позицией, но сделал его по умолчанию пустым. Если нужен разделитель, в строке "const separator = '';" напишите необходимый разделитель между одинарными кавычками.

Круто! Спасибо огромное! А можно еще попросить Вас сделать выбор в свойствах, "применять только к выделенным элементам" " применять только к выделенным блокам" (чтобы оперировать только с позициями блоков, не затрагивая элементы внутри блоков)".