Sortieren einer Liste (Autodesk/Lisp)

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

Exklusives EDU-Programm für RTX PRO Blackwell, eine Pressemitteilung

Meldungen abonnieren

Autor

Thema: Sortieren einer Liste (1156 mal gelesen)

axeld
Mitglied
Projektingenieur/CAD-Administrator

Senden Sie eine Private Message an axeld

Schreiben Sie einen Gästebucheintrag für axeld

Beiträge: 267
Registriert: 18.11.2002

erstellt am: 10. Mrz. 2003 15:04

Editieren oder löschen Sie diesen Beitrag!

<-- editieren / zitieren -->

Unities abgeben:

Ich habe ein Problem mit der Sortierung einer Liste:

(setq li (list (list 1 2 "D")(list 2 3 "Z")(list 5 6 "G")))

Ich möchte nun die Liste nach dem jeweils letzten Eintrag, hier also nach den Buchstaben sortieren. In den DOSLIB-Funktionen habe ich auch schon gesucht, aber nichts gefunden.

Wer kann helfen?

------------------
Axel

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

Brischke
Moderator
CAD on demand GmbH

Senden Sie eine Private Message an Brischke

Schreiben Sie einen Gästebucheintrag für Brischke

Beiträge: 4201
Registriert: 17.05.2001

AutoCAD 20XX, defun-tools (d-tools.eu)

erstellt am: 10. Mrz. 2003 15:27

<-- editieren / zitieren -->

Unities abgeben:

Nur für axeld

Hallo Axel,

leider schreibst du nicht, mit welcher Acad-Version du arbeitest.
Mit den VL-Befehlen, hast du eine solche Funktion zur Verfügung.

Code:

(setq li (list (list 1 2 "D")(list 2 3 "Z")(list 5 6 "G")))
(vl-sort li
(function (lambda (e1 e2)
(< (last e1) (last e2)))))

Bei Fragen ...

Grüße Holger

------------------
Holger Brischke
CADlon - Lisp over night!
Neue Tool's im Free-&Download
Zugang zum Download schon gesichert?

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

axeld
Mitglied
Projektingenieur/CAD-Administrator

Beiträge: 267
Registriert: 18.11.2002

erstellt am: 10. Mrz. 2003 15:53

<-- editieren / zitieren -->

Unities abgeben:

Danke. Ich arbeite mit M6, da ist es möglich.

------------------
Axel

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

Anzeige:	Infos zum Werbeplatz >>
Qscape CAD APP für Landschaft, Landschaftsarchitektur Intuitive Landscape Architecture software. Hardworks, softworks, planting plans, keys, plant schedules and cost estimates.

mkl-cad
Mitglied
Technischer Zeichner

Senden Sie eine Private Message an mkl-cad

Schreiben Sie einen Gästebucheintrag für mkl-cad

Beiträge: 378
Registriert: 23.07.2003

ACAD 2002
Express Tools 1-9
Architektural Desktop
Windows XP
Server Windows 2003
3 GHz Rechner
1 GB RAM
80 GB Festplatte
ATI FireGL V3100
2 17" Flachbildschirme

erstellt am: 10. Feb. 2005 13:48

<-- editieren / zitieren -->

Unities abgeben:

Nur für axeld

Hab mal etwas weiter gebastelt:

Beispiel für Listensortierung mit Wahl der Stelle nach der sortiert werden soll

(setq li (sortier-n li 2))

(defun sortier-n (liste nr / e1 e2)
; (setq nr (- nr 1)) je nach belieben da 0 die erste Stelle der Liste ist
(vl-sort liste
(function (lambda (e1 e2)
(< (nth nr e1) (nth nr e2)))))
)

------------------
Martin

Viele Grüße aus dem schönen Münsterland!

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

Anzeige.:
X

Anzeige: (Infos zum Werbeplatz >>)

Qscape CAD APP für Landschaft, Landschaftsarchitektur