Ассемблер, обработка цепочек символов

[<Yuliya>]

Нужно написать программу обработки цепочек символов размерностью слово, с размерностью байт всё нормально, а со словом не получается(((
помогите, плз, вот пример кода для байтовой цепочки:

 MODEL SMALL
STACK 256
.DATA
	str1 db 'Vvedite stroku: $'
	str2 db 'Kolichestvo slov v stroke: $'	
.data?	
	string	db	128 dup (?)

.CODE
Start:
	mov ax,@data
	mov ds,ax
	
	mov bl,1
	

	lea dx,str1
	mov ah,09h
	int 21h

	lea	dx, string
	mov ah,0ch
	mov	aL, 0ah
	int	21h		

	
	lea	si, string
	mov si,OFFSET string	
	cld		

m:
	mov ah,' '	
	lodsb		
	cmp al,0dh
	je exit
	cmp al,ah
	jne  m

 	inc bl
	jmp m


Exit:
	
	mov  dl,10
	mov ah,02h        
      	int  21h
      	mov  dl,13        
     	mov ah,02h
	int  21h

	lea dx,str2
	mov ah,09h
	int 21h


	mov dl,bl
	add dl,'0'
	mov ah,02h
        int 21h
        


	mov ah,04Ch 	
	mov al,0h 	
	int 21h 	


End Start