Ассемблер. Дос. Вывод значения db переменной.

[hydr0]

Сделал задачу, получил результат. Вывести не могу. Дос.

.model small		
.stack 100h		
.data	
s1	db 24,'preved medved ot medveda'
s2	db 6,'medved' 
s3  db 'nomer elementa=$',a
a db 0			
.code
	mov	ax, @data	
	mov	ds, ax			
	mov	es, ax
	xor bx,bx 			
	ln1=s1[0]
	ln2=s2[0]
	
poisk:  
    lea di,[s1+1]
    cld 
    mov cl,ln1         
    cmp cl,ln2           
    js exit 
    
    mov ah,0
    mov al,[s2+1]              
    repne scasb             
    jne exit 
    
    mov bl,ln1
    sub bl,cl
    dec bl 
    
    lea si,[s2+1]
    lea di,[s1+1][bx]          
    cld     
    
    mov cl,ln2          
    repe cmpsb
    je sovpadenie
                     
    inc bl                
    jmp poisk                                             
 
sovpadenie:
    add a,bl
    inc a
;----------------------------------------
    mov ah,9                 
    mov	dx,offset s3
    int 21h
    jmp exit
;----------------------------------------
	 
	
exit:
	mov	ax, 4C00h
	int 	21h			
end

Помогите пожалуйста с правильным кодом вывода значения переменной а.
Спасибо.

[hydr0]

все еще интересует ответ на данный вопрос.

[Serge_Bliznykov]

КРОССПОСТ!
Ваша тема тут: Вывод переменной на экран.


т.к. кросспост на форуме запрещён,
закрываю данную тему!