|
Lisp : Block mit Attributen
CADmium am 24.07.2008 um 11:20 Uhr (0)
Zitat:Original erstellt von Dober Heinz:Hallo ThomasJa ich kenn mich schon aus. Ich habe nie geschrieben, dass ich ein Lisp will.Danke nochmalJa, ist mir klar... so war mein Post auch nicht gemeint(eher als Gedankenstütze und Idee für mich). Da aber die meisten so wie du denken, wird eben weiter rumgefriemelt, Arbeitszeit verschwendet und das Rad im güstigsten Fall mehrmals erfunden. ------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die H ...
|
| In das Form Lisp wechseln |
|
Lisp : 3drotate in Lisp
CADmium am 22.10.2012 um 10:00 Uhr (0)
Hmm .. ist das echt so kompliziert ? (if(and(setq OBJ(car(Entsel "
Polyline : "))) (setq VOBJ(vlax-ename-vla-object OBJ)) (setq A (vlax-curve-getstartpoint VOBJ)) (setq B (vlax-curve-getEndpoint VOBJ)) (setq Winkel 60.0) ) (command "_rotate3d" OBJ "" "_2p" (trans A 0 1)(trans B 0 1) Winkel))------------------Also ich finde Unities gut ...--------------------------------------- - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lö ...
|
| In das Form Lisp wechseln |
|
AutoLisp : _dist sysvar
CADmium am 20.10.2005 um 09:39 Uhr (0)
Welchen hiervon meinst du?Befehl: _distErsten Punkt angeben: Zweiten Punkt angeben:Abstand = 45.70, Winkel in XY-Ebene = 0.0, Winkel von XY-Ebene = 0.0Delta X = 45.70, Delta Y = 0.00, Delta Z = 0.00für die Verwendung in Lisp kannst du doch (setq L(distance (getpoint "
Erster Punkt: ") (getpoint "
Zeiter Punkt: ") ))verwenden.------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form AutoLisp wechseln |
|
AutoCAD Mechanical : Text-Elemente mit fehlender Kontextfunktion
CADmium am 31.01.2006 um 16:57 Uhr (0)
Bei beiden Textdaten sind die angehängeten XDaten etwas verschieden(z.b. mal (entget(car(entsel))("*")) eingeben und den jeweiligen Text anklicken).. entscheidend ist das hinter dem (-3 .... )Im 2.Fall kann ampoweredit ( was durch den Doppelklick aufgerufen wird ) nix mit dem Text anfangen.Lösung wäre eine entsprechende Migration über ein Lisp oder ähnliches , was die Xdatas entsprechend korrigiert.------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits m ...
|
| In das Form AutoCAD Mechanical wechseln |
|
AutoLisp : lisp und höhenlinien
CADmium am 20.09.2004 um 21:21 Uhr (0)
Hallo Piper! Am besten eignet sich dazu eine repeat-schleife. Als Grundgerüst so in etwa: (if (and(setq ss(ssget)) (setq hb(getreal
Bitte die Schichthöhe angeben: )) ) (progn (setq index -1) (repeat (sslength ss) (command _extrude (ssname ss (setq INDEX(1+ INDEX))) (* (+ 1 Index) hb) ) ) ) ) P.S. wenn du in die Lispprogrammierung einsteigen willst, kann ich dir Mapcar s Seiten sehr empfehlen. ------------------ - Thomas - [Diese Nachricht wurde von CADm ...
|
| In das Form AutoLisp wechseln |
|
Rund um AutoCAD : Layerstatus ACAD 2008
CADmium am 29.08.2007 um 14:42 Uhr (0)
Zitat:Original erstellt von jobau:Danke für die Antwort. Wenn das tatsächlich so ist, finde ich,dass das ein ziemlicher Rückschritt ist, denn der Aufruf desLayerstatus-Manager macht das ganze nur umständlich....Kommandozeilenaufrufe zu Layerstände anlegen, setzen, exportieren usw. , die auf den Layerstatusmanager fußen, lassen sich sicher mit Lisp und ActivX realisieren....habs allerdings bloß bisher bis 2007 realisiert und gestestet.------------------ - Thomas -"Bei 99% aller Probleme ist die umfassend ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : Multilinie automatisch im Hintergrund zeichnen
CADmium am 07.02.2007 um 11:05 Uhr (0)
Es gibt im INET z.B. Lisp, die Schraffuren in den Hintergrund packen.. die sollten sich auch auf Multilinien anpassen lassen (oder auf Polylinien mit definierter Breite usw.) ... es gibt auch sowas was die Anzeigereihenfolge auch physisch ordnen kann ..aber warum sollte einer seine Zeit investieren, damit du welchen sparen kannst ------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form Rund um Autocad wechseln |
|
Lisp : Profil per Lisp exportieren?
CADmium am 09.01.2008 um 15:50 Uhr (0)
(defun DT:PROFILE-EXPORT ( PROFILNAME DATEINAME) (not (vl-catch-all-error-p (vl-catch-all-apply vla-ExportProfile (list (vla-get-profiles (vla-get-preferences (vlax-get-Acad-Object) ) ) PROFILNAME DATEINAME ) ) ) ))geht aber nur fürs reine ACAD-Profil, Mechanical schreibt z.B. aber leider ein paar mehr Informationen in die arg ..------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Häl ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Lisp laden
CADmium am 02.09.2004 um 08:41 Uhr (0)
Guck dir auch mal die Lispfunktion autoload in der Hilfe an! @cadffm : etwas Mäkelei: wie reagiert dein Aufruf nach einem vorherigen (setq c:txtcopy 1) ? (etwas hergeholt, ich weiß, aber etwas mehr Sicherheit bietet z.B. der Test (if (/=(type c:txtcopy) SUBR)(load....) oder die Verwendung solchen Algorithmus mit Test, ob geladen. Aber am besten ist Ordnung in den Funktionsbibliotheken. ------------------ - Thomas - [Diese Nachricht wurde von CADmium am 02. Sep. 2004 editiert.]
|
| In das Form AutoLisp wechseln |
|
Rund um AutoCAD : schräge linie um 90° kreuzen?
CADmium am 25.03.2008 um 08:53 Uhr (0)
Zitat:Original erstellt von zehler:beim mechanical funktioniert es.aber beim normalen autocad muß es auch sowas geben.mfgIMHO nicht als integrierten Befehl, sondern nur als Lisp, das dann vom Klickpunkt auf einer Kurve(Linie, PL, Kries..Spline...) eine senkrecht zur Kurve( in diesem Punkt) verlaufende Hilfslinie zeichnet. Z.B. wie das Teil im Anhang.------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form Rund um AutoCAD wechseln |
|
Inventor : Zeichnungsansicht als Polylinie?
CADmium am 21.03.2011 um 07:53 Uhr (0)
denke, aus Inventor heraus geht das nicht, da ja Inventor an sich auch keine Polylinien kennt (aber fürs Allumfassende fehlt mir noch die Erfahrung und das Hintergrundwissen) . Da wirst du in Acad etwas nacharbeiten müssen -- pedit mit option mehrere und verbinden ... was nam sich zwecks automatisierung auch in ein kleines Lisp un dann auf einen button packen kann.------------------ - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung ...
|
| In das Form Inventor wechseln |
|
AutoCAD Mechanical : Mit BATTMAN in der Befehlszeile arbeiten
CADmium am 07.12.2009 um 11:53 Uhr (0)
Zitat:Original erstellt von Oli.D:mhh, klingt bei dir sehr einfach ist es aber denke ich nicht. Werde vielleicht mal ein wenig rumprobieren...Eine kleine andere Frage noch. In Autocad gibt es einen Befehl, mit dem man mehrere Datei auswählen kann und ein Lisp Script was anschließend automatisch alle ausgewählten Dateien abarbeitet.Ich hoffe du verstehst was ich meine.Ja, denke schon------------------ - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die ...
|
| In das Form AutoCAD Mechanical wechseln |
|
Lisp : Koordinaten auslesen mit Text
CADmium am 15.02.2006 um 10:43 Uhr (0)
.. och .. dir wird hier nicht geholfen ? .. Tröst ..... dann werd ich mal inkonsequent sein ... ganz simpel: ersetze(setq pktlst3 (rtos (atof auswahl2) 2 3)) durch(setq pktlst3 auswahl2) und zur Selbsthilfe für deine sicherlich kommende Frage : das hier schon oftgenannte Lisp-Tutorial von MAPCAR------------------ - Thomas -"Du bist einen uns unbekannten Weg in eine andere Form des Seins gegangen. - Wir sehen uns wieder in deinem Paradies! - Tschüß Axel.."
|
| In das Form Lisp wechseln |
