Графика в FPC 2.2.0 Опции

[mr.voland]

Вобщем есть задание нарисовать чебурашку.
В колледже мы используем БП, дома у меня стоит виста поэтому юзаю FPC
В учебники сказано что пистаь надо так.

programm test;
uses Graph;
var driver, mode: integer;
Begin
driver:=detect;
initgraph (driver, mode, 'C:\TP\BGI');
Ellipse (200,250,0,359,10,20); (это овал)
closegraph;
end.

папки C:\TP\BGI у меня естественно нет я не чего умне как взять папку из БП скопировал папку в фрипаскаль не придумал.
Но не работает (чесно говоря я и не удивлен)
собственно и вопрос что делать?.
Заранее благодарен.

[volvo]

собственно и вопрос что делать?

Исправлять, разумеется...

uses graph;
var 
  driver, mode: smallint; { <--- InitGraph работает не с integer-ами, а со SmallInt }
Begin 
  // driver:=detect; { это делать в FPC необязательно }
  initgraph (driver, mode, ''); { <--- Путь тоже можно не указывать }
  Ellipse (200,250,0,359,10,20);
  readln; { <--- ждешь нажатия на Enter }
  closegraph;
end.

Все работает...