|
Rund um AutoCAD : Kreise tangential verbinden (Lisp o.ä.)
CAD-Huebner am 25.03.2011 um 15:31 Uhr (0)
Da wirken sich wohl Rundungsungenauigkeiten beim Rückrechnen des Winkels aus dem Tangens des sehr schmalen Dreiecks aus.Hier mal semiprofessionewll nachgebessert - einfach Linie mit aktiviertem Objektfang "Tangente" aufgerufen.Code:(defun C:KTANV( / dm e1 e2 k1 k2 m1 m2 os p1 p2 r1 r2 rd sk win winm wint) (prompt "Kreise tangential verbinden
") (setq k1 (car (entsel "Kreis 1 (groß) wählen:")) k2 (car (entsel "Kreis 2 (klein) wählen:")) e1 (entget k1) r1 (cdr (assoc 40 e1)) m1 (cdr (assoc 10 e1) ...
|
| In das Form Rund um AutoCAD wechseln |
|
CoCreate Modeling : Lisp-Makro von V12 nach V16 übersetzen?
der_Wolfgang am 07.10.2008 um 20:57 Uhr (0)
Der "Anpassungsbrower" regelt ja auch nur Default Einstellungen. Du aenderst aber die Eigenschaften von vorhandenen Objekten (allen Ansichten)-- 2 paar Stiefel!Den "Anpassungsbrower" kannst Du z.b. Für die Umstellung Hintergrundfarbe des Bildschirms verwenden.Für Deine Schleife (wenn Du denn nicht den kopiere auf weg aus dem Ansichtseigenschaften Dialog nehmen willst)Nur ein paar Brocken (oft fehlt ja der richtige Einstieg):* SD-AM-INQ-SHEET // all sheets* - sd-am-sheet-struct-views - {LIST of SEL_ITEMs} - ...
|
| In das Form CoCreate Modeling wechseln |
|
BricsCad : Externer Lisp-Editor
Theodor Schoenwald am 20.04.2012 um 15:28 Uhr (1)
Hallo,noch ein Nachtrag zu Ultra-Edit:Ich habe jetzt eine Version gekauft.Das Programm ist von den Funktionen her einwandfrei."Säuerliches"Dass ich jedoch zwei Versionen kaufen muss, wenn ich das Programm auf meinem stationären PC und auf dem Laptop nutzen möchte, gefällt mir nicht. Auch die arroganne Art, wie mir dazu auf meine Mail geantwortet wurde, hat mir nicht gefallen.Auf jeden Fall hat es mich "etwas" geärgert und ich habe die Funktionen "UE" genau mit den beiden Freeware-Programmen "PSPAD" und "No ...
|
| In das Form BricsCad wechseln |
|
Lisp : Layerlisten, Textbearbeitung
Werner-Maahs.de am 19.06.2013 um 15:46 Uhr (0)
Hallo, ich stehe mal wieder auf, Schlauch.Das Problem: Layerliste aus AutoCAD erzeugen, so verarbeiten, dass ich diese mit Ebenen in MegaCAD nutzen kann.Ich habe ein Lisp-Datei, die mir eine veränderte Layerliste erzeugt, diese auch in eine Datei schreibt. Nun will ich diese Datei aber in einer veränderten Form haben.Bisher habe ich:Code:0XY_Layer1_3DXY_Layer2_2DYZ_Layer3_3DYZ_Layer4_3D...umgesetzt für MegaCad zuCode:00001: 000002: XY_Layer1_3D00003: XY_Layer2_2D00004: YZ_Layer3_3D00005: YZ_Layer4_3D...Bis ...
|
| In das Form Lisp wechseln |
|
Lisp : Automatic Dimension AutoCAD LISP??
kadirozen am 27.07.2023 um 14:58 Uhr (1)
Nochmals vielen Dank für die ausführliche Antwort. Ich werde auf die Antwort des Autors warten.In der Zwischenzeit möchte ich eine weitere Frage stellen. Vielleicht wäre es besser, einen neuen Beitrag zu eröffnen.Im Moment verwenden wir diesen Arbeitsablauf als einen Teil der täglichen Arbeit.Ich würde ihn gerne verbessern und so weit wie möglich automatisieren.Der Ablauf ist wie folgt.Wir arbeiten mit 40 Layersn. Die meisten davon sind Messungen und sonstiges.Wir exportieren die Layouts als PDF.Wir ändern ...
|
| In das Form Lisp wechseln |
|
Autocad VBA : Polylinientransformation
KlaK am 17.12.2006 um 15:13 Uhr (0)
Hallo guska,das Problem scheint ja wirklich aktuell zu sein, wir haben momentan das gleiche. programm läuft zwar inzwischen, aber immer noch mit Fehlern.Wenn Du nur Polylines umwandelt willst, kannst Du es mit folgender Lisp-Routine von CADmium http://ww3.cad.de/foren/ubb/Forum259/HTML/001081.shtml Wenn Du es selber entwickeln möchtest, solltest Du bei den Polylines auch die Bögen berücksichtigen, und dann mußt Du natürlich die Höhen auf den Zwischenpunkten interpolieren.Für die Übernahme der Höhen aus Bl ...
|
| In das Form Autocad VBA wechseln |
|
AutoLisp : Lisp Kontextmenü
dan_rather am 02.05.2005 um 14:51 Uhr (0)
Tja, Nochmal Hallo. Also das prog läuft... aaaaber wie bekomme ich das voreingestellte Maß in die Zeile? (setq antw (getkword
Enter oder [A]bstand %i : )) bei %i hätte ich gerne das vorher eingestellte/gewählte Maß stehen. Weiß jemand wie das geht mit dem Platzhalter? Prog: (vl-load-com) (setq osmode_save(getvar OSMODE )) (setvar OSMODE 15743) (princ
Aktueller Abstand: ) (princ abst) (initget A ) (setq antw (getkword
Enter oder [A]bstand: )) (if antw (setq abst (progn(getdist
Abst ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Getstring mit Vorgabe
marc.scherer am 11.05.2006 um 12:20 Uhr (0)
Toll,hab wieder zu lange rumgemacht :-(Hier mein Senf:Code:(defun C:KANAL_SCHACHT (/ PUNKT SCHACHT STRANG) ;; (prompt "Schachtmitte: ") ;; Die Aufforderung kann man direkt in die GETXX Funktion bringen ;; Angaben in "" sind traditionell für "Vorgabe wenn Enter" gedacht. ;; Was ist, wenn der User keinen Punkt klickt? Dies muß abgefangen werden. (if (not (setq PUNKT (getpoint "
Schachtmitte: "))) (princ "
Ey, Du sollst n Punkt klicken... Funktionsende.") (progn ;_ fasst nachfolgendes zu einem Ausdruck zusa ...
|
| In das Form Lisp wechseln |
|
Rund um AutoCAD : Punkten Nummern zuweisen und auslesen
Gargarot am 21.07.2009 um 21:52 Uhr (0)
Hi!Also ich hät dir 3 Möglichkeiten zu bieten:1. "LS" oder "ID" für 1-2 Punkte2. Für 3-30 Punkte (Ist einfach mühsam): Ein Lisp (Im Angang) einfach txt Endung entfernen und laden (siehe sonst FAQ) Dabei musst du einen Dateinamen vergeben (möglichst was spezielles....) Dann Name eintipen, Punkt wählen.. usw. Einziges Problem es ist ein bisschen Tombola wo die Datei gespeichert wird. Meist in iregendeinem Supportpfad. Also einfach danach suchen, die Datei hat übrigens auch keine Endung... 3. unbegrenzt, wied ...
|
| In das Form Rund um AutoCAD wechseln |
|
Bild/Grafikanwendungen : Freistellen
mapcar am 06.11.2004 um 17:57 Uhr (0)
Ich weiß das es da intelligente Assis in Programmen gibt Da weisst du mehr als ich z.B. - natürlich hat mehr oder weniger jedes Programm ein Zauberstab- oder wie-auch-immer-Funktion, mit der man Bildbereiche wählen und damit dann freistellen kann. Mit Intelligenz hat das allerdings wenig zu tun, du kannst einfach aus einer Menge Algorithmen wie Helligkeitsunterschied, RGB-Abweichung usw. auswählen. Das geht oft erstaunlich gut (Porträt vor blauem Himmel), aber oft geht s auch erstaunlich schlecht:-( ...
|
| In das Form Bild/Grafikanwendungen wechseln |
 |
Rund um AutoCAD : Anwendung laden LISP
cadalacad am 18.08.2015 um 15:16 Uhr (5)
Hallo zusammen,ich weiß der Beitrag ist schon recht alt, hätte aber trotzdem nochmal genau zu dieser Problematik eine Frage.Nachdem ich gerade meine Systemvariablen über die Express Tools auf die Vorgabewerte zurückgesetzt habe, erscheint bei mir jetzt auch immer beim Start die ominöse Sicherheitsbedenken-Meldung - zu zwei Civil mnl-Dateien.Klar, ich kann in den Optionen den Pfad bei Vertrauenswürdige Speicherorte zu den mnls hinzufügen oder wie oben auch schon beschrieben die Sicherheitsfunktionalität übe ...
|
| In das Form Rund um AutoCAD wechseln |
|
BricsCad : AutoLISP-Applikationen beim Programmstart automatisch laden
MSchuster am 26.02.2010 um 14:37 Uhr (0)
Zitat:Original erstellt von autocart:Nicht einen Backslash in Pfadangaben, sondern zwei:(load "C:UsersmschusterAppDataRoamingBricsysBricscadV10de_DEsupportGefaelle.lsp")Das war wohl die Lösung. Ich habe zusätzlich die führende Leerzeile in der on_start.lsp entfernt und die LISP-Dateien ins Support-Verzeichnis von BricsCAD kopiert (liegen also nicht mehr im User-Support-Verzeichnis).Vielen Dank für die schnelle Hilfe!Zusammenfassung der Lösung:- Doppelte Backslashes in Pfadangaben verwendet- Klammern um di ...
|
| In das Form BricsCad wechseln |
|
AutoLisp : Eingabe eines Punktes per Lisp
WolfgangE am 14.01.2004 um 10:03 Uhr (0)
Vielleicht nochmal ein ganz konkretes Beispiel bezüglich der Koordinaten-Eingabe: Die Varialbe BASE beinhaltet die Koordinaten aus der (ENTGET)-Definition. Die Koordinaten speichere ich nach X und Y (alles direkt an der Kommandozeile): Befehl: AMCVTFRAME12 Bitte Rahmenblock wählen: X,Y *Ungültige Auswahl* Erwartet einen Punkt oder Letztes Bitte Rahmenblock wählen: *Abbruch* Befehl: (SETQ X (CAR BASE)) -1714.6 Befehl: (SETQ Y (CADR BASE)) -1703.23 ********************************* Jetzt Folgende Eingaben: ...
|
| In das Form AutoLisp wechseln |
