Ассеблер!!!!!!!! Ужас))))

[NewMen]

.model small
 .stack 100h
 .data

 ; Считаем, что числа x и y - всегда одноразрядные

 ; Предварительно отформатированная строка
 str db 'x = '
 x db '3', 13, 10
         db 'y = '
 y db '5', 13, 10
         db 'x + y = '
 sum db ?, ?, 13, 10
         db 'x - y = '
 minus db ' ', ?, 13, 10
         db 'x * y = '
 umn db ?, ?, 13, 10
         db 'x / y = '
 del db ?, 13, 10, '$'

 .code
 start:
 ; Загружаем регистры сегмента данных
 mov ax, @data
 mov ds, ax

 xor cx, cx
 xor dx, dx

 mov cl, x
 mov dl, y
 sub cl, 30h ;30h = '0'
 sub dl, 30h

 ;sum = x + y
 mov ax, cx
 add ax, dx
 aaa ; Десятичная коррекция после сложения
 add ax, 3030h
 mov sum, ah
 mov sum+1, al

 ;minus = x - y
 mov al, cl
 sub al, dl ; Результат всегда одноразрядный, коррекция не требуется
 jns @f
         mov minus, '-' ; если результат отрицательный, записываем знак 
 минуса
         neg al
 @@:

 add al, 30h
 mov minus+1, al

 ;umn = x * y
 mov ax, cx
 mul dl
 aam ; Коррекция после умножения
 add ax, 3030h
 mov umn, ah
 mov umn+1, al

 ;del = x / y
 mov ax, cx
 aad ; Коррекция перед делением
 div dl
 add al, 30h ; результат всегда одноразрядный
 mov del, al

 ; Вывод результата на экран
 mov ah, 09h
 lea dx, str
 int 21h ; Выводим исходную строку

 ; Выход из программы
 mov ax, 4C00h
 int 21h

 end start

Небольшая Просьба!!! Прокоментируйте каждую строку....(Программа Складывает,Вычитает,Умножает и делит) Мне нужны только коментарии, Очень Прошу))))))))))))