"Laat AutoCAD het werk doen" klinkt krachtig en is prachtig om te zien. Al heel vroeg in de ontwikkeling van AutoCAD begin jaren '80 heeft AutoDESK gezocht naar een mogelijkheid de gebruiker zelf taken te laten automatiseren binnen AutoCAD. Toen is gekozen voor de programmeertaal LISP en daaruit is de variant AutoLISP ontstaan. Dat AutoLISP of tegenwoordig VisualLISP nu nog steeds erg populair is hadden de meeste critici niet gedacht. Immers iedereen kan toch programmeren in VisualBasic, VBA, .NET, C#, Java, PHP, etc.
Jij, AutoCAD gebruiker, niet dan? Ooohhh...
Ja wat niemand erbij zegt is dat wel wat kennis, ervaring en vooral bijhouden van software updates nodig is om de boel draaiende te houden.
In dit artikel een stukje code uit begin jaren '90 welke nog steeds zonder enige aanpassing werkt. Het doel van mijn artikel is tweeledig. Allereerst is het mogelijk voor een aantal AutoCAD gebruikers een zinvolle oplossing voor het uitrekken van strekkende meters. Anderzijds laat dit voorbeeld goed zien hoe in slechts 20 tekstregels een routine geschreven kan worden die in staat is snel en foutloos gegevens uit een tekening te verwerken en daarmee nieuwe (informatie) objecten aan de tekening toe te voegen.
In dit artikel een stukje code uit begin jaren '90 welke nog steeds zonder enige aanpassing werkt. Het doel van mijn artikel is tweeledig. Allereerst is het mogelijk voor een aantal AutoCAD gebruikers een zinvolle oplossing voor het uitrekken van strekkende meters. Anderzijds laat dit voorbeeld goed zien hoe in slechts 20 tekstregels een routine geschreven kan worden die in staat is snel en foutloos gegevens uit een tekening te verwerken en daarmee nieuwe (informatie) objecten aan de tekening toe te voegen.
De code
AutoLISP Code
De afbeelding laat de programmeercode in de "notepad" (windows kladblok) omgeving van AutoCAD zien.
(​Onder aan het artikel staat de code in tekst.)
(​Onder aan het artikel staat de code in tekst.)
Wat doet het
Stel je hebt op een aparte laag met LINE's aangegeven waar de erfafscheiding moet worden vervangen. Nu wil je graag de strekkende meters op tekening vermelden. Bedenk hoeveel werk dat kan zijn als je dat handmatig moet doen. Door de voorbeeld code uit dit artikel te downloaden op te slaan onder de naam LIJNLENGTE.LSP heb je de lisproutine klaar voor gebruik en kan deze geladen worden in je tekening. Start daarvoor het commando APPLOAD en zoek het opgeslagen LIJNLENGTE.LSP bestand op en klik op LOAD gevolgd door CLOSE. Nu heb je AutoCAD uitgebreid met een nieuw commando genaamd LIJNLENGTE. Toets dit nu in op de commandoregel.
Command: LIJNLENGTE<enter>
Select objects: <selecteer alle lijnen waarvan de lengte moet worden bepaald> ...found
Select objects:<enter>
Specify middle point of text:<klik locatie in tekening>
Select objects: <selecteer alle lijnen waarvan de lengte moet worden bepaald> ...found
Select objects:<enter>
Specify middle point of text:<klik locatie in tekening>
Resultaat
Van iedere geselecteerde lijn wordt de lengte in de tekening bijgeschreven. Daarna vraagt de routine nog om een locatie voor een tekst waarin het berekende totaal wordt weergegeven. Dit alles snel en foutloos!
Alle lijnen snel en foutloos gemaatvoerd
Download voorbeeld
Ik wil de lisp-routine voor het bijschrijven van lengte zelf gaan gebruiken. Mijn gegevens staan hieronder, ik ontvang per e-mail de lisproutine.
Zonodig kun je de teksthoogte in de LISP routine aanpassen. Verander de aangegeven getallen in de gewenste teksthoogte. Let op dat in de Current Textstyle de hoogte op 0.00 moet staan.
Meer weten
Ik publiceer in mijn nieuwsbrief en op de website www.rodema.nl over het aanpassen/afstemmen van AutoCAD op jouw praktijk situatie. In de workshops en cursussen die ik geef besteed ik ook veel aandacht aan dit onderwerp. En ik ontwikkel maatwerk AutoCAD applicaties in opdracht. Wil je op de hoogte blijven abonneer je dan gratis op onze nieuwsbrief.
RSS-feed
