Topic: Spot elevations

[Mark]

Would anyone be interested in _another_ way to label spot elevations in LDT?

[Dent Cermak]

Sure. I've figured out a way in LDD3 but it is combersome. But remember, I don't use those stinking "x"s. We do spot shots Corps of Engineer style with the decimal point marking the spot shot location.
With the "x" you get too much clutter and generally text placement on an individual basis is a real pain ( remember, you have a prefered position for the spot shot text in relation to the "x" and 6 alternate positions.) betcha' he didn't know that.

[Mark]

Sure. I've figured out a way in LDD3 but it is combersome. But remember, I don't use those stinking "x"s. We do spot shots Corps of Engineer style with the decimal point marking the spot shot location.
With the "x" you get too much clutter and generally text placement on an individual basis is a real pain ( remember, you have a prefered position for the spot shot text in relation to the "x" and 6 alternate positions.) betcha' he didn't know that.

Then you won't like mine Dent, I use the "x's", sorry. IMO, any dwg that has spot elev's in it is cluttered. I hate them!

[Dent Cermak]

True, especially with the dang "x"s!! I drop in the spot shots with the decimal point aligned on the node and then clean out any overprints. Now the drawing isn't cluttered. (I put the elevations that I dump due to overprints on a layer called "OFF". That way the client has ALL of the spot shots. Dang data collector zaps an elevation on everything that is shot, so you've got lots of extra shots.) The trick too is to set the spot shots at L50 or L60, no bigger. Lay a screen value on them and you have no problems.
I can't see ya'll not using spot shots in Florida. There's only 3 or 4 contours in the entire state....except for the sink holes.
(I put a copy of a current drawing in yor box on the Lilly Pond to show you what I mean.)

[Bob Garner]

I thought you had to include the x's in LDT because they were the objects that represented the elevations.  When paper drafting, I learned Dent's way of plotting spot shots.  Good to know this works with LDT.

Bob G.

[Mark]

Well my prgram uses what ever you have defined for pdmode but the elev. is placed by using the AECC point and middle_left justified. Making it use the decimal point might take a bit of work but I'll try.

[Dent Cermak]

Bob, what you say is true in LDT in R14 or whenever using the Softdesk point blocks. The work around there is the "explode attributes to text" button. Then you erase the PNTS and DESC elements. Then measure the move required for one of the spot shots to the node. then do a mass move.(Before the measurement, I also change the text style to Romans and oblique the elevation values 15 degrees)
Once you get into 2000 with the point groups, the whole scene changes. You can bring in just the nodes. then bring in just the elevations and then do your mass move.(explode the elevation point group TWICE before doing the move though. Trust me, it works.)
(See my drawing in Mark's box in the Lily Pond for a sample.)

[Mark]

In the newer versions of LDT all you have to do is create a "Point Label Style" and set it to place the labels on point. You define anything in the style, text style layer offset text rotation, etc.

[MSTG007]

I have a lisp which is there to calculate top of curbs on elev spot shots... but I can not get the X at the place of the grade shot to work!

Can i have some help?

Thanks!

(defun c:Spot ()
;; assumes 2 blocks available named "SpotLeft" and
;; "SpotRight" with different base points, a rectangle and
;; 2 attributes, text drawn at 1 unit high.
(setq TxtHt (getreal "\nText height for label: ")
      Pt1 (getpoint"\nPick point for elevation: ")
      Pt2 (getpoint Pt1 "nPick elevation label point: ")
)
(setq BkName (if (> (car Pt2) (car Pt1))  "SpotRight" "SpotLeft"))
(setq SpotElev (getreal "\nEnter elevation: ")
      SpotHigh (+ 0.5 SpotElev)
      SpotElevTxt (rtos SpotElev 2 2)
      SpotHighTxt (rtos SpotHigh 2 2)
)
(command "line" pt1 pt2 "")
(command "-insert" BkName Pt2 TxtHt TxtHt 0 SpotElevTxt SpotHighTxt)
(princ)
)

It be nice to have one with one elev. spot rather than one

[Mark]

Could you upload a copy of the two blocks to the lilly.pond ?

[MSTG007]

Mark, i can... lol wheres the upload place and account info...  ill zip it up!

thanks

[Slim©]

Mark, i can... lol wheres the upload place and account info...  ill zip it up!

thanks

Here's where: http://theswamp.org/lilly.pond/

[MSTG007]

THanks Slim.....

I went ahead created a folder  Mstg007 ----->>> Mstg007  

with a spot.zip   init with a lsp and dwg!

thanks

[Mark]

Do you mean like this.

Code: [Select]


(defun c:Spot ()
;; assumes 2 blocks available named "SpotLeft" and
;; "SpotRight" with different base points, a rectangle and
;; 2 attributes, text drawn at 1 unit high.
(setq TxtHt (getreal "\nText height for label: ")
      Pt1 (getpoint"\nPick point for elevation: ")
      Pt2 (getpoint Pt1 "nPick elevation label point: ")
)
(command "_point" Pt1); <-- added this MST

(setq BkName (if (> (car Pt2) (car Pt1))  "SpotRight" "SpotLeft"))
(setq SpotElev (getreal "\nEnter elevation: ")
      SpotHigh (+ 0.5 SpotElev)
      SpotElevTxt (rtos SpotElev 2 2)
      SpotHighTxt (rtos SpotHigh 2 2)
)
(command "line" pt1 pt2 "")
(command "-insert" BkName Pt2 TxtHt TxtHt 0 SpotElevTxt SpotHighTxt)
(princ)
)