18.5.1. Установка размера области испытаний
Функция OvrGetRetry : LongInt возвращает текущий размер области испытаний. До вызова процедуры OvrGetRetry будет всегда возвращать нуль.
Процедура OvrSetRetry(Size : LongInt) устанавливает размер области испытаний в оверлейном буфере. Теперь при попадании оверлея в последние Size байт буфера он автоматически ставится на «испытание» стартовый размер области испытаний равен нулю, что, по сути, блокирует работу механизма испытаний. Определить размер области испытаний можно только методом проб и ошибок. В техническом описании Турбо Паскаля рекомендуется отводить под эту область немногим более трети буфера. Включение механизма оптимизации ускоряет работу администратора оверлеев, но немного замедляет обращения к хранящимся в оверлеях подпрограммам. Вызов процедуры OvrSetRetry должен стоять после вызовов OvrInit и OvrInitEMS:
OvrInit(ovr_name); {инициализация администратора}
OvrInitEMS; {попытка использовать EMS}
{Назначение области испытаний (и включение оптимизации):}
OvrSetRetry(OvrGetBuf div 3);