贱人工具箱都有什么

⑴ cad中怎么快速把规则的矩形 多线段画着太慢了 或者谁知道贱人工具箱里有什么类似的功能没有

方法：把矩形创建为面域，再求差，如图所示，参考一下。

⑵ 贱人工具箱如何编号如一个圆有很多个不同样的图型，编成1到500，

我用贱人尝试过，不会弄，后来下载了一个lisp，用text编辑的数字可以复制递增。希望对你有所帮助。如下：
(defun c:gf()
(setq bc (getint "\n 请输入步长:"))
)

(defun c:saa()
(setq banben (ver))
(ddd banben)
(setq banben (atoi banben))
(prompt "\n 设置步长命令为:gf,初始步长为1")
(prompt "\n 请选择不需要更改的实体:")
(if (= bc nil)
(setq bc 1)
)
(setq ddjjqq (ssget))
(setq entt (entsel "\n 请选择一个文字:"))
(setq ent (car entt))
;(setq pt1 (cadr entt))
(redraw ent 3)
(setq dxf (entget ent)) ;联合列表
(setq wenzizu (assoc 1 dxf)) ;点对列表
(setq wenzi (cdr wenzizu)) ;文字

(setq wenzilen (strlen wenzi))
(setq fanyihou (vl-string-translate "1234567890" "##########" wenzi)) ;翻译字符

(setq wei (vl-string-search "#" fanyihou)) ;找出#的位置

(setq qianzhui (substr wenzi 1 wei)) ;取出前缀
(setq shuzi (substr wenzi (+ wei 1))) ;取出字符串形式的数字
(setq shishu (atoi shuzi)) ;把数字改为实数

(setq pt1 (getpoint "\n 请选择一个点:"))
(setq pt2 (getpoint pt1 "\n 请选择第二点:"))
(setq n 0)

(while pt2

(setq lll (substr wenzi 1 1)) ;判断第一个字符是什么
;(setq llll (substr wenzi 4 1)) ;判断第四个字符是什么

(cond

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
( (= lll "<") ;
(progn ;
(setq b (+ shishu bc n)) ;
(setq c (itoa b)) ;

(if (< b 10) ;
(setq d (strcat qianzhui "0" c ">"))
(setq d (strcat qianzhui c ">"))
) ;
;
(setq e (cons 1 d))

(if (> banben 2004)
(progn ;
(command "" ddjjqq "" pt1 pt2 "")
(command "" ent "" pt1 pt2 "")
)
(progn ;
(command "" ddjjqq "" pt1 pt2 )
(command "" ent "" pt1 pt2 )
) ;end progn
) ;end if

(setq ent1 (entget (entlast))) ; ;此处为一个判断
(setq txtzh1 (assoc 1 ent1)) ;
(setq ent1 (subst e txtzh1 ent1)) ;
(entmod ent1) ;
(princ) ;
) ;end progn ;
) ;end first ;
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;如果要加判断的话,请选择这里

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(t ;
(progn ;
(setq b (+ shishu bc n))
;
(setq c (itoa b))
(if (< b 10) ;
(setq d (strcat qianzhui c))
(setq d (strcat qianzhui "0" c))
) ;
(setq e (cons 1 d))

(if (> banben 2004)
(progn ;
(command "" ddjjqq "" pt1 pt2 "")
(command "" ent "" pt1 pt2 "")
) ;end progn

(progn ;
(command "" ddjjqq "" pt1 pt2 )
(command "" ent "" pt1 pt2 )
) ;end progn
); end if ; ;此处为第二个判断
(setq ent1 (entget (entlast))) ;
(setq txtzh1 (assoc 1 ent1)) ;
(setq ent1 (subst e txtzh1 ent1)) ;
(entmod ent1) ;
(princ) ;
) ;
) ;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

) ;end cond

(setq n (+ bc n))
(setq pt2 (getpoint pt1 "\n 请选择第二点:")) ;pt1决定有没有显示线

) ;end while
) ;end defun

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;; 以下为输入单个字的命令 ;;;;;;;;;;;;;;;;

(defun c:sa()
(setq banben (ver))
(ddd banben)
(setq banben (atoi banben))
(prompt "\n 设置步长命令为:gf,初始步长为1")
(if (= bc nil)
(setq bc 1)
)

(setq enty (entsel "\n 请选择一个文字:"))
(setq ent (car enty))
;(setq pt1 (cadr enty))

(redraw ent 3)
(setq dxf (entget ent)) ;联合列表
(setq wenzizu (assoc 1 dxf)) ;点对列表
(setq wenzi (cdr wenzizu)) ;文字

(setq wenzilen (strlen wenzi))
(setq fanyihou (vl-string-translate "1234567890" "##########" wenzi)) ;翻译字符

(setq wei (vl-string-search "#" fanyihou)) ;找出#的位置

(setq qianzhui (substr wenzi 1 wei)) ;取出前缀
(setq shuzi (substr wenzi (+ wei 1))) ;取出字符串形式的数字
(setq shishu (atoi shuzi)) ;把数字改为实数

(setq pt1 (getpoint "\n 请选择一个点:"))
(setq pt2 (getpoint pt1 "\n 请选择第二点:"))
(setq n 0)

(while pt2

(setq lll (substr wenzi 1 1)) ;判断第一个字符是什么

;(setq llll (substr wenzi 4 1)) ;判断第四个字符是什么
(cond

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
( (= lll "<") ;
(progn ;
(setq b (+ shishu bc n)) ;
(setq c (itoa b)) ;
(if (< b 10) ;
(setq d (strcat qianzhui "0" c ">"))
(setq d (strcat qianzhui c ">")) ;
) ;
(setq e (cons 1 d))

(if (> banben 2004) ;
(command "" ent "" pt1 pt2 "")
(command "" ent "" pt1 pt2 )
) ;

(setq ent1 (entget (entlast))) ; ;此处为一个判断
(setq txtzh1 (assoc 1 ent1)) ;
(setq ent1 (subst e txtzh1 ent1)) ;
(entmod ent1) ;
(princ) ;
) ;end progn ;
) ;end first ;
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;如果要加判断的话,请选择这里

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(t ;
(progn ;
(setq b (+ shishu bc n)) ;
(setq c (itoa b))
(if (< b 10) ;
(setq d (strcat qianzhui "0" c))
(setq d (strcat qianzhui c))
) ;
(setq e (cons 1 d))

(if (> banben 2004) ;
(command "" ent "" pt1 pt2 "")
(command "" ent "" pt1 pt2 )
) ;
;此处为第二个判断
(setq ent1 (entget (entlast))) ;
(setq txtzh1 (assoc 1 ent1)) ;
(setq ent1 (subst e txtzh1 ent1)) ;
(entmod ent1) ;
(princ) ;
) ;
) ;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

) ;end cond

(setq n (+ bc n))
(setq pt2 (getpoint pt1 "\n 请选择第二点:")) ;pt1决定有没有显示线

) ;end while
(princ)
) ;end defun

;;;;;;(wcmatch "SHZ1G" "*[1234567890]*") 可以找到是否只有一个数字

(defun ddd (#a)

(setq #b (vl-string->list #a))
(setq #c (vl-remove-if '(lambda (x) (> x 57)) #b))
(setq #d (vl-remove-if '(lambda (x) (< x 46)) #c))
(setq #e (vl-remove 47 #d)) ;此句是去掉/的语句
(setq banben (vl-list->string #e))

⑶ cad贱人工具箱有自动排版功能

有那么一点。。。很简单的。。。

⑷ 有人用过贱人工具箱吗

你好，贱人工抄具箱加载的方法
第一、打开AutoCAD，点击菜单“工具”-->“加载应用程序”-->调出对话框；
第二：点击对话框上启动组里的“内容...”-->点“浏览”，找到“贱人工具箱5.6.VLX”，点“添加”，把工具箱添加进去，关闭对话框。
第三：输入命令"y"调出工具箱。

⑸ cad都有什么辅助的工具啊，求介绍

HGCAD，贱人工具箱，VCAD我遇到的是这三种，第一和第三用过

⑹ CAD贱人工具箱谁的公司有用到它

贱人还好吧。与原版不冲突。
不像天正经常掉失。
你用你的，他们不用也没关系。

⑺ CAD贱人工具箱哪个功能可以选中框中所有文本的的

虽然抄自己不用，不过网袭上帮你收到一个加载方式，你试试看行不行

打开AutoCAD，输入命令:ap，找到工具箱，点加载，关闭对话框，输入y或yy打开工具箱。
自动加载方法：
打开AutoCAD，输入命令:ap，点“内容...”，点“浏览”，找到工具箱，点“添加”，关闭对话框，重启CAD。

⑻ 贱人工具箱5.2 改颜色命令为什么只有第一个有用

现在贱人工具都有5.9版本的了，用那个有用的

⑼ 贱人工具箱5.7破解版有什么用

管理和优化电脑操作系统的一个软件工具。功能很多，例如清除临时文件、一键修改IP等等。。以加快电脑运行速度、加快你需要更改电脑的某些项的速度。

⑽ 有没有免费的CAD贱人工具箱

这些必须有呀.画图的,没有不方便呀