第08章AutoLISP与Visual_LISP清华.pptVIP

第8章 编程实例;8.1设置作图环境 编程作图和交互作图一样，也需要设置作图的环境，例如图纸的范围、绘图的单位、目标捕捉的类型、图层、颜色、线型、线宽、字样等，如果缺少对作图环境的设置，只能是利用加载程序时AutoCAD提供的默认环境。 设置一个合适的作图环境不仅可以提高作图的精度和效率，有时还会影响到所绘制的图纸是否符合企业的规范和满足生产的需要。 用程序实现设置作图环境的功能可以通过command函数调用相关的命令，或者通过setvar函数改变相应系统变量的当前值或当前状态。有些功能只能通过上述一种途径实现，有些功能可以通过上述两种途径实现。 ;1. 设置图纸的范围 例如设置A3图纸的作图范围 （1）通过command函数设置 图纸的范围 (command limits 0,0 420,297)或者 (command limits (0 0) (420 297)) 或者 (command limits (list 0 0) (list 420 297)) 这时p1、p2分别是作图范围的左下和右上角点，上式可改写为： (command limits p1 p2);（2）通过setvar函数设置图纸的范围 系统变量limmin和limmax分别对应于图纸的左下和右上角点，只需用setvar函数设置它们以新的值即可。 (setvar limmin (0 0)) 或者 (setvar limmin (list 0 0)) 或者 (setvar limmin 0,0) 或者 (setvar limmin p1) 设置图纸的右上角点的表达式如下： (setvar limmax (420 297)) 或者 (setvar limmax (list 420 297)) 或者 (setvar limmax 420,297) 或者 (setvar limmax p2);2. 设置绘图的长度和角度单位 例如将绘图的长度单位设置为十进制、3位小数，角度单位设置为十进制的度（?）十进制、2位小数、X轴正方向为0?、逆时针方向为正。 （1）通过command函数设置绘图的长度和角度单位 (command units 2 3 1 2 0 N) command的参数说明如下： units：AutoCAD设置绘图单位的命令； 2：长度单位为十进制； 3：3位小数； 1：角度单位为十进制的度； 2：2位小数； 0：X轴正方向为0?； N：非顺时针，即逆时针为正。;（2）通过setvar函数设置设置绘图的长度和角度单位 (setvar lunits 2) ；长度单位为十进制 (setvar luprec 3) ；长度单位3位小数 (setvar aunits 1) ；???度单位为十进制的度 (setvar auprec 2) ；角度单位为长2位小数 (setvar angbase 0.0) ；X轴正方向为0? (setvar angdir 0) ；逆时针方向为正;3. 设置目标捕捉的类型 交互操作时，目标捕捉类型的选项是字符串，它以编码的形式记录在系统变量osmode内，代码的具体含义是： 0 ：NONe （不标捕捉任何类型的对象） 1： ENDpoint （线段和圆弧的端点） 2： MIDpoint （线段和圆弧的中点） 4 ：CENter （圆、椭圆和圆弧的中心点）;8： NODe （结点，用point命令生成的点） 16 ：QUAdrant （圆和圆弧的象限点） 32： INTersection （线段和圆弧的交点）;256：TANgent （切点） 512： NEArest （对象上的最近点） 1024：QUIck （快速捕捉） 2048：APParent Intersection （在观察方向上相交的点） 4096：EXTension （延长线上的点） 8192：PARallel（与所选对象平行的点）;（1）通过command函数设置设置目标捕捉的类型 (command osnap endpoint,midpoint,center)；捕捉端点、中点和中心 (command osnap none)；不捕捉任何类型 （2）通过setvar函数设置目标捕捉的类型 (setvar osmode 7)；7是捕捉端点、中点和中心的代码之和 (setvar osmode 0)；不捕捉任何类型 将osmode设置为0（不捕捉任何类型）是通常的设置。假定osmode的当前值为1，将捕捉直线或圆弧的端点。在这种情况下，如果指定的是p点，而p点处刚好有一条直线，那么实际获取的是该直线距p点较近的那个端点，而不是p点本身。所以应该用setv