; ************************************************************
;       Programme: lab_d_7.txt     version PEP813 sous Windows
;
;       INF2171 - laboratoire sur DECI
;       7) Modifier le programme nouveau programme PREMIERx (étape 3) afin de n'additionner que les nombres compris entre -100 et +100.
;
;       auteur:         Bernard Martin
;       code permanent: non applicable
;       courriel:       martin.bernard@uqam.ca
;       date:           hiver 2019
;       cours:          INF2171
; ***********************************************************
;
début:   LDA     0,i         ; le registre Accumulateur conserve la somme des nombres
;
         DECI    nombre,d    ; lecture d'un nombre
         BREQ    FINI        ; si le nombre lu est zéro, on termine définitivement le programme
boucle:  NOP0                
         LDX     nombre,d    
         CPX     -100,i      ; limite inférieure
         BRLT    oublier     
         CPX     100,i       ; limite supérieure
         BRGT    oublier     
;
         ADDA    nombre,d    ; totalisation
;
oublier: DECI    nombre,d    ; lecture d'un autre nombre
         BRNE    boucle      ; zéro termine la sommation
;
termine: STA     total,d     ; conserve le résultat enregistré dans le registre Accumulateur
         CHARO   "\n",i      ; nouvelle ligne
         DECO    total,d     ; affiche le total en décimal
         CHARO   "\n",i      ; nouvelle ligne
         CHARO   "\n",i      ; nouvelle ligne
         LDA     0,i         ; somme <- 0
         BR      début       
;
FINI:    STOP                
;
nombre:  .BLOCK  2           ; #2d valeur initiale zéro
total:   .BLOCK  2           ; #2d valeur initiale zéro
;
         .END