|
Lisp : Befehl fortsetzen
Dorfy am 01.04.2008 um 07:41 Uhr (0)
Hallo Ernst;letzten Schritt in Deiner Lisp - wieder zum aktuellen Auswahlsatz??einfach mit command aws0 übergeben?Wie wieder zum aktuellen Auswahlsatz machen? Mfg HeikoHab es! sssetfirst und dann ssget "_I"Danke[Diese Nachricht wurde von Dorfy am 01. Apr. 2008 editiert.]
|
| In das Form Lisp wechseln |
|
Lisp : lisp aus lisp
wronzky am 01.04.2008 um 19:09 Uhr (0)
Äh...so?Code:(defun c:A () (Print "A läuft") (c:B) ; hier aufruf von B (print "wieder in A"))(defun c:B () (Print "B läuft"))Grüsse, Henning------------------Henning JesseVoxelManufakturComputer-Dienstleistungen für Architekten und Ingenieure http://www.voxelman.de
|
| In das Form Lisp wechseln |
|
Lisp : Attributswerte übertragen
joern bosse am 01.04.2008 um 14:47 Uhr (0)
Hallo Ian,ich glaube wir verstehen uns falsch:Das Programm ändert von einem Block der ausgewählt wird die ersten 6 Attributsnamen, mehr passiert nicht. Wie hast Du das überprüft? Ich habe bei mir einen Testblock genommen, und mit einem Doppelklick den Attributseditor aufgerufen. Die Attributsnamen waren geändert.Wie auch immer, wenn diese Attributsnamen geändert sind könntest Du das Programm von Marc verwenden. Das einbinden in Marcs Routine würde ich erst machen wenn es auch funktioniert.Vielleicht sollte ...
|
| In das Form Lisp wechseln |
|
Lisp : rotate3d - was will die Funktion von mir?
Frank88 am 01.04.2008 um 18:35 Uhr (0)
Hallo Udo,danke für die Info. Das wird dann wohl schwieriger, als ich dachte. Ich muß ein Teil um verschiedene Werte kippen und dann in kleinen Schritten um eine seiner Achsen drehen. Danach werden dann für eine der Kanten die Orientierungswerte abgegriffen.Direkt in der Zeichnung ging das Ganze. Wie Du sagst, Ansicht wechseln (links, vorne, oben), drehen. Dann brauche ich aber 3ddrehen, weil ichs ja um eine der irgendwie im Raum verlaufenden Achsen drehen muß.Per Lisp das Ganze, weil es sich um 18 Positio ...
|
| In das Form Lisp wechseln |
|
Lisp : Attributswerte übertragen
Ian_K am 01.04.2008 um 13:10 Uhr (0)
Jupp! Das kann ich bestätigen. Genauso wie ich es eingangs dargestellt habe.Obwohl ich das Script bei Bedürftigkeit bestimmt noch etwas selbst anpassen können - Namen ändern oder drehen.Bin von Haus aus eigentlich VBAler. Mit Lisp hab ich so meine Schwierigkeiten, aber das schöne Script von Marc gibts ja nun schon mal. Eine kleine Erweiterung in der Schleife oder nach der Schleife, wo man die von der Funktion erstellte Liste der Texte mit einigen Variablen erweitern könnte wäre nicht schlecht nach dem Mott ...
|
| In das Form Lisp wechseln |
|
Lisp : lisp aus lisp
AutoCADuser am 02.04.2008 um 12:09 Uhr (0)
das ist der code:...nicht wundern, ist meine erste Lisp...(defun c:A ( / Basispunkt OldOsmode)(setq OldOsmode (getvar "OSMODE"))(setvar "OSMODE" 108)(setvar "insbase" (getpoint "
Gib den Basispunkt an:"))(setq Basispunkt (getvar "insbase")) (command "_insert" "DI_Einfügepunkt") (command Basispunkt) (command "1" "" "0")(setvar "OSMODE" OldOsmode) (prin1))------------------
|
| In das Form Lisp wechseln |
|
Lisp : lisp aus lisp
Dorfy am 02.04.2008 um 16:03 Uhr (0)
@fuchsi... zum Thema insbase - frag AutoCADuser...hab mich das weiter oben auch schon gefragtmfg heiko
|
| In das Form Lisp wechseln |
|
Lisp : lisp aus lisp
Dorfy am 02.04.2008 um 13:40 Uhr (0)
hi,was willst du denn genau machen, deine Beschreibung ist recht dünne...Deine command - Zeilen sehen komisch aus...setvar insbase ... wofürHier mal ne lange Zeile mit "insert" - vllt. hilft es:(command "_-insert" (strcat "." curdir "" (nth (atoi cursel) items )) (getvar "viewctr") 1 1 0 "_move" (entlast)""(getpoint "
Einfüge-Basispunkt") pause "_.rotate" (entlast)"" (getvar "LASTPOINT") pause)))mfg Dorfy
|
| In das Form Lisp wechseln |
|
Lisp : Versetzen in die richtige Richtung
Erich Klein am 02.04.2008 um 15:46 Uhr (0)
Hallo,ein Problem, das mich quält, sieht folgendermaßen aus:In einem LISP-Programm wird eine Polylinie als geschlossene Kontur gezeichnet. Diese Kontur besteht ausschließlich aus Linien und Bögen. Die gezeichnete Kontur muss nach innen versetzt werden. Es wird ein Punkt im Inneren der Kontur gewählt und die gesamte Kontur versetzt sich in Richtung dieses Punktes, solange die geschlossene Polylinie besteht. Es kommt aber manchmal vor, dass die geschlossene Kontur nicht als Polylinie bestehen bleiben kann un ...
|
| In das Form Lisp wechseln |
|
Lisp : lisp aus lisp
AutoCADuser am 02.04.2008 um 16:08 Uhr (0)
heiko, ist klar...is halt bissal kürzer. Aber der selbe Ablauf. Wenn ich jetzt deinen code aus meiner Haupt-Lisp starten will, funktionierts nicht.code der Haupt-Lisp:(defun c:B ( / )(command "_.zoom" "_extents") (command "_.xref" "_detach" "*") (command "_.layer" "_unlock" "*" "") (command "_audit" "j") ;-----------------Starten von A---------------------(defun c:A () (Print "A läuft") (c:B) ; hier aufruf von B (print "wieder in A"))(defun c:B () (Print "B läuft"));-----------------Ende von A--- ...
|
| In das Form Lisp wechseln |
|
Lisp : lisp aus lisp
joern bosse am 03.04.2008 um 08:11 Uhr (0)
Hallo,nur eine Anmerkung, ein INSBASE ungleich (0.0 0.0 0.0) hat schon so manchen Fehler verursacht, wenn ein georeferenzierter Block in eine ebenfalls georeferenziere Zeichnung eingefügt wird. Wenn das Gebäude dann abgesteckt ist, bevor der Fehler auffällt.... ------------------viele GrüßeJörn
|
| In das Form Lisp wechseln |
|
Lisp : lisp aus lisp
AutoCADuser am 02.04.2008 um 18:26 Uhr (0)
nee, sorry geht nicht..hat vielleicht einer nen Ausschnitt aus einem Cade...wo man sehen kann wie das aussieht wenns funktioniert...ansonsten DANKE euch für die Hilfe!!------------------
|
| In das Form Lisp wechseln |
|
Lisp : lisp aus lisp
CAD-Huebner am 01.04.2008 um 17:58 Uhr (0)
Das ist ja wohl sebstverständlich, dass eine funktion eine andere Funktion wieder aufrufen kann und nach Beendigung er aufgerufenen Funktion die Prrogrammbearbetiung in der aufrufenden Funktion fortgesetzt wird. Das geht eigentlich in jeder Programmiersprache.Code:(defun A () (Print "A läuft") (B) ; hier aufruf von B (print "wieder in A"))(defun B () (Print "B läuft"))------------------Mit freundlichem GrußUdo Hübnerwww.CAD-Huebner.de
|
| In das Form Lisp wechseln |
