---

Moin moin,

ich habe mir folgendes Makro mit dem Rekorder unter "Anpassen" aufgenommen.

set_vp_model_clipping "1"  :on set_vp_capping "1"  :on set_vp_capping "1"  :part-color model_clipplane  :plane1  :off  :plane1  :on  :plane1_positioning  :par_wp :ref_wp "/s" :done :flip_plane :done
(PROGN
  (RESET-TOGGLE "MODIFY_CLIPPLANE_SA-VAR-GROUP-1-OPT-CONT-DONE-TB")
  NIL)
complete

Damit lasse ich mir das Darstellungsfenster im Schnitt darstellen, auf der Ebene einer Arbeitsebene die ich zuvor erstelle und dann den Namen "s" gebe.
Leider funktioniert es nur im Darstellungsfenster "1".
Kann ich bei clipping "1" einen Joker einsetzen daß es in jedem Fenster funktioniert?

Viele Grüße
Jörg Antweiler

[Diese Nachricht wurde von jantweiler am 12. Nov. 2004 editiert.]

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

---

Einen "Joker" gibt's nicht, aber Du koenntest einfach den Namen des aktiven Viewports erfragen und zur Laufzeit einsetzen:

Code:

---

set_vp_model_clipping (oli:sd-inq-current-vp) :on set_vp_capping (oli:sd-inq-current-vp) :on set_vp_capping (oli:sd-inq-current-vp) :part-color model_clipplane :plane1 :off :plane1 :on :plane1_positioning :par_wp :ref_wp "/s" :done :flip_plane :done complete

---

Siehe auch Dokumentation zum Integration Kit (Reference Manual, Abschnitt "Viewport Inquiries").

Claus

[Diese Nachricht wurde von clausb am 12. Nov. 2004 editiert.]

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

---

Hallo Claus,

vielen Dank!!!
Uni's sind unterwegs. 

------------------
Gruß
Jörg Antweiler

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

---

Moin moin zusammen,

die Funktion gefällt mir jetzt ganz gut, aber perfekt wäre es wenn ich die Arbeitsebene nicht immer in "s" umbenennen müsste, sondern wenn das Makro die aktuelle Arbeitsebene nehmen würde.

Ich habe zwar mit Hilfe des Integration Kit versucht es selber hinzubekommen, aber mir fehlt einfach jegliches Hintergrundwissen.   :(

Könnte mir da einer weiterhelfen?   :)

Achso, ausschalten tue ich es mit folgenden Makro:

model_clipplane  :plane1  :off complete
set_vp_model_clipping "1"  :off

Viele Grüße
Jörg

[Diese Nachricht wurde von jantweiler am 23. Nov. 2004 editiert.]

[Diese Nachricht wurde von jantweiler am 23. Nov. 2004 editiert.]

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

---

@Joerg

Die aktuelle Arbbeitsebene kannst du mittels (oli::sd-inq-curr-wp)
auswaehlen. (anstelle von "/s" eingesetzt)

Hoffe das hilft weiter...

Gruss
RainerH.

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

---

Hallo Rainer,

nöö, funktioniert leider nicht.
Wenn ich den Befehl ausführe ist das Modell garnicht mehr zu sehen, wenn ich dann meinen Befehl für die Vollansicht ausführe ist es wieder da, wenn ich nun meinen ursprünglichen Befehl mit "s" ausführe funktioniert es wenn die Arbeitsebene "s" heißt.
Ab dann schneidet mir der neue Befehl das Teil immer entlang der AE "s" egal welche AE aktiv ist.

------------------
Gruß
Jörg Antweiler

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

---

@Joerg

Probiers mal so:
(oli::sd-inq-obj-pathname (oli::sd-inq-curr-wp))
das liefert dann den Pfadnamen der AE !!

Gruss
RainerH.

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

---

Schade, immer noch das Gleiche.
Schade auch das es so was nicht standardmäßig von CoCreate gibt.

------------------
Gruß
Jörg Antweiler

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

---

Gib uns doch mal die aktuelle Version Deines Makros. Vielleicht ist's ja nur eine Kleinigkeit.

Claus

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

---

Auch moin.

Versuch es mal mit (setf Variable (format nil "~A"(sd-inq-obj-pathname (sd-inq-curr-wp))).

Gruß Michael

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

---

Hallo,

Ich kann Claus nur zustimmen, stell doch mal dein Macro hier rein. Prinzipiell macht es naemlich keinen Unterschied ob du "/s" oder (oli::sd-inq-curr-wp) verwendest. Das mit dem pathname konvertieren und format kannst du meiner Meinung nach weglassen. Das habe ich gerade ausprobiert. Es muss also wohl eine andere Ursache fuer dein Problem geben. Aber ohne Code werden wir nur schwer weiter helfen koennen.

Gruss Dorothea

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

---

@Joerg

Du musst zuerst die akt. AE abfragen und diese dann waehlen !
Beim definieren deiner Schnittebene wird eine erstellt und dann ist ja diese aktuell!

So muesste es aber gehen:

(defun custom::schnittebene-setzen ()
  (let (akt_wp)
    (progn
      (setf custom::akt_wp (oli::sd-inq-curr-wp))
      (oli::sd-put-buffer "model_clipplane  :plane1_positioning  :par_wp :ref_wp custom::akt_wp :done  :plane1  :on  :plane1_positioning :flip_plane :done complete")
    )
  )
)

Starten uebr die Eingabe von: (custom::schnittebene-setzen)

Man koennte das ganze dann auch in einen Dialog packen - mal sehen !

Gruss
RainerH.

Werde mal versuchen, das ganze in einen Dialog zu packen

[Diese Nachricht wurde von RainerH am 24. Nov. 2004 editiert.]

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

---

Hallo zusammen,

also so hatte ich es dann zuletzt probiert (noch mit einfacher Abfrage der Arbeitsebene):

ein:
set_vp_model_clipping (oli:sd-inq-current-vp) :on set_vp_capping (oli:sd-inq-current-vp) :on set_vp_capping (oli:sd-inq-current-vp) :part-color model_clipplane :plane1 :off :plane1 :on :plane1_positioning :par_wp :ref_wp (oli::sd-inq-curr-wp)
:done :flip_plane :done complete

aus:
model_clipplane :plane1 :off complete
set_vp_model_clipping "1" :off

Vielen Dank schon mal für Eure Anteilnahme.

------------------
Gruß
Jörg Antweiler

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

---

@Joerg

Hast du meine Funktion probiert ob sie das macht wie gewuenscht ??

Gruss
RainerH.

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

---

@Rainer:
Hat leider auch nicht funktioniert.
Vieleicht habe ich aber auch ein Fehler mit der Ausführung gemacht, habe beides über die Eingabe eingegeben. 

------------------
Gruß
Jörg Antweiler

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

---

@Joerg

Bin gerade dabei, einen Dialog dazu zu erstellen, weil ich diese
Funktion auch ein wenig komfortabler gestalten will.

Ich werde ihn dann fuer dich hier reinstellen, dauert aber noch ein klein wenig...

Gruss
RainerH.

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

---

Mahlzeit,

habe Deine Version etwas verhuebscht und dann ausprobiert - bei mir tut das so, wie ich das erwarte. Den aufgebesserten Code findest Du zusammen mit einigen Erlaeuterungen unter

http://www.clausbrod.de/Osdm/OsdmMacros#Controlling_model_clipping_plane

  Claus

PS: Habe bewusst keinen Dialog daraus gemacht, damit RainerH auch seine verdienten Unities abraeumen kann 

[Diese Nachricht wurde von clausb am 24. Nov. 2004 editiert.]

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

---

Guten Morgen zusammen,

ich weiß garnicht was ich sagen soll. Ihr seid so lieb. 
Claus, da hast Du Dir aber ganz schön arbeit gemacht - danke.
Jetzt habe ich wohl noch ein generelles Problem, wie führe ich dieses Programm aus?
Ich habe es als .lsp gespeichert und geladen - nix,
in das Eingabefeld kopiert und enter gedrückt - nix,
in den Recorder kopiert, geht auch nicht.
Was ich schon wieder falsch?

Viele Grüße
Jörg

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

---

Als Icon kann man das so ausführen:

preselect
(MEI::CLIPPING-ON)

Gruß
Edgar

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

---

Hi,

@Edgar:
Super, jetzt klappt es! 

@Claus:
Habe ich es richtig verstanden das ich dann mit einem Befehl das clipping ein und ausschalten kann?
Weil das funktioniert bei mir nicht.
Ich habe jetzt 2 Icons eins für (defun clipping-on) und eins für (defun clipping-off)

Viele Grüße
Jörg

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

---

Zitat:

---

Original erstellt von jantweiler:
Habe ich es richtig verstanden das ich dann mit einem Befehl das clipping ein und ausschalten kann?

---

Mit (clipping-on) schaltet man's ein, mit (clipping-off) wieder aus. Tut bei mir prima.

Hast Du wirklich hinter Deinen Icons so wie Du schreibst eine Zeichenkette "(defun clipping-on)" versteckt? Das kann natuerlich nicht gehen.

Claus

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

---

gssss.... das kommt davon wenn man nachts arbeitet..  erst ueberraschte man mich mit einem "Database" Error. Dann gings wieder.. dann war mein Beitrag doppelt drin.. und als ich diesen hier dann loeschen wollte, bekam ich ein
"Nur Administratoren und Moderatoren können diesen Beitrag löschen!"
zu sehen.

Vielleicht kann einer der genannte dann ja diesen Beitrag umweltgerecht entsorgen?

Gute Nacht!

[Diese Nachricht wurde von der_Wolfgang am 26. Nov. 2004 editiert.]

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

---

Ich moechte ja keinem die Kekse^WUnities abspenstig machen.... aber...

Ich habe mit Hilfe einer dritten Funktion (clipping-on-off) ein einfachstes EIN/AUS Verhalten realisiert und das ganze zu einem ICON erhoben. Das war etwas guenstiger als einen Dialog drum rum zu stricken (was aber sicher eine netter LISP-IKIT-Einsteiger Ansatz ist).

Zu finden ist die Dialog-lose "Komfort"Loesung in einer 2-sprachigen Ausführung auf http://www.clausbrod.de/Osdm/OsdmMacros#Controlling_model_clipping_plane

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

---

SD_Schnittebene.zip

Zitat:

---

Original erstellt von clausb:
PS: Habe bewusst keinen Dialog daraus gemacht, damit RainerH auch seine verdienten Unities abraeumen kann...

---

Hier ist er ! - Hoffe dass es auch was wert ist ...

Gruss
RainerH.

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

---

Moin,moin,

ich glaube leider hat noch keiner mein Hauptproblem erkannt,
wie "installiere" ich all die tollen clipping Programme damit ich sie zum laufen bringe?
Ich kenne nur Lisp's über "Laden" zu laden oder ich kopiere den code in das Befehlaktionsfeld im recorder und ziehe mir die Schaltfläche in eine Symbolleiste.
Bitte helft einem Lisplosen Hirn. 

Viele Grüße
Jörg

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

---

@Joerg

Also, SD_Schnittebene.zip entzippen und SD_Schnittebene.lsp ganz
einfach als LISP-Quellencode (*.lsp) laden.
Dann kannst du das Programm von der Werkzeugkiste aus starten.

Gruss
RainerH.

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

---

Das ist ja der Hammer.
Was Gutes kann man sogar noch besser machen.
Perfekt wäre es, wenn die Schnittfunktion auch noch im 2. oder 3. Fenster funktionieren würde.

Gruß
Edgar

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

---

SD_Schnittebene.zip

@Edgar

Muesste jetzt in allen Fenstern funktionieren !

Gruss
RainerH.

[Diese Nachricht wurde von RainerH am 26. Nov. 2004 editiert.]

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

---

@Rainer:
Jau, genauso hatte ich es bei Deinem dialogisierten Programm gemacht, funktioniert tadellos. Vielen Dank!!!
Nur mit den Sachen von Claus und Wolfgang habe ich noch meine Probleme.

------------------
Gruß
Jörg Antweiler

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

---

@Rainer

Funktioniert jetzt auch in allen Fenstern. Der Schnitt wird jedoch immer nur in Fenster 1 angezeigt.

Gruß
Edgar

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

---

Zitat:

---

Original erstellt von jantweiler:
Nur mit den Sachen von Claus und Wolfgang habe ich noch meine Probleme.

---

Einfach nur laden. Wolfgang hat sich sogar die Muehe gemacht, seine Version als "available command" zur Verfuegung zu stellen (Tools/Customize/...). Sehr viel einfacher geht's wirklich nicht mehr. Nur das passende Icon wirst Du Dir halt selber malen muessen.

Claus

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

---

SD_Schnittebene_V2.zip

@Edgar

Irgendwie funktioniert es nicht, wenn man die geaenderte Zip-Datei nochmals uploadet ??

Ich hab dir dazu eine neue Version 2 erstellt.
Hoffe, dass es nun klappt ...

Gruss
RainerH.

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

---

@Rainer
Ich hab die Version2 geladen . Der Schnitt wird im Fenster 2 ausgeführt, jedoch nur in Fenster 1 angezeigt.

@Wolfgang, Claus
Wenn ich das Lisp von Wolfgang richtig verstanden habe, müßte in der Funktionsleiste "verfügbare Befehle" unter Verschiedenes der Befehl Schnitt auftauchen, den ich dann anwählen und einbinden kann.
Ich hab das mal ausprobiert, finde den Befehl allerdings auch nicht.

Gruß
Edgar

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

---

@Rainer
Jetzt hat bei mir der Versionsdurcheinander zugeschlagen. Das Programm funkioniert einwandfrei!!

Gruß
Edgar

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

---

Fenster.gif

@Rainer
Doch kein Versionsdurcheinander. Der Fehler lag woanders. Der Schnitt im 2. Fenster funktionierte nicht, weil ich den Punkt am Fenster rechts oben nicht aktiviert hatte.(z.B. auch erforderlich für Spacemouse). Das wird man wahrscheinlich auch nicht automatisieren können.

Gruß
Edgar

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

---

Zitat:

---

Original erstellt von edgar:
Wenn ich das Lisp von Wolfgang richtig verstanden habe, müßte in der Funktionsleiste "verfügbare Befehle" unter Verschiedenes der Befehl Schnitt auftauchen, den ich dann anwählen und einbinden kann.

---

"Schneiden" heisst er bei mir in der deutschen Version. Tut einwandfrei.

Claus

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

---

Mahlzeit,

so, jetzt hat es auch bei mir geschnackelt, vielen Dank nochmal an alle.
Ich denke Wolfgangs Version wird wohl mein Favorit werden.

Schönes Wochenende
Tschö
Jörg

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

---

Geil! Was anderes fällt mir dazu nicht ein :-)

------------------
Gruß

Christian

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