#include<graphics.h>
#include<dos.h>
#include<conio.h>
#include<alloc.h>
void *buf;
void firstleft();
void secondleft();
void main()
{
int gd=DETECT,gm,i=0,x,y,area;
initgraph(&gd,&gm,"tc:\bgi");\put your directory contains egavga.bgi
rectangle(0,0,getmaxx(),getmaxy());
arc(240,120,40,140,70);
ellipse(165,80,10,280,20,20);
ellipse(315,80,-100,170,20,20);
arc(235,120,163,215,70);
arc(245,120,-35,17,70);
ellipse(193,178,85,280,40,20);
ellipse(283,178,-100,95,40,20);
ellipse(238,199,180,0,39,50);
ellipse(213,123,44,240,33,40);
ellipse(262,123,-60,135,33,40);
ellipse(210,123,0,360,13,20);//left eye
ellipse(265,123,0,360,13,20);//right eye
ellipse(210,133,0,360,10,10);//left eye ball
ellipse(265,133,0,360,10,10);//right eye ball
ellipse(210,133,0,360,3,3);//left eye ball
ellipse(265,133,0,360,3,3);//right eye ball
ellipse(238,160,0,360,10,13);//nose
arc(240,125,228,312,68);//mouth
arc(240,120,230,310,72);//mouth
setfillstyle(1,4);
floodfill(238,160,15);//nose
setfillstyle(1,15);
floodfill(210,113,15);
floodfill(265,113,15);
setfillstyle(1,9);
floodfill(210,100,15);
setfillstyle(1,1);
floodfill(315,80,15);
moveto(203,220);
lineto(203,260);
lineto(183,260);
lineto(183,350);
lineto(293,350);
lineto(293,260);
lineto(273,260);
lineto(273,220);
moveto(183,350);
lineto(173,460);
lineto(213,460);
lineto(238,400);
lineto(263,460);
lineto(303,460);
lineto(293,350);
moveto(173,460);
lineto(143,478);
lineto(213,478);
lineto(213,460);
moveto(263,460);
lineto(263,478);
lineto(333,478);
lineto(303,460);
line(238,400,238,350);
//right hand
moveto(183,260);
lineto(113,310);
lineto(183,375);
moveto(183,280);
lineto(137,310);
lineto(181,353);
setfillstyle(2,13);
floodfill(190,300,15);
setfillstyle(1,5);
floodfill(223,400,15);
setfillstyle(1,5);
floodfill(253,400,15);
setfillstyle(1,6);
floodfill(173,470,15);
floodfill(303,470,15);
//fingers
secondleft();
ellipse(413.5,228,0,180,3.5,3.5);
line(420,240,433,240);
line(423,247,440,247);
line(413,240,410,228);
line(417,228,420,240);
ellipse(433,243.5,-90,90,3.5,3.5);
line(423,254,440,254);
ellipse(440,250.5,-90,90,3.5,3.5);
ellipse(430,257,-90,90,3,3);
line(413,260,430,260);
area=imagesize(409,224,444,261);
getimage(409,224,444,261,buf);
while(!kbhit())
{
if(i==0)
{
setfillstyle(1,15);
setcolor(15);
ellipse(210,133,0,360,10,10);//left eye ball
ellipse(265,133,0,360,10,10);//right eye ball
setcolor(0);
ellipse(210,133,0,360,3,3);//left eye ball
ellipse(265,133,0,360,3,3);//right eye ball
floodfill(210,133,15);
floodfill(265,133,15);
setcolor(0);
putimage(391,209,buf,1);
firstleft();
setcolor(15);
secondleft();
putimage(409,224,buf,0);
i=1;
}
else
{
setfillstyle(1,0);
setcolor(0);
ellipse(210,133,0,360,10,10);//left eye ball
ellipse(265,133,0,360,10,10);//right eye ball
floodfill(210,133,0);
floodfill(265,133,0);
setcolor(15);
ellipse(210,133,0,360,3,3);//left eye ball
ellipse(265,133,0,360,3,3);//right eye ball
floodfill(210,133,15);
floodfill(265,133,15);
setcolor(0);
putimage(409,224,buf,1);
secondleft();
setcolor(15);
firstleft();
putimage(391,209,buf,0);
i=0;
}
delay(300);
}
}
void firstleft()
{
moveto(293,260);
lineto(353,276);
lineto(395,223);
moveto(293,280);
lineto(355,296);
lineto(395,245);
}
void secondleft()
{
moveto(293,260);
lineto(363,280);
lineto(413,240);
moveto(293,280);
lineto(363,300);
lineto(413,260);
}
I2luY2x1ZGU8Z3JhcGhpY3MuaD4KI2luY2x1ZGU8ZG9zLmg+CiNpbmNsdWRlPGNvbmlvLmg+CiNpbmNsdWRlPGFsbG9jLmg+CnZvaWQgICpidWY7CnZvaWQgZmlyc3RsZWZ0KCk7CnZvaWQgc2Vjb25kbGVmdCgpOwp2b2lkIG1haW4oKQp7CmludCBnZD1ERVRFQ1QsZ20saT0wLHgseSxhcmVhOwppbml0Z3JhcGgoJmdkLCZnbSwidGM6XGJnaSIpO1xwdXQgeW91ciBkaXJlY3RvcnkgY29udGFpbnMgZWdhdmdhLmJnaQpyZWN0YW5nbGUoMCwwLGdldG1heHgoKSxnZXRtYXh5KCkpOwphcmMoMjQwLDEyMCw0MCwxNDAsNzApOwplbGxpcHNlKDE2NSw4MCwxMCwyODAsMjAsMjApOwplbGxpcHNlKDMxNSw4MCwtMTAwLDE3MCwyMCwyMCk7CmFyYygyMzUsMTIwLDE2MywyMTUsNzApOwphcmMoMjQ1LDEyMCwtMzUsMTcsNzApOwplbGxpcHNlKDE5MywxNzgsODUsMjgwLDQwLDIwKTsKZWxsaXBzZSgyODMsMTc4LC0xMDAsOTUsNDAsMjApOwplbGxpcHNlKDIzOCwxOTksMTgwLDAsMzksNTApOwplbGxpcHNlKDIxMywxMjMsNDQsMjQwLDMzLDQwKTsKZWxsaXBzZSgyNjIsMTIzLC02MCwxMzUsMzMsNDApOwplbGxpcHNlKDIxMCwxMjMsMCwzNjAsMTMsMjApOy8vbGVmdCBleWUKZWxsaXBzZSgyNjUsMTIzLDAsMzYwLDEzLDIwKTsvL3JpZ2h0IGV5ZQplbGxpcHNlKDIxMCwxMzMsMCwzNjAsMTAsMTApOy8vbGVmdCBleWUgYmFsbAplbGxpcHNlKDI2NSwxMzMsMCwzNjAsMTAsMTApOy8vcmlnaHQgZXllIGJhbGwKZWxsaXBzZSgyMTAsMTMzLDAsMzYwLDMsMyk7Ly9sZWZ0IGV5ZSBiYWxsCmVsbGlwc2UoMjY1LDEzMywwLDM2MCwzLDMpOy8vcmlnaHQgZXllIGJhbGwKZWxsaXBzZSgyMzgsMTYwLDAsMzYwLDEwLDEzKTsvL25vc2UKYXJjKDI0MCwxMjUsMjI4LDMxMiw2OCk7Ly9tb3V0aAphcmMoMjQwLDEyMCwyMzAsMzEwLDcyKTsvL21vdXRoCnNldGZpbGxzdHlsZSgxLDQpOwpmbG9vZGZpbGwoMjM4LDE2MCwxNSk7Ly9ub3NlCnNldGZpbGxzdHlsZSgxLDE1KTsKZmxvb2RmaWxsKDIxMCwxMTMsMTUpOwpmbG9vZGZpbGwoMjY1LDExMywxNSk7CnNldGZpbGxzdHlsZSgxLDkpOwpmbG9vZGZpbGwoMjEwLDEwMCwxNSk7CnNldGZpbGxzdHlsZSgxLDEpOwpmbG9vZGZpbGwoMzE1LDgwLDE1KTsKbW92ZXRvKDIwMywyMjApOwpsaW5ldG8oMjAzLDI2MCk7CmxpbmV0bygxODMsMjYwKTsKbGluZXRvKDE4MywzNTApOwpsaW5ldG8oMjkzLDM1MCk7CmxpbmV0bygyOTMsMjYwKTsKbGluZXRvKDI3MywyNjApOwpsaW5ldG8oMjczLDIyMCk7Cm1vdmV0bygxODMsMzUwKTsKbGluZXRvKDE3Myw0NjApOwpsaW5ldG8oMjEzLDQ2MCk7CmxpbmV0bygyMzgsNDAwKTsKbGluZXRvKDI2Myw0NjApOwpsaW5ldG8oMzAzLDQ2MCk7CmxpbmV0bygyOTMsMzUwKTsKbW92ZXRvKDE3Myw0NjApOwpsaW5ldG8oMTQzLDQ3OCk7CmxpbmV0bygyMTMsNDc4KTsKbGluZXRvKDIxMyw0NjApOwptb3ZldG8oMjYzLDQ2MCk7CmxpbmV0bygyNjMsNDc4KTsKbGluZXRvKDMzMyw0NzgpOwpsaW5ldG8oMzAzLDQ2MCk7CmxpbmUoMjM4LDQwMCwyMzgsMzUwKTsKLy9yaWdodCBoYW5kCm1vdmV0bygxODMsMjYwKTsKbGluZXRvKDExMywzMTApOwpsaW5ldG8oMTgzLDM3NSk7Cm1vdmV0bygxODMsMjgwKTsKbGluZXRvKDEzNywzMTApOwpsaW5ldG8oMTgxLDM1Myk7CnNldGZpbGxzdHlsZSgyLDEzKTsKZmxvb2RmaWxsKDE5MCwzMDAsMTUpOwpzZXRmaWxsc3R5bGUoMSw1KTsKZmxvb2RmaWxsKDIyMyw0MDAsMTUpOwpzZXRmaWxsc3R5bGUoMSw1KTsKZmxvb2RmaWxsKDI1Myw0MDAsMTUpOwpzZXRmaWxsc3R5bGUoMSw2KTsKZmxvb2RmaWxsKDE3Myw0NzAsMTUpOwpmbG9vZGZpbGwoMzAzLDQ3MCwxNSk7Ci8vZmluZ2VycwpzZWNvbmRsZWZ0KCk7CmVsbGlwc2UoNDEzLjUsMjI4LDAsMTgwLDMuNSwzLjUpOwpsaW5lKDQyMCwyNDAsNDMzLDI0MCk7CmxpbmUoNDIzLDI0Nyw0NDAsMjQ3KTsKbGluZSg0MTMsMjQwLDQxMCwyMjgpOwpsaW5lKDQxNywyMjgsNDIwLDI0MCk7CmVsbGlwc2UoNDMzLDI0My41LC05MCw5MCwzLjUsMy41KTsKbGluZSg0MjMsMjU0LDQ0MCwyNTQpOwplbGxpcHNlKDQ0MCwyNTAuNSwtOTAsOTAsMy41LDMuNSk7CmVsbGlwc2UoNDMwLDI1NywtOTAsOTAsMywzKTsKbGluZSg0MTMsMjYwLDQzMCwyNjApOwphcmVhPWltYWdlc2l6ZSg0MDksMjI0LDQ0NCwyNjEpOwpidWY9bWFsbG9jKGFyZWEpOwpnZXRpbWFnZSg0MDksMjI0LDQ0NCwyNjEsYnVmKTsKd2hpbGUoIWtiaGl0KCkpCnsKaWYoaT09MCkKewpzZXRmaWxsc3R5bGUoMSwxNSk7CnNldGNvbG9yKDE1KTsKZWxsaXBzZSgyMTAsMTMzLDAsMzYwLDEwLDEwKTsvL2xlZnQgZXllIGJhbGwKZWxsaXBzZSgyNjUsMTMzLDAsMzYwLDEwLDEwKTsvL3JpZ2h0IGV5ZSBiYWxsCnNldGNvbG9yKDApOwplbGxpcHNlKDIxMCwxMzMsMCwzNjAsMywzKTsvL2xlZnQgZXllIGJhbGwKZWxsaXBzZSgyNjUsMTMzLDAsMzYwLDMsMyk7Ly9yaWdodCBleWUgYmFsbApmbG9vZGZpbGwoMjEwLDEzMywxNSk7CmZsb29kZmlsbCgyNjUsMTMzLDE1KTsKc2V0Y29sb3IoMCk7CnB1dGltYWdlKDM5MSwyMDksYnVmLDEpOwpmaXJzdGxlZnQoKTsKc2V0Y29sb3IoMTUpOwpzZWNvbmRsZWZ0KCk7CnB1dGltYWdlKDQwOSwyMjQsYnVmLDApOwppPTE7Cn0KZWxzZQp7CnNldGZpbGxzdHlsZSgxLDApOwpzZXRjb2xvcigwKTsKZWxsaXBzZSgyMTAsMTMzLDAsMzYwLDEwLDEwKTsvL2xlZnQgZXllIGJhbGwKZWxsaXBzZSgyNjUsMTMzLDAsMzYwLDEwLDEwKTsvL3JpZ2h0IGV5ZSBiYWxsCmZsb29kZmlsbCgyMTAsMTMzLDApOwpmbG9vZGZpbGwoMjY1LDEzMywwKTsKc2V0Y29sb3IoMTUpOwplbGxpcHNlKDIxMCwxMzMsMCwzNjAsMywzKTsvL2xlZnQgZXllIGJhbGwKZWxsaXBzZSgyNjUsMTMzLDAsMzYwLDMsMyk7Ly9yaWdodCBleWUgYmFsbApmbG9vZGZpbGwoMjEwLDEzMywxNSk7CmZsb29kZmlsbCgyNjUsMTMzLDE1KTsKc2V0Y29sb3IoMCk7CnB1dGltYWdlKDQwOSwyMjQsYnVmLDEpOwpzZWNvbmRsZWZ0KCk7CnNldGNvbG9yKDE1KTsKZmlyc3RsZWZ0KCk7CnB1dGltYWdlKDM5MSwyMDksYnVmLDApOwppPTA7Cn0KZGVsYXkoMzAwKTsKfQpnZXRjaCgpOwp9CnZvaWQgZmlyc3RsZWZ0KCkKewptb3ZldG8oMjkzLDI2MCk7CmxpbmV0bygzNTMsMjc2KTsKbGluZXRvKDM5NSwyMjMpOwptb3ZldG8oMjkzLDI4MCk7CmxpbmV0bygzNTUsMjk2KTsKbGluZXRvKDM5NSwyNDUpOwp9CnZvaWQgc2Vjb25kbGVmdCgpCnsKbW92ZXRvKDI5MywyNjApOwpsaW5ldG8oMzYzLDI4MCk7CmxpbmV0byg0MTMsMjQwKTsKbW92ZXRvKDI5MywyODApOwpsaW5ldG8oMzYzLDMwMCk7CmxpbmV0byg0MTMsMjYwKTsKfQ==