afficher la somme de 2 entiers superieur à 9

pile segment 'stack'
base DB 100 DUP(?)
sommet DB ?
pile ends

donnees segment 'data'

messaisie1 DB 0Dh,0Ah,0Ah,'Saisir OP1 : $'
messaisie2 DB 0Dh,0Ah,0Ah,'Saisir OP2 : $'
messresult DB 0Dh,0Ah,0Ah,'La somme est : $'
messerreur DB 0Dh,0Ah,0Ah,'erreur, le caractere doit etre un entier, recommencer : $'
OP1 DB ?
OP2 DB ?

donnees ends

inst segment 'code'
assume cs:inst, ds:donnees,ss:pile
debut:
mov ax,donnees
mov ds,ax
mov ax,pile
mov ss,ax
lea sp,sommet







; Première Saisi : 

	Saisie1:
	;Invite_saisie :
	mov AH,9
	LEA DX, messaisie1
	INT 21h

	mov AH,1
	INT 21h
	
	MOV OP1, AL
	
	CMP OP1, '0'
	JL CasErreur1
	CMP OP1, '9'
	JG CasErreur1
	
	JMP Saisie2
	
	CasErreur1 :
	
	mov AH,9
	LEA DX, messerreur
	INT 21h
	JMP Saisie1
	
	
; Deuxième Saisi : 

	Saisie2:
	;Invite_saisie :
	mov AH,9
	LEA DX, messaisie2
	INT 21h

	mov AH,1
	INT 21h
	
	MOV OP2, AL

	CMP OP2, '0'
	JL CasErreur2
	CMP OP2, '9'
	JG CasErreur2
	
	JMP Traitement
	
	
	CasErreur2 :
	
	mov AH,9
	LEA DX, messerreur
	INT 21h
	JMP Saisie2
	
	
	
	
; Traitement :

	Traitement :
	ADD OP1, AL
	ADD OP1, -48
	
	CMP OP1,'9'
	;JG sup9
	
	JMP inf10
	

	
; Affichage : 
	
	inf10 :
	
	mov AH,9
	LEA DX, messresult
	INT 21h
	
	MOV AH,2
	MOV DL, OP1
	INT 21h
	
	
	
	;sup9 :
	
	
	
RetourSysteme:
mov ah,4Ch
int 21h
inst ends
end debut

Traitement1 :
		

		
		CMP VAL1, 9 	; on compare VAL1 qui est la somme des chiffres pour voir s'il est superieur à 9
		JG sup91 		; si superieur à 9 on jump jusqu'à sup91
		CMP VAL1, 9
		JL Traitement2 ; sinon on jump au traitement numéro 2
		
	sup91:
	
		SUB VAL1,10		;	on enlève 10 à VAL1
		ADD VAL2,1		;	on ajoute dans VAL2 1
		
		JMP Traitement1
		
		
	Traitement2 :
		
		CMP VAL2, 9  ; on compare VAL2 qui est la somme des dizaine pour voir ;s'il est superieur à 9
		JG sup92 ; si superieur à 9 on jump jusqu'à sup92
		CMP VAL2, 9
		JL Affichage ; sinon on jump à l'affichage
		
	sup92 :
		
		SUB VAL2,10	;	on enlève 10
		ADD VAL3,1	;	on ajoute dans VAL3 1
		
		JMP Traitement2
		
		
	Affichage :
		
		; affichage résultat de la somme
		
		mov AH,9
		LEA DX, messresult	; affichage texte
		INT 21h
		
		ADD VAL3, '0'
		MOV AH,2
		MOV DL, VAL3		; centaine
		INT 21h
		
		ADD VAL2, '0'
		MOV AH,2
		MOV DL, VAL2		; dizaine
		INT 21h
		
		ADD VAL1, '0'
		MOV AH,2
		MOV DL, OP1			; chiffre
		INT 21h