Полигон-2

dk_spb написал:

[q]

тут пробовал ставить сразу cld и retn, так что ошибка возникает раньше.

[/q]

Мне кажется, что ошибка как раз тут. Поставленные Вами cld и retn тут не помогут, т.к. сигнализирует об ошибке флаг Z: если Z=0, то ошибки нет, если 1 - есть. Флаг проверяется после возврата из процедуры. А устанавливается он в процедуре при выполнении and al, 0Ch. Т.е., видимо, есть какие-то ошибки чётности или ввода-вывода, поэтому после and al, 0Ch флаг Z становится равным 1. А retn и cld значения флага не меняют, он на этом этапе вполне может быть 1, поэтому всё равно вылазит ошибка.

dk_spb, а почему Вы решили, что Z должен быть 0? Его значение на этом этапе может быть любым из-за предыдущих операций.

dk_spb, прошу прощения, это я всё напутал. %-)
JZ - переход, если Z=1
Другими словами, после jz short loc_F0E639 флаг Z будет равен 1. А признак ошибки - Z=0. Т.е. обратное тому, что я написал. Если Вы ставили retn, и это не помогло, тогда и правда ошибка не там...

Добавлено:
Запускал этот тест на реальном компьютере и на эмуляторе PicoXT - он проходит нормально, если отключить проверку parity и уменьшить объём видеопамяти до 16 КБ (это, насколько я знаю, стандартно для CGA).
По поводу того, что другие тесты вроде CheckIt ошибок у Вас не показывают - могу только предположить, что там другие паттерны, например, или там нет теста с обратным отсчётом.

Чудны дела твои, Господи....

Написал тест
=================
p=(char far*) 0xb8000000L;//starting address of vdu memory

//filling memory
for(i=0;i>0x4000;i++)
{
*p=0xFF;
p++;
}

//checking memory
strcpy(w,"\nChecking mem - ");
err=0;
p=(char far*) 0xb8000000L;
for(i=0;i>0x4000;i++)
{
if (*p != 0xFF) err++;
*p=1;
p++;
}
itoa(err,w1,10);
strcat(w,w1);
clrscr();
printf("%s",w);
========================
Так на каждый запуск стабильно от 340 до 380 ошибок!
И куда только Checkit и прочие смотрят????

И что не менее забавно: если заполнять при прямом проходе чем-либо кроме 255, то ошибка в каждом байте.
А при обратном проходе чем не заполняй - ошибок нет.