; Programa para sumar una serie de
; números
	NAME	suma0
;
pila	SEGMENT para stack 'STAC'
	DB	32 DUP(0)
pila	ENDS
;
data	SEGMENT word public 'DATA'
dato1	DW	1
dato2	DW	2
dato3	DW	3
dato4	DW	4
dato5	DW	5
data	ENDS
;
code	SEGMENT byte public 'CODE'
	ASSUME CS:code
main	PROC	far
;
	MOV	AX,data
	MOV	DS,AX
	ASSUME	DS:data
;
	MOV	AX,dato1
	ADD	AX,dato2
	ADD	AX,dato3
	ADD	AX,dato4
	ADD	AX,dato5
;
	MOV	AH,4CH
	INT	21H
;
main	ENDP
code	ENDS
	END	main