Разное

Crt паскаль что это: Что такое uses crt

Анимация. Модуль Crt. — Информатика

Uses Crt;

Процедуры и функции модуля Crt

Функция/процедура

Описание 

AssignCrt 

Назначает текстовый  файл  для   устройства CRT

ClrEоl

Очищает все  символы,  начиная  от  позиции курсора до конца  строки,  без  перемещения курсора

ClrScr 

Очищает экран  и  помещает курсор в верхнем левом углу

Dеlау 

Выполняет задержку на указанное число  миллисекунд

DelLine

Удаляет строку, на которой находится курсор и перемещает все следующие строки  на  одну строку вверх. Нижняя строка очищается. 

GоtоХY

Выполняет позиционирование курсора. Х — это горизонтальная позиция,  Y  —  вертикальная позиция

НightVideo

Выбирает символы с подсветкой

InsLine

Вставляет пустую  строку в месте расположения курсора

KeyРrеssеd 

Возвращает значение Truе,  если клавиша  на клавиатуре  нажата  и  Falsе  — в противном случае

LowVidе

Выбирает символы с пониженной яркостью

NormVideo

Выбирает символы с нормальной яркостью

NoSound 

Выключает внутренний динамик

Sound

Включает внутренний динамик

TextВаckground

Выбирает фоновый цвет

TextColor

Выбирает цвет самого символа

TextМоdе

Выбирает конкретный текстовый режим

Window

Определяет на экране текстовое окно

Rеаdкеу 

Считывает символ с клавиатуры

WherеХ

Возвращает координату Х для текущей позиции курсора,  относящуюся  к  текущему окну.   Х представляет собой  горизонтальную позицию

WhereY

Возвращает координату Y для текущей позиции курсора,  относящуюся  к  текущему окну.  Y представляет собой вертикальную позицию

Crt под Delphi

 
Mortem ©   (2006-03-30 21:53) [0]

Пишу консольную прогу под компилятор Free Pascal. Попытался откомпилить из под Delphi. Ясно дело модуль Crt не нашёлся. А там куча функций из него бзаются для работы с консолью. Есть ли аналоги этого (пришедшего из ДОСовского ещё Паскаля, если мне память не изменяет) модуля под Delphi?
Заранее спасибо!


 
Гаврила ©   (2006-03-30 23:41) [1]

А сам то модуль этот есть н машине? в составе установки компилятора Free Pascal?
(я просто не в курсе как этот Free Pascal устроен, но предполагаю, что модуль где-то должен быть)


 
Mortem ©   (2006-03-31 00:38) [2]


> Гаврила ©   (30. 03.06 23:41) [1]

Он есть, но поставляется в откомпиленном виде. А как мне известно это не одно и то же, что и DCU.


 
Германн ©   (2006-03-31 00:56) [3]

А чем вызвана необходимость компилляции Дельфийским компиллятором чужеродных для Дельфи исходников?


 
Defunct ©   (2006-03-31 04:19) [4]

Германн ©   (31.03.06 00:56) [3]

вопрос действительно интересный.
на кой ляд оно нужно.

> Mortem ©

Пиши себе под Free Pascal и им же и компилируй.
на крайний случай бери BP7 и компилируй им.
(консоль это вообще-то последовательный ввод-вывод, функции типа GotoXY, WhereX и проч. из Crt нарушают идеологию работы консольного приложения и приведут к тому, что у такого приложения нельзя будет перенаправить консоль в другое окно. )


 
bw_original   (2006-03-31 04:46

) [5]

Mortem
Возьми исходники fp, да посмотри как там сделано.
Если не хочешь качать ~20Mb, попробую выковырять нужный код.
Обращайся по bw{кошка}uidz{тчк}ru.

p.s. Я тут мимо проходил, и форум проверять не буду.

..bw


 
PZ   (2006-03-31 09:12) [6]

Посмотрите здесь, много CRT32:
http://www.google.ru/search?hl=ru&q=crt32&btnG=%D0%9F%D0%BE%D0%B8%D1%81%D0%BA+%D0%B2+Google&lr=


 
Amoeba ©   (2006-03-31 11:06) [7]

Удалено модератором
Примечание: Личная переписка


 
Mortem ©   (

2006-03-31 11:41) [8]


> Amoeba ©   (31.


 
Amoeba ©   (2006-03-31 16:19) [9]

Удалено модератором
Примечание: Личная переписка


единиц ЭЛТ — ссылка

единица ЭЛТ — ссылка

Блоки обработки экрана и клавиатуры Mad Pascal

автор: Томаш Бела (Тебе)

http://www.freepascal.org/docs-html/rtl/crt/index-5.html

Константы:

40025 Цвет на адаптере0021
00320020 $C
9
Имя:0011 CN_START_OPTION 2
CN_OPTION 3
CN_START_SELECT 4
CN_SELECT 5
CN_START 6
CN_NONE 7
BW40 0 40×25 Ч/Б на цветном адаптере
CO40 1
BW80 2 80×25 B/W on Color Adapter
CO80 3 80×25 Color on Color Adapter
Mono 7 80×25 on Monochrome Adapter
C40 CO40
C80 CO80
Black $ 0
White $ 00021
White $
$ 1
White $ 1
White $ 1
White $
.
0011
RED $2
CYAN $3
PURPLE $4
GREEN $5
BLUE $6
YELLOW $ 7
Orange $ 8
Браун $
Light_red $
.0011 DARK_GREY $B
GREY $C
LIGHT_GREEN $D
LIGHT_BLUE $E
LIGHT_GREY $F
Black $ 0
White $ 1
RED $ 2
Cyan $ 3
Cyan $ 3
$ 3
$ 3
$ 3
$ 3
PURPLE $4
GREEN $5
BLUE $6
YELLOW $7
ORANGE $8
BROWN $
Yellow_green $ A
Pink $ B
Blue_Green
LIGHT_BLUE $D
DARK_BLUE $E
LIGHT_GREEN $F
BLACK $00
WHITE $0F
RED $26
CYAN $AC
PURPLE $48
GREEN $B6
BLUE $86
YELLOW $DC
ORANGE $18
BROWN $F4
LIGHT_RED $ 2A
Dark_grey $ 04
Grey $ 08
Light_green $ BC
Light_green $ BC
Light_green $ BC
Light_green $ BC
0032
LIGHT_BLUE $9A
LIGHT_GREY $0C
Blink 128

Register Variables:

Название: Адрес: Тип: Описание:
Consol $ D01F BYTE CONSOL Regist
имя: тип: описание:
TextAttr byte = 0 Text Attribute

Прочие коды | shdon.

com

Ошибка Turbo Pascal

Ошибка в стандартном ЭЛТ-модуле Turbo Pascal. Эта ошибка вызывает ошибку «Деление на ноль» на Pentium II и выше. Любая программа, использующая блок ЭЛТ, дает сбой. Если, как и многие люди, вы используете CRT только для «ClrScr», «GotoXY», «Delay», «Readkey» и «KeyPressed», то вместо этого вы можете использовать мой сменный блок Small CRT. В нем нет ошибки… до тех пор, пока компьютеры не станут в 30 000 раз быстрее, чем их нынешняя скорость.

Чтобы загрузить исходный код Pascal (3k), щелкните здесь.

Процедура задержки

Мне сказали, что в Microsoft C нет процедуры «задержки». Поскольку я не использую MS-C, я не могу это проверить. Здесь, однако, процедура задержки.

Добавьте #include «delay.h» в примеры программ и замените все ссылки на задержку на MilliDelay. Этот файл содержит MilliDelay (long n) и MicroDelay (long m), которые ожидают n миллисекунд или m микросекунд соответственно.

Чтобы загрузить исходный код C (0k), щелкните здесь.

Для программистов Pascal также доступны подпрограммы MicroDelay, поскольку задержка TurboPascal имеет разрешение только в миллисекундах

Чтобы загрузить исходный код Pascal (0k), щелкните здесь.

Подпрограммы расширенной памяти

Модуль Turbo Pascal, который позволяет напрямую использовать память XMS (расширенную) в программах DOS.

Чтобы загрузить исходный код Pascal (3k), щелкните здесь.
Чтобы загрузить исходный код C(++) (3k), щелкните здесь.

Расширение обработчика клавиатуры

Исходный код для перехвата нажатия и отпускания клавиши курсора. Это позволяет непрерывно перемещать персонажа игрока вместо повторения, генерируемого обработчиком клавиатуры BIOS.

Чтобы загрузить исходный код Pascal (2k), щелкните здесь.
Чтобы загрузить исходный код DJGPP/C(++) (2k), нажмите здесь.

Многие люди запрашивали список скан-кодов для всех клавиш на клавиатуре, которые будут использоваться с заменяющим обработчиком клавиатуры, так что вот он.

Добавить комментарий

Ваш адрес email не будет опубликован. Обязательные поля помечены *