Форум профессиональных мебельщиков 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.. Причина: Добавил объявление.
Просмотров: 1378781
Ответить с цитированием Вверх
6 пользователя(ей) сказали cпасибо:
Старый 16.03.2021, 18:11   #1371
Meshok
Пользователь
 
Аватар для Meshok
 
Регистрация: 17.12.2016
Сообщений: 89
Сказал(а) спасибо: 27
Поблагодарили 50 раз(а) в 30 сообщениях
Вес репутации: 107
Meshok скоро придёт к известности
По умолчанию

Цитата:
Сообщение от vittsan Посмотреть сообщение
Здравствуйте! Есть ли скрипт "Восстановить видимость"?
Если Вы это имели ввиду...

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

Model.forEach(function(obj) {
obj.Visible = true;
});
[свернуть]
Meshok вне форума   Ответить с цитированием Вверх
3 пользователя(ей) сказали cпасибо:
PravCom (02.04.2022), toucaner (29.03.2021), vittsan (16.03.2021)
Старый 16.03.2021, 20:18   #1372
vittsan
Новичок
 
Регистрация: 30.09.2014
Сообщений: 15
Сказал(а) спасибо: 3
Поблагодарили 2 раз(а) в 2 сообщениях
Вес репутации: 0
vittsan пока не определено
По умолчанию

Цитата:
Сообщение от Meshok Посмотреть сообщение
Если Вы это имели ввиду...

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

Model.forEach(function(obj) {
obj.Visible = true;
});
[свернуть]
Супер! Спасибо, добрый человек, это то что надо!
vittsan вне форума   Ответить с цитированием Вверх
Старый 24.03.2021, 09:14   #1373
4kkuhnii
Новичок
 
Регистрация: 02.09.2020
Сообщений: 18
Сказал(а) спасибо: 7
Поблагодарили 12 раз(а) в 6 сообщениях
Вес репутации: 0
4kkuhnii на пути к лучшему
По умолчанию

Здравствуйте, пытаюсь написать скрипт обработки фрезой на указанные панели. В окне просмотра видно, что после работы скрипта панель обработана фрезой, фрезеровка также присутствует в чертеже. Но в окне проекции почему то не видно фрезеровки, а если закрыть и заново открыть этот файл, то фрезеровка видна. Почему так?

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

Profile = system.askFileName('frw');
Panel = GetPanel("Укажите панель")

var p1 = Panel.GabMin.x;
var p2 = Panel.GabMin.y;
var p3 = Panel.GabMax.x;
var p4 = Panel.GabMax.y;
var p5 = Panel.GabMax.z;



Cut = Panel.AddCut('Паз');
Cut.Trajectory.AddRectangle(p1 + 70, p2 + 70, p3 - 70, p4 - 70);
Cut.Contour.Load(Profile);
Cut.Contour.Move(0, p5);
[свернуть]
4kkuhnii вне форума   Ответить с цитированием Вверх
2 пользователя(ей) сказали cпасибо:
PravCom (02.04.2022), solcratius (20.06.2021)
Старый 24.03.2021, 09:57   #1374
4kkuhnii
Новичок
 
Регистрация: 02.09.2020
Сообщений: 18
Сказал(а) спасибо: 7
Поблагодарили 12 раз(а) в 6 сообщениях
Вес репутации: 0
4kkuhnii на пути к лучшему
По умолчанию

Разобрался, нужно оказывается добавить "Build()" - перестраивает объект после изменения его свойств.
4kkuhnii вне форума   Ответить с цитированием Вверх
Пользователь сказал cпасибо:
solcratius (20.06.2021)
Старый 27.03.2021, 01:13   #1375
demanus
Пользователь
 
Регистрация: 08.06.2010
Сообщений: 34
Сказал(а) спасибо: 550
Поблагодарили 19 раз(а) в 8 сообщениях
Вес репутации: 176
demanus на пути к лучшему
По умолчанию

Цитата:
Сообщение от 4kkuhnii Посмотреть сообщение
Разобрался, нужно оказывается добавить "Build()" - перестраивает объект после изменения его свойств.
А куда именно нужно добавить "Build()" ?
demanus вне форума   Ответить с цитированием Вверх
Старый 12.04.2021, 17:25   #1376
LARS1024
Новичок
 
Регистрация: 14.01.2012
Сообщений: 8
Сказал(а) спасибо: 50
Поблагодарили 1 раз в 1 сообщении
Вес репутации: 0
LARS1024 пока не определено
По умолчанию

"Build()" в конце.
LARS1024 вне форума   Ответить с цитированием Вверх
Старый 21.06.2021, 09:43   #1377
solcratius
Новичок
 
Регистрация: 20.04.2021
Сообщений: 1
Сказал(а) спасибо: 6
Поблагодарили 0 раз(а) в 0 сообщениях
Вес репутации: 0
solcratius пока не определено
По умолчанию

добрый день.

4kkuhnii - очень хороший скрипт вы начали создавать. НЕмного изменил.
Подскажите как можно выбрать сначала несколько панелей ( и не тыкать по одному), а потом Фрезу и сразу все панели отфрезеровать. заранее спасибо всем.
БМ 8

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



Panel = GetPanel("Укажите панель") // что можно тут добавить чтобы выбрать сразу несколько панелей?
Profile = system.askFileName('frw');

var p1 = Panel.GMin.x;
var p2 = Panel.GMin.y;
var p3 = Panel.GMax.x;
var p4 = Panel.GMax.y;
var p5 = Panel.Thickness;



Cut = Panel.AddCut('Паз');
Cut.Trajectory.AddRectangle(p1 + 60, p2 + 60, p3 - 60, p4 - 60);
Cut.Contour.Load(Profile);
Cut.Contour.Move(0, p5);
Panel.build();
[свернуть]


поправьте пожалуйста если что не так.

Последний раз редактировалось solcratius; 21.06.2021 в 12:36.
solcratius вне форума   Ответить с цитированием Вверх
Старый 21.06.2021, 19:06   #1378
kos100pudov
Местный
 
Регистрация: 02.11.2015
Сообщений: 490
Сказал(а) спасибо: 105
Поблагодарили 700 раз(а) в 265 сообщениях
Вес репутации: 292
kos100pudov - просто великолепная личностьkos100pudov - просто великолепная личностьkos100pudov - просто великолепная личностьkos100pudov - просто великолепная личностьkos100pudov - просто великолепная личностьkos100pudov - просто великолепная личностьkos100pudov - просто великолепная личность
По умолчанию

Цитата:
Сообщение от solcratius Посмотреть сообщение
добрый день.

4kkuhnii - очень хороший скрипт вы начали создавать. НЕмного изменил.
Подскажите как можно выбрать сначала несколько панелей ( и не тыкать по одному), а потом Фрезу и сразу все панели отфрезеровать. заранее спасибо всем.
БМ 8

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



Panel = GetPanel("Укажите панель") // что можно тут добавить чтобы выбрать сразу несколько панелей?
Profile = system.askFileName('frw');

var p1 = Panel.GMin.x;
var p2 = Panel.GMin.y;
var p3 = Panel.GMax.x;
var p4 = Panel.GMax.y;
var p5 = Panel.Thickness;



Cut = Panel.AddCut('Паз');
Cut.Trajectory.AddRectangle(p1 + 60, p2 + 60, p3 - 60, p4 - 60);
Cut.Contour.Load(Profile);
Cut.Contour.Move(0, p5);
Panel.build();
[свернуть]


поправьте пожалуйста если что не так.
Можно сначала выбрать нужные панели, а потом запустить скрипт. В скрипте нанесение фрезеровок обернуть в цикл, перебирающий выделенные элементы.
Это будет перебирать только выделенные элементы, если выделенный панель, то обрабатывать.
for (var i=0; i<Model.SelectionCount;++i){
if (Model.Selections[i] instanceof TFurnPanel) {
var panel =Model.Selections[i];
Обрабатываем panel
}
}

А этот перебирает все панели в модели и если панель выделена, то обрабатывает.
Model.forEachPanel(function(panel) {
if (panel.Selected) {
Обрабатывает panel
}
});
kos100pudov вне форума   Ответить с цитированием Вверх
2 пользователя(ей) сказали cпасибо:
PravCom (16.08.2021), solcratius (22.06.2021)
Старый 30.06.2021, 11:28   #1379
MebelitBY
Пользователь
 
Регистрация: 09.11.2014
Сообщений: 43
Сказал(а) спасибо: 12
Поблагодарили 11 раз(а) в 7 сообщениях
Вес репутации: 121
MebelitBY на пути к лучшему
По умолчанию

Здравствуйте. Не помню где скачал скрипт (переименование материалов), но возникла необходимость его доработать, скрипт не переименовывает 1-н из материалов в сростках, созданных с помощью инструмента "облицовка пласти".
Вот оригинальный скрипт:

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

var panel = GetPanel('Выберите панель, материал которой надо заменить');
if (panel){
var oldName = panel.MaterialName;
var newName = prompt('Старый материал:' + oldName + '. Введите новое название материала');
if (newName){
Model.forEachPanel(function (panel) {
if (panel.MaterialName === oldName)
panel.MaterialName = newName;
});
}
}
[свернуть]


Также было бы хорошо, если у кого-нибудь есть скрипт, который переименовывает погонные материалы.

Спасибо всем, кто откликнется.
MebelitBY вне форума   Ответить с цитированием Вверх
Старый 30.06.2021, 12:58   #1380
Ovsyanicov
Местный
 
Регистрация: 30.11.2013
Адрес: Кишинев
Сообщений: 734
Сказал(а) спасибо: 1,529
Поблагодарили 884 раз(а) в 376 сообщениях
Вес репутации: 402
Ovsyanicov за этого человека можно гордитсяOvsyanicov за этого человека можно гордитсяOvsyanicov за этого человека можно гордитсяOvsyanicov за этого человека можно гордитсяOvsyanicov за этого человека можно гордитсяOvsyanicov за этого человека можно гордитсяOvsyanicov за этого человека можно гордитсяOvsyanicov за этого человека можно гордится
По умолчанию

Цитата:
Сообщение от MebelitBY Посмотреть сообщение
Не помню где скачал скрипт (переименование материалов), но возникла необходимость его доработать, скрипт не переименовывает 1-н из материалов в сростках, созданных с помощью инструмента "облицовка пласти".
Проверьте, если устраивает такой вариант:
PHP код:
Undo.RecursiveChanging(Model);

var 
panel GetPanel('Выберите панель из материала, которой надо заменить');
if (
panel) {
    var 
oldName panel.MaterialName;
    var 
newName prompt('Текущий материал:\r' ExtractMatName(oldName) + '\r\rВведите новое название материала');
    if (
newName) {
        
Model.forEachPanel(function(panel) {
            if (
panel.MaterialName === oldName)
                
panel.MaterialName newName;
            if (
panel.Plastics.Count 0) {
                for (
let i 0panel.Plastics.Counti++) {
                    
let plasticMaterial ExtractMatName(panel.Plastics.Plastics[i].Material);
                    if (
plasticMaterial === ExtractMatName(oldName)) {
                        
panel.Plastics.Plastics[i].Material newName;
                    }
                }
            }
        });
    }

Ovsyanicov вне форума   Ответить с цитированием Вверх
3 пользователя(ей) сказали cпасибо:
demanus (07.08.2021), MebelitBY (30.06.2021), PravCom (02.04.2022)
Ответ

Нижняя навигация
Вернуться   Форум профессиональных мебельщиков 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


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


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

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