Снова здравствуйте!
Вобщем попробовал совместить всё вместе, а так же кое что поменял местами (сделал как показывали в институте), прошу проверить привильно ли я всё сделал, и можно ли было менять местами, как я это сделал, вобщем вот что получилось :
.model small
.186
.stack 100h
.data
Matrix
db 01,02,03,04
db 05,06,07,08
db 09,10,11,12
db 13,14,15,16
.code
begin:

;Адресуем сегментные регистры
mov ax,@data
mov ds,ax
mov es,ax
call OutMatrix ;Выводим исходную матрицу
call TranspMatrix ;Транспонируем матрицу
call OutMatrix ;Выводим полученный результат

;Вывод матрицы
OutMatrix:
mov cx,4 ;устанавливаем внешний индекс цикла
xor si,si ;сбрасываем указатель в матрице
OM1:
push cx ;запоминаем его в стеке
mov cx,4 ;устанавливаем внутренний индекс цикла
OM2:
mov al, [Matrix+si] ;считываем значение числа
inc si ;переходим к следующему числу
call OutNumber ;выводим число на экран
loop OM2 ;проверяем внутренний цикл
call NewLine ;переходим на новую строку
pop cx ;востанавливаем внешний индекс цикла
loop OM1 ;проверяем внешний индекс цикла

;переходим на новую строку
NewLine:
mov al,10
int 29h
mov al,13
int 29h
ret ;возвращаемся из под програмы

;Выводим одно число в АХ
OutNumber:
push cx ;запоминаем счетчик цикла в стеке
mov bx,10 ;система счисления, в данном случае 10-ая
xor ah,ah ;сбрасываем старшую часть слова
xor cx,cx ;сбрасываем счетчик цифр
ON1:
xor dx,dx ;сбрасываем остаток
div bx ;длелим на систему счисления и получаем остаток от деления
push dx ;запоминаем остаток в стеке
inc cx ;считаем запомненую цифру
or ax,ax ;посторяем пока АХ больше нуля
jnz ON1

;форматируем вывод чисел
mov ax,-10h ;значение, которое при +30Н даст код пробела

ON2:
inc cx ;увеличиваем счетчик цифр в стеке
push ax ;запоминаем в стеке условный код пробела
cmp cx,4 ;повторяем пока в стеке не будет 4-е цифры
jnz ON2

;выводим число на экран
ON3:
pop ax ;извлекаем из стека очередную цифру
add al,30h ;переводим в символьный код для вывода на экран
int 29h ;выводим на экран символ
loop ON3 ;повторяем пока в стеке есть цифры
pop cx ;востанавливаем счетчик цикла
ret

;трнспонируем матрицу
;устанавливаем индекс внешнего цикла
TranspMatrix:
xor bx,bx ;база строки
xor si,si ;смещение элемента в строке
xor di,di ;смещение транспонированного элемента
TM1: ;цикл по строкам верхнего треугольника
push si ;сохраним индекс в строке
push di ;сохраним смещение транспонированного элемента
TM2: ;цикл по элементам строки верхнего треугольника
inc si ;диагональный элемент обходим
add di,N ;аналогично для второго элемента
cmp si,N ;дошли до края строки?
je TM3 ;да - переходим на следующую

;обмениваем элементы
mov al,[Matrix+bx+si]
xchg [Matrix+di],al
mov [Matrix+bx+si],al
jmp TM2 ;на слеующий элемент в строке
TM3: ;переход на следующую строку
pop di ;восстановим индексы
pop si
add bx, N ;переходим на слеующую строку
inc si ;и смещаемся на одну позицию вправо
;(рассматриваем только верхний треугольник)
add di, N+1 ;смещаемся на одну строку вниз и на одну позицию вправо
;(соответствующая позиция в нижнем треугольнике)
cmp bx, (N-1)*N ;дошли до последней строки?
jne TM1 ;нет - на отработку строки
ret
;Ожидаем любую клавишу и завершаем программу
xor ax,ax
int 16h
mov ax,4c00h
int 21h
end begin

;Адресуем сегментные регистры
mov ax,@data
mov ds,ax
mov es,ax
call OutMatrix ;Выводим исходную матрицу
call TranspMatrix ;Транспонируем матрицу
call OutMatrix ;Выводим полученный результат
Тут Вы теряете управления программой
;Вывод матрицы
OutMatrix:

Верните последние 4-е строчки

[code h=200]model small
N equ 4
.186
.code
begin:
;Адресуем сегментные регистры
mov ax,@data
mov ds,ax
mov es,ax
;Выводим исходную матрицу
call OutMatrix
;Транспонируем матрицу
call TranspMatrix
;Выводим полученный результат
call OutMatrix
;Ожидаем любую клавишу и завершаем программу
xor ax,ax
int 16h
mov ax,4c00h
int 21h
;
;Вывод матрицы
;устанавливаем внешний индекс цикла
OutMatrix: mov cx,N
;сбрасываем указатель в матрице
xor si,si
;запоминаем его в стеке
OM1: push cx
;устанавливаем внутренний индекс цикла
mov cx,N
;считываем значение числа
OM2: mov al,[Matrix+si]
;переходим к следующему числу
inc si
;выводим число на экран
call OutNumber
;проверяем внутренний цикл
loop OM2
;переходим на новую строку
call NewLine
;востанавливаем внешний индекс цикла
pop cx
;проверяем внешний индекс цикла
loop OM1
;переходим на новую строку
NewLine: mov al,10
int 29h
mov al,13
int 29h
;возвращаемся из под програмы
ret
;
;Выводим одно число в АХ
;запоминаем счетчик цикла в стеке
OutNumber: push cx
;система счисления, в данном случае 10-ая
mov bx,10
;сбрасываем старшую часть слова
xor ah,ah
;сбрасываем счетчик цифр
xor cx,cx
;сбрасываем остаток
ON1: xor dx,dx
;длелим на систему счисления и получаем остаток от деления
div bx
;запоминаем остаток в стеке
push dx
;считаем запомненую цифру
inc cx
;посторяем пока АХ больше нуля
or ax,ax
jnz ON1
;форматируем вывод чисел
;значение, которое при +30Н даст код пробела
mov ax,-10h
;увеличиваем счетчик цифр в стеке
ON2: inc cx
;запоминаем в стеке условный код пробела
push ax
;повторяем пока в стеке не будет 4-е цифры
cmp cx,N
jnz ON2
;выводим число на экран
;извлекаем из стека очередную цифру
ON3: pop ax
;переводим в символьный код для вывода на экран
add al,30h
;выводим на экран символ
int 29h
;повторяем пока в стеке есть цифры
loop ON3
;востанавливаем счетчик цикла
pop cx
ret
;
;трнспонируем матрицу
;устанавливаем размер матрицы
TranspMatrix: mov bx,N
;устанавливаем индекс внешнего цикла
mov cx,N
;сбрасываем указатель в матрице
xor si,si
;сохраняем индекс внешнего цикла
TM1: xchg dx,cx
;устанавливаем индекс внутреннего цикла
mov cx,N
;проверяем индексы циклов
TM2: cmp cx,dx
;если внешний больше или равен внутреннему пропускаем
jbe TM3
;сохраняем используемый регистр
push dx
;готовимся к преобразованиям
mov ax,si
;разделяем строки и столбцы
xor dx,dx
div bx
;АХ - строка
;DX - столбец
;запоминаем строку
mov di,ax
;работаем со столбцом
mov ax,dx
;преобразовываем столбец в указатель
xor dx,dx
mul bx
;получаем транспонированный указатель
add di,ax
;востанавливаем регистр
pop dx
;считываем текущее число
mov al,[Matrix+si]
;обмениваем его с числом по транспонированному адресу указателя
xchg [Matrix+di],al
;записываем транспонированное значение
mov [Matrix+si],al
;следующий элемент матрицы
TM3: inc si
;проверяем индекс внутреннего цикла
loop TM2
;востанавливаем значение индекса внешнего цикла
xchg dx,cx
;проверяем индекс внешнего цикла
loop TM1
;выход из подпрограммы
ret
;сегмент данных
.data
;Matrix db 01,02,03,04
; db 05,06,07,08
; db 09,10,11,12
; db 13,14,15,16
;формируем матрицу
Matrix label byte
i = 1
rept N*N
db i
i = i+1
endm
;сегмент стека
.stack 100h
;точка входа в программу
end begin[/code]
Переделал транспониование с помощью умножения и деления, а не сдвигов.
Добавил единственный оптимальный макрос, т.к. всё остальное только увеличивает длину кода.

Верните последние 4-е строчки

Совершенно верно, у Вас получилось, что после второго вызова п/п вывода матрицы
Вы опять попадаете, уже прямо, на нее же и после ret улетаете неизвестно куда...
А надо завершить программу...

Если хотите, чтобы выход был в конце, не вопрос...
Поставьте после второго вывода матрицы jmp на метку в конце( т.е. на ожидание любой клавиши)

Поставьте после второго вывода матрицы jmp на метку в конце

Зачем?
Проще все подпрограммы перенести в начало, перед меткой begin

Зачем? Проще все подпрограммы перенести в начало, перед меткой begin

Да, конечно

Как успехи? Вам наших комментариев достаточно?

Останусь на своём варианте, так мне легче воспринимать и понимать программу, как я понял если верну 4 строчки :
;Ожидаем любую клавишу и завершаем программу
xor ax,ax
int 16h
mov ax,4c00h
int 21h
то всё остальное будет правильно? Может быть глупый вопрос но не понимаю почему по порядку не пишется, допустим: "сначала задаём сегмент стека, формируем матрицу ... трансопируем ... и в конце уже соответственно код завершения программы". В данном случае всё немного наоборот.

Я плоховато пока разбираюсь в ассемблере. Может это неправильно но мне проще воспринимать когда всё по порядку, если можно то прошу подправить в моём варианте так чтобы было правильно .
Заранее большое спасибо!)

Сегменты стека, данных и кода Вы можете распологать в любой последовательности и в лобом количестве. К примеру даже так:
.data
.stack
.code
.data
.code
.data
Компилятор при комппановке программы сам соберет одноименные сегменты одной группы, т.е. в результирующем коде они будут располагатся в одном сегменте. Аналогично происходит и с кодом. Но если данные могут быть разбросанны и не систематизированны. Код представляет собой определенный программистом последовательный набор команд процессора, которые выполняют определенный алгоритм заложенный в программу. Любое нарушения этой последовательности приводит к сбоям и т.д.

прошу подправить в моём варианте так чтобы было правильно

К примеру так будет правильно:

[code h=200].model small
.186
.stack 100h
.data
Matrix
db 01,02,03,04
db 05,06,07,08
db 09,10,11,12
db 13,14,15,16
.code

;Вывод матрицы
OutMatrix:
mov cx,4 ;устанавливаем внешний индекс цикла
xor si,si ;сбрасываем указатель в матрице
OM1:
push cx ;запоминаем его в стеке
mov cx,4 ;устанавливаем внутренний индекс цикла
OM2:
mov al, [Matrix+si] ;считываем значение числа
inc si ;переходим к следующему числу
call OutNumber ;выводим число на экран
loop OM2 ;проверяем внутренний цикл
call NewLine ;переходим на новую строку
pop cx ;востанавливаем внешний индекс цикла
loop OM1 ;проверяем внешний индекс цикла

;переходим на новую строку
NewLine:
mov al,10
int 29h
mov al,13
int 29h
ret ;возвращаемся из под програмы

;Выводим одно число в АХ
OutNumber:
push cx ;запоминаем счетчик цикла в стеке
mov bx,10 ;система счисления, в данном случае 10-ая
xor ah,ah ;сбрасываем старшую часть слова
xor cx,cx ;сбрасываем счетчик цифр
ON1:
xor dx,dx ;сбрасываем остаток
div bx ;длелим на систему счисления и получаем остаток от деления
push dx ;запоминаем остаток в стеке
inc cx ;считаем запомненую цифру
or ax,ax ;посторяем пока АХ больше нуля
jnz ON1

;форматируем вывод чисел
mov ax,-10h ;значение, которое при +30Н даст код пробела

ON2:
inc cx ;увеличиваем счетчик цифр в стеке
push ax ;запоминаем в стеке условный код пробела
cmp cx,4 ;повторяем пока в стеке не будет 4-е цифры
jnz ON2

;выводим число на экран
ON3:
pop ax ;извлекаем из стека очередную цифру
add al,30h ;переводим в символьный код для вывода на экран
int 29h ;выводим на экран символ
loop ON3 ;повторяем пока в стеке есть цифры
pop cx ;востанавливаем счетчик цикла
ret

;трнспонируем матрицу
;устанавливаем индекс внешнего цикла
TranspMatrix:
xor bx,bx ;база строки
xor si,si ;смещение элемента в строке
xor di,di ;смещение транспонированного элемента
TM1: ;цикл по строкам верхнего треугольника
push si ;сохраним индекс в строке
push di ;сохраним смещение транспонированного элемента
TM2: ;цикл по элементам строки верхнего треугольника
inc si ;диагональный элемент обходим
add di,N ;аналогично для второго элемента
cmp si,N ;дошли до края строки?
je TM3 ;да - переходим на следующую

;обмениваем элементы
mov al,[Matrix+bx+si]
xchg [Matrix+di],al
mov [Matrix+bx+si],al
jmp TM2 ;на слеующий элемент в строке
TM3: ;переход на следующую строку
pop di ;восстановим индексы
pop si
add bx, N ;переходим на слеующую строку
inc si ;и смещаемся на одну позицию вправо
;(рассматриваем только верхний треугольник)
add di, N+1 ;смещаемся на одну строку вниз и на одну позицию вправо
;(соответствующая позиция в нижнем треугольнике)
cmp bx, (N-1)*N ;дошли до последней строки?
jne TM1 ;нет - на отработку строки
ret


begin:
;Адресуем сегментные регистры
mov ax,@data
mov ds,ax
mov es,ax
call OutMatrix ;Выводим исходную матрицу
call TranspMatrix ;Транспонируем матрицу
call OutMatrix ;Выводим полученный результат

;Ожидаем любую клавишу и завершаем программу
xor ax,ax
int 16h
mov ax,4c00h
int 21h
end begin[/code]

сделал как показывали в институте

Вы можете выложить на портале методичку, по которой учитесь?
Игорь Витальевич и я переделаем код под Вашу учебную прогамму.

Вы можете выложить на портале методичку, по которой учитесь?

Во! Это правильно! Посмотрим, что от Вас требуют, и объясним, что Вы неправильно поняли

Методички к сожалению никакой нет, одни только лекции.
Последний вариант программы вполне устраивает. Надеюсь преподователя тоже устроит.
Ещё раз большое спасибо!

Уважаемые эксперты прошу помочь переделать программу без прерываний 30h и 29h, или подробно описать что каждое из них делает и на что ссылается. Преподаватель сказал что незнает что делает 30h)) Прошу переделать или обьяснить как можно подробнее и проще.
Заранее большое спасибо!
Если надо могу создать новый вопрос.
Программу сдавал кот. в ответе №3.

И где Вы увидели прерывание 30h? Посмотрите внимательнее, нету там такого...
А прерывание 29h выводит на экран в текущей позиции символ из al.
Аналог - функция 02 прерывания 21h, только там символ должен быть в dl

Понятно спасибо!
А для чего служит 30h поясните попобробней пожалуйста. Не понимаю всей этой операции - когда форматируем вывод чисел и выводим число на экран)

Используется при преобразовании двоичного числа в строку цифр.
Сначала при помощи деления на 10 получаются разряды 0-9,
затем эти числа преобразуются в символы '0'-'9', которые имеют код 30h-39h,
т.е. отличаются на 30h. Вот мы эти 30h и добавляем