APPLICATIONSDIVERS ★ TRI A GRANDE VITESSE ★

Tri Turbo (Microstrad)Applications Divers

Une nouvelle instruction trie les tableaux à une dimension, et ce, à toute vitesse. Un TGV informatique en somme !

Quelle rapidité ! Ecrit en langage machine, ce « tri en épi » traite les tableaux à une dimension. Il est appelé par une nouvelle instruction Basic : |TRI,@A$,C,N. Le nom du tableau est affect à A$, le sens du tri (croissant ou décroissant) à C et l'indice de l'élément final à N. Une erreur dans les données provoque le retour au Basic avec un message d'erreur. La valeur de as est de type chaîne, celle de c'est de type booléen (0 ou -1) et celle de N est de type entier. Pour appeler la routine depuis un programme Basic, on écrira :

10 DIM T(100)
.....

100 A$="T":|TRI,@A$,-1,54
190 CROIT=-1:N=100: |TRI,@AS,NOT CROIT, N-20

L'ensemble du tableau est alors trié jusqu'à l'élément final donné, y compris l'élément d'indice 0. Si ce dernier est vide, il peut perturber le tri et se classer. Les indices doivent être adaptés à cette exigence.

Le chargeur Basic (programme 1) permettra de placer facilement la routine de tri, sans être obligé de posséder un Assembleur. Elle est implantée en &A000 jusqu'en &A343 (hexadécimal). Vous ne pourrez la déplacer en mémoire.

Le programme vérifie l'entrée des data et indique, en cas d'erreur de copie, dans quel groupe de lignes elle a eu lieu. Le tri est ensuite mis en place par call &A000. Un peu de patience et vous disposez d'une nouvelle instruction Basic très efficace, une RSX (extension Basic).

Lignes 1060 à 1110 : lecture et vérification des DATA.

Ligne 1120 : mise en place du RSX.

Lignes 1130 à 2470 : liste des data en quatorze groupes.


Cette routine utilise des variables systèmes et une entrée en mémoire Basic. Elle n'est donc pas compatible directement avec les CPC 664 et 6128. Voici les lignes du programme 1 à changer pour une implantation sur ces appareils :

1210 DATA 56,D5,DD,E1,2A,6AAE,22
1220 DATA 7145
1240 DATA CF,A0,2 A,CF,,A0,ED,5B,6C
1320 DATA 8480
1390 DATA 18,F6,D7,81,C0,C1,7E,FE
1420 DATA 8340
Pour les habitués du langage machine, il sera plus rapide de sauvegarder le programme binaire par SAVE "TRIBIN",b,&A000,&344,&A000 et de l'appeler en début du programme utilisateur par MEMORY &9FFF:LOAD "TRIBIN”:CALL &A000.

Le programme 2 est un exemple d'utilisation de ce tri. Il traite cent chaînes de quatre caractères créées aléatoirement. Un bip sonore vous indique le début du travail. Vous pouvez faire des essais avec des. tableaux d'entiers ou de réels, la routine permettant de trier tous les tableaux à une dimension quel que soit le type des variables indicées.

Ligne 70 : mélange de tableaux pour essai recherche.

Lignes 90 à 170 : création de mots et affichage.

Lignes 180-230 : tri et affichage.

Lignes 240-270 : sous-programme d'affichage.

Maintenant, à vos chronomètres! le gain de temps est étonnant.

MICROSTRAD n°6

★ EDITEUR: MICROSTRAD
★ ANNÉE: 1986
★ CONFIG: 64K + AMSDOS
★ LANGAGE:
★ LiCENCE: LISTING
★ AUTEUR: GEORGES CONVERS
 

★ AMSTRAD CPC ★ DOWNLOAD ★

Type-in/Listing:
» RSX-Tri  Turbo    (Microstrad)    FRENCHDATE: 2020-04-29
DL: 244
TYPE: ZIP
SiZE: 11Ko
NOTE: Uploaded by CPCLOV ; 40 Cyls
.HFE: Χ

★ AMSTRAD CPC ★ A voir aussi sur CPCrulez , les sujets suivants pourront vous intéresser...

Lien(s):
» Applications » String-Editor (CPC Amstrad International)
» Applications » Verify (Popular Computing Weekly)
» Applications » RSX Variablendump (CPC Magazin)
» Applications » RSX - Helpbasic/Helpbase (Amstar&CPC)
» Applications » RSX String to Extra bank (Amstrad Action)
» Applications » Schrift-RSX (Schneider Magazin)
Je participe au site:
» Vous avez des infos personnel ?
» Vous avez remarqué une erreur dans ce texte ?
» Aidez-nous à améliorer cette page : en nous contactant via le forum ou par email.

CPCrulez[Content Management System] v8.7-desktop/c
Page créée en 153 millisecondes et consultée 1629 fois

L'Amstrad CPC est une machine 8 bits à base d'un Z80 à 4MHz. Le premier de la gamme fut le CPC 464 en 1984, équipé d'un lecteur de cassettes intégré il se plaçait en concurrent  du Commodore C64 beaucoup plus compliqué à utiliser et plus cher. Ce fut un réel succès et sorti cette même années le CPC 664 équipé d'un lecteur de disquettes trois pouces intégré. Sa vie fut de courte durée puisqu'en 1985 il fut remplacé par le CPC 6128 qui était plus compact, plus soigné et surtout qui avait 128Ko de RAM au lieu de 64Ko.