Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.05.13;
Скачать: CL | DM;

Вниз

Ошибка в ассемблере   Найти похожие ветки 

 
sammy   (2002-04-28 11:21) [0]

получаю 4 ошибки в следующем коде
(ошибка типа invalid register combination)

function TForm1.GetComAvailable: byte; assembler;
const
BiosSeg = $0040;
DPMIInt = $31;
SegSel = $02;
Com1Off = 0;
Com2Off = 2;
Com3Off = 4;
Com4Off = 6;

asm
push es
mov ax,SegSel
mov bx,BiosSeg
int DPMIInt
mov dx,0
jc @Error
mov es,ax
mov di,0
cmp di,es:[di+Com4Off] //ошибка
rcl dx,1
cmp di,es:[di+Com3Off] //ошибка
rcl dx,1
cmp di,es:[di+Com2Off] //ошибка
rcl dx,1
cmp di,es:[di+Com1Off] //ошибка
rcl dx,1
@Error:
mov ax,dx
pop es
end;


 
sammy   (2002-04-28 11:42) [1]

если кто знает помогите пожалуста!
я асм еще не очень знаю!
Заранее спасибо


 
Vovchik ©   (2002-04-28 11:47) [2]

> cmp di,es:[di+Com4Off]

Вместо di он хочет 32-битный регистр, например edi. Попробуй везде поменять di на edi, может поможет.


 
Alx2 ©   (2002-04-29 10:35) [3]

Вот так попробуй:
cmp di,word ptr es:[di+Com4Off]


 
Alx2 ©   (2002-04-29 10:38) [4]

Вернее, так:
cmp di,word ptr es:[edi+Com4Off]


 
Anatoly Podgoretsky ©   (2002-04-29 10:47) [5]

Тут ошибок гораздо больше, но главная этот код для real mode, неприменим и не переделываемый под protected mode
Ты явно хочешь работать с ком портами, используй для этого WinApi


 
DarkGreen   (2002-04-29 13:52) [6]

2 Anatoly Podgoretsky ©
Зависит от конкретного компилятора, в BP 7.0 данный код будет работать, без каких либо исправлений (не считая комментариев), как в реальном, так и в защищенном режиме.



Страницы: 1 вся ветка

Текущий архив: 2002.05.13;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.008 c
1-39754
kull
2002-04-27 14:21
2002.05.13
TabOrder......


4-39897
Эдуард
2002-03-11 14:32
2002.05.13
Как получить некоторые значения из чужой программы


6-39812
Aaz
2002-02-27 04:29
2002.05.13
Sniffer. Не работает. Не открывает адаптер.


6-39808
kazakh
2002-01-28 16:02
2002.05.13
Telnet и еще раз telnet


14-39854
kronprince
2002-04-03 11:20
2002.05.13
Русский help к Ghost Installer?