Модуль VCRT

  Модуль предсавляет собой модифицированный стандартный модуль CRT
для Turbo Pascal 6.0,5.5  в который не добавлено практически ни одной
новой функции, но работа некоторых весьма стандартных функций
изменена так, как это казалось автору более логичным. Кроме
того ряд функций, бывших внутренними выведен в интерфейс.

   Изменение первое - драйвер текстовых файлов :
   1. В графических режимах CGA 320x200, EGA и VGA атрибуты
   символов обрабатываются так же как и в текстовых.
   2. Процедуры READ и READLN допускают редактирование с
   помощью стрелок, клавиш Home, End, BackSpace и Delete.
   3. Процедуры READ и Readln в графических режимах эмулируют
   курсор

   Изменуние второе:
   Процедуры
    InsLine, DelLine, ClrEol, ClrScr обрабатывают атрибуты во всех
    графических режимах

   Изменение третье
    Добавлены процедуры
     ReInitCrt - инициализация внутренних переменных
       необходимо вызывать после изменения режима экрана не
       средствами VCRT для корректной работы.
     ReadKeyWord - возвращает двухбайтовый код нажатой клавиши
      Старший байт - скэнкод.
     Beep - выдает стандартный звуковой сигнал. Эквивалент
       Write(#7)

    Изменение третье:
     Переменная DirectVideo инициализируется в False, если текущий
     режим графический.
    Ограничения:
    1. Вывод на экран всегда через Bios, независимо от значения
    DirectVideo
    2. Процедура Readln не позволяет вводить строки,
    превышающие расстояние до правой границы экрана.

                       Модуль VCRTEXT

    Содержит расширения CRT, весьма полезные и отчасти повторяющие
    процедуры tpCrt и opCrt (Copyright by TurboPower Software), но,
    как и VCRT, корректно работающие в графике.

     Procedure FrameWindow(X1,Y1,X2,Y2) - рисует рамку. Символы
     задают