|
Lisp : Umwandlung von (getvar DWGNAME)
spider_dd am 05.10.2006 um 10:01 Uhr (0)
Hallo Angeltoni,teste doch mal Deine einzelnen Codezeile (auch abschnittsweise) im Lisp-Editor / VL-Konsole. Da siehst Du was die einzelnen substr Anweisungen liefern. Das erhaltenbleiben der mittleren Zeichen: Kann es sein, dass Dein aktueller Dateiname das zweite "-" Zeichen nicht hat? Das wird nämlich gesucht.Wenn Deinen Dateinamenstruktur immer so "starr" ist wie angegeben brauchst Du auch nur die gewünschten Abschnitte rausgreifen.Code:(setq dwgname (vl-string-right-trim ".dwg" dwgname))(setq TX (strc ...
| | In das Form Lisp wechseln |
|
Rund um AutoCAD : Drehen mit Bezug / Xlines automatisieren
spider_dd am 03.07.2015 um 08:24 Uhr (1)
Hallo Silbergelatine,naja, ich würde sagen bei dem Lips fehlen noch 2/3.(get_sysvar) und am Ende (reset_sysvar) sind keine definierten Lisp-Befehle sondern vermutlich selbst gebaute Funktionen. Vielleicht kommt Dirk ja nochmal vorbei und liefert diese noch nach.Solange kannst Du die mal auskommentieren, einfach ein ; davorsetzen.Und durch das Löschen der ; in den drei Zeilen hast Du jetzt 2 x den rotate - Befehl drin. Ob das so gewollt ist?zum Beispiel so könnte es gehen.Code:(defun c:Drb (); (get_sysvar) ...
| | In das Form Rund um AutoCAD wechseln |
|
Lisp : vl-string-position kaputt
spider_dd am 21.03.2022 um 07:57 Uhr (1)
Hallo Frank,ich habe auch mal weiter getestet. Also die Datei ist OK, sauber TAB getrennt.Strg+C aus der Datei und Einfügen in die Befehlszeile macht aus den Tab dann Leerzeichen, warum auch immer.Code:Befehl: (setq aa "1 2689819.955 1282112.134 446.979")"1 2689819.955 1282112.134 446.979" ;; Hier sieht man die LeerzeichenBefehl: (vl-string-position 9 aa)nilÖffen per Lisp funktioniert einwandfrei.Code:(setq file (getfiled "test" "c:downloads" "txt" 4))"C:DownloadsTest_BoPL.txt"Befehl: (setq ff (open file ...
| | In das Form Lisp wechseln |
|
Rund um AutoCAD : Breite Zeichnung auf mehrere Seiten plotten
spider_dd am 29.01.2013 um 15:13 Uhr (1)
Zitat:Original erstellt von Werner-Maahs.de:Ich würde die einzelnen Seite als Layout darstellen .... Macht zunächst viel Arbeit mit den Layouts...Wenn, wie im ersten Bild die darzustellenden Bereiche immer gleich groß und schön regelmäßig angeordnet sind, lässt sich das mit den Layouts anlegen auch automatisieren.Einfach erstes Layout als Vorlage einrichten und dann eine Lisp mit folgenden Aktivitäten drüber laufen lassen:Code:in eine Schleife mit der Anzahl Deiner benötigten Layouts: (setq neu_layout "neu ...
| | In das Form Rund um AutoCAD wechseln |
|
Lisp : script zur Bereinigung von Export DXF/DWG
spider_dd am 19.10.2011 um 08:39 Uhr (0)
Hallo Carsten,an dem Punkt, an dem Du jetzt angekommen bist, bleiben euch m. E. folgenden, weiter oben von CADchup schon sinngemäß genannte Möglichkeiten.1) Du "wurschtelst" weiter wie bisher gehabt. (und kriegst kein Geld dafür)2) Du vertiefst Dich soweit in Lisp und Script, dass Du selber was proggen kannst, was euch weiterhilft. (Ist erstmal Zeit, die euch keiner bezahlt, bringt aber später dann Zeitersparniss.) Wenn Du dabei dann konkrete Hilfe brauchst, steht Die hierfür das Forum sicher mit Rat und T ...
| | In das Form Lisp wechseln |
|
Lisp : Drehe Block und verschiebe Attribut
spider_dd am 27.06.2012 um 16:55 Uhr (0)
Zitat:Original erstellt von cadplayer:Es kam aber zu einem guten Nebeneffekt, dass ich den Block am Bildschirm drehen kann und er solange gedreht wird bis ich einen Punkt anklicke. Vorher warst Du aber mit einem Fehler aus dem Lisp-Prog rausgeflogen. Zumindest bei mir kommt eine entsprechende Fehlermelung.Code:Befehl: RBSelect block! _ucsAktueller BKS-Name: *WELT*Ursprung des neuen BKS angeben oder [FLäche/bENannt/Objekt/VOrher/ANsicht/Welt/X/Y/Z/ZAchse] Welt: _objectObjekt für BKS-Ausrichtung wählen:Befeh ...
| | In das Form Lisp wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |
