Как залить сектора окружности?

[ai\ekcah^p]

Рисую самолет.
Как закрасить сектора окружности pieslice(420,220,0,90,30)-коричневым,
pieslice(420,220,270,360,30)-розовым.
Заранее благодарен.


uses graph,crt;
var
gd,gm:integer;
begin
gd:=detect;
initgraph(gd,gm,'x:\bp');
if graphresult<>0 then
begin
write(' owibka ',grapherrormsg(graphresult));
halt;
end;

setbkcolor(15);
setcolor(1);
moveto(200,250);
lineto(100,150);
lineto(180,150);
lineto(210,190);
lineto(300,190);
setcolor(3);
lineto(380,160);
lineto(400,190);
setcolor(1);
lineto(420,190);


pieslice(420,220,0,90,30);

pieslice(420,220,270,360,30);

line(420,250,200,250);
line(300,220,200,310);
line(200,310,250,310);
line(250,310,350,220);
line(420,190,420,250);
line(420,220,450,220);

readln;
closegraph;
end.

[ai\ekcah^p]

Я разобрался.
Кому интересно ,это делается с помощью SetFillStyle.
Пример использования PieSlice:

SetFillStyle(10, 10); {установка стиля}