A c++ program to per-posed a Girl

Source code is below::
Enjoy my Friends::

#include
#include
#include
#include
void main()
{
int gd=DETECT,gm,i=0,j=0,k=0,l=0,t=0;
initgraph(&gd,&gm,"C:\TC\BGI");

for(int f=0;f<=300;f) { cleardevice();
setcolor(BLUE); line(50,420,90,420);
arc(110,420,0,180,20);
line(130,420,220,420);
arc(240,420,0,180,20);
line(260,420,300,420);
line(300,420,300,400);
line(300,400,240,380);
setcolor(RED); line(240,380,200,350);
line(200,350,130,350);
line(100,380,130,350);
line(50,400,50,420);
line(50,400,100,380);
for(int k=0;k<=17;k) { setcolor(GREEN); circle(110,420,k);
circle(240,420,k); setcolor(WHITE); circle(550,40,k); }
setcolor(BLUE); line(230,380,200,360);
line(200,360,170,360);
line(170,380,170,360);
line(230,380,170,380);
line(160,380,160,360);
line(160,380,110,380);
line(110,380,130,360);
line(130,360,160,360);
{ setfillstyle(1,BROWN); bar(607-f,280,621-f,437); settextstyle(1,HORIZ_DIR,4); setcolor(WHITE); outtextxy(580-f,230,"Stop"); rectangle(575-f,230,650-f,280); delay(15); } }
getch(); goto A;

A:
for(i=0;i<=25;i++) { cleardevice(); bar(31,280,43,437); settextstyle(1,HORIZ_DIR,4); setcolor(WHITE); outtextxy(5,230,"Stop"); rectangle(0,230,75,280); setcolor(WHITE); circle(77+l,302,18); arc(86+l,295,270,160,2); arc(85+l,292,50,140,2); arc(85+l,308,200,340,3);
setcolor(CYAN); line(72+l,320,72+l,390); line(72+l,320,72+j+l,375-i);
setcolor(RED); arc(77+l,295,0,190,20); line(59+l,285,59+l,296); arc(102+l,300,40,130,9); //cap
setcolor(WHITE); line(85+l,299,85+l,305); line(72+l,390,45+l+j,440); line(72+l,390,99-j+l,440);
{ setcolor(WHITE); { setfillstyle(1,CYAN); bar(418,282,426,286); setcolor(WHITE); arc(413,302,0,130,18); line(431,302,431,360); arc(410,302,0,120,18); line(428,302,431,360); line(429,302,429,360); line(426,290,426,360); setcolor(WHITE);} //hair
setfillstyle(1,BROWN); { line(414,390,386,440); line(414,390,436,440); circle(410,302,18); arc(401,295,60,290,2); arc(401,292,30,130,2); line(401,299,401,305); setcolor(RED); arc(401,308,200,340,3); line(414,320,414,390); } }
line(415,318,393,357);
j=j+1; delay(20); if(i25) { i=0;j=0; k=k+1;} if(k10) {goto B;} l=l+1;

B:
{ cleardevice(); setcolor(WHITE); circle(327,302,18); arc(336,295,270,160,2); arc(335,292,50,140,2); arc(335,308,200,340,3); line(335,299,335,305); line(322,390,295,440); line(322,390,349,440); { line(414,390,386,440); line(414,390,436,440); circle(410,302,18); { setfillstyle(1,CYAN); bar(418,282,426,286); setcolor(WHITE); arc(413,302,0,130,18); line(431,302,431,360); arc(410,302,0,120,18); line(428,302,431,360); line(429,302,429,360); line(426,290,426,360); setcolor(WHITE);} //hair
arc(401,295,60,290,2); arc(401,292,30,130,2); line(401,299,401,305); setcolor(RED); arc(401,308,200,340,3); line(415,318,393,357); line(414,320,414,390); } setcolor(CYAN); line(322,320,322,390); line(322,320,345,360);
setcolor(RED); arc(327,295,0,190,20); line(309,285,59+l,296); arc(352,300,40,130,9); //cap
settextstyle(1,HORIZ_DIR,3); outtextxy(50,200,"Aik bat Kahun kia ijazat h ???"); setcolor(WHITE); rectangle(40,200,420,250); line(300,250,315,275); }
getch();

line(322,320,322,390); line(322,320,345,360);
arc(327,295,0,190,20); line(309,285,59+l,296); arc(352,300,40,130,9); //cap
settextstyle(1,HORIZ_DIR,3); outtextxy(50,200,"Han Bolo....!!"); setcolor(WHITE); rectangle(40,200,420,250); line(360,250,385,275); } getch();

{
cleardevice(); setcolor(WHITE); { setfillstyle(1,CYAN); bar(418,282,426,286); setcolor(WHITE); arc(413,302,0,130,18); line(431,302,431,360); arc(410,302,0,120,18); line(428,302,431,360); line(429,302,429,360); line(426,290,426,360); setcolor(WHITE);} //hair
circle(325,339,18); arc(336,332,270,160,2); arc(335,330,50,140,2); arc(335,346,200,340,3); line(335,337,335,346);
line(290,440,322,440); //legs
{ line(414,390,386,440); line(414,390,436,440); circle(410,302,18); arc(401,295,60,290,2); arc(401,292,30,130,2); line(401,299,401,305); setcolor(RED); arc(401,308,200,340,3); line(415,318,393,357); line(414,320,414,390); }
setcolor(CYAN); line(322,360,322,440); //body
line(322,380,365,370); //arm
setcolor(GREEN); line(365,340,365,370); line(361,343,365,340); line(361,340,365,340); line(361,337,365,340);
line(369,343,365,340); line(369,340,365,340); line(369,337,365,340);
setcolor(RED); arc(363,337,290,90,4); arc(367,337,90,250,4);
setcolor(CYAN); arc(324,332,0,190,20); line(306,322,59+l,333); arc(349,337,40,130,9); //cap
setcolor(WHITE); rectangle(0,0,600,250); line(260,250,275,345); }
for(int r=0;r<=200;r) { circle(10,10+r,5); delay(5); }
setcolor(RED); for(r=0;r<=200;r) { circle(50,10+r,5); delay(5); }
for(r=0;r<80;r) { circle(50+r,210,5); delay(5); }
setcolor(YELLOW); for(r=0;r<80;r) { circle(150,130+r,5); delay(5); }
for(r=0;r<80;r) { circle(200,130+r,5); delay(5); }
for(r=0;r<50;r) { circle(150+r,130,5); delay(5); }
for(r=0;r<50;r) { circle(150+r,210,5); delay(5); }
setcolor(BROWN); for(r=0;r<40;r) { circle(220+r,130+t,5); circle(219+r,129+t,5); t=t+2; delay(5); } t=0;
for(r=0;r<40;r) { circle(260+r,210-t,5); circle(259+r,209-t,5); t=t+2; delay(5); }
setcolor(GREEN); for(r=0;r<80;r) { circle(320,130+r,5); delay(5); }
for(r=0;r<50;r) { circle(320+r,130,5); delay(5); }
for(r=0;r<50;r) { circle(320+r,170,5); delay(5); }
for(r=0;r<50;r) { circle(320+r,210,5); delay(5); } t=0;
setcolor(CYAN); for(r=0;r<40;r) { circle(390+r,10+t,5); circle(389+r,9+t,5); t=t+2; delay(5); } t=0;
for(r=0;r<40;r) { circle(430+r,90-t,5); t=t+2; circle(429+r,89-t,5); delay(5); }t=0;
for(r=0;r<120;r) { circle(430,90+r,5); delay(5); }
setcolor(MAGENTA); for(r=0;r<50;r) { circle(460+r,130,5); delay(5); }
for(r=0;r<50;r) { circle(460+r,210,5); delay(5); }
for(r=0;r<80;r) { circle(460,130+r,5); delay(5); }
for(r=0;r<80;r) { circle(510,130+r,5); delay(5); }
setcolor(BLUE); for(r=0;r<80;r) { circle(530,130+r,5); delay(5); }
for(r=0;r<50;r) { circle(530+r,210,5); delay(5); }
for(r=0;r<80;r++) { circle(580,210-r,5); delay(5); } getch();

 { cleardevice(); outtextxy(60,220,"Koi bat Ni"); setcolor(CYAN); outtextxy(60,260,"Always Be Happy"); outtextxy(60,300,"Bye.Take Care"); }

else
{ cleardevice();
for(i=0;i<=100;i++)
{
setcolor(RED);
circle(200,200+i,5);
setcolor(YELLOW);
circle(300,300+i,5);
setcolor(BLUE);
circle(250,250+i,5);
setcolor(GREEN);
circle(350,350+i,5);
setcolor(GREEN);
circle(10+i,10,5);
setcolor(YELLOW);
circle(30+i,30,5);
setcolor(BLUE);
circle(50+i,50,5);
setcolor(RED);
circle(70+i,70,5);
setcolor(RED);
circle(400+i,90,5);
setcolor(BLUE);
circle(330+i,70,5);
setcolor(GREEN);
circle(250+i,10,5);
setcolor(YELLOW);
circle(300+i,30,5);
setcolor(BLUE);
circle(250+i,250+i,5);
setcolor(YELLOW);
circle(200+i,100+i,5);
setcolor(RED);
circle(200+i,200+i,5);
setcolor(YELLOW);
circle(110,100+i,5);
setcolor(WHITE);
circle(150+i,150,5);
setcolor(WHITE);
circle(250+i,150,5);
circle(400+i,150+i,5);
circle(300+i,100+i,5);
circle(500,200+i,5);
circle(200+i,500,5);
circle(100+i,400,5);
setcolor(YELLOW);
circle(100,350+i,5);
circle(150,300+i,5);
circle(200,250+i,5);
circle(250,200+i,5);
circle(300,150+i,5);
circle(350,100+i,5);
setcolor(GREEN);
circle(350+i,100,5);
circle(300+i,150,5);
circle(250+i,200,5);
circle(200+i,250,5);
circle(150+i,300,5);
circle(100+i,350,5);
setcolor(CYAN);
settextstyle(1,HORIZ_DIR,4);
outtextxy(100,200,"Hurrraaayyyy...!!!");
outtextxy(100,240,"Phly Kbhi btaya Q ni chawal....??? ;) :P "); if(i==50) goto Z;
delay(50);
cleardevice();
}
}

Z:
getch();

}

Up-vote , Resteem and Follow me for most interesting posts