contrib/pep8analysis/tests/terrasa/soustraction.pep

   1 ; Introduction à PEP8
   2 ; Programme qui calcule la différence de deux nombres saisis par l'utilisateur
   3 ; et affiche le resultat.
   4 ;
   5 ; Alexandre Terrasa (c) 2013
   6
   7          stro    msgIn, d         ; print(mshIn)
   8          deci    nb, d            ; nb = deci()
   9          lda     nb, d            ; A = nb
  10          deci    nb, d            ; nb = deci()
  11          suba    nb, d            ; A -= nb
  12          sta     nb, d            ; nb = A
  13          stro    msgOut, d        ; print(msgOut)
  14          deco    nb, d            ; print(nb)
  15
  16          stop
  17
  18 msgIn:   .ASCII  "Veuillez saisir deux nombres: \n\x00"  ; \x00 permet d'indiquer la fin de la chaîne
  19 msgOut:  .ASCII  "La différence de"                         ; Ainsi, on peut ecrire un message
  20          .ASCII  " ces deux nombres est \x00"            ; sur plusieurs lignes...
  21
  22 nb:      .BLOCK  2                ; utilisé pour stocker les nombres saisis puis le résultat pour l'affichage
  23
  24          .END