---

Hi

Im Autocad gibt es den Befehl "break at point" es wird einen linie an einem punkt in 2 linien unterteilt. Das Makro sieht folgendermassen aus. ^C^C_break \_f \@

Wenn ich nun den behehl wiederhole. kommt dann aber nur noch _braek

Kann mir jemand helfen wie ich den befehl in eine LSP umwandel kann??

Danke

Gruss

------------------
Moni

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

---

Code:

---

(DEFUN C:BR2 () (COMMAND "_BREAK" PAUSE "_F" PAUSE "@0,0" )  (PRINC))

---

Gruß, Lothar

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

---

Hi Lothar

Danke dir!!!!

gruss

------------------
Moni

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

---

Hallo

und das * davor hats nicht gereicht?

MfG

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

---

Hallo Lothar

Wie kann ich die LSP ändern das ich eine linie mehrmals unterbrechen kann. mit breack kann ich die linie nur einmal unterbrechen (in 2 teile teilen) möchte aber gerne eine linie in merhere teile teilen.

Geht das??

Gruss

------------------
Moni

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

---

Hallo Lothar

Wie kann ich die LSP ändern das ich eine linie mehrmals unterbrechen kann. mit breack kann ich die linie nur einmal unterbrechen (in 2 teile teilen) möchte aber gerne eine linie in merhere teile teilen.

Geht das??

Gruss

------------------
Moni

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

---

Zitat:

---

Original erstellt von MonikaB:

Wie kann ich die LSP ändern das ich eine linie mehrmals unterbrechen kann. mit breack kann ich die linie nur einmal unterbrechen (in 2 teile teilen) möchte aber gerne eine linie in merhere teile teilen.
Geht das??

---

Immer mit neuer manueller Punktwahl, oder Brechen an den Punkten, wie sie bei den Befehlen messen(_measure) und teile (_divide) entstehen ?

------------------
  - Thomas -
"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."

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

---

[edit] wegen doppelpost .. gelöscht wird später 

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

---

Hallo CADmium

Danke für deine schnell rückmeldung.

Glaube du hast mich missverstanden (oder ich habe es nicht gut erklärt)

Ich möchte eine linie an verschieden stellen (frei wählbar) unterbrechen.
Line vorher:____________________________
Line danach:___ ______ ____ ____________ (danach mehrere Linien)

Gruss

------------------
Moni

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

---

wie gesagt. Sternchen

hast du das:  *^C^C_break \_f \@

schon mal getestet

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

---

ich glaube, Ihr versteht Monika nicht. Sie möchte die Linie NUR EINMAL wählen und dann mehrere Punkte zeigen und NICHT den Befehl immer wieder wiederholen.
Sie möchte sich das erneute Zeigen der Linie ersparen!

[Diese Nachricht wurde von cad4fun am 31. Mai. 2006 editiert.]

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

---

 

Zitat:

---

Original erstellt von cad4fun:
ich glaube, Ihr versteht Monika nicht. Sie möchte die Linie NUR EINMAL wählen und dann mehrere Punkte zeigen und NICHT den Befehl immer wieder wiederholen

---

nach dem ersten Brechen hab ich nicht mehr die Originallinie, sondern zwei neue!! daher erfordert die Wunscherfüllung einen etwas anderen Ansatz.. vielleicht so? :
*^C^C(command "_break" (car(setq w (entsel)))(osnap(cadr w)"_nea")(osnap(cadr w)"_nea"))
------------------
      - Thomas -
"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."

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

---

Die Problematik ist mir schon klar, Dein Ansatz kann aber keine Lösung sein.
Ich verstehe zuwenig von LISP, aber sollte der Ansatz nicht sein, eine Linie zu wählen, dann eine Liste mit Punkten zu füllen und erst am Schluss die Linie mehrfach zu brechen
Nächsten Brechpunkt zu Anfangspunkt aus liste suchen
brechen ergibt 2 neue linien mit
neuem nächsten Brechpunkt zu Anfangspunkt der neuen Linie wieder
brechen
usw.

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

---

Zitat:

---

Original erstellt von cad4fun:
Die Problematik ist mir schon klar, Dein Ansatz kann aber keine Lösung sein.
Ich verstehe zuwenig von LISP, aber sollte der Ansatz nicht sein, eine Linie zu wählen, dann eine Liste mit Punkten zu füllen und erst am Schluss die Linie mehrfach zu brechen
Nächsten Brechpunkt zu Anfangspunkt aus liste suchen
brechen ergibt 2 neue linien mit
neuem nächsten Brechpunkt zu Anfangspunkt der neuen Linie wieder
brechen
usw.

---

sowas hab ich ähnlich _measure/_divide schon realisiert.So einfach wie du dir das aber vorstellst, ist es nicht. Sind ja auch nicht nur Linien, auf die der _break-Befehl anwendbar ist ...

------------------
  - Thomas -
"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."

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

---

Bin zwar nicht der Lispfachmann aber, wie ist denn dieser Ansatz:

^c^c(defun bp ()(setq pkt (getpoint "xxx"))(command "bruch" pkt pkt))*(bp)

Das Objekt mit der Punktwahl wählen. Wobei ich hier den Objenktfang nicht berücksichtigt habe.

Anmerkung:
Habe das Makro nicht geprüft, sollte nur eine Idee sein.

------------------
strukturiertes Zeichnen mit www.Werner-Maahs.de

Edit: habe nach Cadminums Beitrag das Makro geändert.

[Diese Nachricht wurde von Werner-Maahs.de am 31. Mai. 2006 editiert.]

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

---

Zitat:

---

Original erstellt von Werner-Maahs.de:
Bin zwar nicht der Lispfachmann aber, wie ist denn dieser Ansatz:

[b]^c^c*(defun bp ()(setq pkt (getpoint "xxx"))(command "bruch" pkt pkt))

Das Objekt mit der Punktwahl wählen. Wobei ich hier den Objenktfang nicht berücksichtigt habe.

[/B]

---

..damit definierst du bloß ne Funktion ( noch nicht mal als ACAD-Kommando) , rufst sie aber nicht auf....

P.S. das obige
(command "_break" (car(setq w (entsel)))(osnap(cadr w)"_nea")(osnap(cadr w)"_nea"))

ruft entsel auf , dabei wird in (car w ) das Objekt und in (cadr w) der Klickpunkt zurückgeliefert. osnap sorgt dafür, das für das Break-kommando der Punkt auch auf dem Kurvenobjekt befindet...

------------------
  - Thomas -
"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."

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

---

Ja so ist das, wenn man seinen Beitrag nicht probieren kann.
Aber es fehlt halt nur der Aufruf.
Ansonsten sollte es funktionieren und auch nur den Ansatz für weitere Gedanken wie Objektabfrage Objektfang usw. vorschlagen.

------------------
strukturiertes Zeichnen mit www.Werner-Maahs.de

[Diese Nachricht wurde von Werner-Maahs.de am 31. Mai. 2006 editiert.]

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

---

Besten dank für alle Antworten

Aber erlich gesagt weiss ich nun nicht mehr was ich machen soll
und ich sehe das es sehr komplex ist.

Dachte ja das man am LSP von lothar nur noch was anhangen kann damit man eine linie mehrmals unterbrechen kann. Aber so einfach ist es ja anscheinend nicht.

(DEFUN C:BR2 () (COMMAND "_BREAK" PAUSE "_F" PAUSE "@0,0" )  (PRINC))

Cadmium deine Funktion habe ich  mir angeschaut.
"""*^C^C(command "_break" (car(setq w (entsel)))(osnap(cadr w)"_nea")(osnap(cadr w)"_nea"))"""
Damit kann ich eine linie zwar mehrmals schneiden aber nur in der mitte und nicht genau wo ich will.

Wens kaum machbar ist, ruffe ich halt den befehl immer wieder auf.

Gruss

------------------
Moni

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

---

Zitat:

---

Original erstellt von MonikaB:

Damit kann ich eine linie zwar mehrmals schneiden aber nur in der mitte und nicht genau wo ich will.
Wens kaum machbar ist, ruffe ich halt den befehl immer wieder auf.

---

Mit der Mitte unterliegst Du einem Irrtum, da Du anscheinend die Linie fast in der Mitte anklickst. Klick sie mal eher an einem Ende an und Du wirst bemerken, dass immer beim Cursor (nea -> nearest -> nächster Punkt) gebrochen wird

Setz den Stern vor den Befehl, dann steht er Dir immer wieder zur Verfügung und Du musst den Befehl nicht wieder aufrufen, sondern "nur" die Linie wieder anklicken.
*^C^C_break \_f \@

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

---

Hallo Monika

Versuch mal das, ist nicht von mir habe es in Internet gefunden.

(defun c:Breaker (/ acdoc varlist echo pmode psize ent pt1 pt2)
  (setq acdoc
(vlax-get-property
  (vlax-get-acad-object)
  'ActiveDocument
)
  )
  (vlax-invoke-method acdoc 'EndUndomark)
  (vlax-invoke-method acdoc 'StartUndomark)
  (mapcar '(lambda (arg)
    (setq varlist (cons (cons (car arg) (getvar (car arg))) varlist))
    (setvar (car arg)
    (if (= 'LIST (type (setq argument (cdr arg))))
      (eval argument)
      argument
    )
    )
  )
  '(("CMDECHO" . 0)
    ("PDMODE" . 3)
    ("PDSIZE" . -5)
    ("OSMODE" . (getvar "OSMODE"))
  )
  )
  (while
    (progn
      (setq ent (entsel "\nElement für Bruch wählen "))
    )
    (if (wcmatch (strcase (cdr (assoc 0 (entget (car ent)))))
  "ARC,LINE,*POLYLINE"
)
      (progn
(redraw (car ent) 3)
(initget 1)
(setq pt1 (getpoint "\nErster Punkt:"))
(entmake (list
    '(0 . "POINT")
    (cons 10 pt1)
  )
)
(setq point (entlast))
(initget 6)
(setq
  pt2
    (getpoint
      "\nZweiter Punkt oder Rechtsklick für ersten Punkt:"
    )
)
(setvar "OSMODE" 97)
(vl-cmdf "_.break"
  ent
  "_f"
  pt1
  (if pt2
    pt2
    pt1
  )
)
(entdel point)
      )
      (princ "\nKann Objekt nicht brechen!")
    )
  )
  (mapcar '(lambda (arg)
    (setvar (car arg) (cdr arg))
  )
  varlist
  )
  (vlax-invoke-method acdoc 'EndUndomark)
  (vlax-release-object acdoc)
  (princ)
)
(princ
  "\nBreaker.lsp wurde geladen. Start mit dem Befehl \"Breaker\"."
)
(princ)

------------------
Heinz 

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

---

hallo Heinz,
Monika wollte - aus welchen Gründen auch immer - die Linie geteilt und nicht zwischen 2 Punkten gelöscht haben. Genau das tut Deine Routine mit viel Aufwand, wo auch
(command "_break" pause "e")
gereicht hätte

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

---

Hallo Heinz

Danke, aber das tool unterbricht die linie nicht sondern schneidet ein teil der linie hinaus.

Gruss

------------------
Moni

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

---

Hallo Monika
Sorry falsch verstanden.

------------------
Heinz 

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

---

Hi,

@cad4fun und Monika
Auch wenn das Tool, das Heinz gepostet hat, wirklich nicht ganz zur Aufgabenstellung passt, ist es doch viel komfortabler als der Acad-Bruchbefehl. Bei CADmaro.de heißt es dazu:
"Die gewählten Bruchstellen werden markiert, man hat die Wahl zwischen einer oder zwei Brüchen in einem Befehl und das Tool läuft solange weiter, bis keine Objekte zum Brechen mehr gewählt werden." Befehlszeile lesen lohnt. 

Und damit wären wir auch schon bei...

...@Heinz
Wenn du das nächste Mal ein Tool postest, das du irgendwo runtergeladen hast, poste es wenigstens vollständig mit Header, sonst kommt irgendwann mal ein Autor und haut dir auf die Mütze. 

Gruß
CADchup

------------------
CADmaro.de

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

---

@ CADchup

werd es mir merken.

------------------
Heinz 

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

---

Den Breaker find ich super 

------------------
Schöne Grüsse aus dem Herzen Hamburgs

Morten

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

---

Zitat:

---

Original erstellt von CADchup:

Auch wenn das Tool, das Heinz gepostet hat, wirklich nicht ganz zur Aufgabenstellung passt, ist es doch viel komfortabler als der Acad-Bruchbefehl.

---

Komfortabler ist IMHO ein Buttonmakro mit
*^C^Cbruch \erster \@
ergibt als notwendige Klicks            Vergleich breaker
Button                                                        Button
Element                                                      Element
1.Brechpunkt                                              1.Brechpunkt
Element                                                      Rechtsklick für 1.Punkt
2.brechpunkt                                              Element
Element                                                      2.Brechpunkt
3.Brechpunkt                                              Rechtsklick für 1.Punkt
ESC                                                            Element
                                                                  3.Brechpunkt
                                                                  ESC

Du hast also bei breaker immer "Anzahl der Brechpunkte minus 1" mehr Klicks .
lG

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

---

Der Vergleich ist nicht ganz fair; natürlich ist ein Buttonmakro klickfreundlicher, dafür kann das Makro aber auch nur die eine Bruchvariante.
Der eigentliche Bruchbefehl braucht sehr viel mehr Klicks und mit diesem habe ich Breaker verglichen.

Aber lassen wir die Erbsenzählerei. Schönen Feierabend. 

CADchup

------------------
CADmaro.de

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

---

@AsSchu:
Hallo, das mit dem * hab ich grad bei meinem Werkzeugkasten ausprobiert. Leider funktioniert es nicht. Wenn ich auf das Werkzeug klicke -> normal. Danach auf Leertaste -> wieder nur der erste Befehl.
Habe Acad 2004.

------------------
Gruß und "have fun"
schickt/wünscht Stephan

"Don't assume, go as far as possible with the known facts, then ask."

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

---

Hallo Leute,

den Eintrag hab ich in meiner mnu.
*^C^C_BREAK \_F \@
Es funktioniert seit Jahren.
Alternative:
nochmal ^C^C_BREAK \_F \@

Gruß
Waldemarr

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

---

Zitat:

---

Original erstellt von Waldemar:
...den Eintrag hab ich in meiner mnu.
*^C^C_BREAK \_F \@...

---

aber das erzählt AsSchu doch seit Tagen, liest du dir den thread nicht durch bevor du antwortest?

------------------

gruß CADdog, the dog formerly known as TR

AutoCAD spricht mit einem, aber viele hören nicht zu.

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

---

ich nahm gerade auf AsSchu bezug
er antwortete auf meinen beitrag
da wird er schon gewusst haben, was AsSchu schrieb

------------------
Gruß und "have fun"
schickt/wünscht Stephan

"Don't assume, go as far as possible with the known facts, then ask."

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

---

@autocart
irgendwie war ich verwirrt, weil du plötzlich den thread für ein weiteres Problem nutzt:
Bei der Befehlswiederholung werden Optionien nicht wiederholt, das ist einfach so, deshalb der Stern, damit der Befehl nicht abgebrochen werden muss, sondern eben durchläuft; schau während der Arbeit auch mal in die Befehlszeile.

------------------

gruß CADdog, the dog formerly known as TR

AutoCAD spricht mit einem, aber viele hören nicht zu.

[Diese Nachricht wurde von CADdog am 02. Jun. 2006 editiert.]

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

---

entschuldig caddog,
jetzt kenn ich mich nicht mehr aus.
Was soll das Sternchen bewirken?

Monkia B eröffnete den Thread mit:
"Im Autocad gibt es den Befehl "break at point" es wird einen linie an einem punkt in 2 linien unterteilt. Das Makro sieht folgendermassen aus. ^C^C_break \_f \@

Wenn ich nun den behehl wiederhole. kommt dann aber nur noch _braek"
Dann schrieb AsSchu vom Sternchen.
Daher ging ich davon aus, dass das Sternchen verhindern soll, dass NUR NOCH _break bei der Wiederholung kommt. Also nehme ich an, die Alternative wäre, dass das ganze Makro wiederholt wird.
Das ist bei mir zwar nicht der Fall, aber was soll das Sternchen dann bewirken?

------------------
Gruß und "have fun"
schickt/wünscht Stephan

"Don't assume, go as far as possible with the known facts, then ask."

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

---

das sternchen bewirkt, dass die befehlsfolge sozusagen nach abarbeitung wieder aufgerufen wird, abbruch erfolgt mit ESC oder rechter maustaste.
wiederaufruf nach abbruch mit ENTER oder rechter maustaste führt allerdings zum allgemeinen bruchbefehl. die befehlsfolge mit sternchen ist daher für mehrmaliges abarbeiten OHNE unterbrechung geeignet!
wie wäre es mit ausprobieren? dann ist das beschriebene verhalten doch eindeutig zu erkennen.

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

---

Ich zitiere die Hilfe:

"Sie können einen ausgewählten Befehl mehrmals verwenden, bevor Sie einen anderen Befehl aufrufen. Befehle in Menümakros können bis zum Aufruf eines anderen Befehls wiederholt werden. Optionen lassen sich auf diese Weise allerdings nicht auswählen."

"Menümakros, die mit *^C^C direkt nach der Optionsmarke beginnen, werden im Speicher abgelegt. Dadurch kann dieses Makro auf nachfolgende Eingabeaufforderungen so lange reagieren, bis Sie ESC drücken oder eine andere Menüoption auswählen."

------------------

gruß CADdog, the dog formerly known as TR

AutoCAD spricht mit einem, aber viele hören nicht zu.

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

---

danke an euch beide für die geduldige Hilfe!
hätte es zwar ausprobiert, aber anscheinend was falsch gemacht.
habe auch in F1 im index nachgeglozt unter "*". dort waren zwar verweise, aber nicht auf dieses phänomen.
jetzt gehts, danke nochmals

------------------
Gruß und "have fun"
schickt/wünscht Stephan

"Don't assume, go as far as possible with the known facts, then ask."

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