DOSSEG
.MODEL Small

.STACK 100h
.DATA

message1 db 'Envoi de Z sur COM2 par OUT $'
com2 EQU 2f8h

.CODE

DEBUT:

		  mov AX,@DATA
		  mov DS,AX

		  mov dx,OFFSET message1 ; affichage du message 1
		  mov ah,9
		  int 21h

		  call spout


FIN:
		  mov AH,04Ch
		  int 21h

		  spout proc
				mov al,5ah
				mov dx,com2+5
				out dx,al
				ret
		  spout endp		

END DEBUT