Студентам с вопросами о лабораторных работах сюда

спасибо!

получается что xor di,di здесь играет роль счетчика??

еще один вопрос какую функцию несет cmc в

@@:lodsb

sub al,1

cmc

adc bx,di

loop @b

 

gvay

точнее его инициализации (типа di=0)

инвертирует флаг CF (типа cf = not cf)

п.с. gvay, почитал бы лекций или книг. С таким знанием теории ты не сдашь ничего.

 

@@:lodsb

sub al,1

cmc

adc bx,di

loop @b
как я понял этот цикл работает по такому принципу : начинает читать массив сравнивает числа в нем с нулем и если те не равны нулю вычитает единицу из
девяти sub al,1, потом записывает результат в bx(adc bx,di) правильно я понимаю? а зачем тогда инвертировать флаг CF?

 

gvay

Код (Text):

1. xor  di,di ; di=0
2. mov  bx,di ; bx=di=0
3. @@:lodsb ; читаем байт в al
4.    sub al,1 ; отнимаем 1 из al (если al был 0, то после вычитания 1 установится CF)
5.    cmc ; инвертируем CF
6.    adc bx,di ; прибавляем CF к bx
7. loop @b ; декремент cx и возврат к @@, если он не 0

в bx будет число ненулевых элементов.

 

я бы почитал но в в 9 утра сдавать а щас 3 ночи не думаю что чтонибудь успею понять,а сдать надо вот и прошу помощи .

 

Все закоментил ) с вашей помощью и тем что смог понять из статей и книг, правильно ли все ?? или есть ошибки??

org 100h //Директива компилятора. Выполнение всегда начинается с первого байта файла. Указываем Ассемблеру при ассемблировании использовать смещение 100h от начала сегмента,в который загружена наша
программа.

mov ax,3 //устанавливается 3-й видео-режим

int 10h //вызов графического адаптера BIOS.

push 0B800h //установка видеорежима 0 CGA 25*40 only text 16 B&W 2000 0B800h

pop es //типа es=0B800h

mov cx,9 // количество ячеекв массиве

mov si,arr //перемещает значения массива в регистр si

xor di,di //di=0

mov bx,di //bx=di=0

@@:lodsb //читаем байт в al

sub al,1 //отнимаем 1 из al (если al был 0, то после вычитания 1 установится CF)

cmc //инвертируем CF

adc bx,di //прибавляем CF к bx

loop @b //декремент cx и возврат к @@, если он не 0

add bx,0F30h //0 - цвет фона, F - цвет текста, 30h - смещение цифр в таблице ASCII-кодов

mov [es:di],bx //обращение к памяти. В данном случае к видеопамяти.

int 16h //вызов прерывания 16h. В реальном режиме это сервис для работы с клавиатурой. В данном случае нужен для ожидания нажатия клавиши перед выходом.//

arr db 0,8,9,5,0,1,0,2,0 //массив

 

это просто мы ложим в стек 0B800h, а потом берем es из стека.

не значение, а адрес
остальное все правильно.

 

ВСЕМ БОЛЬШОЕ СПАСИБО ЗА ПОМОШЬ !!)

 

всем здравствуйте! У меня такая проблема:
нужно из БД ACCESS прочитать таблицу с именем name и записать ее в файл name.txt. Сделала такой каркас:

HRESULT hr;
CoInitialize(NULL);
ADODB::_ConnectionPtr connection;
hr = connection.CreateInstance(__uuidof(ADODB::Connecti on));
ADODB::_RecordsetPtr recordset;
hr = recordset.CreateInstance(__uuidof(ADODB::Recordset ));
if(!SUCCEEDED(hr))
return 1;
_bstr_t bsConnString (L"Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=C:\\Таблицы.mdb");
_bstr_t bsUserID(L"");
_bstr_t bsUserPwd(L"");
connection->Open(bsConnString, bsUserID, bsUserPwd, ADODB::adConnectUnspecified);
_bstr_t bsCommand(L"select * from ");
bsCommand += name;
recordset->Open(bsCommand,connection.GetInterfacePtr(),ADODB ::adOpenForwardOnly, ADODB::adLockReadOnly,ADODB::adCmdText);

while (!recordset->adoEOF)
{

//тут должно быть чтение таблицы

recordset->MoveNext();
}
recordset->Close();
connection->Close();

а вот как прочитать таблицу?
если известны поля, то прочитать можно так:

pole1 = recordset->Fields->GetItem(_variant_t("Поле1"))->Value;

но у меня поля неизвестны, и неизвестно их количество

кажется о-то нашла:

while (!recordset->adoEOF)
{
//pole1 = recordset->Fields->GetItem(_variant_t("Поле1"))->Value;
int nNumFields = recordset->Fields->Count;
for(int i=0;i<nNumFields;i++)
{
_bstr_t strName = recordset->Fields->Item[(_variant_t)i]->Name;
_bstr_t strValue = recordset->Fields->Item[(_variant_t)i]->Value;
}

recordset->MoveNext();
}
только программа почему-то зацикливается

 

Почему в emu 8086 выдает ошибку ?

(7) wrong parameters: MOV si,arr
(7) operands do not match: 16 bit register and 8 bit address

org 100h
mov ax,3
int 10h
push 0B800h
pop es
mov cx,9
mov si,arr
xor di,di
mov bx,di
@@:lodsb
sub al,1
cmc
adc bx,di
loop @b
add bx,0F30h
mov [es:di],bx
int 16h
arr db 0,1,9,5,0,1,0,2,0
ret

 

gvay
Видимо синтаксис немного отличается от FASM. Замени mov si,arr на lea si,arr.

 

mov si,arr
заменить на второе скорее всего
mov si,word ptr arr
mov si,offset arr

 

ВСЕМ СПАСИБО СДАЛ ЭКЗАМЕН )

 

Размер регистра - 16 бит, а операнда - 8 бит. Поэтому и ошибка. Попробуй 7-ю строку записать так:
mov si,word ptr [arr]

p.s. опередили...

 

Кароч чет наваял для одного символа "а", и то коряво пашет(
Подскажите как сделать для всех букв так.

Код (Text):

1. model small
2. .stack 80h
3. .data
4. sym db 'a'
5. str db 'Enter string :',10,13,'$'
6. string db 0ch,11 DUP (?)
7. S1 db 10,13,'$'
8. s db '$'
9. .code
10. start :
11. mov ax,@data
12. mov ds,ax
13. mov ah,9
14. mov dx,offset str
15. int 21h
16. mov dx,offset string
17. mov ah,0ah
18. int 21h
19.  
20. mov di,2
21. A1:
22. mov al,sym
23. cmp string[di],al
24. JZ A2
25.  
26. A4:
27. inc di
28. cmp di,13
29. JZ A3
30. JMP A1
31. A2:
32. mov string[di],0
33. JMP A4
34. A3:
35. mov dx,offset s1
36. mov ah,9
37. int 21h
38. mov dx,offset string
39. mov ah,9
40. int 21h
41. mov ah,2ch
42. int 21h
43. mov bl,dh
44. TIME:
45. int 21h
46. sub dh,bl
47. cmp dh,3
48. JNZ TIME
49. mov ax,4c00h
50. int 21h
51. end start

 

Помоги те плиз с последней лабой, не успеваю ((.
"Программа просит ввести строку. Строка - это слова, разделенные пробелом. Посчитать кол-во слов в строке, начинающихся с гласной буквы, результат вывести на экран."
Алфавит, как я понимаю, латинский.

Наставьте на путь истиный

 

Mikl___

латиницу,маленькие

 

WoLfhOUnD
Используй битовые множества.

Код (Text):

1. org 100h
2. push $B800
3. pop  es
4. xor  di,di
5. @@:xor   ax,ax
6.    int   16h
7.    mov   dx,ax
8.    movzx eax,al
9.    bt    [numbers],eax
10.    jnc skip
11.    mov   ah,2
12.    stosw
13.    skip:
14.    dec   dh
15. jne @b
16. ret
17. numbers dd 0,111111111110000000000000000b,0,0,0,0,0,0