FasmWorldПрограммирование на ассемблере FASM для начинающих и не только

Здравствуте!
Сделал, но только вот какя фигня, если запускаю программу из винды, то сумма=0, а если запускаю в отладчике, то сумма =1. С чего такая разница не понимаю.
use16
org 100h
jmp start
;————————-
summ_flags db ‘Summa Flagov = $’

;————————-
start:
mov dx,summ_flags
mov ah,09h
int 21h
xor ax,ax
lahf
shr ah,1
call summa
shl ah,2
call summa
shl ah,1
call summa
cmp cl,1
jg inv_cf
vivod:
xor dx,dx
mov ax,cx
mov bx,10
div bx

add dl,’0′
mov ah,02h
int 21h
mov ah,08h
int 21h
mov ax,4c00h
int 21h

summa:
jc summ
ret
summ:
add cl,1
ret
inv_cf:
cmc
jmp vivod

summa:
    jc summ
    ret
summ:
    add cl,1
    ret

    adc cl,0

Всё понятно, спасибо.

org 100h ;Программа начинается с адреса 100h
jmp start
;———————————————————————
s_sum db ‘CF+SF+ZF=$’
press db 13,10,’Press any key…$’
sr_sum db 0,’$’
;———————————————————————
start:
mov ax,64000
add ax,63999;пример устанавливающий флаги
pushf;их сохранение
lahf; в ah — флаги
xor al,al;обнуление al
ror ah,1;подготовка к подсчету — биты подряд
mov cx,3;счетчик циклов=3
sym: shl ah,1;значение флага в CF
adc al,0;суммирование значения флагов
loop sym
cmp al,1;сравнение суммы с 1
jna sr;если меньше или равно,не меняем CF
popf;если больше
cmc;инвертируем CF
pushf;сохраняем измененное значение
sr: add al,’0′;преобразуем сумму в символ
mov [sr_sum],al;сохраняем как строку
mov dx,s_sum
call print;выводим
mov dx,sr_sum
call print;выводим
mov dx,press
call print;выводим
popf; восстанавливаем флаги
mov ah,08h ;Функция DOS 08h — ввод символа без эха
int 21h ;Обращение к функции DOS

mov ax,4C00h ;\
int 21h ;/ Завершение программы
;———————————————————————
print:
push ax
mov ah,09h
int 21h
pop ax
ret

use16
org 100h
add cx ,1; устанавливаем флаги чтобы были не 0
sub cx ,2 ; устанавливаем флаги чтобы были не 0
call Flag ; вызов процедуры
xor ax,ax
mov al,[CFZ] ; помешаем значение флага с
mov ah,[SFZ]; помешаем значение флага s
add al, ah ; с=c+s
mov ah,[ZFZ] ; помешаем значение флага s
add al, ah ; c=c+s
cmp al,1 ; проверяем значение
ja m ; если al>1 то переходим
jmp m3 ; если al
m:
xor ax,ax
mov al,[CFZ];
cmp al,1 ; инверсия состояния влага до вызова процедуры
jz m1 ; c>1
jb m2; c <1
jmp m3

m1:
clc ; меняется текущие состояние флага
jmp m3
m2:
stc ; меняется текущие состояние флага
jmp m3
m3:
mov ax,4C00h
int 21h
SFZ rb 1
ZFZ rb 1
AFZ rb 1
PFZ rb 1
CFZ rb 1
Ds10 rb 10

Flag:
PUSHF ; сохраняет флаги в стёке
xor bx,bx
xor ax,ax
xor si,si
mov cx,8 ; счётчик =8
POPF; восстанавливаем
PUSHF ; сохраняет флаги в стёк
LAHF
;—————SAL ah,0
push ax
SHR ah,7 ; сдвигаем на 7 бит в право остаётся 7бит
mov [Ds10+si],ah ; сохраняем
pop ax
inc si
;—————
Zl:
SAL ah,1 ; смешаем на 1 бит , или на x=x+1
push ax
SHR ah,7 ; сдвигает всё лишние оставляя только 1 бит
mov [Ds10+si],ah ; сохраняем в память
xor ax,ax
pop ax
inc si
Loop Zl
mov bl,[Ds10+0]
mov [SFZ],bl ; SFZ=S
mov bl,[Ds10+1]
mov [ZFZ],bl ; ZFZ=Z
mov bl,[Ds10+3]
mov [AFZ],bl ; AFZ=A
mov bl,[Ds10+5]
mov [PFZ],bl ; PFZ=P
mov bl,[Ds10+7]
mov [CFZ],bl ; CFZ=C
POPF
ret

    PUSHF ; сохраняет флаги в стёке
    xor bx,bx
    xor ax,ax
    xor si,si
    mov cx,8 ; счётчик =8
    POPF; восстанавливаем
    PUSHF ; сохраняет флаги в стёк
    LAHF

Ds10:
SFZ db ?
ZFZ db ?
    db ?
AFZ db ?
    db ?
PFZ db ?
    db ?
CFZ db ?

не могу понять зачем помещать в dl строку ‘0’
mov dl,’0′ ;DL = ‘0’

use16
org 100h
jmp start
summ db 0
sout rb 2
resul db ‘Flags sum =$’
press db 13,10,’Press any key…$’
start:
lahf
mov al,ah
and al,11000001b
mov cx,8
xor dl,dl
loop1:
ror al,1
jnb next
inc dl
next:
loop loop1
mov [summ],dl
cmp dl,1
jna next1
xor ah,00000001b
next1:
sahf
sum_out:
mov dl,[summ]
add dl,’0′
mov [sout],dl
mov [sout+1],’$’
mov ah,09h
mov dx,resul
int 21h
mov dx,sout
int 21h
mov dx,press
int 21h
mov ah,08h
int 21h
mov ax,4c00h
int 21h

use16
org 100h
xor dx,dx
;Изменяем флаги для проверки
mov ah,11000001b ;sf,zf,0,af,0,pf,1,cf
sahf
;читаем флаги и проверяем
lahf ; ah=flags
shl ah,1 ;sf
adc dh,0
shl ah,1 ;zf
adc dh,0
shr ah,3 ;cf
adc dh,0
xchg dh,dl
and dl,11111111b;проверка на 0
jz m1 ;если dl=0->m1
cmc ;иначе, инвентируем CF
m1:
;Вывод на консоль
print:

push dx
mov dx,sum
mov ah,9
int 21h
pop dx
add dl,48
mov ah,2
int 21h
exit:
mov dx,press
mov ah,9
int 21h
mov ah,8
int 21h
mov ax,4c00h
int 21h
sum db ‘sum = $’
press db 13,10,’Press any key…$’