Subject: Re: baidarka tile printing from Cad with Lisp
From: Paul Raymond (kayaker37@hotmail.com)
Date: Sat Dec 30 2000 - 16:34:20 EST
Hi Bill,
You should be impressed with Ilgiz R. Baitimetov. I only changed a few minor
things to get it to work with Intellicad. Even that gave me a headache. It
has been a long time since I looked at LISP too. By the way I found this
piece of code at
http://www.cad.dp.ua/sovet1e.html
The only significant change was the line that started with this:
(setq ssss (strcat "plot w " (rtos $bufx1 2) ","
I used the script record feature of Intellicad to check the appropriate way
to call up the print command, but everytime I changed the "plot w" to
"_print" it caused Intellicad to become erratic. Changed it to the view
command as in my manual method and voila! If anyone has Autocad this should
print automatically, but it seemd more useful to save views. That way if you
ruined a sheet you wouldn't have to load the program again and figure out
which sheet it was.
Happy New Year!
Paul
>I'm impressed!
>
>I used to write a little LISP about 10 years ago, but have forgotten how it
>goes.
>
>Still a fantastic language.
>
>Have a happy holiday!
>
>Bill
> >Here is a short lisp program that will break up any drawing automatically
>;==============================================================
> >;Program for printing large drawings on a laser printer
> >;By Ilgiz R. Baitimetov, Bashkiriya, Sterlitamak
> >;Fido: 2:5011/206.0 E-mail mtezil@str.bashnet.ru
> >;minor changes Dec 28 2000 to break large drawings into saved views
> >;in order to print from IntelliCAD 2000 by kayaker37
_________________________________________________________________
Get your FREE download of MSN Explorer at http://explorer.msn.com
-
Baidarka Mailing List - All postings copyright the author and not to be
reproduced outside Baidarka or Baidarka archives without author's permission
Submissions: baidarka@lists.intelenet.net
Subscriptions: baidarka-request@lists.intelenet.net
Searchable archive: http://rtpnet.org/robroy/baidarka
This archive was generated by hypermail 2b27 : Mon Jan 01 2001 - 01:00:03 EST