[求助]：为什么我圆柱体画不出来，帮忙改下！

wgl1019

我画出来的 图形根本就不是三维的。能帮忙改下！

  (setq d01 (list 100 0 0 ))
    (setq d02 (list 0 0 100))
    (setq d03 (list -100 0 0))
    (setq d04 (list 0 0 -100))          
    (setq d11 (list 100 300 0))
    (setq d12 (list 0 300 100))
    (setq d13 (list -100 300 0))
    (setq d14 (list 0 300 -100))
    (command "circle" d02 d03 d04 "")
    (command "circle" d12 d13 d14 "")
    (command "line" d01 d11 "")
    (command "line" d02 d12 "")
    (command "line" d03 d13 "")
    (command "line" d04 d14 "")

czg09180274

你画的这个感觉有点不伦不类！如果是轴测图，则画圆要用椭圆命令，而且也要计算好角度才行

wgl1019

楼上的老师能不能画和简单的圆柱体给 我参考下 ，我刚刚学起。不懂得该如何下手，谢谢！我画的这个图 从正面看应该是的矩形的。再用三维动态观察器就可以看到它是圆柱体的吧·

xyp1964

2. [FONT=courier new]
   
3. (load "xyp_lib");加载通用函数
   
4. ;| 如果已经下载xyp_lib并放到搜索路径下可以不再下载!
   
5. 利用以下任何一种方式即可加载和运行通用函数内的所有子程序：
   
6. 1.在acad.lsp中增加(load"xyp_lib")
   
7. 2.在每个程序内增加(load"xyp_lib")
   
8. 3.在command下，输入(load"xyp_lib")
   
9. 4.在菜单.mnl中增加(load"xyp_lib")
   
10. 通用函数下载地址:[url]http://www.xdcad.net/forum/attachment.php?s=&postid=1606661[/url]
    
11. （可在签名栏直接下载）|;
    
12. 
    
13. (defun c:test ()
    
14.   (cmdla0)
    
15.   (setq    pt  (getpoint "\n圆柱体中心点 : ")
    
16.     no1 (UREAL 1 "" "\n圆柱体半径" no1)
    
17.     no2 (UREAL 1 "" "\n圆柱体高" no2)
    
18.   )
    
19.   (command "_cylinder" pt no1 no2)
    
20.   (command "_shademode" "_g")
    
21.   (cmdla1)
    
22. )[/FONT]

[FONT=courier new]<br /> (load "xyp_lib");加载通用函数 <br /> ;| 如果已经下载xyp_lib并放到搜索路径下可以不再下载! <br /> 利用以下任何一种方式即可加载和运行通用函数内的所有子程序： <br /> 1.在acad.lsp中增加(load"xyp_lib") <br /> 2.在每个程序内增加(load"xyp_lib") <br /> 3.在command下，输入(load"xyp_lib") <br /> 4.在菜单.mnl中增加(load"xyp_lib") <br /> 通用函数下载地址:[url]http://www.xdcad.net/forum/attachment.php?s=&postid=1606661[/url] <br /> （可在签名栏直接下载）|; <br /> <br /> (defun c:test () <br />   (cmdla0) <br />   (setq    pt  (getpoint "\n圆柱体中心点 : ") <br />     no1 (UREAL 1 "" "\n圆柱体半径" no1) <br />     no2 (UREAL 1 "" "\n圆柱体高" no2) <br />   ) <br />   (command "_cylinder" pt no1 no2) <br />   (command "_shademode" "_g") <br />   (cmdla1) <br /> )[/FONT]

wgl1019

谢谢老师

chuanxue

无法加载xyp_lib

sunstone1110

谢谢，我也要好好学习