|
Lisp : Kreise ersetzen
CADchup am 14.11.2011 um 11:57 Uhr (0)
Hi,oder gehts hier eher um die syntaktische Frage? Zitat:Original erstellt von mundal:Hi Holger,trotz des GC 40 hat es funktioniert - nochmals Danke.Kann ich den fixen Wert hier 5.0 durch eine Variable ersetzen ?Bespiel(setq durchmesser 5.0 )(ssget "X" ((0 . "CIRCLE") (-4 . "=") (40 . durchmesser )))-- so ist es wohl falsch ich erhalte eine FehlermeldungGrußHeinzCode:(setq ss (ssget "X" (list (0 . "CIRCLE") (-4 . "=") (cons 40 halberdurchmess ...
| | In das Form Lisp wechseln |
|
Lisp : Kreise ersetzen
CADchup am 15.11.2011 um 09:25 Uhr (0)
Hi,Wolfgang, ich bin mir sicher, dass Heinz das inzwischen längst verinnerlicht hat. Habe es oben trotzdem geändert, falls irgendwann ein anderer LISP-Frischling hier reinstolpert.GrußCADchup------------------CADmaro.de
| | In das Form Lisp wechseln |
|
Lisp : Fonts in Textstilen automatisch ersetzen lassen
CADchup am 16.11.2009 um 10:28 Uhr (0)
Hi und herzlich willkommen,wenn du (noch) nicht lispeln kannst, warum versuchst dus nicht mit einem Skript? Das ist ein relativ schmerzloser Einstieg in die "Programmierung" und in deinem Fall durchaus sinnvoll. Einfach alle deine Stile durchgehen und am Ende die überflüssigen bereinigen. Die Anzahl der Leerzeilen musst du selbst rausfinden:Code:_-styleSTILNAME1TTF-oderSHXNAMESTILNAME2TTF-oderSHXNAME_-purge_st*_nDie wichtigsten Dinge dazu: Versuch, die Befehls- und Optionsnamen gleich in englischer Sprache ...
| | In das Form Lisp wechseln |
|
Lisp : Objektfang 2D
CADchup am 12.07.2011 um 15:02 Uhr (0)
Hi,danke für die Erklärung und letzter Versuch.Um OSMODE nicht zurücksetzen zu müssen, hatte ich in meiner ersten Funktion mit dem (command-Aufruf explizit _NONE, also keinen Objektfang, für die nächste Punkteingabe ausgeben wollen. Damit könnte das ganze OSMODE-Gedöns umgangen werden.Vielleicht kann man command durch princ ersetzen. Und da die Funktion sowieso das letzte Ergebnis zurückgibt, brauchts in der letzten Zeile vielleicht auch gar kein princ mehr:Code:(defun C:2d (/ p) (setq p (getpoint "3D-Punk ...
| | In das Form Lisp wechseln |
|
AutoLisp : Textfahnen ??
CADchup am 22.03.2006 um 13:18 Uhr (0)
Hi,kenne keins, habe keins und weiß auch nicht, wo es eins gibt. Da dieses Forum grundsätzlich auf Hilfe zur Selbshilfe ausgelegt ist:Wenn es einen Bezug zwischen deinen Punkten und den zugehörigen Texten gibt (Textinhalt entspricht z. Bsp. Z_Koordinate eines Punkts) solltest du Punkte und Texte einsammeln,Textinhalte und Z-Koordinaten vergleichen und bei passender Zuordnung eine Führung zwischen Punkt und Text erzeugen lassen.Wenn der Text später verschoben wird, wandert die Führung autm. mit.Ich gehe al ...
| | In das Form AutoLisp wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |
