;
pila	SEGMENT para stack 'STACK'
pila	ENDS
;
data	SEGMENT word public 'DATA'
	dato1 dw 1
	dato2 dw 2
	dato3 dw 3

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
		mov bx,dato3
		mul bx
main ENDP
code ENDS
	END	main