★ APPLICATIONS ★ DIVERS ★ TRACEUR DE CAMAMBERT ★ |
Traceur de Camembert (CPC Revue) | Applications Divers |
Les résultats d'élections à la télévision nous ont familiarisés avec cette représentation circulaire des divers pourcentages obtenus. C'est beaucoup plus "parlant" que les diagrammes en barres verticales. Le programme que nous vous proposons est complet, à savoir : la saisie des données brutes, le calcul automatique en pourcentages, le classement (facultatif), l'affichage de la représentation graphique en camembert avec la liste complète des éléments (pourcentages et total), édition sur imprimante de la liste des résultats et "Hard copy" de la page graphique. Ajoutez à cela les corrections d'erreurs à la saisie et une multitude de sécurités anti-étourderies. Un logiciel d'une rapidité étonnante pouvant être utilisé à des fins professionnelles, et qui ne fait que 3655 octets REM comprises, soit deux "Blocks" sur cassette. LE MODE D'EMPLOI Il est parfois beaucoup plus clair de commencer par la fin... La première page d'écran est le titre qui vous demande d'entrer le nom de baptême de votre tableau. Tous les caractères tels virgule et guillemets sont admis. Un pointillé vous indique le nombre de caractères maxi (40). Deuxième page d'écran : la saisie des données brutes. L'en-tête rappelle que vous avez droit à douze noms (ou éléments) de 1 5 caractères maxi chacun. La numérotation de 1 à 12 est automatique. Nous sommes toujours en MODE 1. Entrez le premier nom, ENTER, quantité correspondante, ENTER, nom suivant, etc. En bas de l'écran figurent deux options : E pour erreur, Q pour quitter la saisie (automatique après le douzième nom). Deux cas d'erreurs : – le curseur étant sur "quantité", vous constatez une erreur sur le nom situé à gauche (vous avez déjà pressé ENTER). Tapez E,ENTER; vous pouvez réécrire le nom ; A la fin de la saisie, on vous demande si vous voulez un classement. Répondons N (non), par exemple. Aussitôt après... Troisième page d'écran, en MODE 2, le camembert se dessine à gauche. Chaque secteur est repéré par des lettres A, B, C, D, etc. En haut apparaît votre titre. A droite la légende, Lettre A = tel nom=tel pourcentage, etc. Au-dessous "Sur un total de ..." (somme des quantités). En bas à droite, le choix entre quatre options : I = I IMPRIMER C = CLASSER E=ENCORE F = FIN LE PROGRAMME Pour beaucoup d'entre vous, ce sera l'occasion d'utiliser certaines fonctions Basic peu courantes mais tellement pratiques, qui font la gloire de l'AMSTRAD. – UPPER$ qui transforme tout en majuscules.
TABLEAUX DE CALCULS DIM CA(12,3) : En 1 ce sont les quantités NB saisies (totalisées par TNB). En 2, le rapport NB/TNB (multiplié par 100 = %). En 3 = la position angulaire, donc tenant compte des angles des secteurs antérieurs. Ils sont recalculés si on a demandé un classement (tri) en deuxième passe. TRACE Après tracé des rayons séparant les secteurs (ligne 4040), on trace "à blanc" les bissectrices de ces secteurs, mais avec un rayon plus court (lignes 4050 à 4080). Il s'agit alors de transformer ces coordonnées graphiques (XPOS et YPOS) en coordonnées texte (LOCATE) afin d'inscrire l'initiale du secteur (A, B, C...). Le calcul de la ligne 4090 fait une division par 16 pour l'axe Y (400/25 = 16) et par 8 pour l'axe des X (640/80 = 8), car nous sommes ici en MODE 2. La rapidité d'exécution est assez surprenante. IMPRESSION Le module 5000-5110 peut être appliqué à toute imprimante, à l'exception du CHR$(27)" " (ligne 5010) qui est un code EPSON qui vide le buffer de l'imprimante ( = "initialisation d'imprimante"). Une précaution systématique. Le saut de page de la ligne 5090 s'applique au papier 11 pouces de 66 lignes par page (le plus courant). Le module de Hard-Copy (56000-56240) ne concerne que les imprimantes EPSON RX ou FX (et les EPSON vendues sous une quinzaine d'autres marques... ). Le principe consiste à explorer la mémoire d'écran en 80 bandes verticales, mise en DIM Z de ces octets, et envoi de ceux-ci en "BIT IMAGE" (code CHR$(27) "K" de la ligne 56120). On obtient alors un tracé 18 x 24 cm qui déforme légèrement le cercle. NOTE : Si vous utilisez ce module utilitaire pour d'autres programmes, n'oubliez pas le DIM Z (200) mis ici en ligne 50.
|