Проверить, является ли заданная строка симметричной. - Ассемблер

[VHomer]

Мне надо задачку решить на ассемблере,чтобы экзамен сдать,а я с ассемблером плохо дружу.
Вот условие:Проверить, является ли заданная строка симметричной.
Мне пытались решить,но до конца не получилось.Там что то с выводом не получается.Вот что имеется

.model small
.stack 100h
.data
Stroka DB 'kabak' ;Это слово мне по душе 
Str_Len DB $-Stroka ;Длина строки
text1 db "ne polindrom$"
text2 db "palindrom$"
.code
org 100h
start:
lea si,stroka ;Смещение первого символа
lea di,str_len-1 ;Смещение последнего
mov cl,str_len-stroka;Длина строки и цикл, для скорости можно добавить shr cl,1
go: ;но проиграем в размере
cmpsb ;Сравниваем 1 и 5(в нашем случае) потом 2-4,3-3,4-2,5-1.....при добавлении строки shr cl,1
;сравниваем 1-5,2-4
jne $+7 ;На выход, если не равны
dec di ;Настройка индексов
dec di
loop go
dec ax ;Если Stroka палиндром, то AX=0FFFFh, иначе 0
exit:
cmp ax,0FFFFh
je ppp
    mov ah,9h
 mov dx, offset text1
 int 21h
 
 jmp VIHOD
ppp:
 mov ah,9h
 mov dx, offset text2
 int 21h
;ret ;Game Over
VIHOD:
mov ah,4ch
 int 21h
end start

Если кто то сможет понять что тут))),то подскажите что надо доделать или изменить и как, чтобы всё работало!Заранее СПАСИБО!!!

[Ulex]

Перед вызовом DOS-прерываний (некоторых), необходимо настроить сегментный регистр данных ds на сегмент памяти, содержащий ваши данные. Так как вы использовали директивы упрощённой сегментации .data, .code, то сделать это можно так:

.code
org 100h
start:
mov	ax, @data
mov	ds, ax

lea si,stroka ;Смещение первого символа
;ну и т.д.

Хотя программа всё равно неправильно работает, слово "kabak" ведь симметричное, а она пишет ne polindrom. А вообще принципиально применение цепочечных инструкций cmpsb в вашей программе ??

[VHomer]

Не обязательно!
Мне вообще кажется,что можно намного проще всё это сделать!Но как, не знаю(((

[Ulex]

Если ещё актуально, то вот вариант без cmpsb: