Results 1 to 3 of 3

Thread: Offset a rectangle to separate lines.

  1. #1
    Member
    Join Date
    2012-01
    Posts
    11
    Login to Give a bone
    0

    Default Offset a rectangle to separate lines.

    Hi ALL,

    You know how when you offset a rectangle it it stay as a polyline? i need a lisp routine that i can use to offset the rectangle, set the new lines to current layer, and substract the offset distance from both end of the line. i know thats asking alot but has anyone seen a routine like this?

    Thanks,
    Brian

  2. #2
    Administrator Opie's Avatar
    Join Date
    2002-01
    Location
    jUSt Here (a lot)
    Posts
    9,100
    Login to Give a bone
    0

    Default Re: Offset a rectangle to separate lines.

    Can't say that I have seen anything like that. What are some steps that may be needed to accomplish this? I would think:
    • Get a record of the last entity in the drawing
    • Request the user to select the rectangle to offset
    • Copy said rectangle
    • Change the layer of the copied rectangle
    • Explode the copy of the rectangle
    • Create a selection set based on the previous selection set (The explode command created a new selection set with all of the base entities from the previous rectangle).
    • Determine the side of the rectangle to offset to
    • Offset each item in the new selection set
    • Delete said selection set


    Of course, there may be other steps.
    If you have a technical question, please find the appropriate forum and ask it there.
    You will get a quicker response from your fellow AUGI members than if you sent it to me via a PM or email.
    jUSt

  3. #3
    Administrator BlackBox's Avatar
    Join Date
    2009-11
    Posts
    5,719
    Login to Give a bone
    0

    Default Re: Offset a rectangle to separate lines.

    This sounds like it would be a really neat application of Lee's mad-crazy grvecs/grdraw skills.
    "How we think determines what we do, and what we do determines what we get."

    Sincpac C3D ~ Autodesk Exchange Apps

    Computer Specs:
    Dell Precision 3660, Core i9-12900K 5.2GHz, 64GB DDR5 RAM, PCIe 4.0 M.2 SSD (RAID 0), 16GB NVIDIA RTX A4000

Similar Threads

  1. Edge lines on separate layer
    By autocad.wishlist1734 in forum AutoCAD Wish List
    Replies: 1
    Last Post: 2018-10-30, 04:11 PM
  2. Replies: 0
    Last Post: 2011-11-29, 07:01 PM
  3. Create an X (2 lines) inside a rectangle
    By CISCO in forum AutoLISP
    Replies: 4
    Last Post: 2008-08-12, 06:00 PM
  4. Replies: 1
    Last Post: 2008-06-10, 09:35 PM
  5. Rectangle command draws 4 Lines instead of 1 Polyline
    By jeff.garr in forum AutoCAD General
    Replies: 8
    Last Post: 2004-10-01, 03:43 PM

Tags for this Thread

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •