|
Lisp : Anonyme Blöcke per Lisp umbenennen
alfred neswadba am 17.11.2009 um 21:20 Uhr (0)
Hi, wie könnte man einmal definierte dynamische Paramter von Block zu Block übertragen ?IMHO gar nicht (oder zumindest fast nicht). Begründung: jeder Parameter auf irgendeine Art verbunden mit der Geoemtrie in der Blockdefinition. Und genau diese Verbundenheit wüsste ich nicht, wie diese zu übertragen sein sollte.Ich mach mal ein Beispiel, aus dem diese Abhängigkeit hoffentlich hervorgeht:Ein dynamischer Block (-definition) namens Verkehrszeichen mit einem Sichtbarkeitsparameter. Dieser zeigt eine Vorrang- ...
|
| In das Form Lisp wechseln |
|
AutoLisp : kompakte Lisp Code
RoyCAD am 15.03.2005 um 09:51 Uhr (0)
Hallo Kann man dieser Code bearbeiten, weil jetzt ist das eine Endlose Geschichte. Ich denke es ist doch möglich das Ding viel kürzer zu schreiben. Für ein Beispiel werde ich sehr dankbar. Mit freundlichen Grüßen RoyCAD (setq bock_seit_an1 (polar (setq startbock_an (getpoint Startpunkt )) 0.0 (- (+ (+ (+(-(* b1 (sqrt 2.0))9.95 )2.9) (* b2 (sqrt 2.0))) (+ (* Breite_3 (sqrt 2.0)) 4.0)) 5.4) )) (setq bock_seit_an2 (polar bock_seit_an1 w45 (* 5.4 (sqrt 2.0)))) (setq bock_seit_an3 (polar bock_ ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Infopunkte mit Lisp Einfügen und Bearbeiten
rex121 am 22.09.2003 um 17:50 Uhr (0)
Da mir keiner hier helfen konnte, muß ich mir selbst helfen . Die sache ist eigentliech ganz einfach . AutoCad hat eingebautes ActiveX model. Genau so einen hat auch AutoCAD Mechanical. Das Problem ist raus zu fienden wie ist Er aufgebaut. Es ist genau beschrieben in der Datei mcadauto.hlp die im Help-order von autoCAD zu fienden ist . Wenn Mann die alle Informationen hat kann Man ganz leicht einen Infopunkt in AutoCAD einfügen und ausfühlen. Als erstes muss Man zugrif auf die ale ActiveX componente ...
|
| In das Form AutoLisp wechseln |
 |
Lisp : .lisp zum öffnen eines PDF-Dokuments funktioniert nicht mehr
Stroph am 09.04.2014 um 15:20 Uhr (15)
Super, tatsächlich hatte ich die .pgp kaputtgespielt. Die zeilen zu den externen Befehlen hatte ich auskommentiert auf der erfolglosen Suche nach der Bedeutung der Begriffe "Zeile" und "Feld" in der Meldung:Syntaxfehler in acad.pgp-Datei auf Zeile 4 in Feld 1Syntaxfehler in acad.pgp-Datei auf Zeile 3 in Feld 1Frustriert hatte ich dann vergessen es rückgängig zu machen.Vielen Dank!
|
| In das Form Lisp wechseln |
|
Lisp : Mit Lisp Blöcke auslesen und Teile des Inhalts in Textzeilen abbilden
spider_dd am 26.11.2024 um 08:33 Uhr (1)
Zitat:Original erstellt von 100dpi:...@Andreas: Das genau hab ich versucht, Acad schiebt die Texte dann aber ALLE zum Punkt 0,0 Du musst den GC 11 noch setzen, der wird bei Ausrichtungen anders als links verwendet.Also:(cons 11 (list x y z))bzw.(cons 11 (list x (- y (* text-height 1.5)) z))noch in die entmake Listen nehmen.GrußThomas[Diese Nachricht wurde von spider_dd am 26. Nov. 2024 editiert.]
|
| In das Form Lisp wechseln |
|
AutoLisp : an die LISP Experten - Express Befehl umschreiben (Liste sortieren)
marc.scherer am 09.03.2005 um 15:32 Uhr (0)
Hi, tausche mal die Zeile: Code: (acet-dcl-list-make "color_list" lst) mit: Code: (acet-dcl-list-make "color_list" (setq lst (vl-sort lst (lambda (x y)( (atoi x)(atoi y)))))) aus... ------------------ Ciao, Marc [Diese Nachricht wurde von marc.scherer am 09. Mrz. 2005 editiert.]
|
| In das Form AutoLisp wechseln |
|
Lisp : Text Ändern in Block (Attribut) per Lisp
CADmium am 06.02.2018 um 07:15 Uhr (1)
Für Datum und Zeitstrings würde ich sowas nehmen :(menucmd "M=$(edtime,$(getvar,date),DD.MO.YYYY)")mit dem Formatstring DD.MO.YYYY kann man dann auch das Ausgabeformat beeinflussen wie man will(menucmd "M=$(edtime,$(getvar,date),DD.MO.YYYY - HH:MM:SS)") liefert z.B auch gleich die Zeit mit .. andere Möglichkeiten bitte ausprobieren oder googelnEdit ... der Vollständigkeit halber :(setq JAHR (menucmd "M=$(edtime, $(getvar, date),YYYY)") MONAT (menucmd "M=$(edtime, $(getvar, date),MO)") MONATNAME ( ...
|
| In das Form Lisp wechseln |
|
Lisp : Screen Refresh in Lisp-Schleife
HPW am 23.02.2012 um 08:21 Uhr (0)
Hallo,Ich nutze es nun erst mal so:Code:(defun c:pdia ( / rfile techo shell );Öffnen pdScript Dialog (princ "
Warte auf Dialog Ende
") ; (setq rfile (strcat (getenv "TEMP") "~pdia_return.txt" )) ;Resultfile für Return-Data und Ende-Signal in der Startapp-Version (setq techo(getvar "CMDECHO")) ; (setvar "CMDECHO" 0) ;aus (if (findf ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Externe Lisp in Repeat starten möglich?
CADwiesel am 26.10.2004 um 11:15 Uhr (0)
müsste so gehen (command .-layer _th * _on * ) (setq allobj (ssget X (list (-4 . AND )(cons 8 * ) (-4 . AND )))) (Setq objanz (sslength allobj)) (repeat objanz (setq laakt (ssget l )) (print laakt) (setq las (ssname laakt 0)) (print las) (setq elist (entget las)) (print elist) (setq lalist (assoc 8 elist)) (print lalist) (setq aktla (cdr lalist)) (print aktla) (command .-layer _se aktla _off * _on aktla ) (if (setq lst (acet-overkill-ui nil)) (acet-overkill2 lst) );if ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Lisp zur Übernahme benannter Attribut werte als Schriftfeld in Multiführungslinie
joern bosse am 13.04.2021 um 09:18 Uhr (1)
Hallo Kuschelfee,Verwunderlich finde ich nur, dass bei der Version mit 2 Attributen die länge des Attributwertes egal ist, dieser hüpft beim links absetzen nicht. Ja, das ist mir auch nicht ganz klar, was ich da zurecht gebastelt habe ist mit Sicherheit nicht der beste Weg. Aber vielleicht hat ja noch irgendwer anders hier im Forum eine Erklärung dafür.------------------viele GrüßeJörnhttp://www.bosse-engineering.comBosse_tools-Überblick
|
| In das Form Lisp wechseln |
|
Lisp : Lisp-Ablauf -> AC-Bildschirm überspringt vieles
archtools am 22.02.2011 um 17:20 Uhr (0)
Zitat:Original erstellt von Werner-Maahs.de:Nein, so ar das nicht gemeint.Der Monitor zeigt nur nicht alles. Überspringt vieles und, wenn der Ablauf fehlerfrei war, wird auch ein richtiges (gewolltes) Ergebnis ercheinen. Nur die Zwischenschritte werden nicht angezeigt (hätte ich aber gern). Also zunächst mal: ein Programm überspringt nur das, was das Programm laut Programm überspringen soll.Dass der Bildschirm nicht immer sofort jede Änderung anzeigt, die innerhalb eines Programmablaufs vollzogen wird, ha ...
|
| In das Form Lisp wechseln |
|
Lisp : Lisp soll nach Blöcken suchen
Wolli am 07.04.2009 um 13:25 Uhr (0)
Hallo Thomas,Danke das ging aber schnell.Ganz funktioniert es noch nicht.Ich bekomme wenn so ein Block vorhanden ist folgendeAutoCAD-Meldung:"216176810001-.scr"Kann Datei nicht finden.Wenn ich dann OK klicke geht es weiter und es erscheint nicht diegewünschte Meldung.In der ACAD Befehlszeile steht dann folgendes:Scriptdateinamen eingeben C:cdb_localcdb_work216176810001-.scr: cdb_plot.scrBefehl: (setvar "filedia" 1)1Befehl: (if(or(tblobjname "BLOCK" "A-Format"))(_ (tblobjname "BLOCK" "B-Format"))nilBefeh ...
|
| In das Form Lisp wechseln |
|
Lisp : Warum funkt dieses lisp nicht in Briscad?
CAD-Huebner am 05.09.2011 um 10:29 Uhr (0)
Zuerst einmal gehört noch die Datei "kantopt.dcl" mit ins ZIP Archiv, sonst feht die Dialogsteuerdatei und das Programm läuft gar nicht.in dem Programm sind keine Kommentare enthalten, dafür eine etwas ungewöhnliche Art der Punkterstellung (als Zeichenketten) - warum - genialer Trick oder Unkenntniss? Es is der größte Aufwand, zuerst den genauen Zweck des Programmes zu verstehen bzw. wie die Ausgangsdaten aussehen könnten, dabei kannst du helfen - lege doch mal eine Zeichnung mit Vorher - Nachher dabei.--- ...
|
| In das Form Lisp wechseln |
