CADsite forum

 :mrgreen:Perfect 

Dit laatste programma is precies wat ik zocht, thanx.

Maikel

Beste HofCAD,

Het programma werkt. Bedankt

Misschien dat ik lastig ben, is het mogelijk een selectie te maken van de blocks. die gewijzigd worden. In plaats van dat de hele tekening wordt gewijzigd.
Ik dacht zelf. De X weg te halen bij:

ssblocks (ssget "X" (list '(0 . "insert") '(66 .1) (cons 2 BlockNaam)

Maar dit geeft als probleem dat de blocknaam niet overeen komt. Zou hier een oplossing voor zijn, zo ja dan hoor ik die graag.

Alvast bedankt.

Maikel

Beste HofCAD,

Is het mogelijk de naam van de attribute die ingevuld moet worden in te geven. Er zitten namelijk meerder attribute aan het block vast. Met het programmatje van jou wordt het eerst attribute ingevuld.

Alvast bedankt,

Maikel.

Beste HofCAD,

Hartstikke bedankt voor je snel reactie. Wat ik zo kan zien doet dit wat nodig is. Ik zal het vanmiddag gaan testen dan zit ik namelijk weer achter de juiste PC.

Ik heb alleen twee vragen?
1) In de test staat "MijnBlock". Moet dit de naam van de block zijn of kan dit ook een lijst met daarin de verschillende blocken. Zit
    hiervoor de teller erin? De blokken die ik wil invullen hebben namelijk niet allemaal dezelfde naam.
2) Bij "if ssblocks" moet hier niet nog een vergelijkende waarde aan vast?

Misschien zijn het wel simpele antwoorden want ik ben nog niet zo bekend met LISP. Ik vind het wel een ontzettend interessant onderwerp want men kan er zoveel mee.

Alvast bedankt,

MvG,

Maikel

Goedemorgen allemaal,

Ik heb diverse blokken in een tekening. Deze hebben allemaal een attribute met dezelfde benaming. Daarnaast heb ik een lisp met een variabele. Hoe kan ik de attribute in laten vullen door het lisp programma.

Alvast bedankt,

Maikel

Het is gelukt.

HofCAD, Bedankt

Maikel

Goedemiddag,

De reden dat ik de cdr had gewijzigd naar last omdat de layer meer gegevens heeft dan ik wil.

De sLayer krijgt bijvoorbeeld als waarde: 43260269-x13l000 kalkzandsteen

Ik heb het inmiddels al uitgeprobeerd met de cdr te wijzigen maar dat werkt niet. Het woord kalkzandsteen is voor mij van belang. Heeft iemand misschien een idee zodat ik alleen kalkzandsteen heb als gegeven van sLayer krijg.

Alvast bedankt,

Maikel

beste HofCAD

Geldt dit ook wanneer de hatch in de xref staat.

Met vriendelijke groet,

Maikel

Goedemorgen allemaal,

Ik ben momenteel bezig met het schrijven van een lisp ik heb momenteel het volgende:


(defun Muurtype ( /  )

;The next while loop checks for null or invalid selection.
  (while (or
    (not (setq ePick (nentsel "\nSelect the type of wall: ")))
    (< (length ePick) 3)
    );end or
    (progn  (princ "\nObject was invalid or was not selected."))
  );end while

(GetList)
)
;;;----------------------------------------------------------------------------------
(defun GetList ( / iNest eList   )
  (setq iNest (length (last ePick)))

;The next if statement handles block within blocks. iNest = 1 means no nesting. Since (nentsel) goes all the
;way to the root AutoCAD object we have to traverse back up to the top level of the nesting to get a block name.
  (if (= iNest 1)
    (setq eList (entget (car ePick)))
    (setq eList (entget (nth (- iNest 2) (last ePick)))) 
  );end if

;Check Layername (hatch)
  (setq sLayer (last (assoc 8 eList))
  ); end setq
 
); End GetList


Volgens gaat dit wel werken. Dit is mijn eerst lisp dus ik hoor graag wat jullie ervan vinden.

Met vriendelijke groet,

Maikel

Bedankt, hier kan ik wel wat mee

Mazzel Maikel

Goedemorgen allemaal,

Alles goed. Ik zit met een vraag. Is het mogelijk om vanuit een Xref gegevens te lezen met behulp van een lisp. Om zo bijvoorbeeld de hatch van een bepaalde wand te weten toekomen.

Alvast bedankt voor jullie reacties

Maikel

Hallo,

Ik heb een kort vraagje? Ik ben me aan het verdiepen in de lagenstructuren in autocad. Ik kom op " De GB CAD afsprakenstelsel". Is de lagenstructuur die hierin wordt behandelt een standaard of niet? Ik kom hem namelijk in verschillende andere programma's tegen.

Alvast bedankt voor jullie reactie,

Maikel

Beste mensen,

Allereerst wat een handige site is dit. Ik heb hier erg veel informatie kunnen vinden over Autocad. Mijn dank hiervoor.

Nu zit ik met een vraag. Is het mogelijk een scan uit te voeren over een tekening met behulp een Lisp. Voor bijvoorbeeld diverse lagen te herkennen Zoja hoe kan ik dit het beste aanpakken.

Alvast bedankt voor de hulp.

Maikel

Hoi, allemaal

Ik ben bezig met een project voor mijn werk. Ik maak gebruik van Autocad 2007 in combinatie met nordined. De bedoeling is de bedoeling dat een wcd op een muur automatisch ziet op wat voor type muur hij is geplaatst. ik dacht persoonlijk door een lisp te schrijven die kijkt naar de layer van de muur en dan de naam van het symbool wijzigt.
Hebben jullie enig idee of dit mogelijk is en zo ja kan dit dan via lisp of kan het nog makkelijker. Ik heb namelijk zelf geen ervaring met lisp.

Alvast bedankt, Maikel