|
AutoLisp : kann man ein script in eine Lisp umwandeln?
tunnelbauer am 07.04.2005 um 11:41 Uhr (0)
Alternative zu CADmium: Code: (defun C:meineBEFEHLE (command Befehl_1 Befehlsoption_1 Befehelsoption_2 ....) (command Befehl_2 Befehlsoption_1 Befehelsoption_2 ....) (command Befehl_3 Befehlsoption_1 Befehelsoption_2 ....) ) Dieses Lisp musst du natürlich auch noch laden und dann mittels meineBEFEHLE (oder wie du es dann nennen mögest) aufrufen. Ist aber nicht die schnellste Form einer Umsetzung; hier ist die Wirkungsweise wirklich einem script gleich. Schnelle(re) Abläufe ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : kann man ein script in eine Lisp umwandeln?
batman17 am 07.04.2005 um 11:42 Uhr (0)
hm, und genau da geht das problem weiter, nach dem G: hört er auf im Pfad zu suchen....
|
| In das Form AutoLisp wechseln |
|
AutoLisp : kann man ein script in eine Lisp umwandeln?
CADmium am 07.04.2005 um 11:46 Uhr (0)
Pfadangaben mit oder / trennen! so : D:ACADSCRIPTEMEINSCRIPT.SCR oder wenn du deine Scripte in einem Supportpfad hast: ^C^C(command _script (findfile Meinscript.scr )) ------------------ - 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 |
|
AutoLisp : kann man ein script in eine Lisp umwandeln?
batman17 am 07.04.2005 um 11:52 Uhr (0)
JA! Jetzt hats geklappt! Besten Dank!!! Da hat sich die ganze Mühe ja am Ende doch noch gelohnt... gruß alex
|
| In das Form AutoLisp wechseln |
|
AutoLisp : String in Zahlen umwandeln
cad-intensiv am 29.07.2005 um 20:34 Uhr (0)
Zitat: Original erstellt von MH Bit: Hallo, ich hab doch noch eine Frage denn: jetzt kommt bei (rtos 1000 2 4) = "1000.0000" da kam sonst immer "1000" raus. Wie kann ich die Anzahl der Stellen nach dem Komma einstellen? Hat das was mit DIMZIN zu tun? Michael Ja, das hat was mit DIMZIN zu tun - das stand bei Dir früher vermutlich auf 8. Ich verwende statt RTOS immer meine eigene Funktion, die Du gerne für Dich passend ändern kannst: Code: (defun my-rtos (zahl modus stellen / result olddimzin) ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : kann man ein script in eine Lisp umwandeln?
Bernd P am 08.04.2005 um 10:17 Uhr (0)
Mein Senf Wenn das Scipt im Supportpfad steht reicht ^C^C(command _script Meinscript.scr ) od. _script; Meinscript.scr ------------------ Warum Einfach es geht auch kompliziert . Schöne Grüsse aus der Steiermark Bernd P. Bitte Supportangaben eintragen , warum siehst du hier
|
| In das Form AutoLisp wechseln |
|
AutoLisp : 2d Rohrbogen
HANS at Stmk am 09.04.2005 um 19:28 Uhr (0)
Hallo Leute, ich bin neu im Forum und ein Anfänger in Lisp, brauche deshalb professionelle Hilfe beim erstellen einer Routine zum zeichnen eines 2d-Rohrbogens mit folgendem Ablauf: nach Eingabe der Nennweite (z. B. 100) soll der Befehl abrunden aufgerufen werden. Dann nach anklicken von 2 Linien (erste u. zweite Rohrmitte) soll auf den Layer der angeklickten Linien gewechselt (wenn nicht auf gleichem Layer, Meldung) und die beiden Linien mit rb (für Nennweite 100 ist das 152.5) abgerundet werden. Danach de ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Dialogfenster an Cursor
mkl-cad am 11.04.2005 um 16:55 Uhr (0)
Hallo Lispler ist es möglich ein Dialogfenster, ähnlich wie ein Kontexmenü, dort öffnen zu lassen wo sich gerade der Curser befindet. Beispiel: Möchte aus einem Dialogfester heraus weitere Dialogfenster öffnen. Das erste Dialogfenster ist recht groß, die zu öffnenden relativ klein. Währe schön wenn das neue Fenster dort geöffnet würde wo sich gerade der Curser befindet (über der Taste zum öffnen des Dialogfensters) Danke schon mal, aber so wie ich Lisp mitlerweile kenn ist das nicht möglich. Wollte nur s ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : xref
Brischke am 18.04.2005 um 08:57 Uhr (0)
Hallo Frank, ... natürlich! Du kannst ja auch im Lisp auf die ActiveX-Schnittstelle zugreifen. Das Musst du allerdings in diesem Fall nicht unbedingt. War nur ein Bsp. Grüße Holger ------------------ Holger Brischke CAD on demand GmbH Autodesk User Group Central Europe Individuelle Lösungen von Heute auf Morgen. AUGCE Manager Deutschland
|
| In das Form AutoLisp wechseln |
|
AutoLisp : xref
Brischke am 18.04.2005 um 23:26 Uhr (0)
Hallo Frank, du durchsuchst als erstes die Blocktabelle nach XRefs. (am besten gleich via ActiveX - in Lisp vlax-...) Dann, wenn du das entsprechende XRef gefunden hast. Dann kannst du mittels der Eigenschaft XRefDatabase praktisch auf das XRef zugreifen. Dorst suchst du dir dann ebenfalls wieder über die Eigenschaft ModelSpace den Modellbereich raus und durchhechelst in diesem dann jedes Objekt. Über die Objekteigenschaften kannst du die gesuchten Linien ermitteln. Die Koordinaten dann noch transform ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Anonyme Blöcke per Lisp umbenennen
CADmium am 20.04.2005 um 10:27 Uhr (0)
bei www.Cadwiesel.de solltest du fündig werden, wenn nicht - Anhang als vlx speichern , in ACAD laden und dann mit Block-rename aufrufen , bzw. für die ganze Zeichnung :BLOCKS-NOTANONYMUS------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."[Diese Nachricht wurde von CADmium am 20. Apr. 2005 editiert.]
|
| In das Form Lisp wechseln |
|
Lisp : Anonyme Blöcke per Lisp umbenennen
Peter2 am 20.04.2005 um 10:50 Uhr (0)
habe gestern leider nur etwas oberflächlich bei Cadwiesel gesucht und mit Stichwort "anonym" nichts gefunden, aber jetzt habe ich nochmals ordentlich geschaut - und sieh da:BenennUBL neue VersionBenennt Unbenannte Blöcke (die mit * beginnen) in Benannte um. Es können entweder einzelne Böcke umbenannt werden,(Bsp: X347) oder durch eingabe von * innerhalb des Blocknamens alle die dem Suchkriterium entsprechenden (Bsp: X*)DankePeter------------------Für jedes Problem gibt es eine einfache Lösung.Die ist abe ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Nummern forlaufend
Dober Heinz am 20.04.2005 um 12:44 Uhr (0)
Hallo Lispler Habe eine Bitte kann mir jemand das Lisp so ändern, das ich dem Text am Fadenkreuz schon seh, damit ich ihn besser Platzieren kann. Danke Heinz (defun c:num (/ nr ipt ant th prefix) (setq LAY_OLD (getvar CLAYER )) (setq prefix (getstring
Textprefix: ) nr (if (setq ant (getint
Startnummer 0 )) (1- ant) 0 ) ;_ end of if th (getreal
Texthöhe: ) ) (princ
Wählen sie ein Element für die Layerschaltung : ) (setq A ...
|
| In das Form AutoLisp wechseln |
