在AutoCAD2000中用鼠标拖动实现参数化绘图.pdfVIP

制 造 ,k,自动 1七 在AutoCAD2000中用鼠标拖动实现参数化绘图 张 少 丹 (扬州经济干部学校.江苏 扬州 225002) 摘 要 在AutoCAD2000中用VisualL工SP对AutDCAD进行二次开发，修改、扩充AutoCAD的功能，让用户 直接读取输入设备(如鼠标)，实现鼠标拖动实体数据库与屏幕图形的同时变动，使鼠标拖动图形的参数化绘 图成为可能.同时免去了编制大量绘图程序的工作: 关键词 A.utoCAD2000:鼠标拖动;参数化绘图:AutoL工SP程序 0 问题的提出 在工程设计绘图过程中，许多零部件R有相同或相似的形体结构 如机械设计中的标准 件 对于这样一类零部件，在计算机辅助设计中常采用参数化的绘图方法来完成其生声图样 约绘制。 通常情况下，采用尺寸驱动实现参数化绘图，即通过改变决定几何图形的形状和人小的 绘图参数来驱动图形的自动变化 但是，若需生成系列图纸，设计人员只能通过编制大量图 纸程序确定可变参数，通过改变参数值达到 “人r”参数化绘图，这种绘图需要设计人员编 制、调试大量绘图程序，而且对方案设计而言.可变参数数目事先无法确定时，人们便无法 编程， ] 基本原理挥愁 移动光标就能从鼠标那里不断返回坐标值 在 AutoCAD200。中，我们可使用 实现鼠标拖动实体数据库与屏幕图形的一致 bsualLISP对其进行二次开发，修改、扩 变化，它并不改变图形实体的线型、层等属 充AutoCAD的功能 在这里，我仁利用 性 它只图形数据的实体数据交换信息。设 AutoL工SP语言提供的(GRREAD沐track]) 计人员不必考虑图形的原始尺寸 只需用鼠 函数直接读取AutoCAD的输入设备通〔常指 标移动屏幕上的光标，调整所需的参数值即 鼠标)任选项tracki指定是否追踪光标的 可 同时也免去了编制大量绘图程序的上 移动若track项存在且为真时通过鼠标 作。 2 实例:用鼠标拖动画轴类零件图的程序 “axis.Isp (commandlimits0,0420,297) (commandzoomall) (setqA(getpointleftcorner:)) ;用户输入起点A(x,y0) (setqyO(nthIA)) (setqqT)(setqxO(cara)) (whileq (setqB(getpointsecondpoint:)) :用户输入第一点B(x,y) (setqx(nth0B))(setqy(nth1B)) (if(;xx0) (progn ;若xx0.则画出这一段轴图，并用entget获得这段轴图的实体定义数据表 .me,ml,m2,m3,m4 (setqr (一yy4)h (一xx0)、 (commandlayerIf2OK2Lcontinuous2) (commandLine(List(-、。3:i、()dietf-xOh3)y0)’”) .日...喃 1‘33‘ 制 造 习七自动 下七 Surface,Finish,Project加1参数设置中， 以很方便地检查刀具路径的正确与否。 应设定相应参数，以确定毛坯余量并保证加 7 后置处理 工后侧面留20mm余量。为了避免刀具与工 Masterc二提供400种以上的后置处理 件的碰撞，我们采取了两种措施。第一，加 文件以适用于各种类型的数控系统，我厂采 工不同的绳槽曲面采用不同直径的刀具。越 用的是FANUC系统，机床为四轴联动卧式铣 靠近鞍座中心的绳槽曲面，使用直径越大的 床。根据机床的实际结构，我们编制了专门 刀具。根据厂内的实际情况，选用了(}315 的后置处理文件，绳槽曲面加工刀具路径NCI 的端铣刀以及b(400,}500,中630的三面 文件经后置处理后生成加工程序。 刃铣刀。Mastercam自带的刀具库中没有这 8 使用Mastercam实现DNC加 些刀具，我们使用Mastercam的自定义刀具 工 功能，自己设定刀