CADsite forum

Ja inderdaad een lisp er tegen aan gooien.
Probleem is alleen dat ik daar niet genoeg ervaring mee heb.

Is er iemand die mij daar mee op weg kan helpen?

Goede middag allemaal,
Op een tekening staan een aantal gebieden aangegeven dmv een vierkante polyline. Sommige van deze vlakken hebben wel een overlapping.
Nu zijn er twee wensen:
1: hier (automatisch) verschillende layouts van te maken met de naam die links onderin het vierkant staat aangegeven.
2: van deze layouts een export te maken naar een dwg met vectoren. Dus de eventueel in het vlak aanwezige blocken dienen geburst te worden zodat deze als platte lijnen en tekst beschikbaar komen.

Heeft iemand hier een oplossing voor?

Goede dag alle,
Ik heb een tekening waar een aantal blocken in staan. Deze wil ik graag wegschrijven als een wblock.
In het block met de naam "view" staan een aantal teksten en lijnen die niet opgenomen zijn in het block maar wel mee moeten in de selectie voor het maken van het wblock. Het block "view" heeft wel een attribute waarin de filenaam staat voor het te maken block. Ook is het wenselijk dat het het insertpoint van het wblock op het 0,0 punt komt te liggen. Wie kan mij op weg helpen?

Hoi Hofcad,
Nogmaal super bedankt voor je Lisp. Alleen probeer ik er iets van te leren en loop een beetje door de code heen en als ik goed heb maak je dan een block aan als die er niet is?
(if (not (tblsearch "BLOCK" "Markering"))
    (progn
      (entmake (list '(0 . "BLOCK")
           (cons 2 Lay2)
           '(70 . 64)
           '(10 1.5 1.5 0.0)
          )
      )
      (@recblk '(1 1 0) '(2 2 0) Lay2)
      (entmake '((0 . "ENDBLK")))

Of heb ik het helemaal mis? Zou wel mooi zijn dat als het block er niet is er een aangemaakt wordt.

Mvgr
Henk

Geweldig, hartelijk bedankt voor de lisp routine.
Ga dit gelijk onderzoeken hoe het werkt. weer iets om te bestuderen.

Goede dag,
De bedoeling is om een bepaalde linetype polyline of line om te vervangen door losse blokjes mbv van een lisp routine.
Er is bijvoorbeeld een line of polyline met linetype "hidden" en die wil ik verdelen met een gelijkmatige verdeling met vierkantjes van 1 bij 1 mm (blockname in de tekening markering, tussenmaat van 7.5mm). Dus alleen de lijnen met type "hidden" en alle andere lijnsoorten niet.
Na de verdeling moet de originele lijn verplaatst worden naar een andere laag zodat deze niet meer zichtbaar wordt.
Wie kan mij hier mee helpen?

Goede dag, ik probeer een lisp routine te maken die op alle layouts in mijn tekening een aantal stempels plaatst op verschillend x,y coordinaten.
Het aantal layouts verschilt per tekening en het te plaatsen blokje is afhankelijk van de gevonden tekst.
Toelichting op layout 001 staat de tekst 1 hieronder (y-5) wil ik blokje 1 plaatsen onder tekst 2 wil ik blokje 2 plaatsen enz tot maximaal 6 teksten.
Op de layout 010 staat ook tekst 1 en tekst 3 dus ook onder deze teksten het bijbehorende blokje.
Ook het aantal layouts in de tekeningen verschillen nog wel eens van naam en aantal.

Ik heb eigenlijk totaal geen ervaring met lisp maar zou dit tooltje toch wel graag willen hebben.
Graag zou ik een voorbeeld willen hebben voorzien van wat commentaar zodat het gelijk een leer projectje kan worden.

Citaat van: EddyBeerke op di 07 06 2011, 10:13:09
Misschien een oplossing:
Sla de tekening eventueel op als... Bind alle xrefs, explodeer deze en start dan de lisp.

Jou vraag lijkt mij niet onmogelijk (denk aan NCOPY e.d.), maar de winst voor het maken van een lisp die in xrefs kijkt, lijkt mij niet op te wegen tegen de tijd die je kwijt bent met en binden en exploderen.

Deze oplossing staat ook in het vorige topic. Maar het is natuurlijk mooier als het in 1 handeling gaat.
Soms komt de engineer langs en die vraagt dan een update van de lijst en als je dan eerst van alles moet gaan binden en exploderen enz. vergt dit telkens weer tijd. ALs het script er eenmaal is dan kan er op elk tijdstip een update van de lijst gemaakt worden zonder dat er een xref vergeten wordt te binden.
Misschien is het makkelijker om een script te maken die de xrefs bind, explodeerd en weer ongedaan maakt?

Goede dag, de naam van het vorige topic was misschien niet geheel duidelijk.
Maar gezien het aantal mensen dat het vorige topic bekijkt wil ik toch nog een poging wagen om het een beetje te verduidelijken. Om in het veldwerk de kabelloop te kunnen bepalen worden er punten in de tekening uitgezet.
In een seperate eXcellijst worden dan de kabels aangegeven die in dat punt lopen. Begrijpelijk is uiteraard dat dit twee losse items zijn die bijgehouden moeten worden (Kabellooptekening en Kabellijst). Nu is het met de huidge lisp routine al mogelijk om dit te doen vanuit de tekening zodat alleen de tekening bijgewerkt hoeft te worden. Hier ben ik al zeer blij mee!!!
Nu is de wens ontstaan om de tekening op te splitsen in diverse deelinstallatie's mbv verschillende xRefs dit had ik echter niet voorzien in het vorige voorbeeld. Schijnbaar is het moeilijk om de routine aan te passen en zelf ben ik een beginneling met Lisp. Ook een uitbreiding met de lengte van de polyline (kabel) zou zeer welkom zijn.
Om ook het een en ander te leren uit de routine zou ik er graag wat commentaar regels bij willen hebben.
Ik weet inmiddels wel dat de routine meer iets is voor een gevorderde schrijver maar ook voor die mensen zijn commentaar regels dus wel handig. We zijn hier toch om van elkaar te leren???

Ik heb nu wel een goed voorbeeld en de tot nu toe gemaakte routine als bijlage toegevoegd.
In de bijlage staan alle tekeningen, de tekening waar de xrefs onder hangen ejn dus geopend moet worden is de tekening met de naan Testkabelloop000.dwg

In ieder geval bedankt voor de eerste opzet. Het verstrekken van een "verkeerde" tekening heeft overigens te maken met de gewijzigde opzet van de tekening. Ook voor het opzetten van tekeningen geld dat het eigenlijk een constant leer proces is.

Jammer maar helaas, misschien is er iemand die ook iets ziet in de lisp routine en die meer ervaring heeft met lisp dan ik zodat we de routine kunnen aanpassen.
Wat er nog ontbreekt is de lengte van de polyline en de informatie ophalen uit verschillende Xref's.
Het alternatief is om alle Xrefs te insertyen in 1 tekening en dan de routine opstarten, dit gaat ook maar is niet zo'n mooie oplossing.

Bij het vorige bricht misschien vergeten een bijlage met een voorbeeld van de opgebouwde tekening.
Voorde rest is de output van de lijst perfect!!

Geweldig mannen, het lijkt echt te gaan werken.
Heb ik het volgende nog te wensen:
De tekening is opgebouwd uit verschillend Xrefs dus gebouw 1 in xref_1 en gebouw 2 in Xref_2 met hun bijbehorende kabels. Is de selectie ook hiermee uit te breiden? De informatie in welke Xref het gebouw/de kabel staat hoeft niet in de lijst terug te komen maar mag uiteraard wel.
Bij het begin punt en het eindpunt van de kabel graag een uitbreiding in de lijst met de lengte van de polyline.

Ik heb de lisp routine proberen te begrijpen, maar snap hier als beginneling niet echt veel van.
Is het mogelijk om hier en daar een commentaar regeltje in te voegen met een kleine uitleg?
Wil het graag ook begrijpen en niet alleen gebruiken.

Mvgr en bedankt voor de moeite

Geweldig man, dit is precies wat ik zoek/zocht.
Thanx

Nog een kleine toevoeging om de bestemming te bepalen heb ik de coordinaten van het insertpoint van de gebouwen nodig en de coordinaten van de polilijnen. Misschien in een tweede stap:

gebouw1 x-coord y-coord
polylijn_laag begin-x_coord eind-y_coord

Later kunnen we dan de lijst afmaken door een match te zoeken van de x-y coordinaten.

in ieder geval alvast bedankt voor de hulp

Geweldig!!! de uitdraai is precies wat ik zocht CSV file kun je in excel inlezen en bewerken voor de uiteindelijke lijst.
Dus als er nu nog de coordinaten van de blokjes van de gebouwen en de begin en eindpunten van de polilijnen bij kunnen ben helemaal blij