Topic: Snap From Endpoint

[jonesy]

Please excuse my images - dont know how to make them smaller
Before

After

This is becomeing a bigger part of my drawing schedule, so anyway of speeding it up would be VERY welcome

I will try to put the actual drawings in the lilly pond if time allows.

Mucho Gracias

T

[Kerry]

Hi Tracey

• Copying or moving ?
• Blocks or just Entities ?
• Is the 6'.0 and 4'.0 a product of Dimscale ? or fixed
• Vanilla Acad acxxxx ?

I may have some spare time this evening

[Kerry]

How about using a marker  that has been arrayed rectangular on a Locked NoPlot Layer ??

[jonesy]

Hi Tracey

• Copying or moving ?
• Blocks or just Entities ?
• Is the 6'.0 and 4'.0 a product of Dimscale ? or fixed
• Vanilla Acad acxxxx ?

I may have some spare time this evening

Kerry, I always leave the MX file in tact and copy the info into a new template, so moving the sections would be fine.

All the items are entities (usually proxy entities so I have to explode them to get them to do anything)

The 6 and 4 are usually fixed unless it is a wide road then there maybe different numbers involved

We use vanilla acad 2004

We work in Metric

How about using a marker that has been arrayed rectangular on a Locked NoPlot Layer ??

Sorry, I'm not following you there. Could you please explain in Dumb Blonde English

If you are interested there are now 2 zip files in the lilly-pond
http://www.theswamp.org/lilly_pond/jonesy/13403-4500-43%20rev%20a%20sections.zip and
http://www.theswamp.org/lilly_pond/jonesy/design3%20cross%20sections.zip
- Mark I will delete them soon as they are quite big
The drawings show the before and after including layer name changes etc. I know there must be an easier way of doing this

Many Thanks
T

[Kerry]

Rectangular array

using a circle as the BtmLeft of each table on a no-plot locked <after arrayed> layer

Just thought it would/could be a quick and nasty solution.

Set you snap to END and CENTER [ OSMODE 5 ]

[Kerry]

Can you make do with the array Tracey, or do you need a program to help ?

[jonesy]

Hi Kerry, thanks for your help so far.

I wish I could make it with an array, but i have 3 columns that are 4 spaced and then there is a column that is 6 spaced (to allow for the paper border in layout mode).

I really am having a block with this, I know there must be a quicker way of doing this, but what I cannot fathom.

Many thanks

[Kerry]

ahhhh, ok

See if this helps .. A layout solution may be more appropriate than a programatic one.

add the setout lines to your ModelSpace layouts to layer z-vpfr which is currently locked and nonplot
perhaps change the color of the new lines < or change the layer > for clarity.

... .. then just move the tables to the intersections ; no FROM required.

[Kerry]

Hi Tracy
Regarding your Automated Layer changing etc ..

Perhaps the best way to handle the problem is one step at a time. < sounds simple, heh >

Write out a FULL list of changes you want made.
not a HOW list, but a WHAT list, stating explicitly what you want changed or what problem needs solving.

The most expedient solution may be in using a sequence of simple toolbar commands rather than a full blown program ; at least initially untill the problem is resolved technically.

[Kerry]

Tracey,
Couple of questions :

Is your Template setout < setout grid > the same from job to job, or at least within a job. ?

Do you insert the MASTER cross sections into your Modelspace to arrange them ?

I think I could semi-automate the arrangement process to take less than 2 seconds per frame, about 12 minutes for the 500+ frames, irrespective of the Master setout shape.

[edit : projected time revised ]

[Kerry]

I assume your chainage will not always start with 0.00

I assume the chainage will not always be 10.0 increments.

I assume the frame will have a consistant bounding box.

Are you exploding the frame before you move it ?

[jonesy]

I assume your chainage will not always start with 0.00

I assume the chainage will not always be 10.0 increments.

I assume the frame will have a consistant bounding box.

Are you exploding the frame before you move it ?

Chainage start numbers can vary, Chainages are usually 10.0 increments, but not always.

The frame will have the same size bounding box per job, this may vary from job to job though.

Currently I am exploding before moving, but I am open to new ideas. I have 2 zip files in the lillypond, the design cross sections file is exactly how I receive it from the surveyor. The frame is not 1 entity, but lots of proxy entities

Many thanks for your help
T

[Kerry]

OK, TRY this

Code: [Select]

(defun c:TJ990 (/               FrameBoundingHeight
                FrameBoundingWidth              Workpoint
                MovePoint       LL              UR
                ss
               )
  (setq FrameBoundingHeight 12.0
        FrameBoundingWidth 20.0
  )
  (setvar "OSMODE" 32)                                      ; INTersection
  (while
    (and (setq Workpoint
                (getpoint
                  "\n Move Frame FROM :\n Select Frame Lower Left Corner"
                )
         )
         (setq
           Movepoint (getpoint
                       "\n Move Frame TO :\n Select NEW Lower Left Corner"
                     )
         )
    )
     (setq LL (mapcar '- Workpoint '(0.5 1.0 0))
           UR (mapcar '+ Workpoint (List FrameBoundingWidth FrameBoundingHeight 0))
           ss (ssget "c" LL UR)
     )
     (vl-cmdf "MOVE" ss "" WorkPoint MovePoint)
  )
  (setvar "OSMODE" 0)
)

[Kerry]

You may need to amend this to suit the Project,

Code: [Select]

  (setq FrameBoundingHeight 12.0
        FrameBoundingWidth 20.0
  )
but you will never have to select the frame to Move it.

 

[jonesy]

I like it ALOT.

I dont even need to do the grid, just use osnap and polar works great.

But I will try setting up a grid for when the engineers change the things yet again (meeting this afternoon, pdfs sent, and awaiting comments)

Thanks Kerry, you are a STAR

T