При запуске выдает какие-то иероглифы

model tiny
codeseg
org 100h
start:
        mov      dx,offset message1         
        mov      ah,9
        int      21h
        
        mov      dx,offset buffer           ; выводим словарь
        mov      ah,9
        int      21h
                
        mov      dx,offset message2
        mov      ah,9
        int      21h
        jmp      entbuf
        
mloop:
        mov      dx,offset message3
        mov      ah,9
        int      21h
        
        mov      ah,1
        int      21h
        cmp      al,01bh
        je       exit1
 
entbuf:       
        mov      dx,offset user
        mov      ah,9
        int      21h
        
        mov      dx,offset words           ; вводим слова 
        mov      ah,0ah
        int      21h
        
        lea      di,words
        add      di,1
        mov      ah,[di]
        add      di,1
;---------------------------------------------------------------        
        lea      si,buffer
        mov      dl,0
        
        mov      bl,[di]          ; сравниваем  si di
        mov      cl,[si]
 
loop1:        
        cmp      bl,cl
        je       incr             ; если равно увеличиваем счетчик
        inc      si
        mov      cl,[si]
        cmp      cl,'$'
        je       loop2            ; вышли за границы
        jne      loop1
incr:
        add      dl,1
loop2: 
        lea      si,buffer        ; устанавливаем на начало
        inc      di
        mov      bl,[di]
        cmp      bl,'$'            
        je       exit             ; вышли за границы
        jne      loop1
exit:
        cmp      ah,dl                 
        jne      s
 
        add      ch,1
s:
        jmp      mloop
        
exit1:                
        mov      dx,offset number
        mov      ah,9
        int      21h
       
        mov      dl,ch
        or       dl,00110000b
        mov      ah,6
        int      21h
        
        mov      dl,10
        mov      ah,6
        int      21h
        
        ret
;------------------------------------------------------
message1 db       "Dictionary: $"        ;"Enter the characters to the dictionary: $"
message2 db       10,13,"Imagine as many words as you can from the dictionary! $"
message3 db       10,13,"Do you want to continue? $"
user     db       10,13,"User: $" 
number   db       10,13,"Number of correct words: $"
buffer   db       "qwe$"           ; словарь
words    db       ?                ; слова 
end start