Ok, vlw ;p
vc é o rafa belgra de samera né?
Versão Imprimível
Ok, vlw ;p
vc é o rafa belgra de samera né?
é só vc criar uma procedure com o nome do comando que vc quer criar.
no seu caso.
Procedure writexy(byte:coluna,linha;string:frase);
begin
gotoxy(coluna,linha);
write(frase);
end;
pra usar esta sub-rotina:
EX:
Writexy(21,15,'testo que vc quer mostrar');
21 e 15 representa a localização na tela onde sera mostrada a frase que vc colocar.
lembre se que a tela 25x80 então 1<=coluna<=80 e 1<=linha<=25