Micro Systèmes n°29 mars 1983
Micro Systèmes n°29 mars 1983
  • Prix facial : 20 F

  • Parution : n°29 de mars 1983

  • Périodicité : mensuel

  • Editeur : Société Parisienne d'Edition

  • Format : (203 x 271) mm

  • Nombre de pages : 206

  • Taille du fichier PDF : 168 Mo

  • Dans ce numéro : Forth... un langage sans programmes.

  • Prix de vente (PDF) : gratuit

Dans ce numéro...
< Pages précédentes
Pages : 96 - 97  |  Aller à la page   OK
Pages suivantes >
96 97
Les primitives de Forth  : les éléments Forth est un langage construit à partir d'un certain nombre de « primitives » que nous avons rassemblées pour vous dans ce tableau. Dans la colonne de gauche figure le nom du mot et dans celle de droite sa description. Au centre, entre parenthèses, nous indiquons l'état de la pile avant et après exécution du mot. Le sommet de la pile se situe vers la Nom du mot Etat de la pile Description SWAP DU P —DUP DROP OVER ROT 2 9 MOD/MOD ABS MINUS MIN MAX AND OR XOR (n1 n2 — n2 n1) (n—nn) (n—nn)ou(0-0) (n —) (n1 n2 — n1 n2 n1) (n1 n2 n3 — n2 n3 n1) (n —) (adr —) (n1 n2—f) (n1n2—f) (n1 n2—f) 0= (n — f) 0< (n—f) Manipulation de la pile Echange les deux valeurs du dessus de pile. Duplique la valeur du dessus de pile. Duplique le dessus de pile s'il n'est pas nul. Enlève l'élément du dessus de pile. Duplique le deuxième élément de la pile. Rotation circulaire  : le 3e élément se retrouve sur le dessus de la pile. Imprime n comme une valeur signée suivie d'un blanc. Imprime le contenu de l'adresse adr comme une valeur signée suivie par un blanc. Opérations arithmétiques simple précision (n1 n2 — somme) (n1 n2 — différence) (n — n*2) (n1 n2 — produit) (n1 n2 — quotient) (n1 n2 — reste) (n1 n2 — reste quotient) (n—nl) (n — —n) (n1 n2 — n3) (n1 n2 — n3) (n1 n2 — n3) (n1 n2 — n3) (n1 n2 — n3) Laisse la somme de n1 et n2. Laisse le résultat de la soustraction entre n1 et n2. Multiplie par 2 par décalage arithmétique. Laisse le produit de la multiplication de n1 par n2. Laisse le quotient entier de la division de n1 par n2. Laisse le reste de la division de n1 par n2. Laisse le reste suivi du quotient entier de la division de n1 par n2. Donne la valeur absolue den. Inverse le signe den. Laisse n3 qui est le minimum de n1 et n2. Laisse n3 qui est le maximum de n1 et n2. Laisse le ET logique (bit à bit) de n1 et n2. Laisse le OU logique (bit à bit) de n1 et n2. Laisse le OU EXCLUSIF logique (bit à bit) de n1 et n2. Tests logiques Donne « vrai » si n1 est égal à n2. Donne « vrai » si n1 est inférieur à n2. Donne « vrai » si n1 est supérieur à n2. Donne « vrai » si n vaut zéro. Donne « vrai » si n est inférieur à zéro. Structures de boucle IF xx ELSE yy THEN (f —) Si f est « vrai » (non nul), xx est exécuté, sinon yy est exécuté. IF xx THEN (f —) xx n'est exécuté que si f est « vrai » (non nul). DO xx LOOP (n fin début —) Boucle répétitive. DO +LOOP (fin début —) (n —) Idem DO LOOP, mais incrément d'indice étant égal àn. LEAVE (—) Quitte la boucle. 96 — MICRO-SYSTEMES Mars 1983
base du système de programmation droite, par exemple la notation (n1 n2 — n2 n1) utilisée pour le mot SWAP, indique que deux nombres sont nécessaires sur la pile (n1 au sommet), et qu'après l'exécution les deux nombres se retrouvent dans l'ordre inverse. Cette liste ne se prétend pas exhaustive. Un système Forth typique contient environ trois à quatre fois plus de primitives. Nom du mot Etat de la pile BEGIN xx UNTIL BEGIN xx WHILE yy REPEAT BEGIN xx AGAIN 2 ! C « C ! CONSTANT VARIABLE) —))) n) (adr — n) (n adr —) (n adr —) (adr —) (adr —) (adr — d) (d adr —) (adr — b) (b adr —) (n —) (n —) Boucle terminant quand f est « vrai » (non nul). Boucle terminant quand f est nul (faux). Si f est vrai, yy est exécuté, et la boucle reprend au BEGIN. Boucle sans fin. Sert à récupérer le compteur de boucle DO. Opérations portant sur la mémoire Remplace l'adresse par son contenu. Met la valeur n sur 16 bits à l'adresse adr. Ajoute la valeur n sur 16 bits à la valeur contenue à l'adresse adr. Ajoute 1 à la valeur contenue à l'adresse adr. Enlève I à la valeur contenue à l'adresse adr. Laisse sur la pile la valeur sur 32 bits contenue à l'adresse adr. Met la valeur sur 32 bits à l'adresse adr. Laisse sur la pile la valeur sur 8 bits (avec extension du bit de signe) sur la pile. Met la partie basse sur 8 bits de la valeur b à l'adresse adr. Crée une constante dans le dictionnaire. La valeur de cette constante est placée sur la pile lors de l'appel du nom de la constante. Crée une variable dans le dictionnaire initialisée parn. L'adresse de cette variable est placée sur la pile à chaque appel de la variable. (-) (—) HERE (— adr) ALLOT (n —) (—) FORGET (—) Manipulation du dictionnaire Définit le début d'une compilation, et met à jour le dictionnaire. (L'interpréteur est inhibé pendant toute la durée de la compilation.) Termine la compilation et revient en mode interpréteur. Laisse la valeur du sommet du dictionnaire sur la pile. Réserve n octets dans le dictionnaire et incrémente le pointeur de dictionnaire parn. Utilisé pour définir de nouvelles classes de mots telles que tableaux, chaînes de caractères, etc. Efface toutes les définitions de mot à partir du mot qui suit FORG ET. Par exemple, FORGET TABLEAU détruit TABLEAU ainsi que tous les mots, constantes et variables définis ensuite. Divers CR Affiche la chaîne de caractères xx. Envoie un retour chariot. Mars 1983 MICRO-SYSTEMES — 97



Autres parutions de ce magazine  voir tous les numéros


Liens vers cette page
Couverture seule :


Couverture avec texte parution au-dessus :


Couverture avec texte parution en dessous :


Micro Systèmes numéro 29 mars 1983 Page 1Micro Systèmes numéro 29 mars 1983 Page 2-3Micro Systèmes numéro 29 mars 1983 Page 4-5Micro Systèmes numéro 29 mars 1983 Page 6-7Micro Systèmes numéro 29 mars 1983 Page 8-9Micro Systèmes numéro 29 mars 1983 Page 10-11Micro Systèmes numéro 29 mars 1983 Page 12-13Micro Systèmes numéro 29 mars 1983 Page 14-15Micro Systèmes numéro 29 mars 1983 Page 16-17Micro Systèmes numéro 29 mars 1983 Page 18-19Micro Systèmes numéro 29 mars 1983 Page 20-21Micro Systèmes numéro 29 mars 1983 Page 22-23Micro Systèmes numéro 29 mars 1983 Page 24-25Micro Systèmes numéro 29 mars 1983 Page 26-27Micro Systèmes numéro 29 mars 1983 Page 28-29Micro Systèmes numéro 29 mars 1983 Page 30-31Micro Systèmes numéro 29 mars 1983 Page 32-33Micro Systèmes numéro 29 mars 1983 Page 34-35Micro Systèmes numéro 29 mars 1983 Page 36-37Micro Systèmes numéro 29 mars 1983 Page 38-39Micro Systèmes numéro 29 mars 1983 Page 40-41Micro Systèmes numéro 29 mars 1983 Page 42-43Micro Systèmes numéro 29 mars 1983 Page 44-45Micro Systèmes numéro 29 mars 1983 Page 46-47Micro Systèmes numéro 29 mars 1983 Page 48-49Micro Systèmes numéro 29 mars 1983 Page 50-51Micro Systèmes numéro 29 mars 1983 Page 52-53Micro Systèmes numéro 29 mars 1983 Page 54-55Micro Systèmes numéro 29 mars 1983 Page 56-57Micro Systèmes numéro 29 mars 1983 Page 58-59Micro Systèmes numéro 29 mars 1983 Page 60-61Micro Systèmes numéro 29 mars 1983 Page 62-63Micro Systèmes numéro 29 mars 1983 Page 64-65Micro Systèmes numéro 29 mars 1983 Page 66-67Micro Systèmes numéro 29 mars 1983 Page 68-69Micro Systèmes numéro 29 mars 1983 Page 70-71Micro Systèmes numéro 29 mars 1983 Page 72-73Micro Systèmes numéro 29 mars 1983 Page 74-75Micro Systèmes numéro 29 mars 1983 Page 76-77Micro Systèmes numéro 29 mars 1983 Page 78-79Micro Systèmes numéro 29 mars 1983 Page 80-81Micro Systèmes numéro 29 mars 1983 Page 82-83Micro Systèmes numéro 29 mars 1983 Page 84-85Micro Systèmes numéro 29 mars 1983 Page 86-87Micro Systèmes numéro 29 mars 1983 Page 88-89Micro Systèmes numéro 29 mars 1983 Page 90-91Micro Systèmes numéro 29 mars 1983 Page 92-93Micro Systèmes numéro 29 mars 1983 Page 94-95Micro Systèmes numéro 29 mars 1983 Page 96-97Micro Systèmes numéro 29 mars 1983 Page 98-99Micro Systèmes numéro 29 mars 1983 Page 100-101Micro Systèmes numéro 29 mars 1983 Page 102-103Micro Systèmes numéro 29 mars 1983 Page 104-105Micro Systèmes numéro 29 mars 1983 Page 106-107Micro Systèmes numéro 29 mars 1983 Page 108-109Micro Systèmes numéro 29 mars 1983 Page 110-111Micro Systèmes numéro 29 mars 1983 Page 112-113Micro Systèmes numéro 29 mars 1983 Page 114-115Micro Systèmes numéro 29 mars 1983 Page 116-117Micro Systèmes numéro 29 mars 1983 Page 118-119Micro Systèmes numéro 29 mars 1983 Page 120-121Micro Systèmes numéro 29 mars 1983 Page 122-123Micro Systèmes numéro 29 mars 1983 Page 124-125Micro Systèmes numéro 29 mars 1983 Page 126-127Micro Systèmes numéro 29 mars 1983 Page 128-129Micro Systèmes numéro 29 mars 1983 Page 130-131Micro Systèmes numéro 29 mars 1983 Page 132-133Micro Systèmes numéro 29 mars 1983 Page 134-135Micro Systèmes numéro 29 mars 1983 Page 136-137Micro Systèmes numéro 29 mars 1983 Page 138-139Micro Systèmes numéro 29 mars 1983 Page 140-141Micro Systèmes numéro 29 mars 1983 Page 142-143Micro Systèmes numéro 29 mars 1983 Page 144-145Micro Systèmes numéro 29 mars 1983 Page 146-147Micro Systèmes numéro 29 mars 1983 Page 148-149Micro Systèmes numéro 29 mars 1983 Page 150-151Micro Systèmes numéro 29 mars 1983 Page 152-153Micro Systèmes numéro 29 mars 1983 Page 154-155Micro Systèmes numéro 29 mars 1983 Page 156-157Micro Systèmes numéro 29 mars 1983 Page 158-159Micro Systèmes numéro 29 mars 1983 Page 160-161Micro Systèmes numéro 29 mars 1983 Page 162-163Micro Systèmes numéro 29 mars 1983 Page 164-165Micro Systèmes numéro 29 mars 1983 Page 166-167Micro Systèmes numéro 29 mars 1983 Page 168-169Micro Systèmes numéro 29 mars 1983 Page 170-171Micro Systèmes numéro 29 mars 1983 Page 172-173Micro Systèmes numéro 29 mars 1983 Page 174-175Micro Systèmes numéro 29 mars 1983 Page 176-177Micro Systèmes numéro 29 mars 1983 Page 178-179Micro Systèmes numéro 29 mars 1983 Page 180-181Micro Systèmes numéro 29 mars 1983 Page 182-183Micro Systèmes numéro 29 mars 1983 Page 184-185Micro Systèmes numéro 29 mars 1983 Page 186-187Micro Systèmes numéro 29 mars 1983 Page 188-189Micro Systèmes numéro 29 mars 1983 Page 190-191Micro Systèmes numéro 29 mars 1983 Page 192-193Micro Systèmes numéro 29 mars 1983 Page 194-195Micro Systèmes numéro 29 mars 1983 Page 196-197Micro Systèmes numéro 29 mars 1983 Page 198-199Micro Systèmes numéro 29 mars 1983 Page 200-201Micro Systèmes numéro 29 mars 1983 Page 202-203Micro Systèmes numéro 29 mars 1983 Page 204-205Micro Systèmes numéro 29 mars 1983 Page 206