Всех с Днем Черного Кота! Как отпраздновали?

uses // 17 ноября - День Чёрного Кота
GraphABC;

begin
// Тело
Line(220, 100, 200, 380);
Line(420, 100, 440, 380);
Line(200, 380, 440, 380);
Arc(320, 290, 140, 120, 60);

// Уши
Line(220, 100, 250, 170);
Line(420, 100, 390, 170);
floodfill(320,240,clblack);
// Глаза
Circle(290, 220, 30);
Circle(350, 220, 30);

SetBrushColor(Color.Black);
Circle(310, 220, 5);
Circle(330, 220, 5);

// Нос
SetBrushColor(Color.Pink);
Circle(320, 240, 10);

// Рот
SetPenColor(Color.Pink);
Line(320, 250, 320, 290);
Arc(320, 230, 60, -130, -50);

// Усы
Line(239, 270, 310, 245);
Line(239, 280, 310, 245);
Line(239, 290, 310, 245);

Line(329, 245, 400, 270);
Line(329, 245, 400, 280);
Line(329, 245, 400, 290);

// Лапы
Arc(250, 390, 30, 160, 20);
Arc(390, 390, 30, 160, 20);

Line(240, 380, 240, 370);
Line(250, 380, 250, 370);
Line(260, 380, 260, 370);

Line(380, 380, 380, 370);
Line(390, 380, 390, 370);
Line(400, 380, 400, 370);
end.