找回密码
 立即注册

QQ登录

只需一步,快速开始

扫一扫,访问微社区

查看: 982|回复: 11

[LISP程序]:图纸批量打印

[复制链接]
发表于 2003-6-13 20:07:18 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?立即注册

×
图形要先排好,row and column的间距要均匀。
输入图纸的行、列数,选择要打印第一张图的左下角点,再
选其右上角点,再选第二张图的左下角点即可。

详细说明(选自对一网友的答复):
 首先,设置好正常打印所需的一切环境;比方说,用hp绘图仪打印时,确保hpconfig中纸的方向设置无误,cad中笔宽、纸张的大小、比例等都正确,如果下次打印只需要选图纸的角点就可以时,你的设置就到位了。我的程序只帮您自动选点,不帮您设置各选项。唯一能选择的是:用hp绘图仪打印时,是打印成文件还是直接输出到绘图仪。当然,如果是打印机,当然是直接输出到打印机了。
    选点示例:
    (1)要打印排成3行2列的图纸时:
        a.选择第一行第一列图纸的左下角点
        b.选择第一行第一列图纸的右上角点
        c.选择第二行第二列图纸的左下角点----为什么呢?因为这个点和b中选择的点的距离定了图纸排列在x和y方向的增量。明白了吧?
    (2)要打印排成3行1列的图纸时:
        a.选择第一行第一列图纸的左下角点
        b.选择第一行第一列图纸的右上角点
        c.选择第二行第一列图纸的左下角点
    (3)要打印排成1行3列的图纸时:
        a.选择第一行第一列图纸的左下角点
        b.选择第一行第一列图纸的右上角点
        c.选择第一行第二列图纸的左下角点
    目前,我的程序在autocad r14里没什么问题,但在CAD2000以上版本中可能会出错。我还没抽时间去调试。
    再去试试,如果照我说的做,应该没问题了。试验时,可以设置打成文件。先手工选点,打一个plt文件,再用bp命令去打,看打出的plt是否正确。
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
 楼主| 发表于 2003-6-13 20:12:18 | 显示全部楼层

Re: [LISP程序]:[LISP程序]:[LISP程序]:图纸批量打印

最初由 blueyxq 发布
[B]图形要先排好,row and column的间距要均匀。
输入图纸的行、列数,选择要打印第一张图的左下角点,再
选其左上角点,再选第二张图的左下角点即可。 [/B]


补充一点:打印之前切记先调试好打印环境,如笔宽、纸的orientation、size等,还有rotation也要调好。此程序仅帮您自动选点,其它的帮不了您!
如果打的是文件plt,请在d:建一个work目录,再在其下建plt目录,打出的文件将以1.plt,2.plt,3.plt……的形式存在此目录下。如果不愿建此目录,可以修改lisp程序,此程序不加密(加密也没用)。
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2003-6-13 20:25:32 | 显示全部楼层
先试试。不知道效果好不好?只是现在的图花样百出,实在需要一个统一的标准才行!
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2003-6-13 22:41:35 | 显示全部楼层
对于图纸批量的打印,我是这样处理的:先用VIEW来命名视图,这样同时也可以方便在绘图时缩放视图。然后在打印时,采用SCR文件来进行批量打图。按楼上所给的LSP程序,我认为并不是很方便,特别是那些花样百出的图。首先要排列整齐,还要同个方向和相同比例,另外对R14和2002并不通用。不过还是对blueyxq 网友的行为予以肯定,希望能有更多的网友能介绍自己在各方面的经验,让大家取长补短。
ACAD好象还自带一个批量打印的程序,不过我还不会用,也没有用过,各位可以去※AutoCAD 软件使用技术※版看看,或许有介绍。
注:SCR文件采用文本方式,可以用记事本等进行编辑,其内容相当于把在ACAD命令行键入的命令写在一个文本文件内。可以参看有关ACAD的书。
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2003-6-13 23:05:59 | 显示全部楼层
很好用,谢谢啦,希望再接再励
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2003-6-14 01:13:36 | 显示全部楼层
好啊,找了好久了,每次都在一个窗口中打十几张图,光选框框就累死了
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

 楼主| 发表于 2003-6-14 13:11:27 | 显示全部楼层
最初由 大地 发布
[B]对于图纸批量的打印,我是这样处理的:先用VIEW来命名视图,这样同时也可以方便在绘图时缩放视图。然后在打印时,采用SCR文件来进行批量打图。按楼上所给的LSP程序,我认为并不是很方便,特别是那些花样百出的图。首... [/B]


先谢谢版主加的爱心币!
版主说的提醒了我,我还一直没用过scr,虽然看过,知道这东西可以批处理。有空我再研究研究。

我编的那个批打印是有限制,不能处理花样百出的图。另外,在acad2000以上的版本中有时会出错。此外,打成文件时最好用viewcompanion等看plt的文件确认一下plt是否正确无误,免得浪费纸张!

我还想过做个arx保存每张图的打印信息,调出来时直接就能打,不过想法还没成熟,而且会比较费时间,一直未去实施。况且现在的这个lisp感觉也差不多够用了,又不是商用软件,给自己用嘛!
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2004-3-3 23:30:46 | 显示全部楼层
如果在R2004中可以用吗?
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2004-6-30 14:48:29 | 显示全部楼层
为什么不让我下,非要我灌水。我是文明公民,不想灌水。
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2021-7-20 13:44:47 | 显示全部楼层
感谢大佬分享哦,谢谢
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 225个

财富等级: 日进斗金

发表于 2024-2-22 16:46:03 | 显示全部楼层
谢谢分享!!!!!
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复

使用道具 举报

已领礼包: 225个

财富等级: 日进斗金

发表于 6 天前 | 显示全部楼层
不错,感谢分享!!!!
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|申请友链|Archiver|手机版|小黑屋|辽公网安备|晓东CAD家园 ( 辽ICP备15016793号 )

GMT+8, 2024-5-29 15:16 , Processed in 0.218505 second(s), 54 queries , Gzip On.

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表