Форум профессиональных мебельщиков 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.. Причина: Добавил объявление.
Просмотров: 1379061
Ответить с цитированием Вверх
6 пользователя(ей) сказали cпасибо:
Старый 20.11.2018, 14:13   #1031
Fess_ker
Новичок
 
Регистрация: 19.11.2018
Сообщений: 6
Сказал(а) спасибо: 1
Поблагодарили 0 раз(а) в 0 сообщениях
Вес репутации: 0
Fess_ker пока не определено
По умолчанию

пример зубчатой пары. Возможно ли сделать это скриптом?

P.S. размеры могут отличаться от вычислений
P.P.S. формулы ооочень грубые и без всяких коэффициентов, ибо их просто тонна, (и все они берутся из таблиц справочников)но в принципе именно такой расчет
если можно сделать скриптом и форму зуба, то это вообще магия
кстати n - число зубьев колеса

Добавлено через 12 минут
полазил по чужим скриптам и понял, что самое сложное это начать, потому что начинать надо именно с нуля, а для меня это почти невозможное

Последний раз редактировалось Fess_ker; 20.11.2018 в 16:36.
Fess_ker вне форума   Ответить с цитированием Вверх
Старый 20.11.2018, 15:43   #1032
Letos
Консультант
 
Регистрация: 28.06.2017
Сообщений: 555
Сказал(а) спасибо: 127
Поблагодарили 1,030 раз(а) в 366 сообщениях
Вес репутации: 344
Letos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордится
По умолчанию

Цитата:
Сообщение от Fess_ker Посмотреть сообщение
пример зубчатой пары. Возможно ли сделать это скриптом?
P.S. размеры могут отличаться от вычислений
P.P.S. формулы ооочень грубые и без всяких коэффициентов, ибо их просто тонна, (и все они берутся из таблиц справочников)но в принципе именно такой расчет
если можно сделать скриптом и форму зуба, то это вообще магия
кстати n - число зубьев колеса
Картинку посмотреть не получилось (пишет, что прав не хватает, наверное, поэтому она и в сообщении не отображается), поискал в гугле по картинкам и примерно понял, какой результат нужно получить. Можете написать, какие именно параметры могут быть изменяемыми, или, если это всё описано на вашей картинке, перезалить её?
Letos вне форума   Ответить с цитированием Вверх
Старый 20.11.2018, 16:41   #1033
Fess_ker
Новичок
 
Регистрация: 19.11.2018
Сообщений: 6
Сказал(а) спасибо: 1
Поблагодарили 0 раз(а) в 0 сообщениях
Вес репутации: 0
Fess_ker пока не определено
По умолчанию

вроде перезалил) думал как их совместить и понял что нужна еще одна переменная (так даже лучше) или постоянная - высота зуба. Два круга я написал в скрипте, но когда вставляю высоту зуба - скрипт ругается. Также происходит неведомое когда я меняю положение, например вместо оси У пытаюсь поставить на ось Х
Fess_ker вне форума   Ответить с цитированием Вверх
Старый 20.11.2018, 17:22   #1034
Letos
Консультант
 
Регистрация: 28.06.2017
Сообщений: 555
Сказал(а) спасибо: 127
Поблагодарили 1,030 раз(а) в 366 сообщениях
Вес репутации: 344
Letos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордится
По умолчанию

Цитата:
Сообщение от Fess_ker Посмотреть сообщение
вроде перезалил
Посмотрел картинку. Высоту зуба нужно вводить по-любому ибо радиус окружности нужно будет знать. Скорее всего, дополнительными параметрами будут диаметры центральных отверстий (но это мелочи).
По поводу формы зуба нашел такой термин как "эвольвентное зацепление" - полагаю, это для вашего случая.
Не сильно разбираюсь в шестернях, но мне кажется, что указание диаметра шестерни було бы удобнее без учёта высоты зубьев. Но если я не прав - спорить не буду, каких-либо сложностей учёт/не учёт зубьев в диаметре не создаёт. Просто хотелось бы знать, как принято (а то на картинке начало размера на кончике зуба а конец размера у основания зуба).
В целом, задачка интересная. Попробую в свободное время решить её.
Letos вне форума   Ответить с цитированием Вверх
Старый 20.11.2018, 18:08   #1035
Fess_ker
Новичок
 
Регистрация: 19.11.2018
Сообщений: 6
Сказал(а) спасибо: 1
Поблагодарили 0 раз(а) в 0 сообщениях
Вес репутации: 0
Fess_ker пока не определено
По умолчанию

Цитата:
Сообщение от Letos Посмотреть сообщение
дополнительными параметрами будут диаметры центральных отверстий (но это мелочи)
просто не хочу сильно обременять) но сам не справлюсь. И там не будут окружности, а вот такое соединение

Цитата:
Сообщение от Letos Посмотреть сообщение
По поводу формы зуба нашел такой термин как "эвольвентное зацепление"
не силен в таких деталях)

Цитата:
Сообщение от Letos Посмотреть сообщение
Просто хотелось бы знать, как принято
есть 3 диаметра. Внешний, внутренний и начальный
Первые два из них высчитываются. Есть еще где-то у меня полноценный расчет в екселевском варианте (по формулам). Я представил (рисунок как раз я и делал) более упрощенный вариант вычислений. Причем намного

Добавлено через 12 минут
Цитата:
Сообщение от Letos Посмотреть сообщение
а то на картинке начало размера на кончике зуба а конец размера у основания зуба
это так кажется. Когда чертил, не увидел совпадение размерных стрелок. На рисунке два внешних диаметра. Кстати этот рисунок - некая моя шпаргалка для написания скрипта ничего умнее просто не придумал
Fess_ker вне форума   Ответить с цитированием Вверх
Старый 20.11.2018, 19:03   #1036
Fess_ker
Новичок
 
Регистрация: 19.11.2018
Сообщений: 6
Сказал(а) спасибо: 1
Поблагодарили 0 раз(а) в 0 сообщениях
Вес репутации: 0
Fess_ker пока не определено
По умолчанию

расчет.xls

вот расчет. Нарыл когда-то в интернете, немного переделал (не помещался в 200кб)
но там как то слишком все сложно
Fess_ker вне форума   Ответить с цитированием Вверх
Старый 21.11.2018, 21:44   #1037
Fess_ker
Новичок
 
Регистрация: 19.11.2018
Сообщений: 6
Сказал(а) спасибо: 1
Поблагодарили 0 раз(а) в 0 сообщениях
Вес репутации: 0
Fess_ker пока не определено
По умолчанию

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

PHP код:

MakeProperties
();

// толщина
Thick MtThickness();

//бесконечный цикл
while (true) {
    
p1 GetPoint('Укажите первую точку');
    
p2 GetPoint('Укажите вторую точку');
    
Make();
}

function 
Make() {
    
Panel AddPanel(0,0,0);
    
Panel.Name 'шестерня1';
    
//окружность
    
Panel.Contour.AddCircle(p1.zp1.yDiam.Value 2);
    
Panel.Build();

    
Panel AddPanel(0,0,0);
    
Panel.Name 'шестерня2';
    
Panel.Contour.AddCircle(p2.zp2.yDiam.Value 2);
    
Panel.Build();

}

function 
MakeProperties() {
    
Prop Action.Properties;


    
Diam Prop.NewNumber('Диаметр'200);
    
OkBtn Prop.NewButton('Построить');
    
OkBtn.Value 'Ok';

    
Prop.OnChange = function() {
        
DeleteNewObjects();
        
Make();
    };

    
//кнопка Построить
    
OkBtn.OnClick = function() {
        
DeleteNewObjects();
        
Make(); Action.Commit()
    }


Последний раз редактировалось Fess_ker; 21.11.2018 в 22:19.
Fess_ker вне форума   Ответить с цитированием Вверх
Старый 25.11.2018, 23:40   #1038
wizardpnz
Местный
 
Регистрация: 02.07.2011
Сообщений: 191
Сказал(а) спасибо: 93
Поблагодарили 105 раз(а) в 44 сообщениях
Вес репутации: 196
wizardpnz скоро придёт к известностиwizardpnz скоро придёт к известности
По умолчанию

Цитата:
Сообщение от Letos Посмотреть сообщение
Вот так
Код:
obj.UserProperty['name'] = undefined;
Проверял на 9 версии, думаю, в 8 тоже будет работать.
как удалить пользовательские свойства

Model.UserPropCount=0 не помогает
wizardpnz вне форума   Ответить с цитированием Вверх
Старый 26.11.2018, 09:27   #1039
Letos
Консультант
 
Регистрация: 28.06.2017
Сообщений: 555
Сказал(а) спасибо: 127
Поблагодарили 1,030 раз(а) в 366 сообщениях
Вес репутации: 344
Letos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордитсяLetos за этого человека можно гордится
По умолчанию

Цитата:
Сообщение от wizardpnz Посмотреть сообщение
как удалить пользовательские свойства

Model.UserPropCount=0 не помогает
Можно простым перебором:
Код:
var obj = Model.Selected;
Undo.Changing(obj);
for (var i = obj.UserPropCount - 1; i >= 0; i--){
    obj.UserProperty[i] = undefined;
}
Letos вне форума   Ответить с цитированием Вверх
Пользователь сказал cпасибо:
Ovsyanicov (17.02.2022)
Старый 26.11.2018, 09:35   #1040
wizardpnz
Местный
 
Регистрация: 02.07.2011
Сообщений: 191
Сказал(а) спасибо: 93
Поблагодарили 105 раз(а) в 44 сообщениях
Вес репутации: 196
wizardpnz скоро придёт к известностиwizardpnz скоро придёт к известности
По умолчанию

не помогает
все свойства переименовываются в undefined но не исчезают
wizardpnz вне форума   Ответить с цитированием Вверх
Ответ

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


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


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

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