【转帖】请教两件关于图框块比例因子的lisp ，各位高手有空就帮忙看看
 

请教两件关于图框块比例因子的lisp ，各位高手有空就帮忙看看
www.dimcax.com
请教两件关于图框块比例因子的lisp ，各位高手有空就帮忙看看
前景说明：
我们绘图时会将图框按1:1比例做好存成一个块(一般会有3个,a2、a3、a4)，标注尺寸会按图框1:1比例设置几个标注样式(如unit1、unit2、unit3)
第一个需求说明：
需求思路：我们绘好图后会插入图框，图框插入进来时都是1：1，但我们会根据零件大小调整图框比例(如现在调整好后实际是0.8)，接下来就要标注尺寸，现在系统默认尺寸标注全局比例是1.
需求功能：现在我需要一个lisp,输入命令后选取图框，然后将图框的x比例0.8赋予尺寸标注全局比例(就是将尺寸标注全局比例变成0.8)并且将在的当前图层变成dim层,
第二个需求说明：
需求思路：我们在绘图完成后发现图框内尺寸、文字的比例与图框比例不是很协调，就需要手动去调整尺寸、文字大小
需求功能：现在我需要一个lisp,输入命令后选取图框，然后lisp将我选取的那个图框的尺寸全局比例变成与图框x比例一样，将图框内的文字字高变成与图框内现有文字字高一样，图元不能发生变化
还请各位高手有空帮忙看看，谢谢！


第一个很好实现，第二个有些麻烦。

麻烦这位大侠先帮我把第一个先解决一下，谢谢！

我传一个模板大家帮忙看一下
2