; *********************************************************

; Programme: [Link] version PEP813

;
; Mon premier programme
; qui affiche effectue la somme de 2 nombres sign�s.
;
; auteur: Bernard Martin
; courriel: [Link]@[Link]
; date: Hiver 2012
; cours: INF2170
; *********************************************************
;
STRO bienvenu,d ; message d'accueil
;
d�but: STRO phrase1,d ; premier nombre demand�
DECI nombre1,d ; lecture du premier nombre
BREQ fini ; le nombre 0 d�clenche la fin du programme
BRV erreur ; il y a d�bordement si le nombre est > 32767 ou <
-32768
LDA nombre1,d ; premier nombre � traiter
STRO phrase2,d ; deuxi�me nombre demand�
DECI nombre2,d ; lecture du deuxi�me nombre
ADDA nombre2,d ; premier nombre + deuxi�me nombre
BRV erreur ; > 32767, alors message d'erreur
STA total,d ; conservons le r�sultat
STRO phrase3,d ; affichage des r�sultats
DECO total,d ; dont le total
BR d�but ; recommen�ons le processus
erreur: STRO deborde,d ; > 32767 (ou < -32768)
correct: BR d�but ; recommen�ons le processus
;
; message de terminaison
;
fini: STRO termine,d ; affichage de fin normale
STOP
;
nombre1: .WORD 111 ; valeur quelconque qui sera �cras�e de toute fa�on
nombre2: .WORD 222 ; valeur quelconque qui sera �cras�e de toute fa�on
total: .WORD 0
;
bienvenu:.ASCII "Bienvenue � ce programme d'additions.\x00"
phrase1: .ASCII "\n\n\nDonnez-moi la premi�re valeur (0-pour terminer): "; avec
changements de ligne
.BYTE 0 ; d�limiteur de fin de phrase
phrase2: .ASCII "\x0aDonnez-moi la deuxi�me valeur: "
.BYTE 0
phrase3: .ASCII "\x0aLe total donne: \x00"
termine: .ASCII "\x0a\x0aFin normale du programme.\x00"
deborde: .ASCII "\nLe total exc�de le maximum permis.\x00"
.END