Нужно исправить задание на два одномерных массива

; Для сборки использовать
; C:\TASM\BIN\TASM32.EXE 1.asm
; C:\TASM\BIN\TLINK.EXE 1.obj
 
MASM ; указываем TASM работать как MASM
MODEL small ; указываем модель адресации
STACK 256 ; выделяем память под стек
.data ; сегмент данных
msg1 db "my long messsjsage$" ; первая исходная строка
msg2 db "my other message1234$" ; вторая исходная строка
 
.code ; сегмент кода
ASSUME ds:@data, es:@data ; переопределяем ds и es чтобы они указывали на выделенный нами сегмент данных
start: ; точка входа в программу
mov ax, @data ; сохраняем указатель на сегмент данных
mov ds, ax ; устанавливаем ds
mov es, ax ; устанавливаем es
 
xor dx, dx ; зануляем dx - счётчик уникальных символов
prescan1:
xor bx, bx ; зануляем bx - указатель на текущую позицию в строке
 
scan1: ; сканируем первую строку
cmp msg1[bx], "$" ; проверяем не достигли ли конца строки (в DOS-формате она закрывается символом "$")
je prescan2 ; если достигли конца первой строки, переходим на вторую половину
 
lea di, msg1 ; загружаем указатель на msg1 в es:di
mov cx, bx ; помещаем значение текущей позиции в CX,
; чтобы потом сканировать все символы от начала строки до текущего места
 
mov al, msg1[bx] ; помещаем в al текущий символ
inc bx ; увеличиваем позицию в строке
 
repne scas msg1 ; сканируем строку
je scan1 ; если нашли совпадающий символ, значит он не уникален и уже посчитан
 
calc1:
push dx ; Помещаем в стек DX
push ax ; Помещаем в стек AX
 
mov dl, al ; Помещаем найденный символ в dl
mov ah, 02h ; указываем функцию DOS - вывод символа (символ должен быть сохранён в dl)
int 21h
 
pop ax ; Восстанавливаем AX из стека
pop dx ; Восстанавливаем DX из стек
 
inc dx ; увеличиваем счётчик в DX
jmp scan1 ; возвращаемся к сканированию
 
prescan2:
xor bx, bx
scan2:
cmp msg2[bx], "$" ; проверяем на конец строки
je print ; если вторая строка кончилась - переходим к печати результатов
 
lea di, msg2 ; загружаем в es:di указатель на вторую строку
mov cx, bx ; помещаем значение
; чтобы потом сканировать все символы от начала строки до текущего места
 
mov al, msg2[bx]; запоминаем текущий символ в al
inc bx ; увеличиваем позицию
 
repne scas msg2 ; загружаем в es:di указатель на вторую строку
je scan2 ; если нашли совпадающий символ - переходим к сканированию следующего
 
lea di, msg1 ; загружаем в es:di указатель на первую строку
mov cx, 18 ; здесь жёстко указана длина первой строки
repne scas msg1 ; сканируем первую строку
je scan2 ; если нашли совпадающий символ - переходим к сканированию следующего
 
calc2:
push dx ; Помещаем в стек DX
push ax ; Помещаем в стек AX
 
mov dl, al ; Помещаем найденный символ в dl
mov ah, 02h ; указываем функцию DOS - вывод символа (символ должен быть сохранён в dl)
int 21h
 
pop ax ; Восстанавливаем AX из стека
pop dx ; Восстанавливаем DX из стек
 
inc dx ; увеличиваем счётчик в DX
jmp scan2 ; возвращаемся к сканированию
 
print:
push dx ; сохраняем значение DX в стеке
 
mov dl, 0dh ; загружаем в dl код перевода курсора на следующую строку
mov ah, 02h ; указываем функцию DOS - вывод символа (символ должен быть сохранён в dl)
int 21h
mov dl, 0ah ; загружаем в dl код перевода курсора в начало строки
int 21h
 
pop dx ; восстанавливаем DX из стека
mov ax, dx ; помещаем значение в AX
mov dl, 10 ; помещаем в dl 10
div dl ; делим содержимое AX на значение dl
push ax ; остаток от деления в ah
add ax, 48 ; добавляем 48 чтобы цифра соответствовала ASCII-коду
mov dx, ax ; помещаем значение
 
mov ah, 02h ; указываем функцию DOS - вывод символа
int 21h
 
pop dx ; восстановить значение DX
mov dl, dh ; перебрасываем старший разряд в dl
add dl, 48 ; увеличиваем dl на 48 чтобы он соответствовал цифре.
mov ah, 02h ; указываем функцию DOS - вывод символа
int 21h
 
mov ah, 4ch ; указываем функцию DOS - завершение программы
int 21h ; выполняем
 
end start ; конец программы и ссылка на точку входа.