Listenelemente ersetzen (Autodesk/Lisp)

Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte

PNY präsentiert die neue NVIDIA RTX A400 und die A1000 Grafikkarte, eine Pressemitteilung

Meldungen abonnieren

Autor

Thema: Listenelemente ersetzen (562 mal gelesen)

Kenny1
Mitglied

Senden Sie eine Private Message an Kenny1

Schreiben Sie einen Gästebucheintrag für Kenny1

Beiträge: 77
Registriert: 29.06.2004

erstellt am: 15. Jul. 2005 06:58

Editieren oder löschen Sie diesen Beitrag!

<-- editieren / zitieren -->

Unities abgeben:

Hallo Leute,

ein kleines Problem:
Beim ersetzen vom GC habe ich das PRoblem, das ich keinen Wert ersetzen will, sondern stattdessen eine Variable, die von dem Benutzer eingegeben wurde.
Beispiel (10 0 0 0) soll ersetzt werden in (10 a 0 0). A ist die Variable, die vom Benutzer kommt. Wie ist die allgemeine Vorgehensweise? Gruß Kenny1

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

cadffm
Moderator
良い精神

Senden Sie eine Private Message an cadffm

Schreiben Sie einen Gästebucheintrag für cadffm

Beiträge: 22497
Registriert: 03.06.2002

Alles

erstellt am: 15. Jul. 2005 08:01

<-- editieren / zitieren -->

Unities abgeben:

Nur für Kenny1

(entmod (subst (list 10 a 0 0) (assoc 10 obj) obj))
oder.
(setq obj (subst (list 10 a 0 0) (assoc 10 obj) obj))

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Kenny1
Mitglied

Beiträge: 77
Registriert: 29.06.2004

erstellt am: 16. Jul. 2005 13:14

<-- editieren / zitieren -->

Unities abgeben:

Hallo,

das klappt wunderbar. Wie sieht der Quellcode bei den dotted Pairs aus ? Z.B (41 . a) ?

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Bernd10
Mitglied

Senden Sie eine Private Message an Bernd10

Schreiben Sie einen Gästebucheintrag für Bernd10

Beiträge: 763
Registriert: 20.11.2003

Intel(R) Xeon(R) W-2123 CPU @ 3.60GHz
16 GB RAM
Windows 10 Pro 64-bit
AutoCAD Mechnical 2020 Deu

erstellt am: 19. Jul. 2005 08:44

<-- editieren / zitieren -->

Unities abgeben:

Nur für Kenny1

Hallo Kenny1,

Zitat:
Original erstellt von Kenny1:

das klappt wunderbar. Wie sieht der Quellcode bei den dotted Pairs aus ? Z.B (41 . a) ?

so sollte es gehen:
(setq l41alt (assoc 41 LISTE)) ; alten Wert ermitteln
(setq l41neu (cons 41 a)) ; neuen Wert erstellen
(setq LISTE (subst l41neu l41alt LISTE)) ; Liste aktualisieren
(entmod LISTE) ; Objekt modifizieren

Gruß Bernd

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Anzeige:	Infos zum Werbeplatz >>
CP-Symbols Architectural Series CAD APP für Raum- und Möbeldesign, Tiefbau, TGA

Kenny1
Mitglied

Beiträge: 77
Registriert: 29.06.2004

erstellt am: 21. Jul. 2005 17:10

<-- editieren / zitieren -->

Unities abgeben:

Hallo,
thanx, funktioniert.

Gruß Kenny1

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Anzeige.:
X

Anzeige: (Infos zum Werbeplatz >>)

CP-Symbols Architectural Series CAD APP für Raum- und Möbeldesign, Tiefbau, TGA