Tuesday, September 9, 2008

Lighting Layout : 1-Unit from edge, 2-units in between

Have you ever worked on Electrical drawings, especially "Lighting Layout" drawing?
In a Lighting Layout drawing, the blocks representing the normal light will be placed in a room as ...
one unit from the edges of wall & two units in between them.
This is a common concept.

So a draftsman has to either calculate manually or either place a line touching both walls (towards the LENGTH or WIDTH) and then using AutoCAD builtin command DIVIDE, he can get the required points.
But, Its annoying to use a long procedure of dividing & putting/erasing the POINTS, Hence, I worked to develop a LISP routine.

So this LISP routine is actually ...
A command to DIVIDE a line/pline/arc in equal segments with 1-unit from both ends and 2-units in between segments.

* DIVIDE_ALTERNATE.LSP (2Kb)
This command will DIVIDE a line/pline/arc in equal segments with 1-unit from both ends and 2-units in between segments.

Sequence of command lines for this routine:-

Command: DVD
Pick LINE/PLINE/ARC:
Enter the number of POINTS:


Download : DIVIDE_ALTERNATE.LSP

3 comments:

  1. pretty cool lisp, I've been looking into learning how to write lisp commands. I'm going to try to create one that divides a line or pline into 20'and or 50' segments and inserts a specified block at those points along with inserting the specified block at the 2 ends of the line and if the line/pline is under 20'/ 50' only allowing the specified block to be inserted at the 2 endpoints. if you have any ideas/suggestions as to resources for writing/learning to write lisp routines or just advise for writing lisp routines it would be very much appreciated.

    blog on!

    ReplyDelete
  2. Matt - Thanks for visiting my blog.
    And Sorry Matt, I was out of station for the last few weeks.
    I have gone through your task of required lisp and I think that I can make it for u. pls wait for a while or u can contact me thru my email.

    ReplyDelete
  3. Matt,
    Why wouldn't you just use the measure command for the lisp routine you would like to create?

    ReplyDelete