помогите с Ассемблером

[help_me_plz]

Мне надо сравнить две строки, ошибок нету, но программа не работает, т.е не сравнивает (помогите пожалуйста)

.286
.model small
.stack 100h
.data
   buff	db 101 dup(?)
   fuck db 'Suck my dick$'
   suck db '12345e'
   nosuck db '12345e'
.code
  
compar:
   
   cld ;просмотр цепочки в направлении возрастания адресов
   mov cx,6 ;длина цепочки
   mov si, offset suck
   mov di, offset nosuck
   repe cmpsb
   jc ura
   jmp Ending
start:   
cong:
    mov ax, @data
    mov ds,ax

    call compar
ura: 
    mov ah,9
	lea dx,fuck
	int 21h
Ending:
   mov	ah,4ch
   int  21h                     ;Здесь не начало программы, начало выше...
END start

[Stilet]

проект "как есть" на нем не компилируется, оно и понятно

А почему не JMP?
И кстати, отлачике прогу отрабатывал?

[R71MT]

USE16
ORG 100h
JMP start

mess1   DB 'Compare strint: $'
mess2   DB 'OK! $'
mess3   DB 'ERROR! $'

str1    DB '12345e'
str2    DB '12345e'

start:
   MOV   AH,9                  ; текст юзеру..
   MOV   DX,mess1
   INT   21h

   MOV   CX,6                  ; длина строки
   MOV   SI, str1              ; адреса строк...
   MOV   DI, str2              ;   .................
   REPE  CMPSB                 ; сравнивать, пока ZF не установится
   MOV   AH,9                  ; подготовка к выводу результата на экран
   JZ    ok                    ; проверяем флаг ZF на нуль.
   MOV   DX,mess3              ; значит ZF=1 - ERROR!
   INT   21h
   JMP   exit                  ; на выход...
ok:
   MOV   DX,mess2              ; ZF=0 - мессага ОК!
   INT   21h

exit:                          ; по-клавише на выход!
   XOR   AX,AX
   INT   16h
   RET