Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.05.13;
Скачать: [xml.tar.bz2];

Вниз

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

 
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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.004 c
1-39722
SB.John
2002-04-27 11:04
2002.05.13
Как присвоить событию свою процедуру


1-39794
oss
2002-04-25 01:27
2002.05.13
DLL+ADO+MSSQL


1-39701
ymin
2002-04-29 16:04
2002.05.13
Showmessage(‘Давление должно быть <’ +inttostr(int2*0.8));


1-39767
ice
2002-04-28 11:46
2002.05.13
Цвета (RGB Hex)


1-39805
foks
2002-04-28 15:33
2002.05.13
Как добавить пункт меню в работающее приложение





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский