s1 segment
org 100h
begin:
mov ax,0003h
int 10h
mov ah,09h
mov dx,offset st1
int 21h
mov ah,0ah
lea dx,max1
int 21h
mov ah,09h
mov dx,offset enter1
int 21h
mov ah,09h
mov dx,offset st2
int 21h
mov ah,0ah
lea dx,max2
int 21h
mov ah,09h
mov dx,offset enter1
int 21h
xor bx,bx
lea di,string1
mov bh,[string1]
sub bh,30h
lea di,string2
mov bl,[string2]
sub bl,30h
add bh,bl

mov al,bh;заносим 65530
mov ah,0

mov bx,10;основание системы счисления
mov cx,0;значение cx обнуляется
label1:
mov dx,0;уставливается метка label и bx обнуляется
div bx; деление ax на bx
push dx;сохрание значения dx в стек
add cx,1; cx+1
cmp ax,0; если ax =0
jnz label1;если условие выполнилось то переход на label1
label2:
pop dx;достаем dx
call print;вывод dl
loop label2;курутим пока cx не станет 0

mov ah,10h
int 16h
int 20h; завершение поги

print proc
push ax
mov ah,02h
add dl,30h
int 21h
pop ax
ret
print endp

max1 db 2
len1 db 0
string1 db 2 dup(' ')
max2 db 2
len2 db 0
string2 db 2 dup(' ')
st1 db "1 : $"
st2 db "2 : $"
enter1 db 13,10,'$'

s1 ends
end begin