БАЗИС 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]

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

В 10 ке этот скрипт не работает?

В 10 для получения имени файла нужно использовать "Action.ModelFilename" (комментарий в 5 строке).

[anb]

[QUOTE=Letos;468476]В 10 для получения имени файла нужно использовать "Action.ModelFilename" (комментарий в 5 строке).[/QUOTE

Вот если бы ещё объяснили как это сделать. Спасибо!

[Uncle]

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

Вот если бы ещё объяснили как это сделать. Спасибо!

Открываете редактор скриптов. Открываете скрипт, выложенный уважаемым Letos. Выделяете текст - Action.ModelFilename - Копировать - Выделить текст Action.Control.Owner.FileName - Вставить . Сохранить . То есть, заменить текст Action.Control.Owner.FileName на Action.ModelFilename

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

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

Все скриншоты (36 штук на модель) сохраняются в папку модели.

Теперь, зачем мне это нужно.
Есть потребность выкладывать изделие на сайт для сборщика, чтоб было видно где и что. Перепробовал много вариантов и натолкнулся на такой сайт с заголовком Вращение на HTML 5 + JavaScript: готовое решение для вашего сайта. Пример простого скрипта для вращения фотоизображения на 360 градусов. Рекомендации и бесплатные шаблоны
Ссылку на сайт не вставляю т.к не знаю, как к этому отнесутся модераторы
И конечно же огромное спасибо v22884 и Letos.
В Базисе 8 приведенный выше скрипт работает отлично.

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

Подскажите поворот панели с глухим отверстием(петля)
Создаю панель (AddFrontPanel)
Ставлю отверстие(Mount1)
Поворачиваю панель (RotateY)
Панель поворачивается, а отверстие нет.

[Letos]

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

Подскажите поворот панели с глухим отверстием(петля)
Создаю панель (AddFrontPanel)
Ставлю отверстие(Mount1)
Поворачиваю панель (RotateY)
Панель поворачивается, а отверстие нет.

Всё просто - Mount1 возвращает 3д объект отверстия, его тоже надо поворачивать.

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

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

Всё просто - Mount1 возвращает 3д объект отверстия, его тоже надо поворачивать.

Не нашел. Есть функция разрушить блок, не удалить.

[Letos]

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

Есть функция разрушить блок, не удалить.

Самой функции нет, но можно самому написать. Интересует разрушение блока, созданного в скрипте (во временной области) или блока, уже существующего (в модели)?

[do4ent]

Хотелось бы поиметь скрипт который удаляет кромки с панелей с торцевыми отверстиями.

[Letos]

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

Хотелось бы поиметь скрипт который удаляет кромки с панелей с торцевыми отверстиями.

Как-то так:

Код

function Equals(n1, n2) {
  return Math.abs(n1 - n2) < 0.001;
}

function EqualsV(v1, v2) {
  return Equals(v1.x, v2.x) &&
    Equals(v1.y, v2.y) &&
    Equals(v1.z, v2.z);
}

function CheckWithPanel(gDir, panel) {
  return (EqualsV(gDir, panel.NToGlobal(AxisX)) ||
    EqualsV(gDir, panel.NToGlobal(Axis_X)) ||
    EqualsV(gDir, panel.NToGlobal(AxisY)) ||
    EqualsV(gDir, panel.NToGlobal(Axis_Y)))
}

function CheckHole(hole, fast, panel) {
  var holeCenter = fast.ToGlobal({
    x: hole.Position.x + hole.Direction.x * (hole.Depth / 2),
    y: hole.Position.y + hole.Direction.y * (hole.Depth / 2),
    z: hole.Position.z + hole.Direction.z * (hole.Depth / 2),
  })
  holeCenter = panel.ToObject(holeCenter);
  return (holeCenter.x > panel.GMin.x) && (holeCenter.x < panel.GMax.x) &&
    (holeCenter.y > panel.GMin.y) && (holeCenter.y < panel.GMax.y) &&
    (holeCenter.z > panel.GMin.z) && (holeCenter.z < panel.GMax.z);
}

function CheckFast(fast, panel) {
  var fastMin = fast.GabMin;
  var fastMax = fast.GabMax;
  var pMin = panel.GabMin;
  var pMax = panel.GabMax;
  if ((pMin.x > fastMax.x) || (pMax.x < fastMin.x)) return false;
  if ((pMin.y > fastMax.y) || (pMax.y < fastMin.y)) return false;
  if ((pMin.z > fastMax.z) || (pMax.z < fastMin.z)) return false;
  return true;
}

var fasts = [];

function AddFasts(obj) {
  if (obj.Holes && obj.Holes.Count > 0) {
    fasts.push(obj)
  }
  else if (obj.List) {
    var list = obj.AsList();
    for (var i = 0; i < list.Count; i++) {
      AddFasts(list.Objects[i]);
    }
  }
}
AddFasts(Model);

Model.UnSelectAll();
Model.forEachPanel(function (panel) {
  for (var i = 0; i < fasts.length; i++) {
    var fast = fasts[i];
    if (CheckFast(fast, panel)) {
      var holes = fast.Holes;
      if (holes && holes.Count > 0) {
        for (var j = 0; j < holes.Count; j++) {
          var hole = holes[j];
          if (CheckWithPanel(fast.NToGlobal(hole.Direction), panel) &&
            CheckHole(hole, fast, panel)) {
            Undo.Changing(panel);
            panel.Butts.Clear();
            break;
          }
        }
      }
    }
  }
})

[свернуть]

Но у этого скрипта много ограничений по сравнению с тем, что могло быть в 10 (пришлось самому пилить отсев фурнитуры, которая не пересекается с панелью) - поэтому часть панелей с торцевыми отверстиями он может пропустить.