---

Raum.gif

Gibt es einen einfachen Weg, um eine Region mit Abzugsflächen in vordefinierte Flächenteile aufzuteilen. Konkret geht es um eine Aufteilung eines Raumes in Nutzungsanteile, um diese einzufärben. Im Beispiel sollen die gelben Linien ermittelt werden können.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo apcad2,

klingt nach ner schwierigen Aufgabe,
brauchst du die Daten für FM?

So in einer aufsplittung nach NGF bzw. VF

------------------
Gruß Grossi

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Was ist mit gpoly?
dann hast du 3 Polygone oder Regionen.

------------------
Gruß
CADwiesel
Besucht uns im CHAT

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo apcad2,

Willkommen im Forum!

Worum geht es dir genau? Willst du die Fläche automatisch in diese 3Teile zerlegen lassen? Also einfach die jeweiligen XX% angeben, Richtúng vorgeben und dann teilen?
Wenn dem so ist, dann muss ich dich enttäuschen, dafür gibt es keine Funktion im AutoCAD. Mit ein wenig Programmierkenntnissen, sollte das aber kein Problem sein, dafür eine Funktion zu schreiben.

Bei Fragen ...

Grüße Holger

------------------
Holger Brischke
CAD on demand GmbH                              Autodesk User Group Central Europe
Individuelle Lösungen von Heute auf Morgen.              AUGCE Manager Deutschland

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hi,

vor längerem gabs schonmal so eine ähnliche Frage; das lisp dazu habe ich noch, finde nur leider den Thread dazu nicht mehr (und weiß daher nicht, wers geschrieben hat).
Vielleicht geht das in die Richtung was Du suchst?

(defun c:fteiler( / d l p1 p2 ar a1 a2 guess odir dir done eps getarea)
  (defun getarea(pt / )
    (command"_-boundary" pt "")
    (command"_area""_o"(entlast))
    (entdel(entlast))
    (getvar"area")
  )
  (setq l(car(entsel"Linie wählen: ")))
  (setq p1(getpoint"Linker Punkt: "))
  (setq p2(getpoint"Rechter Punkt: "))

  (setq d 0.5)
  ;(setq d(/ 1 3.0))  ; Für Drittelteilung!
  (setq eps 0.00000001)
  (setq guess 1)

  (while(not done)
    (setq a1(getarea p1))
    (setq a2(getarea p2))
    (setq ar(+ a1 a2))
    (cond
      ( (> a1(* ar d))
        (setq odir dir dir 0)
      )
      ( (< a1(* ar d))
        (setq odir dir dir 1)
      )
    )

    (if(and odir(/= odir dir))
      (setq guess(* guess 0.5))
    )

    (if(<(abs guess)eps)
      (setq done 'T)
    )

    (princ "------------------\n")
    (princ "a1    = ")(princ a1)(princ"\n")
    (princ "a2    = ")(princ a2)(princ"\n")
    (princ "ar    = ")(princ ar)(princ"\n")
    (princ "guess = ")(princ guess)(princ"\n")

    (command"_move"l""'(0 0 0)(list(if(= dir 0)(- guess)guess)0 0))
  )
)

------------------
Grüße Karin

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Danke für die Antworten. Es handelt sich wie Brischke sagt, um eine Funktion (die es nicht gibt), bei der man die Anzahl Teile angeben kann und schwupps! ist das Ding aufgeteilt. Im Web hab ich mir den Wolf gesucht und bin nur auf Polygon-Triangulation gestossen. Das sieht am Ende aus wie eine zerschlagene Scheibe.

@Cadzia: werde mir das Script mal näher anschauen, Danke.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

kl. Nachtrag:
das fteiler.lsp verschiebt eine vorhandene Linie mittig einer geschlossenen Polylinie, so dass (z.B.) 2 gleiche Flächengrößen entstehen.

------------------
Grüße Karin

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

In diesem Fall wird das nichts werden. Woher soll ein Programm wissen, wo es eine Fläche aufteilen soll? Es geht ja nicht darum eine fläche einfach in n Teile aufzuteilen, sondern auch noch an bestimmten Stellen die Teilung vorzunehmen.
Es wird immer eine Abweichung dessen, was das Programm 'denkt', und deiner Vorstellung der Aufteilung geben.

Du musst anders an diese Aufgabe rangehen. Sage dem Programm, doch, wo es teilen soll. Das ist in diesem Fall doch durch das einzeichnen der Hilfslinien geschehen. nun musst du nur noch den umfrenzungs-Befehl anwenden und du hast 3 flächen. die alten  Flöchen, sowie die Hilfslienien können dann ja auch Programmgestützt helöscht werden.

------------------
Gruß
CADwiesel
Besucht uns im CHAT

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Du hast Recht, aber wohin die Trennlinien sollen ist eigentlich nicht so wichtig. Es wäre nur schon schön, wenn die Linien gerade wären.

Die Funktion sollte den CAD-Zeichner entlasten, da die Daten aus einem FM-Tool kommen und er so nur den Raum "picken" müsste.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP