1. ; inicializar as variaveis
  2. ORIG 8000h
  3. Num1 TAB 2
  4. Num2 TAB 2
  5. Soma TAB 2
  6.  
  7. ; meter a soma a zero
  8. MOV R1, Soma
  9. MOV M[R1], R0
  10. MOV M[R1+1], R0
  11.  
  12. ; adicionar os numeros mais pequenos
  13. ORIG 0000h
  14. SomarPequenos:  MOV R1, Num1
  15. 								MOV R2, M[R1+1]
  16. 								MOV R1, Num2
  17. 								ADDC R2, M[R1+1]
  18. 								CALL.C SomarCarry
  19. 								MOV R1, Soma
  20. 								MOV M[R1+1], R2
  21. 								BR SomarGrandes
  22.  
  23. SomarGrandes: MOV R2, M[Num1]
  24. 							ADD R2, M[Num2]
  25. 							ADD M[Soma], R2
  26. 							BR Fim
  27. 	
  28. SomarCarry: INC M[Soma]
  29. 						RET
  30.  
  31. Fim:	BR Fim