Automatisch een referentiepunt plaatsen

[Pietje]

Beste allemaal,

Ik zit met de volgende vraag: Is het mogelijk een referentiepunt (in de vorm van een block) te plaatsen in een tekening, waarna automatisch de hoogte wordt bepaald en ingevuld, tov het nulpunt. Hopelijk is dit duidelijk genoeg!

Alvast bedankt

[julien]

[urlhttp://www.dailyautocad.com/autocad/autolisp-method-of-giving-elevation-symbols-in-autocad/]zoiets?[/url]
Dit is wel met een lisp, dus niet voor Lt.

[Pietje]

Ik heb de files binnen, maar het is nog niet geheel duidelijk hoe het precies werkt

[Reimer]

Beste Pietje,

ik gebruik meestal een "ordinate dimension" om een hoogte aan te geven. Deze wordt geplaatst t.o.v. je actieve UCS. Maak dus eerst een UCS aan op het gewenste nul-niveau.
Om e.e.a. te versnellen heb ik er een kleine lisp voor gemaakt. (wel eerst

Reimer.

(defun c:HM ()
    (setq osmo (getvar "osmode"))
    (setq locatie (getpoint "        Geef een locatie voor de hoogtemaat:   "))
    (setvar "osmode" 0)
    (command "dimordinate" locatie "@0.2,0.0")
    (setvar "osmode" osmo)
  (princ)
)

[Pietje]

Het is gelukt! We hebben gebruik gemaakt van een field in een dynamic block.

Deze kan op slot