Oppervlak [m²] in tekening bijschrijven ook in LT

Hoe kun je in AutoCAD LT het oppervlak (in m2) van een arcering of gesloten polyline in de tekening bijschrijven?
De meeste gebruikers die met deze vraag geconfronteerd worden zullen via het properties palette de Area eigenschap uitlezen en overnemen in de tekening. Prima als dat een keer voorkomt.
Als deze vraag vaker terugkomt is het zeker de moeite waard hiervoor een aparte knop te maken die na het selecteren van een polyline of hatch direct de m2 in de tekening plaatst. In AutoCAD LT kunnen we daarvoor een macro schrijven waarbij gebruik gemaakt gaat worden van een speciale taal (Language) genaamd DIESEL. In onze cursussen en workshops leggen we in detail uit bij welke praktisch toepassingen je dit nog meer kunt inzetten. 

---

Stappenplan

1. Plaats met het command:TEXT<enter> op de juiste laag een voorbeeld, "A=100m2"
2. Zet het Toolpalette aan met command:TP <enter> of CTRL+3
3. Klik met de Rechter Muis Knop op een van de tab in het Toolpalette en kies New Palette
4. Type een naam in voor het nieuwe palette tab, bijvoorbeeld METEN IS WETEN
5. Sleep nu de voorbeeld tekst (uit stap 1) naar het lege palette. Eventueel slepen met de rechter muis knop ingedrukt
6. Klik met de  Rechter Muis Knop op de nieuwe knop Dtext en kies Properties...
7. Wijzig de Name in "Oppervlak[m2]" en de Description in "Bijschrijven oppervlak in tekening." 
8. Kopieer (CTRL+C)  en plak (CTRL+V) de hieronder in rood geschreven tekst naar de Command String
   *^C^C_AREA;Object;\TEXT;\350;0;A=$M=$(rtos,$(/,$(getvar,area),1000000),2,2)m²;
9. Sluit af met OK.

Testen

Teken nu een rechthoek met het commando RECTANGLE van bijvoorbeeld 3000x4000mm.

Command: RECTANGLE<enter>
Specify first corner point or [Chamfer/Elevation/Fillet/Thickness/Width]:<klik>
Specify other corner point or [Area/Dimensions/Rotation]: @3000,4000<enter>

Klik nu de knop Oppervlak uit het Toolpalette aan en zie hoe makkelijk de m2 in de tekening kan worden geplaatst.

Opmerking

In dit voorbeeld wordt een teksthoogte van 350units aangehouden en de gemeten waarde omgerekend van mm² naar m². Dit is natuurlijk naar eigen inzicht aan te passen.

Video uitleg