Pascal/Turbo Pascal - necesito una funcion para esconder el cursor

Por favor a quien pueda enviarme una funcion que haga desaparecer el cursor de texto se lo agradeceria muchisimo.

Hola, aqui tienes.

program cursor;
uses crt;
procedure Apagar; assembler;
asm
mov cx, $2000
xor ax, ax
mov ah, $01
int $10
end;
procedure Encender; assembler;
asm
mov ch, $0D
mov cl, $0E
xor ax, ax
mov ah, $01
int $10
end;
begin
clrscr;
Apagar;
writeln('Hola mundo...');
readkey;
Encender;
readkey;
end.

Saludos.

GRACAS PANCHO POR LA FUNCION.
SALUDOS.

Hace mucho que no trabajo con Pascal, pero no alcanzaba con fijar la posicion del cursor en (0,0)?? (puedo equivocarme de lenguaje)

No, creo que eso es de Clipper :).