Zusammenfassung ausgewählter Bereiche

[brizzo1982]

guten morgen, alle. :redface:
ich suche nach einer lisp-funktion, die mir erlaubt, die summe der bereiche von objekten zu berechnen (politik, kreise, regionen, ellipsen, etc.), die wählen.

ist da irgendwas? ? ich versuchte zu suchen, aber vergeblich.

 

[PlannerRoad]

gibt es die option im befehlsbereich hinzufügen:

befehl: bereich
den ersten winkel oder [Oggetto/eineweitere bereiche/sottrai-bereich] <oggetto>: </oggetto>eine

 

[brizzo1982]

das dachte ich nicht. .
vielen dank!

..effizient wie immer!

 

[tir]

ich suche nach einer lisp-funktion

(Defunc c:ca)
(Setvar "cmdecho" 0)
(setq gr(ssget)
(setq-bereich 0 organisiert 0)
(sektq i 0)
(Repeat)
(setq e0(sname gr i)))
(Befehl "_area" "_o" e0)
(fläche(+ fläche)
(setq entgegengesetzt)
(i)
)
(princ "\n total area: ")(princ area)(princ " sqm")
(princ "\n Gesamtannahme: ")(Princ-Berechnung)
(princ)
)
(princ) <copyright: claudio="" granuzzo="" ing.=""> typ ca.
Programm!"</copyright:>

 

[brizzo1982]

(Defunc c:ca)
(Setvar "cmdecho" 0)
(setq gr(ssget)
(setq-bereich 0 organisiert 0)
(sektq i 0)
(Repeat)
(setq e0(sname gr i)))
(Befehl "_area" "_o" e0)
(fläche(+ fläche)
(setq entgegengesetzt)
(i)
)
(princ "\n total area: ")(princ area)(princ " sqm")
(princ "\n Gesamtannahme: ")(Princ-Berechnung)
(princ)
)
(princ) <copyright: claudio="" granuzzo="" ing.=""> typ ca.
Programm!"</copyright:>

los! das ist die funktion, die ich gesucht habe!
vielen dank!

 

[liber]

Hallo ich fand sehr nützlich ing lisp. Claudio Granuzzo
Aber ich habe das Problem, dass ich große Bereiche messen muss und tatsächlich
in der Reihe unter einer Auswahl oder vielleicht Hinzufügen von Auswahlmöglichkeiten
Ich gebe mir dieses Ergebnis

Breite der Polylinea bei der Berechnung der Fläche ignoriert.
Gesamtfläche: 3.73755+007 SqmGesamtumfang: 95479.8
Befehl: Bereich
den ersten Winkel oder [Oggetto/Aggiungi area/soTtrai area] <oggetto>:

Stattdessen möchte ich das Ergebnis "normal von der Linie unten, weil die Gesamtfläche oben, bringt mich in Verwirrung

Objekte auswählen:</oggetto>Fläche = 37375472.5003, Perimeter = 95479.7725Breite der Polylinea bei der Berechnung der Fläche ignoriert.

Danke.

 

[Cristallo]

Stattdessen möchte ich das Ergebnis "normal von der Linie unten, weil die Gesamtfläche oben, bringt mich in Verwirrung

(Defunc c:ca)
(Setvar "cmdecho" 0)
(setq gr(ssget)
(Setq-Bereich 0 Perimeter 0)
(Sectq i 0)
(Repeat)
(setq e0(sname gr i)))
(Befehl "_area" "_o" e0)
(Fläche(+ Fläche)
(Einsatzfläche (Rtosfläche 2 2))
(setq perimeter(+ perimeter (getvar "perimeter")))
(seq i(1+) (i)
)
(princ "\n total area: ")(princ area)(princ " sqm")
(princ "\n total perimeter: ")(princ perimeter)
(princ)
)
(princ) <copyright: claudio="" granuzzo="" ing.=""> Typ ca.
Programm!"</copyright:>

Ich habe gerade die Zeile hinzugefügt, wo Sie die rtos Funktion haben, die Sie die Darstellung als String im dezimalen Format zwingt.
Grüße

 

[liber]

(Defunc c:ca)
(Setvar "cmdecho" 0)
(setq gr(ssget)
(Setq-Bereich 0 Perimeter 0)
(Sectq i 0)
(Repeat)
(setq e0(sname gr i)))
(Befehl "_area" "_o" e0)
(Fläche(+ Fläche)
(Einsatzfläche (Rtosfläche 2 2))
(setq perimeter(+ perimeter (getvar "perimeter")))
(seq i(1+) (i)
)
(princ "\n total area: ")(princ area)(princ " sqm")
(princ "\n total perimeter: ")(princ perimeter)
(princ)
)
(princ) <copyright: claudio="" granuzzo="" ing.=""> Typ ca.
Programm!"</copyright:>

Ich habe gerade die Zeile hinzugefügt, wo Sie die rtos Funktion haben, die Sie die Darstellung als String im dezimalen Format zwingt.
Grüße

Vielen Dank Ingenieur granuzzo

 

[Cristallo]

Vielen Dank Ingenieur granuzzo

Liber, ich bin nicht groß. aber als seine Liste war, änderte ich die Unterschrift nicht

 

[Betoniera]

Ich suche nach einer lisp-Funktion, die mir erlaubt, die Summe der Bereiche von Objekten zu berechnen (Politik, Kreise, Regionen, Ellipsen, etc.), die wählen.Hallo alle
Ich sende das a3.lsp Programm, das neben der Berechnung der Bereiche:
- kann die Maßeinheiten variieren
- kann ein Retino mit variabler Neigung auf ausgewählten Bereichen zeichnen. wenn Sie 2 mal auf den gleichen Bereich klicken, sehen Sie 2 retini mit unterschiedlicher Neigung.
- kann die Höhe des Textes und des retino variieren.
a3.lsp hochladen und das Programm mit a3 starten
Tschüss.

 

[liber]

Liber, ich bin nicht groß. aber als seine Liste war, änderte ich die Unterschrift nicht

bhè compliments gleichermaßen, um eine lisp zu ändern, müssen Sie die Sprache kennen, die ich bin völlig schnell, aber ich modifizierte in kleine kleine kleine das Kommando statt c) Ich hab's. cx weil der Befehl überlappt Oh mein Gott. für mich, dass ich zu viel Nutzung der Tastatur ist es notwendig

 

[liber]

Ich suche nach einer lisp-Funktion, die mir erlaubt, die Summe der Bereiche von Objekten zu berechnen (Politik, Kreise, Regionen, Ellipsen, etc.), die wählen.Hallo alle
Ich sende das a3.lsp Programm, das neben der Berechnung der Bereiche:
- kann die Maßeinheiten variieren
- kann ein Retino mit variabler Neigung auf ausgewählten Bereichen zeichnen. wenn Sie 2 mal auf den gleichen Bereich klicken, sehen Sie 2 retini mit unterschiedlicher Neigung.
- kann die Höhe des Textes und des retino variieren.
a3.lsp hochladen und das Programm mit a3 starten
Tschüss.Anhang anzeigen 67738

interessant, ich bin sicher, dass es funktionieren wird.

 

[giampaolo adagio1]

Liber, ich bin nicht groß. aber als seine Liste war, änderte ich die Unterschrift nicht

Guten Morgen, es gibt eine Lispe, die mir erlaubt, einen unregelmäßigen Bereich in den Alementari-Bereichen zu teilen und eine Tabelle mit der Berechnung des Skorporate-Bereichs in den geschaffenen Gebieten zu erstellen?

 

[GP.]

... gibt es eine Lispe, die es mir erlaubt, einen unregelmäßigen Bereich in Alementari-Bereichen zu unterteilen und eine Tabelle mit der Berechnung des Skorporate-Bereichs in den geschaffenen Gebieten zu erstellen?

Musst du die Oberfläche viel zeigen?

 

[giampaolo adagio1]

Musst du die Oberfläche viel zeigen?

Nein, ich muss die Ausgrabungsflächen in einer volumetrischen Berechnung auf Strangabschnitte demonstrieren.

 

[GP.]

Ich muss die Ausgrabungsgebiete beweisen. .

Sind Polyline geschlossen? einen Tisch mit der Oberfläche, die mit Gauss erzielt wird, okay?

 

[giampaolo adagio1]

Sind Polyline geschlossen? einen Tisch mit der Oberfläche, die mit Gauss erzielt wird, okay?

Si

 

[giampaolo adagio1]

Ich habe Sonnenuhren. Leider die Möglichkeit, elementare Flächen allein bei Straßenbau und nicht auf Unterschied von dtm zu berechnen. Ich wusste wahrscheinlich nicht, wie ich es tun soll.

 

[giampaolo adagio1]

Si

kommen si fa?

 

[GP.]

Ich kann Ihnen nicht für Meridian helfen, ich nutze es nur, um Daten aus dem Tool herunterzuladen, dann nutze ich ein Topographie-Programm, das "gira" in Autocad.

für "top" Oberflächen können Sie eine Lisp herunterladen quiAber du musst aufzeichnen.

im voraus die Antwort, falls jemand darum gebeten, es an diesem Forum zu befestigen: nein