Как переделать программу на TASM? подскОжите как упростить данную программу а то билеберда какая-то

[datileo]

Удалить элементы массива А(I) имеющие одинаковые значения. I=1,2,..,10, Определить количество оставшихся элементов.

.286
.model tiny
.code
start:
; ищем повторяющиеся элементы и заменяем их на 0FFh
    mov cx,lenth+1
    mov bx,offset array 
a2: push cx
    mov al,[bx]
    cmp al,0FFh
    je a1
    mov di,bx
    inc di
a0: repne scasb
    jcxz a1
    mov byte ptr [di-1],0FFh
    loop a0
a1: inc bx
    pop cx
    loop a2
; ищем элемены отличающиеся от 0FFh и сдвигаем их в начало массива
; таким образом происходит удаление из массива повторяющихся элементов
    mov al,0FFh
a5: xor bx,bx
        mov cx,lenth
    mov di,offset array 
a4:     repne scasb
        jcxz a3
    cmp al,[di]
    je a4
    xchg al,[di]
    xchg al,[di-1]
        mov bl,1
        jmp a4
a3: cmp bx,1
    jz a5
; ищем первый элемент с кодом 0FFh, отнимаем от его адреса адрес начала 
;массива, таким образом мы определяем количество оставшихся элементов.
        mov cx,lenth
    mov di,offset array 
    mov si,di
    repne scasb
    sub di,si
    dec di
    ret
array db 1,2,1,1,4,2,7,4,1,10
lenth = $ - array
end start;конец программы

[Mikl___]

datileo,
там откуда ты эту программу взял еще и текст был
задача решается в три этапа:

1. Поиск повторяющихся элементов. Берем первый элемент массива и последовательно сравниваем его с остальными элементами. Если находим совпадающий, то заменяем его значение на 0FFh. Потом берем второй элемент массива и так до тех пор пока не проверим все элементы, а повторяющиеся значения не заменим на 0FFh
2. Удаление повторяющихся элементов. Все элементы со значением равным 0FFh сдвинем в конец массива. Ищем элемент равный 0FFh, если у элемента справа значение не равно 0FFh, тогда обмениваем их значения, если произошел обмен делаем регистр BX=1 проходим всю строку до последнего элемента. Если был хоть один обмен, тогда возвращаемся в начало массива, если BX=0 значит все элементы стоят на своих местах.
3. Запоминаем в SI адрес начала массива. Ищем первый элемент со значением 0FFh его адрес равен DI-1. количество элементов с неповторяющимися значениями равно DI - SI - 1

Написано это было из расчета, что stas9In разберется в алгоритме и напишет программу сам, но затем stas9In пожалели и добавили уже текст программы, который ты называешь "билебердой"...