在CAD中畫漸開線齒輪的工具

一口心

輸了齒數后跳出一個T斷點是怎么回事啊?

luoyj

出現錯誤：
: t1 `1 K4 E' a; u命令1無效
9 z+ }/ C: k6 Q$ {/ B6 y) M
命令: 1
3 f7 [7 ^" ]' P8 L. ^選擇對象: 找到 1 個
' M' ?# k% [9 X4 V$ V8 ~選擇對象:
' k; }  f9 F7 S; K5 Z/ k
[ 本帖最后由 luoyj 于 2008-8-22 14:55 編輯 ]

張華鋒

能加載的！可是出現的是亂碼啊！和前面說的一樣！

' H1 @9 C* ~- \9 q6 q; |  Q0 D[ 本帖最后由 張華鋒 于 2008-11-14 12:54 編輯 ]

張華鋒

我有個CAD畫齒輪的程序！
先AP加載，然后輸入SG就可調出來

張華鋒

看了11樓的，問題解決了！謝了
; v; E: j! Y/ r1 G
[ 本帖最后由 張華鋒 于 2008-11-14 13:10 編輯 ]

趙香林

太感謝樓主了。。。。。。。。。。。。。。。。。

lwrong520

但是這能畫標準的,不能畫非標的.

胡志勇

6樓和10樓的注意：代碼中的亂碼是大五碼字，請進行轉化即可看到如下文字：
(DEFUN C:2()
7 o% P. j" \" j3 c(RSET)
(SETVAR "OSMODE" 0)
8 q, @; m# j( Q+ T( }; x6 z(SETQ M (GETREAL "\n鍵入模數 ..."))
(SETQ T (GETINT "\n鍵入齒數 ..."))
9 y, o7 l# B8 I  l- e6 F/ z& X(SETQ PHIC (GETREAL "\n鍵入壓力角(20) ..."))
1 @% w: K! E8 ]- ^, }8 U(SETQ PT0 (GETPOINT "\n點選中心 ..."))
9 S: m1 p8 E" h# L(SETQ NUM (GETINT "\n幾條線段組成(100) ..."))

mojiayan

,這個做出來的是漸開線的

kaiyuan_abin

感謝樓主的共享！