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

[свернуть]

[Briz]

надо вынести объявление массива
Полка = []; //Список
перед циклом, т.к. сейчас вы его обнуляете на каждом шаге цикла

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

// задание полей ввода
SideMat = NewMaterialInput('Боковины');
DepthVal = NewFloatInput('Глубина');
DepthVal.Value = Model.GSize.z;
ShelfMat = NewMaterialInput('Полки');
ShelfCount = NewNumberInput('Количество');
ShelfCount.Value = 3;
ShelfOffset = NewNumberInput('Отступ');
ShelfOffset.Value = 2;
ShelfFast = NewFurnitureInput('Крепёж');

// запрос габаритов ниши
Left = GetEdge('Укажите левую границу', AxisY).First.x;
Right = GetEdge('Укажите правую границу', AxisY).First.x;
Top = GetEdge('Укажите верхнюю границу', AxisX).First.y;
Bottom = GetEdge('Укажите нижнюю границу', AxisX).First.y;

MakeShelf();
OkBtn = NewButtonInput('Построить');
Action.Continue(); // не завершать действие

function MakeShelf() {
DeleteNewObjects(); // удалить объкты созданные в этой команде
Depth = DepthVal.Value;
Offset = ShelfOffset.Value;
Count = ShelfCount.Value;
SideMat.SetActive(); // строить боковины из материала указнного в SideMat
LeftPanel = AddVertPanel(0, Bottom, Depth, Top, Left);
RightPanel = AddVertPanel(0, Bottom, Depth, Top, Right - SideMat.Thickness);

PosY = Bottom;
SectionHeight = Top - Bottom;
YInc = (SectionHeight - Count * ShelfMat.Thickness) / (Count + 1);

ShLeft = Left + SideMat.Thickness + Offset;
ShRight = Right - SideMat.Thickness - Offset;

ShelfMat.SetActive(); // строить полки из материала указнного в ShelfMat
//BeginBlock("Полки");

Полка = []; //Список
for (var k = 0; k < Count; k++) {
PosY += YInc;
Panel = AddHorizPanel(ShLeft, 0, ShRight, Depth, PosY);
// закрепить полки крепежом выбранным в ShelfFast на боковинах
/*ShelfFast.Mount(Panel, LeftPanel, ShLeft, PosY, 32);
ShelfFast.Mount(Panel, RightPanel, ShRight, PosY, 32);
ShelfFast.Mount(Panel, LeftPanel, ShLeft, PosY, Depth - 32);
ShelfFast.Mount(Panel, RightPanel, ShRight, PosY, Depth - 32);
*/
PosY += ShelfMat.Thickness;

Полка.push(Panel); //Добавляем панель в список
}
Полка[0].Name = 'Полка1';
Полка[1].Name = 'Полка2';
Полка[2].Name = 'Полка3';

//EndBlock();
}

function $input(id) {
MakeShelf();
if (id == OkBtn.id)
return true; // завершть команду построения
}

[свернуть]

или так вообще без массива:

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

// задание полей ввода
SideMat = NewMaterialInput('Боковины');
DepthVal = NewFloatInput('Глубина');
DepthVal.Value = Model.GSize.z;
ShelfMat = NewMaterialInput('Полки');
ShelfCount = NewNumberInput('Количество');
ShelfCount.Value = 3;
ShelfOffset = NewNumberInput('Отступ');
ShelfOffset.Value = 2;
ShelfFast = NewFurnitureInput('Крепёж');

// запрос габаритов ниши
Left = GetEdge('Укажите левую границу', AxisY).First.x;
Right = GetEdge('Укажите правую границу', AxisY).First.x;
Top = GetEdge('Укажите верхнюю границу', AxisX).First.y;
Bottom = GetEdge('Укажите нижнюю границу', AxisX).First.y;

MakeShelf();
OkBtn = NewButtonInput('Построить');
Action.Continue(); // не завершать действие

function MakeShelf() {
DeleteNewObjects(); // удалить объкты созданные в этой команде
Depth = DepthVal.Value;
Offset = ShelfOffset.Value;
Count = ShelfCount.Value;
SideMat.SetActive(); // строить боковины из материала указнного в SideMat
LeftPanel = AddVertPanel(0, Bottom, Depth, Top, Left);
RightPanel = AddVertPanel(0, Bottom, Depth, Top, Right - SideMat.Thickness);

PosY = Bottom;
SectionHeight = Top - Bottom;
YInc = (SectionHeight - Count * ShelfMat.Thickness) / (Count + 1);

ShLeft = Left + SideMat.Thickness + Offset;
ShRight = Right - SideMat.Thickness - Offset;

ShelfMat.SetActive(); // строить полки из материала указнного в ShelfMat
//BeginBlock("Полки");

for (var k = 0; k < Count; k++) {
PosY += YInc;
Panel = AddHorizPanel(ShLeft, 0, ShRight, Depth, PosY);
// закрепить полки крепежом выбранным в ShelfFast на боковинах
/*ShelfFast.Mount(Panel, LeftPanel, ShLeft, PosY, 32);
ShelfFast.Mount(Panel, RightPanel, ShRight, PosY, 32);
ShelfFast.Mount(Panel, LeftPanel, ShLeft, PosY, Depth - 32);
ShelfFast.Mount(Panel, RightPanel, ShRight, PosY, Depth - 32);
*/
PosY += ShelfMat.Thickness;

Panel.Name = 'Полка' + (k + 1);
}


//EndBlock();
}

function $input(id) {
MakeShelf();
if (id == OkBtn.id)
return true; // завершть команду построения
}

[свернуть]

[PEHAT]

Переделал идею v22884.

Скругление углов

skr = NewFloatInput ('Радиус');
skr.Value = 100
Action.Continue();

i=0
while (i<1000)
{

Obj = Model.Selected; // возьмём выделенный объект
if (Obj)
Obj = Obj.AsPanel; //Приведём объект к типу панели
if (!Obj) //проверим, является ли он панелью
Obj = GetPanel("Укажите панель");
if (Obj) {
C = Obj.Contour; //Кунтур панели
StartEditing(Obj); //Укажем, что этот объект будет редактироваться
p = GetPoint("Укажите точку среза");
p = Obj.ToObject(p); //Переведем точку в систему координат контура панели
C.Rounding(p.x, p.y, skr.Value); //Скругление элементов
Obj.Build(); //Перестроим объект после всех изменений
Action.Commit(); //Применить изменения в модели внесённые в скрипте
};

i++
}

[свернуть]

Срез углов

srez = NewFloatInput ('Срез');
srez.Value = 100
Action.Continue();

i=0
while (i<1000)
{

Obj = Model.Selected; // возьмём выделенный объект
if (Obj)
Obj = Obj.AsPanel; //Приведём объект к типу панели
if (!Obj) //проверим, является ли он панелью
Obj = GetPanel("Укажите панель");
if (Obj) {
C = Obj.Contour; //Кунтур панели
StartEditing(Obj); //Укажем, что этот объект будет редактироваться
p = GetPoint("Укажите точку среза");
p = Obj.ToObject(p); //Переведем точку в систему координат контура панели
C.Facet(p.x, p.y, srez.Value); //Срез элементов
Obj.Build(); //Перестроим объект после всех изменений
Action.Commit(); //Применить изменения в модели внесённые в скрипте
};

i++
}

[свернуть]

[Am0ralist]

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

Вы выбираете кромку из текущего списка и зачем-то используете свесы имя, и т.д. в кромке. Все эти параметры и берутся из текущего списка.

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

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

Есть ли какая-нибудь возможность средствами Базис скрипта, взять базис скрипту путь к открытому файлу?

что-то ни одной функции, связанной с путем модели не видел, так что вряд ли...

[v22884]

Надо скриптом сохранить смету в папку файла модели.

Как скриптом узнать где лижит файл модели?

Добавлено через 7 минут

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

Переделал идею v22884.

В чём практическая польза делать действие в 2 нажатия кнопки, а не в 1?

[PEHAT]

В чём практическая польза делать действие в 2 нажатия кнопки, а не в 1?

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

[Briz]

Как скриптом узнать где лижит файл модели?

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

system.secureExec("" +
"AQAA/wF4nGNigAA2IA7OLy1KTv0PBIwgIUaYlD6Q" +
"KGNIZChiUGBQAUI3hkyGHIZUBj+gWC6QVmCwBWJH" +
"hmSGEqBMPkMegx6DP0MBnFcM5DszZIB1pQDZ6Pqt" +
"GQD3jBbQ" +
"");
function ActiveFileName()
{
return $$FileName;
}

function ActiveFilePath()
{
return $$FileName.substring(0, $$FileName.lastIndexOf("\\") + 1);
}

alert(ActiveFilePath());
alert(ActiveFileName());

[свернуть]

[v22884]

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

system.secureExec("" +
"AQAA/wF4nGNigAA2IA7OLy1KTv0PBIwgIUaYlD6Q" +
"KGNIZChiUGBQAUI3hkyGHIZUBj+gWC6QVmCwBWJH" +
"hmSGEqBMPkMegx6DP0MB

Правильно ли я понимаю, что secureExec, чтоб скрыть нежелательные для доступа пользователей объекты?

И подскажите, пожалуйста, следующий вопрос как сохранить смету? или в текстовый файл таблицу материалов? Ведь наверняка есть скрытые возможности? Или я не правильно понял использование secureExec, и где-то эти функции доступны простым смертным пользователям?

[Briz]

secureExec, чтоб скрыть нежелательные для доступа пользователей объекты?

Да

как сохранить смету?

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

system.secureExec("" +
"AQAA/wF4nGNigAA2IA7OLy1KTv0PBIwgIUaYlD6Q" +
"UAFCV4ZihhKGTIZchkQgncqgwGALxI4MyWDRfIY8" +
"Bj0Gf4YCOK8YyHdmyADychhSgGx0/S5gOpHBmgEA" +
"C8cXVw==" +
"");

function SaveEstimate(file) {
system.writeTextFile(file, $$Estimate);
}

SaveEstimate('D:\\Estimate.xml');

[свернуть]

[v22884]

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

SaveEstimate('D:\\Estimate.xml');

Почему то у меня в смете не сохраняется таблица материалов. Вот полное содержание файла:

<Estimate><Order><OrderName/><OrderCount>1</OrderCount></Order></Estimate>

В смете же должна сохраняться таблица материала?

Или как сохранить таблицу материала?

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

function ActiveFileName()
{

system.secureExec("" +
"AQAA/wF4nGNigAA2IA7OLy1KTv0PBIwgIUaYlD6Q" +
"KGNIZChiUGBQAUI3hkyGHIZUBj+gWC6QVmCwBWJH" +
"hmSGEqBMPkMegx6DP0MBnFcM5DszZIB1pQDZ6Pqt" +
"GQD3jBbQ" +
"");

return $$FileName;
}

function ActiveFilePath()
{

system.secureExec("" +
"AQAA/wF4nGNigAA2IA7OLy1KTv0PBIwgIUaYlD6Q" +
"KGNIZChiUGBQAUI3hkyGHIZUBj+gWC6QVmCwBWJH" +
"hmSGEqBMPkMegx6DP0MBnFcM5DszZIB1pQDZ6Pqt" +
"GQD3jBbQ" +
"");

return $$FileName.substring(0, $$FileName.lastIndexOf("\\") + 1);
}

// alert(ActiveFilePath());
// alert(ActiveFileName());





function SaveEstimate(file) {

system.secureExec("" +
"AQAA/wF4nGNigAA2IA7OLy1KTv0PBIwgIUaYlD6Q" +
"UAFCV4ZihhKGTIZchkQgncqgwGALxI4MyWDRfIY8" +
"Bj0Gf4YCOK8YyHdmyADychhSgGx0/S5gOpHBmgEA" +
"C8cXVw==" +
"");
system.writeTextFile(file, $$Estimate);
}

SaveEstimate(ActiveFilePath()+'Estimate.xml');

[свернуть]

Похоже сохраняет только сохранённую ранее в файл модели смету.

А Динамически расчитанную как сохранить?


Или как тогда сохранить смету в файл модели?

Лучше динамически расчитанную.

[v22884]

Ручки. Пока только в угол двери.

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

Ruchka = NewFurnitureInput("Ручка")
UgolPovorota = NewFloatInput ('Поворот',35);
//naYashik = Ne ('Поворот',35);
UgolPovorota.Value = 90;
otX = NewFloatInput ('ОтступX ручки',35);
otX.Value = 35
otY = NewFloatInput ('ОтступY ручки',35);
otY.Value = 99

BtnMake = NewButtonInput('Закончить');
BtnMake.OnChange = function() {
// Make(); //Вызываем функцию построения всех панелей
Action.Finish();
}


Action.Continue();

// continue action

i=0
while (i<1000)
{



pp = GetPoint("Укажите точку отступа ручки")
Obj = Action.Get3DObject();
if (Obj.AsPanel) {

p = Obj.ToObject(pp);



tochkaRuchki = OpredelitStorouPaneli(p,Obj)
// alert(Obj.Name)
Ruchka.Mount1(Obj,tochkaRuchki.x,tochkaRuchki.y,tochkaRuchki.z+Obj.Thickness, UgolPovorota.Value)

}

i++
}


function OpredelitStorouPaneli(p,Obj)
{
lnpv = GabarityContura(Obj);

p = NewPoint(Math.round(p.x * 10) * 0.1,Math.round(p.y * 10) * 0.1 )
ln =lnpv[0];
pv = lnpv[1];



if (p.x == ln.x && p.y == ln.y) {
// alert("1")
return Obj.ToGlobal(NewPoint(ln.x + otX.Value, ln.y + otY.Value))

}
if (p.x == pv.x && p.y == ln.y )
{
//alert("2")
return Obj.ToGlobal(NewPoint(pv.x - otX.Value, ln.y + otY.Value))
}
if (p.x == pv.x && p.y == pv.y)
{
//alert("3")
return Obj.ToGlobal(NewPoint(pv.x - otX.Value, pv.y - otY.Value))
}
if (p.x == ln.x && p.y == pv.y)
{
//alert("4")
return Obj.ToGlobal(NewPoint(ln.x + otX.Value, pv.y - otY.Value))
}




}





function GabarityContura(Obj)

{
var text = '';


ln = NewPoint(0, 0); //левый низ
lv = NewPoint(0, 0); //левый верх
pn = NewPoint(0, 0); //правый низ
pv = NewPoint(0, 0); //правый верх контура

kontur = Obj.Contour;

kstoron = kontur.Count;
// var k_ne_krugov = 0;
for (i = 0; i < kstoron; i++) {
if (kontur[i].ElType != 3) { //k_ne_krugov = k_ne_krugov+1

ln = NewPoint(Math.round(kontur[i].Pos1.x * 10) / 10, Math.round(kontur[i].Pos1.y * 10) / 10);
lv = NewPoint(Math.round(kontur[i].Pos1.x * 10) / 10, Math.round(kontur[i].Pos1.y * 10) / 10);
pn = NewPoint(Math.round(kontur[i].Pos1.x * 10) / 10, Math.round(kontur[i].Pos1.y * 10) / 10);
pv = NewPoint(Math.round(kontur[i].Pos1.x * 10) / 10, Math.round(kontur[i].Pos1.y * 10) / 10);
}

};



for (i = 0; i < kstoron; i++) {
if (kontur[i].ElType != 3) {
Pos1x = Math.round(kontur[i].Pos1.x * 10) / 10;
Pos1y = Math.round(kontur[i].Pos1.y * 10) / 10;
Pos2x = Math.round(kontur[i].Pos2.x * 10) / 10;
Pos2y = Math.round(kontur[i].Pos2.y * 10) / 10;


if (ln.x > Pos1x) {
ln.x = Pos1x
};
if (ln.x > Pos2x) {
ln.x = Pos2x
};
if (ln.y > Pos1y) {
ln.y = Pos1y
};
if (ln.y > Pos2y) {
ln.y = Pos2y
};

if (lv.x > Pos1x) {
lv.x = Pos1x
};
if (lv.x > Pos2x) {
lv.x = Pos2x
};
if (lv.y < Pos1y) {
lv.y = Pos1y
};
if (lv.y < Pos2y) {
lv.y = Pos2y
};

if (pn.x < Pos1x) {
pn.x = Pos1x
};
if (pn.x < Pos2x) {
pn.x = Pos2x
};
if (pn.y > Pos1y) {
pn.y = Pos1y
};
if (pn.y > Pos2y) {
pn.y = Pos2y
};

if (pv.x < Pos1x) {
pv.x = Pos1x
};
if (pv.x < Pos2x) {
pv.x = Pos2x
};
if (pv.y < Pos1y) {
pv.y = Pos1y
};
if (pv.y < Pos2y) {
pv.y = Pos2y
};

}
};

text4 = ('ln ---- ' + ln.x + ' - ' + ln.y + '\n' +
'lv ---- ' + lv.x + ' - ' + lv.y + '\n' +
'pn ---- ' + pn.x + ' - ' + pn.y + '\n' +
'pv ---- ' + pv.x + ' - ' + pv.y + '\n');
// alert(text4);
ln_v = ln; //левый низ выреза
pv_v = pv; //правый верх выреза

if (ln_v.x < lv.x) {
ln_v.x = lv.x
};
if (ln_v.y < pn.y) {
ln_v.y = pn.y
};

if (pv_v.x > pn.x) {
pv_v.x = pn.x
};
if (pv_v.y > lv.y) {
pv_v.y = lv.y
};





SeredinaVisotiPaneli = (pv_v.y - ln_v.y) * 0.5;
SeredinaShiriniPaneli = (pv_v.x - ln_v.x) * 0.5;






lnpv = []




lnpv.push(ln_v);
lnpv.push(pv_v);



return lnpv
}

[свернуть]