сложение цифр в строке от 1 до 5

[buba3230]

нужно ввести любую строку с 10 символов, и если там есть цифры от 1 до 5 то их нада сложить...

помогите исправить ошибки)))

model	small
stack	100h
.data
	str	db   10 dup('$')
	len_str=$-str-1
	s	db ?
.code
	mov	ax, @data
	mov	ds, ax
	mov	es, ax
	xor	bl,bl
	
	mov	ah,3fH
	mov	bx,0
	mov	cx,10
	mov	dx,offset str
	int	21H
	
        lea	si,str
	mov	cx,len_str
c1:	mov	al,[si]
	cmp	al,'1'
	je	m1
	cmp	al,'2'
	je	m1
	cmp	al,'3'
	je	m1
	cmp	al,'4'
	je	m1
	cmp	al,'5'
	je	m1
m1:	add	bl,al
	mov	s,bl
	loop	c1


		
	mov	s, 4ch
	int	21h
end

[buba3230]

вариант 2... уже чтото выводит )))

model	small
stack	100h
.data
	str	db   10 dup(?)
	mesg	db   "Summa ot 1 do 5  "
	s	db   ?
.code
	mov	ax, @data
	mov	ds, ax
	mov	es, ax

	xor	bl,bl
	
	mov	ah,3fH
	mov	bx,0
	mov	cx,10
	mov	dx,offset str
	int	21H
	
        lea	si,str
	mov	cx,10
	cld
c1:	mov	al,[si]
	cmp	al,'1'
	je	m1
	cmp	al,'2'
	je	m1
	cmp	al,'3'
	je	m1
	cmp	al,'4'
	je	m1
	cmp	al,'5'
	je	m1
m1:	add	bl,al
	mov	s,bl
	inc 	si
	loop	c1
	
	mov	ah,09h
	mov	dx,offset mesg
	int	21h

	mov 	ah, 06h               
	mov 	dl,s
	int 	21h        ; Вывод результата
		
	mov	ah, 4ch
	int	21h
end

но не то )))

[Goodwin98]

Да уж. Может быть должно быть так.

.186
.model small
.stack 100h
.data
strq db 10 dup('$')
len_str=$-strq-1
s db ?
.code
start:
	mov ax, @data
	mov ds, ax
	mov es, ax
	xor bl,bl
	
	mov ah,3fH
	mov bx,0
	mov cx,10
	mov dx,offset strq
	int 21H
	
	lea si,strq
	mov cx,len_str
c1:
	mov al,[si]
	sub al,'0'
	cmp al,5
	jg m1
	add bl,al
m1:
    inc si
    loop c1
    
    mov dl,0ah
	mov ah,2
	int 21h
    xor dx,dx
l5:
	cmp bx,100
	jb l6
	sub bx,100
	inc dx
	jmp l5
l6:
	add dl,30h
	mov ah,2
	int 21h
	xor dx,dx
	
l7:
	cmp bx,10
	jb l8
	sub bx,10
	inc dl
	jmp l7
l8:
	add dl,30h
	mov ah,2
	int 21h
	
	mov dl,bl
	add dl,30h
	mov ah,2
	int 21h

mov ax, 4c00h
int 21h
end start

[buba3230]

можно вопрос ?

l5:
	cmp bx,100
	jb l6
	sub bx,100
	inc dx
	jmp l5
l6:
	add dl,30h
	mov ah,2
	int 21h
	xor dx,dx
	
l7:
	cmp bx,10
	jb l8
	sub bx,10
	inc dl
	jmp l7
l8:
	add dl,30h
	mov ah,2
	int 21h
	
	mov dl,bl
	add dl,30h
	mov ah,2
	int 21h

что это за код ? че он делает ? ниче в нем не пойму (((

[Goodwin98]

что это за код ? че он делает ?

Это был код, который переводит число в строку. Я его уже поменял на др. покомпактнее.

[airyashov]

Сообщение от Goodwin98

Да уж. Может быть должно быть так.

	lea si,strq
	mov cx,len_str
c1:
	mov al,[si]
	sub al,'0'
	cmp al,5
	jg m1
	add bl,al
m1:
	inc si
	loop c1

по-моему тогда все коду =<35h попадут и более 127 т.к знаковое сравнение

[buba3230]

ну вот я так с самого начала делал.... потом вводил строку 1q2w3e4r5t
должно вывести результат 15..... а выводило 2 (((

[Goodwin98]

по-моему тогда все коду =<35h попадут и более 127 т.к знаковое сравнение

Просто я думал, что туда ставить пробел или кирилицу не будут.

ну вот я так с самого начала делал.... потом вводил строку 1q2w3e4r5t
должно вывести результат 15..... а выводило 2 (((

А это она нормально просчитывает.

[buba3230]

как нормально??? должно дать 15 а дает 2... обьясни если можеш )
я видь только учусь )

[Goodwin98]

Скопируй код еще раз отсюда, а то я его менял пару раз. Ты наверно копировал между этими разами.