Форум профессиональных мебельщиков 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
Просмотров: 1496
Размер:	36.4 Кб
ID:	86248

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


Последний раз редактировалось systland; 26.12.2017 в 11:52.. Причина: Добавил объявление.
Просмотров: 1378914
Ответить с цитированием Вверх
6 пользователя(ей) сказали cпасибо:
Старый 11.10.2019, 21:37   #1161
gezan1
Новичок
 
Регистрация: 25.01.2019
Сообщений: 4
Сказал(а) спасибо: 2
Поблагодарили 0 раз(а) в 0 сообщениях
Вес репутации: 0
gezan1 пока не определено
По умолчанию

Здравствуйте. Подскажите , как нарисовать скошенную панель или треугольник. Команды FacetEx и Facet делают скос только до половины панели. А мне нужен острый угол.
gezan1 вне форума   Ответить с цитированием Вверх
Старый 12.10.2019, 08:16   #1162
Максим Геннадьевич
Местный
 
Регистрация: 11.04.2018
Адрес: г.Маркс
Сообщений: 162
Сказал(а) спасибо: 57
Поблагодарили 242 раз(а) в 45 сообщениях
Вес репутации: 137
Максим Геннадьевич - весьма и весьма положительная личностьМаксим Геннадьевич - весьма и весьма положительная личностьМаксим Геннадьевич - весьма и весьма положительная личность
По умолчанию

Цитата:
Сообщение от gezan1 Посмотреть сообщение
Здравствуйте. Подскажите , как нарисовать скошенную панель или треугольник. Команды FacetEx и Facet делают скос только до половины панели. А мне нужен острый угол.
Я делал через Subtsraction(contour).
Максим Геннадьевич вне форума   Ответить с цитированием Вверх
2 пользователя(ей) сказали cпасибо:
gezan1 (12.10.2019), Letos (12.10.2019)
Старый 12.10.2019, 08:50   #1163
gezan1
Новичок
 
Регистрация: 25.01.2019
Сообщений: 4
Сказал(а) спасибо: 2
Поблагодарили 0 раз(а) в 0 сообщениях
Вес репутации: 0
gezan1 пока не определено
По умолчанию

Спасибо за подсказку. Огромное. Сам я долго тупил вокруг этого примера. Теперь вроде все решилось.
gezan1 вне форума   Ответить с цитированием Вверх
Старый 21.10.2019, 12:03   #1164
kostiaarh
Местный
 
Аватар для kostiaarh
 
Регистрация: 14.11.2011
Сообщений: 343
Сказал(а) спасибо: 460
Поблагодарили 594 раз(а) в 223 сообщениях
Вес репутации: 304
kostiaarh - это имя известно всемkostiaarh - это имя известно всемkostiaarh - это имя известно всемkostiaarh - это имя известно всемkostiaarh - это имя известно всемkostiaarh - это имя известно всем
По умолчанию

Цитата:
Сообщение от zorro Посмотреть сообщение
Не могу отредактировать свое предыдущее сообщение со скриптом. Прошло много времени с его написания. Там небольшой "косяк".
Всегда надо было указывать сначала левую боковину, а потом праву. Тогда крепеж ставился корректно. Если наоброт - сначала правую, а потом левую - то крепеж выворачивался.
В этом варианте скрипта исправлен этот "косяк".
Изменено имя файла настроек. Сейчас он называется так же как скрипт - Крепеж.xml. Это намного удобней. Файл скрипта и настроек находится в проводнике рядом. Плюс ко всему файл настроек с название Настройка.xml у меня от разных скриптов записывается и они друг друга затирают.

Исправленный скрипт

FileOptions = 'Крепеж.xml';

function MakeProperties()
{
Prop = Action.Properties;
ТипКрепежа = Prop.NewFurniture('Тип крепежа');
ПоложениеКрепежа = Prop.NewCombo('Положение крепежа', 'Снизу панели\nСверху панели');
ТипБазирования = Prop.NewCombo('Базирование крепежа', 'От переднего торца\nОт заднего торца');
НачальныйРазмер = Prop.NewNumber('Минимальное расстояние', 37);
ШагКрепежа = Prop.NewNumber('Шаг крепежа', 32);
СтавитьШкант = Prop.NewBool('Ставить шкант', False);
ТипШканта = Prop.NewFurniture('Тип шканта');
ТипШканта.Visible = False;

Prop.OnChange = function() {
if (СтавитьШкант.Value) { ТипШканта.Visible = True }
else { ТипШканта.Visible = False };
};

}

MakeProperties()

Action.Properties.Load(FileOptions);

Action.OnFinish = function()
{
Model.UnPickAll();
Action.Properties.Save(FileOptions);
}

Bok1 = GetPanel("Укажите 1-ую вертикальную панель");
Bok2 = GetPanel("Укажите 2-ую вертикальную панель");

if (Bok1.GabMax.x < Bok2.GabMax.x)
{
x1 = Bok1.GabMax.x + 1;
x2 = Bok2.GabMin.x - 1;
}
else
{
x1 = Bok2.GabMax.x + 1;
x2 = Bok1.GabMin.x - 1;
}

while (true)
{
Polka = GetPanel("Укажите горизонтальную панель");
if (ПоложениеКрепежа.Value == 'Снизу панели') {Py = Polka.GabMin.y - 1}
else {Py = Polka.GabMax.y + 1};

z1 = Polka.GabMin.z;
z2 = Polka.GabMax.z;
if (ТипБазирования.Value == 'От переднего торца')
{
ZKrep1 = Bok1.GabMax.z - НачальныйРазмер.Value;
while (ZKrep1 > z2 - ШагКрепежа.Value) { ZKrep1 = ZKrep1 - ШагКрепежа.Value }

ZKrep2 = ZKrep1 - ШагКрепежа.Value;
while (ZKrep2 > z1 + 2 * ШагКрепежа.Value) { ZKrep2 = ZKrep2 - ШагКрепежа.Value }
}
else
{
ZKrep1 = Bok1.GabMin.z + НачальныйРазмер.Value;
while (ZKrep1 < z1 + ШагКрепежа.Value) { ZKrep1 = ZKrep1 + ШагКрепежа.Value }

ZKrep2 = ZKrep1 + ШагКрепежа.Value;
while (ZKrep2 < z2 - 2 * ШагКрепежа.Value) { ZKrep2 = ZKrep2 + ШагКрепежа.Value }
}
ТипКрепежа.Value.Mount(Polka, Bok1, x1, Py, ZKrep2)
ТипКрепежа.Value.Mount(Polka, Bok2, x2, Py, ZKrep2)

ТипКрепежа.Value.Mount(Polka, Bok1, x1, Py, ZKrep1)
ТипКрепежа.Value.Mount(Polka, Bok2, x2, Py, ZKrep1)

if (СтавитьШкант.Value)
{
if (ТипБазирования.Value == 'От переднего торца')
{
ТипШканта.Value.Mount(Polka, Bok1, x1, Py, ZKrep2 + ШагКрепежа.Value)
ТипШканта.Value.Mount(Polka, Bok2, x2, Py, ZKrep2 + ШагКрепежа.Value)
ТипШканта.Value.Mount(Polka, Bok1, x1, Py, ZKrep1 - ШагКрепежа.Value)
ТипШканта.Value.Mount(Polka, Bok2, x2, Py, ZKrep1 - ШагКрепежа.Value)
}
else
{
ТипШканта.Value.Mount(Polka, Bok1, x1, Py, ZKrep2 - ШагКрепежа.Value)
ТипШканта.Value.Mount(Polka, Bok2, x2, Py, ZKrep2 - ШагКрепежа.Value)
ТипШканта.Value.Mount(Polka, Bok1, x1, Py, ZKrep1 + ШагКрепежа.Value)
ТипШканта.Value.Mount(Polka, Bok2, x2, Py, ZKrep1 + ШагКрепежа.Value)
}
}
Action.Commit();
}
[свернуть]
Доброго времени. Может кто поможет? При использовании данного скрипта почему то шкант ставится не корректно (выворачивает наружу). Помогите, пожалуйста, исправить. Спасибо.
Миниатюры
Снимок.JPG  
kostiaarh вне форума   Ответить с цитированием Вверх
Старый 21.10.2019, 14:14   #1165
Letos
Консультант
 
Регистрация: 28.06.2017
Сообщений: 555
Сказал(а) спасибо: 127
Поблагодарили 1,030 раз(а) в 366 сообщениях
Вес репутации: 344
Letos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордится
По умолчанию

Цитата:
Сообщение от kostiaarh Посмотреть сообщение
Доброго времени. Может кто поможет? При использовании данного скрипта почему то шкант ставится не корректно (выворачивает наружу). Помогите, пожалуйста, исправить. Спасибо.
Могу попробовать исправить. Версия БМ восьмая? И можно пример небольшой, на котором некорректно отрабатывает? У меня в демке 8.0.1.9649 от 25.08.14 нормально ставит шканты.
Letos вне форума   Ответить с цитированием Вверх
Старый 21.10.2019, 15:08   #1166
kostiaarh
Местный
 
Аватар для kostiaarh
 
Регистрация: 14.11.2011
Сообщений: 343
Сказал(а) спасибо: 460
Поблагодарили 594 раз(а) в 223 сообщениях
Вес репутации: 304
kostiaarh - это имя известно всемkostiaarh - это имя известно всемkostiaarh - это имя известно всемkostiaarh - это имя известно всемkostiaarh - это имя известно всемkostiaarh - это имя известно всем
По умолчанию

Цитата:
Сообщение от Letos Посмотреть сообщение
Могу попробовать исправить. Версия БМ восьмая? И можно пример небольшой, на котором некорректно отрабатывает? У меня в демке 8.0.1.9649 от 25.08.14 нормально ставит шканты.
Да, версия 8.0.12.12765 "народная". Файлик приложил. Всегда так срабатывает, почему то.
Вложения
Тип файла: rar 111.rar (37.3 Кб, 21 просмотров)
kostiaarh вне форума   Ответить с цитированием Вверх
Старый 21.10.2019, 16:11   #1167
Letos
Консультант
 
Регистрация: 28.06.2017
Сообщений: 555
Сказал(а) спасибо: 127
Поблагодарили 1,030 раз(а) в 366 сообщениях
Вес репутации: 344
Letos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордится
По умолчанию

Цитата:
Сообщение от kostiaarh Посмотреть сообщение
Да, версия 8.0.12.12765 "народная". Файлик приложил. Всегда так срабатывает, почему то.
У себя проверил - всё хорошо. Если шкант вбить и в поле "тип крепежа" и в поле "тип шканта". Предполагаю следующие варианты:
1. Шкант какой-то неправильный и поэтому ставится неправильно (можно попробовать, повторится ли проблема с другим шкантом).
2. Сам Бм такой версии, в которой некорректно ставится шкант скриптами.
3. Особый набор настроек скрипта (Если ничего не помогает, скиньте Xml с настройками скрипта).
Letos вне форума   Ответить с цитированием Вверх
Старый 22.10.2019, 12:58   #1168
kostiaarh
Местный
 
Аватар для kostiaarh
 
Регистрация: 14.11.2011
Сообщений: 343
Сказал(а) спасибо: 460
Поблагодарили 594 раз(а) в 223 сообщениях
Вес репутации: 304
kostiaarh - это имя известно всемkostiaarh - это имя известно всемkostiaarh - это имя известно всемkostiaarh - это имя известно всемkostiaarh - это имя известно всемkostiaarh - это имя известно всем
По умолчанию

Цитата:
Сообщение от Letos Посмотреть сообщение
У себя проверил - всё хорошо. Если шкант вбить и в поле "тип крепежа" и в поле "тип шканта". Предполагаю следующие варианты:
1. Шкант какой-то неправильный и поэтому ставится неправильно (можно попробовать, повторится ли проблема с другим шкантом).
2. Сам Бм такой версии, в которой некорректно ставится шкант скриптами.
3. Особый набор настроек скрипта (Если ничего не помогает, скиньте Xml с настройками скрипта).
Спасибо. Перепроверил. Проблема во втором пункте с параметрическими шкантами. С произвольным - проблем нет, все устанавливается корректно. Я так понимаю, исправить никак?
kostiaarh вне форума   Ответить с цитированием Вверх
Старый 22.10.2019, 14:05   #1169
Letos
Консультант
 
Регистрация: 28.06.2017
Сообщений: 555
Сказал(а) спасибо: 127
Поблагодарили 1,030 раз(а) в 366 сообщениях
Вес репутации: 344
Letos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордится
По умолчанию

Цитата:
Сообщение от kostiaarh Посмотреть сообщение
Спасибо. Перепроверил. Проблема во втором пункте с параметрическими шкантами. С произвольным - проблем нет, все устанавливается корректно. Я так понимаю, исправить никак?
Ну если они и вручную ставятся криво, то никак - функция установки крепежа на панели стандартная базисная, а самому писать - очень замороченно, плюс нужно будет проверять все ситуации - вряд ли кто возьмётся.
Letos вне форума   Ответить с цитированием Вверх
Старый 22.10.2019, 14:49   #1170
kostiaarh
Местный
 
Аватар для kostiaarh
 
Регистрация: 14.11.2011
Сообщений: 343
Сказал(а) спасибо: 460
Поблагодарили 594 раз(а) в 223 сообщениях
Вес репутации: 304
kostiaarh - это имя известно всемkostiaarh - это имя известно всемkostiaarh - это имя известно всемkostiaarh - это имя известно всемkostiaarh - это имя известно всемkostiaarh - это имя известно всем
По умолчанию

Цитата:
Сообщение от Letos Посмотреть сообщение
Ну если они и вручную ставятся криво
Вручную (стандартными средствами) ставятся нормально, а вот через скрипт, почемуто, беда. Попробовал еще один скрипт по крепежу - та же беда с шкантами. Может это у меня какая то беда? Может ли кто либо еще из форумчан опробовать данный скрипт у себя на компе в народной 8-ке? Отпишитесь пожалуйста.
kostiaarh вне форума   Ответить с цитированием Вверх
Ответ

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

Опции темы
Опции просмотра

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

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

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

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
БАЗИС 9 - Скрипты Igor_482 Базис-мебельщик. Скрипты 1441 27.02.2024 10:48
БАЗИС 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


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


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

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