| | |
 | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| | |
 | PNY Technologies präsentiert auf der COMPUTEX 2026 neue Lösungen für KI, Gaming und professionelle Anwendungen, eine Pressemitteilung
|
|
Autor
|
Thema: Variable mit getpoint belegen, dann manipulieren (640 mal gelesen)
|
Zoff
Mitglied
   Beiträge: 19
Registriert: 30.08.2006 Auto Cad 2014
Summa Sketch Professionel III
Win 7 64
|
erstellt am: 23. Sep. 2006 22:52  <-- editieren / zitieren -->   Unities abgeben:          
|
CAD-Huebner
Ehrenmitglied V.I.P. h.c.
Verm.- Ing., ATC-Trainer
Beiträge: 9819
Registriert: 01.12.2003 One AutoCAD 2.5 - 2024, AutoCAD, Civil 3D, Win10/Win11
|
erstellt am: 23. Sep. 2006 23:24 <-- editieren / zitieren --> Unities abgeben: Nur für Zoff 
Da gibts mehrere Möglichkeiten: Code:
(setq pkt (getpoint "Punkt wählen:"))
; die Variable pkt ist eine eine Liste in der Form
; '( 1.23 3.45 6.78)
; die Addition zum X-Wert könnte so aussehen:
(setq pkt (cons (+ 9.1011 (car pkt)) (cdr pkt)))
; oder
(setq pkt (list (+ 9.1011 (nth 0 pkt)) (nth 1 pkt)(nth 2 pkt)))
; oder
(setq pkt (list (+ 9.1011 (car pkt)) (cadr pkt)(caddr pkt)))
; oder
(setq pkt (mapcar '+ pkt '(9.1011 0.0 0.0)))
;...
------------------
Mit freundlichem Gruß Udo Hübner Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Zoff
Mitglied
Beiträge: 19
Registriert: 30.08.2006
|
erstellt am: 24. Sep. 2006 00:01 <-- editieren / zitieren --> Unities abgeben:
Zitat:
Original erstellt von CAD-Huebner:
Da gibts mehrere Möglichkeiten:
Code:
(setq pkt (getpoint "Punkt wählen:"))
; die Variable pkt ist eine eine Liste in der Form
; '( 1.23 3.45 6.78)
; die Addition zum X-Wert könnte so aussehen:
(setq pkt (cons (+ 9.1011 (car pkt)) (cdr pkt)))
; oder
(setq pkt (list (+ 9.1011 (nth 0 pkt)) (nth 1 pkt)(nth 2 pkt)))
; oder
(setq pkt (list (+ 9.1011 (car pkt)) (cadr pkt)(caddr pkt)))
; oder
(setq pkt (mapcar '+ pkt '(9.1011 0.0 0.0)))
;...
Super, vielen Dank. p.s.: habe die Lösung mit mapcar genommen, weil sie mir als am einfachsten zu durchschauen erscheint. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Foren auf CAD.de
| 
