summaryrefslogtreecommitdiff
path: root/fpcdocs/crtex/ex7.pp
blob: f04174eb8b9702df5570997e8c2fb97bea2c607f (plain)
1
2
3
4
5
6
7
8
Program Example7;
uses Crt;

{ Program to demonstrate the WhereX and WhereY functions. }

begin
  Writeln('Cursor postion: X=',WhereX,' Y=',WhereY);
end.