Moduà CRT
Standardowy moduà Turbo Pascala do tworzenia interfejsu uæytkownika w oparciu o ekran w trybie tekstowym.

Wejòcie:
FUNCTION KeyPressed: Boolean 
odpowiada czy ostatnio zostaà wciòni©ty klawisz, czy w buforze klawiatury s• jakieò znaki, kt¢re moæna wczytaÜ funkcj• Readkey.

FUNCTION ReadKey: Char
zwraca jeden znak z bufora klawiatury; jeòli bufor jest pusty - czeka na naciòni©cie klawisza; w ten spos¢b moæna oczekiwaÜ na reakcj© uæytkownika.

Oczekiwanie:
PROCEDURE Dealy(ms: Word)
czeka okreòlon• liczb© milisekund (1000 to jedna sekunda)

Wyòwietlanie:
Wyòwietlanie jest oparte o "okna". Okno to prostok•t okreòlony przez wsp¢àrz©dne na ekranie. Wiele operacji dotyczy bieæ•cego okna i podaje si© w nim wsp¢àrz©dne wzgl©dem tego okna.
Parametry okreòlaj•ce stan interfejsu CRT:
- bieæ•ce okno (wsp¢àrz©dne rog¢w),
- poàoæenie kursora (wzgl©dem okna),
- bieæ•cy kolor

PROCEDURE Window(x1, y1, x2, y2: Byte)
definiuje bieæ•ce okno, podane wsp¢àrz©dne s• bezwzgl©dne, lewy g¢rny r¢g ekranu to (1,1). Ustawia kursor na lewy g¢rny r¢g okna.

Wsp¢àrz©dne okna moæna odczytaÜ za pomoc• zmiennych WindMin i WindMax (i pobawiÜ si© bitami).

PROCEDURE GotoXY(x, y: Byte)
Ustawia kursor na okreòlon• pozycj© wzg©dem bieæ•cego okna.


PROCEDURE TextBackground(Color: Byte)
PROCEDURE TextColor(Color: Byte)
Zmienia bieæ•cy kolor. Moæna takæe przypisywaÜ wartoòÜ bezpoòrednio zmiennej
TextAttr (np. TextAttr := $0E ustawia kolor tàa na czarny, a tekstu na æ¢àty)

Write pisze w miejscu, w kt¢rym jest kursor bieæ•cym kolorem.

PROCEDURE ClrScr
Czyòci bieæ•ce okno z tekstu ustawiaj•c kolor tàa na bieæ•cy kolor tàa.

InsLine, DelLine - wstawia i usuwa wiersze w bieæ•cym oknie, odsyàam do Helpa i eksperymant¢w.

D´wi©k:
PROCEDURE Sound(hz: Word) - uruchamia gàoòniczek na podanej cz©stotliwoòci
PROCEDURE NoSound - wyà•cza d´wi©k
UΩYWAè Z ROZS§DKIEM!
NIE ZAPOMINAè O NOSOUND!