AUTOCAD에서 VBA로 GEAR 그리기

오토캐드에서 VBA로 입력괸 GEAR 제원을 이용하여

2D, 3D까지 자동설계한 예 입니다

3D 프린터로 출력할수 있습니다

 

중요한것은 GEAR CURVE인  INVOLUTE 또는 CYCLOID 을 정확하게 설계해야하는데

대부분의 인터넷상에서  설계하는것을 보면 유사한 원으로 작도하는것을 알수있다.

( INVOLUTE 또는 CYCLOID곡선은 수동작업으로 작도할수없다. GEAR CURVE를 정확하게

  이해를 하지 못하는것인지, 아니면 CAD에서 작업을 하지못해 수작업으로 유사 R을

  사용하는것인지 질문을 해 보고 싶다)

 

그렇게 설계하면 실제로 동력을 걸고 회전을 시키면 소음과 진동이 발생하고

치면마모도 쉽게발생하고 회전이 원할하지 못해 사용할수가 없다

 

1. 아래 그림은 VBA로 2D에서 작성된 결과입니다

INVOLUTE CURVE 결과

2. 미리 입력된 GEAR 각종 데이터를 가지고

   VBA로 2D를 그리고 연속해서 3D 모델링 한것입니다

   전체 시간이 1분 정도 소요됩니다