Рисуем шестерни и не только, в программе OpenSCAD

Значимый прорыв формирует отрасль ИИ: deema35 25 минут назад Краткое содержание статьи Рисуем шестерни и не только, в программе OpenSCAD Простой 9 мин 477 CAD/CAM * 3D-принтеры DIY или Сделай сам Пост Здравствуйте меня зовут Дмитрий. Недавно мне попалась на глаза программа OpenSCAD и я хочу сделать небольшой обзор и ещё мы немного порисуем. Итак OpenSCAD это как вы наверно догадались CAD программа но рисовать в ней нужно не мышкой, а по средствам встроенного скриптового языка.

То есть проектирование в ней напоминает програмирование. И вы спросите, а зачем это нужно не проще-ли рисовать по старинке мышкой. Но я похоже разгадал замысел авторов программы.

Технические детали

Дело в том что существует определенный круг деталей внешняя форма которых определяется формулами. И как раз для проектирования подобных деталей OpenSCAD подходит как нельзя лучше. Шестерня с внешним зацеплением.

И первой подобной деталью является шестерня. Вот пример который я написал:Скрытый текст// To activate animation, select "View->Animate" from the // menu; this will cause three fields to appear // underneath the Preview console: Time, FPS & Steps. // To commence animation, enter values into the FPS and Steps input //Example FPS = 60 Steps = 120 // For set initial position uncomment //$t=0; //Fist gear...............................................

Teath = 20; M = 1; PressAng = 20; C = 0. 25; DPeatch = Teath * M; RPeatch = DPeatch/2; DMain = DPeatch * cos(PressAng); St = PI * M/2; // Teeth thickness by diameter Stx = DPeatch * sin(St*(180/PI)/DPeatch); // Teeth thickness by chord DIn = DPeatch - (2 + C)* M; DOut = DPeatch + 2 * M; ROut = DOut / 2; d = sqrt(RPeatch^2 - (Stx/2)^2); Steps = 90; function ToRad(T) = T * (PI/180); function Evolv_X(T, MD) = MD/2 * (cos(T) + ToRad(T) * sin(T)); function Evolv_Y(T, MD) = MD/2 * (sin(T) - ToRad(T) * cos(T)); FistEvolv_temp = ) if (sqrt((Evolv_X(a, DMain) + RPeatch - Evolv_X(20, DMain))^2 + (Evolv_Y(a, DMain) - Evolv_Y(20, DMain) - Stx/2)^2) < ROut) // Cut pionts outside gear ]; FistEvolv = concat(], FistEvolv_temp); SecondEvolv = ]; FistEvolvB = ) a]; SecondEvolvB = ) 2 * len(SecondEvolv) - a - 1]; rotate () linear_extrude(height = 2 * M, center = true, convexity = 10, twist = 0) union() { for (i = ) rotate() polygon(concat(FistEvolv, SecondEvolv),); circle(d = DIn); } //Second Gear.........................................................

Событие, по словам экспертов, усилит конкуренцию в сфере ИИ.