yoin

Aberg

L.S.,

Bij het commando copy moet een basepoint aan gegeven worden en dan een afstand naar voor kopie.

Nu wil ik meteen weer een copy maken van deze kopie. (dus het basepoint is verplaatst naar de kopie)

Is hier misschien iets voor ?

(helaas gebruik ik 2009LT)




jo-king

Citaat van: Aberg op di 07 04 2009, 18:32:54
L.S.,

Bij het commando copy moet een basepoint aan gegeven worden en dan een afstand naar voor kopie.

Nu wil ik meteen weer een copy maken van deze kopie. (dus het basepoint is verplaatst naar de kopie)

Is hier misschien iets voor ?

(helaas gebruik ik 2009LT)


ik vrees er voor; ik heb het nog nooit gevonden.
althans niet in de standaard (LT) autocad.
misschien is dit wel te doen met een Lisp.
CAD/BIM consultant
Autodesk Reseller
Revit Certified professional

Reimer

Ik heb een eerste opzet gemaakt. Het werkt alleen nog maar met één object tegelijk omdat ik niet weet hoe je met lisp een nieuwe selectieset moet maken met daarin alleen de gecopieerde objecten. Verder kun je tijdens het copiëren helaas je object niet zien.
Probeer het maar eens.

Reimer.

;CopyOn. Copieer één object door t.o.v. het voorgaande punt
(defun C:con ()
  (setq obj (entsel))
  (print "\nSelecteer de te copieren objecten: ")(princ)
  (setq p1 (getpoint "\nSelecteer het basispunt: "))
  (while (/= p1 nil)
    (progn
      (setq p2 (getpoint p1 "\nSelecteer het doelpunt: "))
      (command "copy" obj "" p1 p2)
      (setq p1 p2)
      (setq obj (entlast))
    )
  )
)

bart

multicopy van de express tools acad 2008 doet dit standaard :D
Domme vragen bestaan niet.
Domme antwoorden wel.

m.vr. groet Bart

jo-king

Citaat van: bart op do 09 04 2009, 11:18:19
multicopy van de express tools acad 2008 doet dit standaard :D

mhuahahaa... zo simpel.

thanks Bart!
CAD/BIM consultant
Autodesk Reseller
Revit Certified professional

HofCAD

#5
Citaat van: jo-king op do 09 04 2009, 12:26:27
Citaat van: bart op do 09 04 2009, 11:18:19
multicopy van de express tools acad 2008 doet dit standaard :D

mhuahahaa... zo simpel.

thanks Bart!
Beste Reimer, Bart en Jo-king,

Helaas heeft Aberg aan een Lisp of een Express tools (met COPYM) oplossing niets,
want hij schreef: helaas gebruik ik 2009LT.
Maar voor Reimer als je het programma toch zelf zou willen schrijven,
dan had je het als bijgevoegd programma REPCOPY kunnen maken.
Bij het programma REPCOPY kun je wel meerdere objecten kopiëren,
maar heb je nog steeds geen preview.
Je kan natuurlijk ook voor een professionele oplossing naar het bestand Copym.lsp kijken.

Met vriendelijke groet, HofCAD CSI.
ACADcadabra

Reimer

je moet ook nooit het wiel opnieuw willen uitvinden. Mooi dat er al iets voor is. :vreegoe:

Reimer

Aberg

iedereen bedankt voor het mee denken !