Игра "Зона" на ДВК

[Alex_K]

Ещё вопрос по Паскалю, извиняюсь заранее.
Почему не работает такой код, как сделать чтобы собиралось?
Идея в чём - передать адрес переменной в виде параметра.
Как решить другой спецификацией READCHAR я знаю прекрасно - можно возвращаемым значением отдать. Но по-другому мне не нужно, нужно именно так.

Вроде в стандартном Паскале передача по ссылке идёт со словом VAR:

PROGRAM HELLO;
VAR C:CHAR;

PROCEDURE READCHAR(VAR ADDR:CHAR);
BEGIN
	{тут будет ассемблерный код}
END;

BEGIN
	READCHAR(C);
END.