查看会员资料
- Email:用户隐藏
- Icq/MSN:qq
- 电话号码:
- Homepage:
- 会员简介:这家伙很懒,什么都没留下!
最新会员发布资源
cbj
- 查图中各种直径的圆个数,可以快速查出图上有几种直径,并统计出各种直径的数量-(DEFUN C:cbj () (PRINC "查直径及个数") (setq ss (ssget ((0 . "CIRCLE")))) (setq i 0 n 0 zj-j nil) (repeat (sslength ss) (setq el (entget (ssname ss i))) (setq zj (read (rtos (cdr (assoc 40