;第一次发帖,而且我是新手,如有不当之处,还请大家批评指正. 自己写了一个自动拉线的小程序,高手见笑了.. 绘图步骤如下 如图: 圆弧+直线: arc+line: +自动拉线: +eqptdl: +直线: +line: +自动拉线: +eqptdl: +直线: +line: +完成: +ok: 再来一个: circle+eqptdl: +line+eqptdl: +line: +ok: 打完收工. 注: 以上红色文字为自定义命令. ;============================================================================== 此lsp文件包含三个命令: 1 ready 此命令用于自动建立图层. 并且画出坐标轴. 2 eqptdl 主角命令 对"1辅助线"层(绿色那层)上的图元拉线 注:只对 线段 圆弧 圆 拉线,也就是说除此之外的 多段线 样条.. 都不会被拉线. 3 ok 此命令用于将"1辅助线"层上的所有图形改到"2粗实线"层上. 并且清除 拉线.. ;=================================================================== 当然为了使用方便大家可以为之设置快捷键 如: 21--ready 22--eqptdl 23--ok ;===================================================================== 好了欢迎大家来鄙视在下... |