dati SEGMENT
	DIM 	EQU	10
	parola 	 DB "Buongiorno"
	inversa  DB 10 DUP(?)
dati ENDS		

codice SEGMENT
	ASSUME CS:codice, DS:dati

	inizio:	 MOV AX, dati
			 MOV DS, AX
		
			 MOV AX, 0
			 MOV CX, DIM

			 MOV DI, 0 

	label:	 MOV AL, parola[DI]
			PUSH AX
			 INC DI
			loop label

			 MOV CX, DIM
			 MOV DI, 0

	label2:	 POP AX
			 MOV inversa[DI], AL
			 INC DI
			loop label2

codice 	ENDS

END inizio