schieben (Autodesk/Lisp) - Foren auf CAD.de


	Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte
Autor	Thema: schieben (464 mal gelesen)
fca_mi2 Mitglied Bauingenieur Beiträge: 505 Registriert: 10.01.2003 ACAD2018	erstellt am: 26. Apr. 2005 06:58 <-- editieren / zitieren --> Unities abgeben: hallo, ich möchte das letzte element der zeichnunge folgendermaßen verschieben: (command "schieben" "l" "" (nth 5 allg_dat) pause) wenn ich einfach nur enter drücke, wird mir das teil irgendwohin verschoben. wie kriege ich das in den griff ? ------------------ MfG Frank Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
joern bosse Ehrenmitglied Dipl.-Ing. Vermessung Beiträge: 1734 Registriert: 11.10.2004 Window 10 ACAD 2021 CIVIL 2021 BricsCAD V14-V22 Intel(R) Core(TM)i5-8250U CPU @ 1.60GHz 1.80 GHz 16.0GB RAM NVIDIA GeForce GTX 1050<P>	erstellt am: 26. Apr. 2005 07:43 <-- editieren / zitieren --> Unities abgeben: Nur für fca_mi2 Hallo Frank, (command "schieben" "l" "" (nth 5 allg_dat) pause) In Deiner Zeile ist (nth 5 allg_dat) der Basispunkt der Verschiebung. Wenn bei dem Befehl "schieben" aber kein zweiter Punkt der Verschiebung angegeben wird (das ist der Fall, wenn Du einfach mit ENTER bestätigst), dann wird das Element nicht "von => nach" verschoben, sondern nur relativ um den Wert Deines Listenelementes (nth 5 allg_dat). ------------------ viele Grüße Jörn Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
fca_mi2 Mitglied Bauingenieur Beiträge: 505 Registriert: 10.01.2003 ACAD2018	erstellt am: 26. Apr. 2005 07:47 <-- editieren / zitieren --> Unities abgeben: danke für die antwort, und wie kriege ich es hin, dass das element bei enter nicht verschoben wird ? ------------------ MfG Frank Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
joern bosse Ehrenmitglied Dipl.-Ing. Vermessung Beiträge: 1734 Registriert: 11.10.2004 Window 10 ACAD 2021 CIVIL 2021 BricsCAD V14-V22 Intel(R) Core(TM)i5-8250U CPU @ 1.60GHz 1.80 GHz 16.0GB RAM NVIDIA GeForce GTX 1050<P>	erstellt am: 26. Apr. 2005 07:58 <-- editieren / zitieren --> Unities abgeben: Nur für fca_mi2 Hallo Frank, ich denke mal so: (command "schieben" "l" "" (nth 5 allg_dat) (if (setq pkt (getpoint (nth 5 allg_dat))) pkt(nth 5 allg_dat))) ------------------ viele Grüße Jörn Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
s.wickel Mitglied Bauingenieur Wasserwirtschaft Beiträge: 422 Registriert: 17.12.2001 Bricscad V7 - V11	erstellt am: 24. Mai. 2005 15:20 <-- editieren / zitieren --> Unities abgeben: Nur für fca_mi2 Hallo! Das ist echt interessant. Danach habe ich gesucht. Aber kann ich es auch irgendwie schaffen, dass das zu schiebende Objekt jetzt am Fadenkreuz sichtbar ist wie beim "normalen" verschieben? ------------------ Nodda, Stefan Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
CADmium Moderator Maschinenbaukonstrukteur Beiträge: 13508 Registriert: 30.11.2003 .	erstellt am: 24. Mai. 2005 15:35 <-- editieren / zitieren --> Unities abgeben: Nur für fca_mi2 wie wärs damit (progn (setq allg_dat '((0 0 0)(1 1 0)(2 2 0)(3 3 0)(4 4 0)(5 5 0))) (setq P (getvar "Lastpoint")) (command "_move" "_l" "" (nth 3 allg_dat) pause) (if (equal P (getvar "Lastpoint")) (command "_undo" 1)) ) ?? (zum testen mal mit progn geklammert) ------------------ - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben." Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Anzeige.:
X

Anzeige: (Infos zum Werbeplatz >>)