#include <conio.h>
#include <graphics.h>
#include <stdio.h>
void
taj_body();
void
left_minars();
void
right_minars();
void
main()
{
int
gd = DETECT, gm;
initgraph(&gd, &gm,
"C:\\turboc3\\bgi"
);
taj_body();
left_minars();
right_minars();
getch();
closegraph();
}
void
taj_body()
{
rectangle(10, 650, 1350, 680);
rectangle(550, 300, 800, 650);
rectangle(540, 290, 810, 650);
line(600, 650, 600, 400);
line(750, 650, 750, 400);
line(600, 400, 675, 390);
line(675, 390, 750, 400);
arc(675, 240, 330, 210, 155);
line(655, 85, 675, 30);
line(675, 30, 695, 87);
line(540, 315, 445, 315);
arc(490, 315, 0, 180, 45);
line(480, 270, 490, 250);
line(490, 250, 500, 270);
line(445, 315, 445, 355);
line(445, 355, 540, 355);
line(445, 375, 540, 375);
line(445, 355, 375, 370);
line(445, 375, 375, 390);
line(375, 370, 375, 650);
rectangle(450, 390, 530, 650);
line(450, 520, 530, 520);
line(440, 650, 440, 390);
line(385, 650, 385, 405);
line(440, 390, 385, 405);
line(440, 520, 385, 520);
line(460, 650, 460, 585);
line(520, 650, 520, 585);
line(460, 585, 490, 555);
line(520, 585, 490, 555);
line(460, 520, 460, 455);
line(520, 520, 520, 455);
line(460, 455, 490, 425);
line(520, 455, 490, 425);
line(810, 315, 905, 315);
arc(860, 315, 0, 180, 45);
line(850, 270, 860, 250);
line(860, 250, 870, 270);
line(905, 315, 905, 355);
line(905, 355, 810, 355);
line(905, 355, 810, 355);
line(905, 375, 810, 375);
line(905, 355, 975, 370);
line(905, 375, 975, 390);
line(975, 370, 975, 650);
rectangle(820, 390, 900, 650);
line(820, 520, 900, 520);
line(910, 650, 910, 390);
line(965, 650, 965, 405);
line(910, 390, 965, 405);
line(910, 520, 965, 520);
line(830, 650, 830, 585);
line(890, 650, 890, 585);
line(830, 585, 860, 555);
line(890, 585, 860, 555);
line(830, 520, 830, 455);
line(890, 520, 890, 455);
line(830, 455, 860, 425);
line(890, 455, 860, 425);
}
void
left_minars()
{
line(20, 650, 30, 500);
line(120, 650, 110, 500);
line(110, 500, 30, 500);
line(30, 500, 20, 480);
line(110, 500, 120, 480);
line(120, 480, 20, 480);
line(30, 480, 40, 330);
line(110, 480, 100, 330);
line(40, 330, 100, 330);
line(40, 330, 30, 310);
line(100, 330, 110, 310);
line(110, 310, 30, 310);
line(40, 310, 50, 160);
line(100, 310, 90, 160);
line(50, 160, 90, 160);
line(50, 160, 40, 140);
line(90, 160, 100, 140);
line(40, 140, 100, 140);
line(40, 140, 60, 120);
line(100, 140, 80, 120);
line(60, 120, 80, 120);
line(60, 120, 70, 100);
line(70, 100, 80, 120);
line(170, 650, 180, 575);
line(270, 650, 260, 575);
line(180, 575, 260, 575);
line(180, 575, 170, 555);
line(260, 575, 270, 555);
line(170, 555, 270, 555);
line(180, 555, 190, 480);
line(260, 555, 250, 480);
line(190, 480, 250, 480);
line(190, 480, 180, 460);
line(250, 480, 260, 460);
line(180, 460, 260, 460);
line(190, 460, 200, 385);
line(250, 460, 240, 385);
line(200, 385, 240, 385);
line(200, 385, 190, 365);
line(240, 385, 250, 365);
line(190, 365, 250, 365);
line(190, 365, 210, 345);
line(250, 365, 230, 345);
line(210, 345, 230, 345);
line(210, 345, 220, 325);
line(220, 325, 230, 345);
}
void
right_minars()
{
line(1340, 650, 1330, 500);
line(1240, 650, 1250, 500);
line(1330, 500, 1250, 500);
line(1330, 500, 1340, 480);
line(1250, 500, 1240, 480);
line(1240, 480, 1340, 480);
line(1330, 480, 1320, 330);
line(1250, 480, 1260, 330);
line(1320, 330, 1260, 330);
line(1320, 330, 1330, 310);
line(1260, 330, 1250, 310);
line(1250, 310, 1330, 310);
line(1320, 310, 1310, 160);
line(1260, 310, 1270, 160);
line(1310, 160, 1270, 160);
line(1310, 160, 1320, 140);
line(1270, 160, 1260, 140);
line(1320, 140, 1260, 140);
line(1320, 140, 1300, 120);
line(1260, 140, 1280, 120);
line(1300, 120, 1280, 120);
line(1280, 120, 1290, 100);
line(1290, 100, 1300, 120);
line(1090, 650, 1100, 575);
line(1190, 650, 1180, 575);
line(1100, 575, 1180, 575);
line(1100, 575, 1090, 555);
line(1180, 575, 1190, 555);
line(1090, 555, 1190, 555);
line(1100, 555, 1110, 480);
line(1180, 555, 1170, 480);
line(1110, 480, 1170, 480);
line(1110, 480, 1100, 460);
line(1170, 480, 1180, 460);
line(1180, 460, 1100, 460);
line(1110, 460, 1120, 385);
line(1170, 460, 1160, 385);
line(1120, 385, 1160, 385);
line(1110, 365, 1120, 385);
line(1160, 385, 1170, 365);
line(1110, 365, 1170, 365);
line(1110, 365, 1130, 345);
line(1170, 365, 1150, 345);
line(1130, 345, 1150, 345);
line(1130, 345, 1140, 325);
line(1140, 325, 1150, 345);
}