CADsite forum

AutoCAD => Script files => Topic gestart door: marcelmaas op do 06 05 2010, 12:39:33

Titel: Macro voor oppervlakte bepaling en plaatsing van tekst.
Bericht door: marcelmaas op do 06 05 2010, 12:39:33
Hi allemaal,

Ik heb een Macro gevonden die voor mij met een klik de oppervlakte van een gebied bepaald en daarna met een tweede klik de tekste oppervlakte=..... mm² plaatst.

Nou zou ik de uitkomst niet in millimeters maar in meters willen krijgen.
Weet iemand hoe ik dat in de regel aan zou moeten passen?

Dit is mijn macro:
^C^C-H;P;S;\;area;o;l;e;l;;-mtext;\@0,0;Oppervlakte=$m=$(fix,$(getvar,area)) mm²;;
Titel: Re:Macro voor oppervlakte bepaling en plaatsing van tekst.
Bericht door: H@rm op do 06 05 2010, 13:15:40
Citaat van: marcelmaas op do 06 05 2010, 12:39:33
Hi allemaal,

Ik heb een Macro gevonden die voor mij met een klik de oppervlakte van een gebied bepaald en daarna met een tweede klik de tekste oppervlakte=..... mm² plaatst.

Nou zou ik de uitkomst niet in millimeters maar in meters willen krijgen.
Weet iemand hoe ik dat in de regel aan zou moeten passen?

Dit is mijn macro:
^C^C-H;P;S;\;area;o;l;e;l;;-mtext;\@0,0;Oppervlakte=$m=$(fix,$(getvar,area)) mm²;;

Ik heb hier wel een lisp voor je die de oppervlakten in meters weergeeft. Hij werkt overigens twee kanten op, je kunt ook een oppervlakte geven en een gebied laten tekenen.

Michel
Titel: Re:Macro voor oppervlakte bepaling en plaatsing van tekst.
Bericht door: marcelmaas op do 06 05 2010, 17:44:35
Als ik het goed zie werkt jou lisp alleen voor Polylijnen, of je moet zelf eerst alle punten van een te berekenen gebouw aangeven.
Mijn macro werkt ook als het losse lijnen zijn, hij plaatst een hatch en berekend dan de area.
Daarna plaatst hij de oppervlakte als tekst waar je zelf aangeeft, dus best cool eigenlijk toch?
Het enige is dat het in meters zou moeten zijn.
Het kan ook nooit heel moeilijk zijn, maar ik kom er niet op, heb al van alles geprobeerd.

in ieder geval bedankt voor jou oplossing.



Titel: Re:Macro voor oppervlakte bepaling en plaatsing van tekst.
Bericht door: EddyBeerke op do 06 05 2010, 20:26:03
Het is al eens eerder vermeld maar een hach heeft wel een area, maar deze is niet altijd goed. Als je een polyline hebt wel.
Titel: Re:Macro voor oppervlakte bepaling en plaatsing van tekst.
Bericht door: marcelmaas op do 06 05 2010, 20:49:42
Het is voor ruwweg de oppervlaktes te bepalen van ruimtes in gebouwen, dus komt het niet zo heeel precies.
Dat is voor ons dus geen probleem.!!!
We doen nu ook eerst een polylijn tekenen om daarna met het commando list de oppervlakte te bepalen, dus in dat geval was mijn macro een stuk sneller.

Niemand die weet hoe ik ipv millimeters meters als uitkomst krijg uit mijn macro?

groeten Marcel..
Titel: Re:Macro voor oppervlakte bepaling en plaatsing van tekst.
Bericht door: EddyBeerke op do 06 05 2010, 21:04:22
Misschien is het de units waar je in tekend?
Titel: Re:Macro voor oppervlakte bepaling en plaatsing van tekst.
Bericht door: H@rm op vr 07 05 2010, 08:23:45
Citaat van: marcelmaas op do 06 05 2010, 20:49:42
Het is voor ruwweg de oppervlaktes te bepalen van ruimtes in gebouwen, dus komt het niet zo heeel precies.
Dat is voor ons dus geen probleem.!!!
We doen nu ook eerst een polylijn tekenen om daarna met het commando list de oppervlakte te bepalen, dus in dat geval was mijn macro een stuk sneller.

Niemand die weet hoe ik ipv millimeters meters als uitkomst krijg uit mijn macro?

groeten Marcel..

Marcel,

Ik heb in mijn vorige post niet de juiste lisp bijgevoegd. Dat was er een die ik verbouwd had. De lisp die ik nu bij voeg is de "originele". Ook hier kun je een polyline selecteren en dan word de oppervlakte in m2 bijgeschreven.
Ook kun je de opp. naar een extern (.xls) bestand wegschrijven om vervolgens die te gebruiken voor berekeningen.
Het is destijds opgezet voor het maken van EPA berekeningen.

Michel

P.S.: Dit zijn alle benodigde bestanden
Titel: Re:Macro voor oppervlakte bepaling en plaatsing van tekst.
Bericht door: sschevers op vr 07 05 2010, 09:17:13
Niet om het een of ander maar waarom maak je geen gebruik van een Field? Het voordeel daarvan is dat wanneer je je oppervlak aanpast de waarde automatisch wordt aangepast.

Werkwijze in het kort:
Start het commando Field
Onder field Catergory selecteer je Objects
Selecteer de je polyline
Vervolgens kun je de area selecteren. Daarna kun je nog wat aditionele formatering doen (precision en eventueel wat tekst toevoegen)

stephan
Titel: Re:Macro voor oppervlakte bepaling en plaatsing van tekst.
Bericht door: roy_043 op vr 07 05 2010, 09:42:54
Voorbeelden van vermenigvuldigingen met diesel (Online Help AC2010):
http://docs.autodesk.com/ACD/2010/ENU/AutoCAD%202010%20User%20Documentation/files/WS73099cc142f4875513fb5cd10c4aa30d6b-7b45.htm