8.Programa Uso de funciones

	import base64
	try:
	CR EQU 13
	LF EQU 10
	DATOS SEGMENT
	MENSAJE DB CR,LF,'HOLA MUNDO ', CR,LF,'$'
	DATOS ENDS
	PILA SEGMENT STACK
	DB 64 DUP('PILA')
	PILA ENDS
	CODIGO SEGMENT
	HMF PROC FAR
	ASSUME CS:CODIGO,DS:DATOS,SS:PILA
	MOV AX,DATOS
	MOV DS,AX
	LEA DX,MENSAJE
	CALL ESCRIBE
	MOV AX,4C00H
	INT 21H
	HMF ENDP
	ESCRIBE PROC
	MOV AH,9
	INT 21H
	RET
	ESCRIBE ENDP
	CODIGO ENDS
	END HMF

view rawUso de funciones. hosted with ❤ by GitHub