★ APPLICATIONS ★ DIVERS ★ QSORT - Fix und fertig in drei Sekunden ★ |
Qsort (CPC Amstrad International) | Applications Divers |
QSORT ist eine außerordentlich schnelle und komfortable Sortierroutine für Arrays: Für 1120 unsortierte Wörter benötigt QSORT drei Sekunden. Zum Vergleich die Sortierroutine (Bubble-sort) aus dem SH 6/88: 125 sec! Eine leicht erweiterte Version von QSORT, die in einem Vokabelprogramm englische Wörter sortiert, die deutschen entsprechend mitbewegt und zusätzlich am Stringanfang "to" ignoriert, leistet im Vergleich (560 Wörter):
Abtipphinweise Sie tippen den Datalader (Listing 1) ab. sichern ihn auf Diskette/Kassette und starten mit RUN. Anschließend befindet sich auf der Diskette/Kassette die fertige MC-Datei QSORT.OBJ . Wenn Sie noch QSORT.DEM (Listing 2) abtippen und starten, erleben Sie eine eindrucksvolle Demonstration: QSORT.DEM holt die Basic-Schlüsselworte aus dem ROM (dort in absteigender Reihenfolge) und sortiert sie. Sie können QSORT.OBJ nun in jedes Basic-Programm einbauen und durch die Befehlsfolge MEMORY &A1FF:LOAD"QSORT.OBJ":CALL &A200 aktivieren. |QSORT, mode, @array(links) ,@array(rechts) Dabei bedeuten:
Dabei dient die ASCII-Tabelle als Sortierschlüssel, also Space vor Ausrufezeichen, ... Ziffern, . . .Großbuchstaben, große Umlaute, . . .Kleinbuchstaben, kleine Umlaute (ß).
Auf eine ursprünglich integrierte mitzählende Bildschirmanzeige wurde verzichtet, da die dadurch bewirkte Verzögerung bei dieser Sortiermethode bereits erheblich ins Gewicht fällt. CPCAI 89/04
|