мощность множества

[Ам тя]

подсчет реального числа элементов (мощность множества)
вроде ошибок нет... но пр запуске ошибки при вызове card
помогите испривить

sseg segment stack 'stack'
     dw 256 dup(?)
sseg ends
data segment
A  db 00110100b,11110011b
B  db 01110101b,11000110b
len db 16
data ends
code segment
assume cs:code,ds:data
start:mov ax,data
      mov ds,ax
     .386
      mov si,offset A
call card
     mov ah,4ch
     int 21h
card proc
     mov al,0
     mov bx,0
m1:  bt[si],bx
     adc al,0
     inc bx
loop m1
card endp    
code ends
end     start

[Stilet]

int 21h
card proc

Вообще-то ret там не помешал бы.

bt[si]

а что такое bt ?
да и потом loop m1 подразумевает уменьшение регистра СХ и будет циклить пока тот в нуль не превратиться, но что-то я не вижу где он у тебя инициализируется

[xxxyyyzzz]

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

Вообще-то ret там не помешал бы.

В любом справочнике, функция:

mov ah,4ch
int 21h

трактуется как выход в MS_DOS.

[Stilet]

xxxyyyzzz

Я знаю, я не к этому придираюсь.

[Ам тя]

sseg segment stack 'stack'
     dw 256 dup(?)
sseg ends
data segment
A  db 00110100b,11110011b
B  db 01110101b,11000110b
len db 16
data ends
code segment
assume cs:code,ds:data
start:mov ax,data
      mov ds,ax
     .386
      mov si,offset A 
    
      mov cx,8    
call card 
     mov dl,al
    add dl,30h
    mov ah,2h
    int 21h
     mov ah,4ch
     int 21h
card proc
     mov al,0
     mov bx,0
m1:  bt[si],bx
     adc al,0
     inc bx
loop m1
ret
card endp    
code ends
end     start

у меня получилось
про ret забыла
а вот про сх...я думала как бы чтоб он сам считал сколько элементов в множестве..
ну можно и подсчитать)
Команду bt используют для определения значения конкретного бита в операнде источник.