Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Работа с большими числами [D6, WinXP]


dubolom ©   (2006-03-28 20:48:00) 

Имеется задача: создать калькулятор для работы с большими числами (целыми). Предполагаемое решение: числа хранить в массивах байтов. Один байт - одна цифра. Реализация сложения таких чисел:

asm
mov cx,len; //len - разрядность числа
lea di,a;  //a,b - числа
lea si,b;
les bx,c; //c:=@a;
cc: mov al,es:[di];
adc dl,es:[si];
aaa;
mov es:[di],al;
inc di;
inc si;
loop cc;
adc es:[di],0;
end;
Но на строке mov al,es:[di] возникает исключение Access Violation, хотя адреса загружаются правильно. Почему оно возникает и как его обойти? Если нельзя, то существует ли решение этой задачи чисто на Delphi (без эмуляции вышеупомянутых ассемблерных команд)?


dubolom   (2006-03-29 06:13:00) [1]

Спасибо за ответы.


Rial   (2006-03-29 01:23:00) [2]

Вот здесь можно найти кое-что для твоих целей (+-*/ для целых чисел любой длины):
http://www.rial578.narod.ru/bigzahlen.pas


Pavia   (2006-03-28 23:00:00) [3]

Ты программируешь в 32 разрадном режиме. Поэтому тебе нужно заменить.
DI на EDI
SI на ESI
и др. А также лучше работать не с Byte, а с DWord.
И конечно это можно реализовать без используя ассемблерные вставок.


Наверх

Титульная страница Поиск, карта сайта Написать письмо