(read-char [file-descriptor])

Přečte jeden znak.

---

Tato funkce čte jeden znak ze souboru nebo klávesnice. Pokud je součástí deskriptoru souboru (přiřazen pomocí open funkce), read-char čte ze souboru. Když chybí deskriptor souboru, čte read-chart z klávesnice.

Funkce read-char ve skutečnosti nevrací písmeno, ale vrací kód ASCII tohoto písmena. Abyste skutečně viděli písmeno, musíte převést kód ASCII pomocí funkce chr.

PŘÍKLAD:

Pro následující příklad předpokládejme, že soubor file sample.lsp existuje a první řádek je "C:\Sample\First.txt".

Code	Returns
(setq file (open "sample.lsp" "r"))
(setq c (read-char file))	67
(setq a (chr c))	"C"
(read-char) [press A]	Waits for you to press a key. 65