программа недоработана. из больших букв делать маленькие

[VARVAR_GIO]

программа должна из всех больших букв делать маленькие
вывода на экран нет, и задержку поставить норм не могу.

	model	tiny
	.code
	org	100h

Start:
	mov	si, 0
M1:			
        mov	al, InpStr[si]	; Читаем очередной символ строки.
	cmp	al, 'A'		; Сравниваем с кодом символа A.
	jb	M5		; Не входит ни в один букв. диапаз.-просто копир.
	cmp	al, 'Z'		; Сравниваем с кодом символа Z.
	ja	M2		; Не входит в диапазон A..Z - проверяем дальше.
	add	al, 32		; Преобразовние A..Z -> a..z.
	jmp	M5
M2:	cmp	al, 'А'		; Сравниваем с кодом символа А.
	jb	M5		; Не входит ни в один букв. диапаз.-просто копир.
	cmp	al, 'П'		; Сравниваем с кодом символа П.
	ja	M3		; Не входит в диапазон А..П - проверяем дальше.
	add	al, 32		; Преобразовние А..П -> а..п.	
	jmp	M5
M3:	cmp	al, 'Я'		; Сравниваем с кодом символа Я.
	ja	M4		; Не входит в диапазон Р..Я - проверяем дальше.
	add	al, 80		; Преобразовние Р..Я -> р..я.	
	jmp	M5	
M4:	cmp	al, 'Ё'		; Сравниваем с кодом символа Ё.
	jne	M5		; Не входит ни в один букв. диапаз.-просто копир.
	mov	al, 'ё'		; Преобразовние Ё -> ё.	
M5:	mov	OutStr[si], al	; Запис. символ(возможно преобр.)в выходн. стр.
	inc	si		; Команды завершения тела цикла.
        cmp	si, N
	jb	M1
	ret

N	dw	70      	; Длина строки InpStr
InpStr	db	'ODNAJDI V STUDENUIU ZIMNIUIU PORU '
	db	'BIL MOROS...'
OutStr	db	70 dup(0)

end	Start

___________
Код нужно оформлять по правилам:
тегом [CODE]..[/СODE] (это кнопочка с решёточкой #)
Не забывайте об этом!
Модератор.

[vadimych]

Достаточно одной строки.

	.model	tiny
	.code
	org	100h

Start:
mov dx,offset InpStr
mov ah,9
int 21h
push dx
push ax
	mov	si, 0
M1:			
        mov	al, InpStr[si]	; Читаем очередной символ строки.
	cmp	al, 'A'		; Сравниваем с кодом символа A.
	jb	M5		; Не входит ни в один букв. диапаз.-просто копир.
	cmp	al, 'Z'		; Сравниваем с кодом символа Z.
	ja	M2		; Не входит в диапазон A..Z - проверяем дальше.
	add	al, 32		; Преобразовние A..Z -> a..z.
	jmp	M5
M2:	cmp	al, 'А'		; Сравниваем с кодом символа А.
	jb	M5		; Не входит ни в один букв. диапаз.-просто копир.
	cmp	al, 'П'		; Сравниваем с кодом символа П.
	ja	M3		; Не входит в диапазон А..П - проверяем дальше.
	add	al, 32		; Преобразовние А..П -> а..п.	
	jmp	M5
M3:	cmp	al, 'Я'		; Сравниваем с кодом символа Я.
	ja	M4		; Не входит в диапазон Р..Я - проверяем дальше.
	add	al, 80		; Преобразовние Р..Я -> р..я.	
	jmp	M5	
M4:	cmp	al, 'Ё'		; Сравниваем с кодом символа Ё.
	jne	M5		; Не входит ни в один букв. диапаз.-просто копир.
	mov	al, 'ё'		; Преобразовние Ё -> ё.	
M5:	mov	InpStr[si], al	; Запис. символ(возможно преобр.)в выходн. стр.
	inc	si		; Команды завершения тела цикла.
        cmp	si, N
	jb	M1
pop ax
pop dx
int 21h
xor ax,ax
int 16h
	ret

InpStr	db	'ODNAJDI V STUDENUIU ZIMNIUIU PORU '
	db	'BIL MOROS...',0ah,'$'
N	=	$-InpStr-2      	; Длина строки InpStr

end	Start

[Serge_Bliznykov]

так, основной алгоритм не трогал..

длину строки реальную сделал, ну и вывод результирующей строки добавил....

        model   tiny
        .code
        org     100h

Start:
        mov     si, 0
M1:                     
        mov     al, InpStr[si]  ; Читаем очередной символ строки.
        cmp     al, 'A'         ; Сравниваем с кодом символа A.
        jb      M5              ; Не входит ни в один букв. диапаз.-просто копир.
        cmp     al, 'Z'         ; Сравниваем с кодом символа Z.
        ja      M2              ; Не входит в диапазон A..Z - проверяем дальше.
        add     al, 32          ; Преобразовние A..Z -> a..z.
        jmp     M5
M2:     cmp     al, 'А'         ; Сравниваем с кодом символа А.
        jb      M5              ; Не входит ни в один букв. диапаз.-просто копир.
        cmp     al, 'П'         ; Сравниваем с кодом символа П.
        ja      M3              ; Не входит в диапазон А..П - проверяем дальше.
        add     al, 32          ; Преобразовние А..П -> а..п.   
        jmp     M5
M3:     cmp     al, 'Я'         ; Сравниваем с кодом символа Я.
        ja      M4              ; Не входит в диапазон Р..Я - проверяем дальше.
        add     al, 80          ; Преобразовние Р..Я -> р..я.   
        jmp     M5      
M4:     cmp     al, 'Ё'         ; Сравниваем с кодом символа Ё.
        jne     M5              ; Не входит ни в один букв. диапаз.-просто копир.
        mov     al, 'ё'         ; Преобразовние Ё -> ё. 
M5:     mov     OutStr[si], al  ; Запис. символ(возможно преобр.)в выходн. стр.
        inc     si              ; Команды завершения тела цикла.

        cmp     InpStr[si], 0   ; 0 признак окончания строки!
        jne      M1

        mov     OutStr[si], '$' ; занесём символ конца строки для вывода

        ; выведем результирующую строку на экран
        mov    ah, 9h
        lea    dx, OutStr
        int    21h

        ; выведем надпись о нажатии любой клавиши
        mov    ah, 9h
        lea    dx, PressAny
        int    21h

        ; ожидание нажатия любой клавиши для выхода
        xor ah,ah
        int 16h

        ret

InpStr  db      'ODNAJDI V STUDENUIU ZIMNIUIU PORU '
        db      'BIL MOROS...',0
OutStr  db      71 dup(?)

PressAny db 13,10,'Press any key...',13,10,'$'

end     Start

Добавлено
когда писал ответ vadimych ещё не видел..
но зато теперь у TC целых ДВА рабочих решения