miram

Из fido7.ru.linguist. Прислал alexander smishlajev (2:5100/14.8). Исходное сообщение в fido7.humor.filtered гуглом не отыскивается.

--------------------------- Start Cut -------------------------
From : Roman V. Isaev, 2:5020/193.11 (12 Aug 95 13:12)
To : Dmitry Zavalishin
Subj : For hf? Latin basic...
---------------------------------------------------------------
From Roman V. Isaev to Dmitry.
Hails!

Я тут ржал полчаса, обнаружив в исходниках bwbasic (не путать с gwbasic)
фичу -- латинский язык! В readme написано, что этот интерпретатор начинала
писать бабушка автора (Я HЕ ШУЧУ!). Вот кусок хедера:

=== Cut ===
/****************************************************************

The following Latin conventions are used:

LATIN	ENGLISH
acies datorum	array (of data)
crusta	shell
litteras	(character) string
memoria mutabilis	RAM
organum	device
ordo	line
praeceptum	command
praecepta	program (commands)
praecepta interna	operating system
praeceptellum	function
tabula	file

****************************************************************/

#if LATIN
#define MES_SIGNON "Interpres et Crusta ad linguam BASIC, versionis"
#define MES_COPYRIGHT "Iure proprio scriptoris (c) 1992, Eduardi de Campobello"
#define MES_LANGUAGE "Cum nuntiis latinis ab ipso E. de C."
#define PROMPT "bwBASIC:"
#define ERROR_HEADER "ERRANT praecepta in ordine"
#define MATHERR_HEADER "ERRANT praecepta"
#define MES_BREAK "Intermittuntur praecepta in ordine"
#define ERR_OPENFILE "Non patet tabula quod <%s> vocatur"
#define ERR_GETMEM "Deest memoria mutabilis"
#define ERR_LINENO "Non adicitur novus ordo praeceptorum"
#define ERR_LNNOTFOUND "Non invenitur ordo praeceptorum <%d>"
#define ERR_LOADNOFN "LOAD requirit nomen ad tabulam"
#define ERR_NOLN "Non invenitur ordo praeceptorum"
#define ERR_NOFN "Non invenitur nomen ad tabulam"
#define ERR_RETNOGOSUB "RETURN sine GOSUB"
#define ERR_INCOMPLETE "Praeceptum imcompletum"
#define ERR_ONNOGOTO "ON sine GOTO sive GOSUB"
#define ERR_VALOORANGE "Numerus in praeceptis excedit fines"
#define ERR_SYNTAX "Non sequunter praecepta"
#define ERR_DEVNUM "Numerus ad organum invalidum est"
#define ERR_DEV "Errat organum"
#define ERR_OPSYS "Errant praecepta interna"
#define ERR_ARGSTR "Praeceptum requirit litteras"
#define ERR_DEFCHAR "ad varium definiendum"
#define ERR_MISMATCH "Non congruunt typus"
#define ERR_DIMNOTARRAY "Praeceptum requirit nomen ad aciem datorum"
#define ERR_OD "Desunt data"
#define ERR_OVERFLOW "Data excedunt fines"
#define ERR_NF "NEXT sine FOR"
#define ERR_UF "Non definitur praeceptellum"
#define ERR_DBZ "Non licet divisio ab nihilo"
#define ERR_REDIM "Non licet varium iterum definiendum"
#define ERR_OBDIM "Debet OPTION BASE procedere DIM"
#define ERR_UC "Praeceptum incognitum est"
#endif
=== Cut ===

Hf?!

/ With best wishes
/ Yours truly
/ Roman
-+- Golden AXE 2.50
+ Origin: % Connection closed by foreign orc host. (2:5020/193.11)

--------------------------- Final Cut -------------------------

UPD: ссылка по теме: Lingua::Romana::Perligata -- Perl for the XXIimum Century. Damian Conway's paper on the module that makes it possible to write Perl programs in Latin. - 101k.