Asm Test

stak segment stack 'stack'
db 100h dup (?)
stak ends
data segment 'data'
Text db 'Kuzichkin Pavel, 241 group$'
Space db 20h
M1 db 32h
M2 db 38h
data ends
code segment 'code'
assume CS:code,DS:data,SS:stak

start:
	mov AX, data
	mov DS, AX
	call Print_Text
	mov AL, M1
	mov BL, M2
	call Out_string
	XCHG AL, BL
	call Out_string
	mov AX, 4C00h
	int 21h
	Out_string proc
		mov DL, AL
		mov AH, 09h
		int 21h
		mov DL, Space
		int 21h
		mov DL, BL
		int 21h
		mov DL, 0Ah
		int 21h
		ret
	Out_string endp
	Print_Text proc
		mov DX, offset Text
		mov AH, 09h
		int 21h
		ret
	Print_Text endp

code ends
end start