; ************************************************************
;       Programme: PREMIER2.TXT     version PEP813 sous Windows
;
;       version 2: un peu d'humanité en ajoutant des phrases au terminal
;
;       Mon premier programme qui affiche la somme de 2 nombres signés.
;
;       auteur:         Bernard Martin
;       code permanent: non applicable
;       courriel:       martin.bernard@uqam.ca
;       date:           Eté 2020
;       cours:          INF2171
; ***********************************************************
;
         STRO    bienvenu,d  ; message réel "Bienvenue" avec un e car les symboles sont limités à 8 caractères
;
début:   STRO    demande1,d  ; premier nombre demandé
         DECI    nombre1,d   ; lecture du premier nombre
         STRO    demande2,d  ; deuxième nombre demandé
         DECI    nombre2,d   ; lecture du deuxième nombre
         LDA     nombre1,d   ; premier nombre à traiter
         ADDA    nombre2,d   ; premier nombre + deuxième nombre
         STA     total,d     ; conservons le résultat
         STRO    réponse,d   ; affichage des résultats
         DECO    total,d     ; affiche le total en décimal
;
         STRO    termine,d   ; affichage du message de terminaison indiquant une fin normale
         STOP                
;
; variables
;
nombre1: .BLOCK  2           ; #2d valeur initiale zéro
nombre2: .BLOCK  2           ; #2d valeur initiale zéro
total:   .BLOCK  2           ; #2h valeur initiale zéro  (2 octets qui seront affichés en hexadécimal)
;
;                N.B. Il est préférable d'afficher un long message sur plusieurs lignes car la largeur
;                     de la fenêtre d'output de PEP/8 n'est que de 52 caractères par défaut.
bienvenu:.ASCII  "Bienvenue à ce programme d'additions de 2 nombres."
         .ASCII  "\nVous devrez entrer 2 nombres compris"
         .ASCII  "\nentre -32768 et 32767.\x00"
demande1:.ASCII  "\n\n\nVeuillez entrer le premier nombre: \x00"; précédé de 3 changements de ligne
demande2:.ASCII  "\nVeuillez entrer le deuxième nombre: \x00"
réponse: .ASCII  "\nLe total de ces 2 nombres est \x00"
termine: .ASCII  ".\n\nFin normale du programme.\x00"
         .END