Графический режим с поддержкой мышки, проблемы с VESA2 Опции

[Bokul]

Код

uses vesa2;
begin
setvesa;
SetGraphMode(2);
initmouse;
showcursor;
readln;
end.

Вот эта программа вываливается в винду с ошибкой, после того как я подвигаю мышкою, если не двигать, то прога работает нормально - сначала видно курсор, такой как в винде, а после нажатия enter нормальное возвращения в Паскаль. В чем проблема?
Вот такая ошибка:

Borland Pascal 7.0
The NTVDM CPU has encountered an illegal instruction.
CS:0000 IP:0077 OP:f0 37 05 0e 02 Choose 'Close' to terminate the application.
---Close--- ---Ignore---

[volvo]

В чем проблема?

Никакого вылета при движении мыши не наблюдаю... Мышка двигается, жмется Enter, программа завершается... Если хочешь - попробуй запустить скомпилированный мной EXE, может у тебя компилятор глючит. А может быть - проблема с NTVDM, тогда пробуй запускать под DosBox...

P.S. Кстати, ты забыл в Uses добавить Graph, ведь именно там определена процедура SetGraphMode...

[Bokul]

Если хочешь - попробуй запустить скомпилированный мной EXE, может у тебя компилятор глючит

Ваш EXE работает отлично.

А может быть - проблема с NTVDM,

Что это такое?

тогда пробуй запускать под DosBox

Скачал, запустил, что дальше?

[volvo]

Ну, если мой EXE работает - то у тебя проблема с компилятором...

[Bokul]

Пробивал на двоих Borland и Turbo, картина одинаковая

Ну, если мой EXE работает - то у тебя проблема с компилятором...

Как ее решать? Где взять нормальный компилятор?

[Bokul]

Нашел pascal.sources.ru Turbo Pascal v6.0, он все нормально компилирует, только приходится боротся с неудобностями этой версии - нету подсветки и надо позановому компилировать модули.

Если кто то поделится ссылкой где можна скачать "нормальный" Turbo или Borland Pascal v7.0 буду признателен

[virt]

turbo pascal 7.0

ЗЫ
а почему не freepascal?

[Bokul]

Спасибо, virt. Сейчас проверю его на "нормальность" .

а почему не freepascal?

Я б его использовал, но только там вроде мышка не поддерживается в графическом режиме.

[Bokul]

Сейчас проверю его на "нормальность"

Тест не пройден , поиски продолжаются.

[volvo]

Я б его использовал, но только там вроде мышка не поддерживается в графическом режиме.

Угу, угу... Как же

А это зачем: Wingraph ?

[Bokul]

А это зачем: Wingraph ?

Сразу надо было меня туда носом ткнуть Спасибо, пришел конец моим мучениям

Угу, угу... Как же

Я имел ввиду в стандартном модуле mouse.