|
Lisp : eine bestehende lisp auf den Inhalt von Blöcken erweitern?
CADwiesel am 17.12.2008 um 07:56 Uhr (0)
Ganz so einfach wirds nicht werden.Erzähl uns lieber, was du genau vorhast, und poste deine Programmansätze.Grundsätzlich wirst du aber über die command-Schiene innerhalb von Blockdefs oder Inserts nicht weiterkommen.------------------Gruß CADwieselBesucht uns im CHAT
|
In das Form Lisp wechseln |
|
Lisp : eine bestehende lisp auf den Inhalt von Blöcken erweitern?
-ikarus- am 17.12.2008 um 07:51 Uhr (0)
Hallo ich habe von Lisp wenig Ahnung,meine Frage ist, wie kann ich eine bestehende Lisp so modifizieren, das sie sich auch auf den Inhalt von Blöcken auswirkt bzw. gibt es eine Lispin der ich meine Lispanwendungen als command einbauen kann und dann durch die Blockliste laufen lassen kann? Das heißt das er alle Blöcke nach einander mit dem von mir gewünschten Befehl (weitere Lispanwendung) abarbeitet.
|
In das Form Lisp wechseln |
|
Lisp : eine bestehende lisp auf den Inhalt von Blöcken erweitern?
CADmium am 17.12.2008 um 08:06 Uhr (0)
Ja das geht .. am universellsten finde ich eine Scanroutine, der ich für die Objektwahl die Vorgabe "Auswahl", "gesamte Zeichnung" oder "aktuelles Layout" mitgeben kann, weiterhin einen Flag, ob Blockdefinitionen berücksichtigt werden sollen oder nicht und als Abschluß die "to Do" - Funktion als Parameter, die auf die Objekte angewandt werden soll.... Ohne Lispverständnis ist das aber nicht so einfach zu backen.Aber sag erstmal , wo es hingehen soll ... ------------------ - Thomas -"Bei 99% aller Proble ...
|
In das Form Lisp wechseln |
|
Lisp : eine bestehende lisp auf den Inhalt von Blöcken erweitern?
-ikarus- am 17.12.2008 um 08:44 Uhr (0)
Danke für die schnelle AntwortAlso mir geht es darum, das ich meine bestimmte Zeichenreihenfolge auch auf den Inhalt von Blöcken anwenden kann.anbei mal die von mir erstellte draworder.(defun C:DRAWOR ( / ofang1 helems la bema mas bema1 sch15 sch95 gr30 sch95 rah10 kon1)(setq ofang1 (getvar "osmode"));^C^C(if (setq helems (ssget "_X" ((0 . "HATCH"))))(command "_.draworder" helems "" ""))(command "_.copy" "alle" "e" helems "" "@" "@")(command "_.erase" "V" "");^C^C(if (setq mas (ssget "_X" ((0 . "HATCH") (2 ...
|
In das Form Lisp wechseln |
|
Lisp : eine bestehende lisp auf den Inhalt von Blöcken erweitern?
CADmium am 17.12.2008 um 08:47 Uhr (0)
nee, das mußt du IMHO anders lösen, denke, das wird so mit command nix ... ich hatte mal ähnliches so gelöst..------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
In das Form Lisp wechseln |
|
Lisp : eine bestehende lisp auf den Inhalt von Blöcken erweitern?
-ikarus- am 17.12.2008 um 09:29 Uhr (0)
OKHeißt das es gibt da keine Möglichkeit die Lisp zu erweitern, das sie auf den Inhalt von Blöcken zugreift?Wenn ich einen Block im Blockeditor öffne, dann funktioniert die Lisp auch, es ist halt sehr zeitaufwändig jeden Block zu öffnen. Ich dachte halt das es als eine Erweiterung der Lisp möglich wäre diesen schritt im Hintergrund nach einer Blockliste ablaufen zulassen. Aber es sieht wohl nicht danach aus, dass das geht.
|
In das Form Lisp wechseln |
|
Lisp : Erweiterung Lisp zum Ermitteln von einem Schnittpunkt
neurosis am 17.12.2008 um 14:28 Uhr (0)
hallo,1. eckpunkte mittels getpoint von flaeche angeben oder punkte der flaechenbegrenzung auslesen (uebergabe mittels entsel)2. alle relevanten linien ueber ssget anklicken3. in einer schleife alle schnittpunkte der flaeche mit einzelnen linien berechnen (siehe dazu auch http://local.wasp.uwa.edu.au/~pbourke/geometry/planeline/ ) und in liste speichern4. polylinie oder linien aus allen schnittpunkten erzeugengrussmarco------------------Marco Heuer www.arc-aachen.de Airport Office
|
In das Form Lisp wechseln |
|
Lisp : Erweiterung Lisp zum Ermitteln von einem Schnittpunkt
Geos am 18.12.2008 um 07:50 Uhr (0)
Meinst Du sowasCode:(defun c:schnittp ( / P1 P2 P3 P4 P5 P6); by Stefan Schwankner - 2008-04-10(arxload "GEOMCAL") ;;;Rechner muss geladen werden (setq P3 (getpoint "
Erster Punkt der Ebene:")) (setq P4 (getpoint "
Zweiter Punkt der Ebene:")) (setq P5 (getpoint "
Dritter Punkt der Ebene:")) (while (setq P1 (getpoint "
Erster Punkt der Linie:")) (setq P2 (getpoint "
Zweiter Punkt der Linie:")) (setq OSCHNAePP (getvar "osmode")) (command "osmode" 0) (cal "P6=ilp (p1,p2,p3,p4,p5)") (command "_sp ...
|
In das Form Lisp wechseln |
|
Lisp : Erweiterung Lisp zum Ermitteln von einem Schnittpunkt
StephanJP am 18.12.2008 um 08:28 Uhr (0)
Vielleicht sowas...Code:;by Stephan Vette - 2006-09-13(defun c:vme () ;verschneidet alle Linien mit einer Ebene (arxload "geomcal" T) (setq as (ssget ((0 . "LINE"))) ebene (getreal "zu erreichende Ebene eingeben: ") ep1 (list 0.0 0.0 ebene) ep2 (list 0.0 10.0 ebene) ep3 (list 10.0 0.0 ebene) n 0 en (ssname as n) ) (while en (setq p1 (cdr (assoc 10 (entget en))) p2 (cdr (assoc 11 (entget en))) ) (kal "vp=ilp(p1,p2,ep1,ep2,ep3)") (cond (( (nth 2 p1)(nth 2 p2))(entmod (list (car (entget en))(cons 10 vp)) ...
|
In das Form Lisp wechseln |
|
Lisp : Selection Set LISP -> VBA
autocart am 18.12.2008 um 09:25 Uhr (0)
Hallo!Gibt es eine einfache (in Autocad eingebaute) Möglichkeit, ein LISP-Selection-Set in ein VBA-Selection-Set-Object umzuwandeln (und umgekehrt)? Danke.(In der Suche fand ich dazu noch nichts, obwohl man meinen sollte, dass das eher zu den Grundlagen gehört.)------------------Gruß, Stephanwww.stbartl.at
|
In das Form Lisp wechseln |
|
Lisp : Erweiterung Lisp zum Ermitteln von einem Schnittpunkt
treffi75 am 18.12.2008 um 09:43 Uhr (0)
Hi zusammen,habe aus den informationen, die ihr mir gegeben habt eine lsp zusammengestellt und sie funktioniert!programmiertechnisch sicherlich nicht das feinste, denn man könnte, so wie stephan meinte zuerst alle linien anklicken und dann die berechnung durchführen, aber so auf die schnelle funzt meins auch.Danke nochmal für die anregungen, habs angehängt.gruß, treffiP.S.: Übrigens, Ernst, ich glaube wir kennen uns!!
|
In das Form Lisp wechseln |
|
Lisp : Selection Set LISP -> VBA
CADmium am 18.12.2008 um 09:58 Uhr (0)
..muß man sich programmieren..------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
In das Form Lisp wechseln |
|
Lisp : Selection Set LISP -> VBA
alfred neswadba am 18.12.2008 um 10:01 Uhr (0)
Hi Stephan,ein paar Dinge könnten mir da schon einfallen, hängt aber sehr von der Arbeitsweise ab.Da wären für SelectionSet in DVB die Parameter acSelectionSetPrevious, acSelectionSetLast == abhängig von dem, wie Du in Lisp selektiert hast, kannst Du das eventuell direkt verwendenDann wäre noch das ImpliedSelectionSet oder Suchbegriff PickFirstxxx == aktuell selektierte ElementeSind mal ein paar Ideen, wenn ein wenig mehr Beschreibung Deines Workflows kommt, dann kommen vielleicht noch mehr Ideen- alfred -
|
In das Form Lisp wechseln |