320x240 彩色LCD營幕的八角窗形-F的幾何圖形範例#24

 第六個八角窗形-F的幾何圖形範例
r=50;
for(i=1;i<5;i++)
{ GS[i][0]=120+(cos(((i-1)*90)*PI/180)*100);
 GS[i][1]=180+(sin(((i-1)*90)*PI/180)*100);
 }   
GS[5][0]=GS[1][0];GS[5][1]=GS[1][1]+r;
GS[6][0]=GS[2][0]+r;GS[6][1]=GS[2][1];
GS[7][0]=GS[2][0]-r;GS[7][1]=GS[2][1];
GS[8][0]=GS[3][0];GS[8][1]=GS[3][1]+r;
GS[9][0]=GS[3][0];GS[9][1]=GS[3][1]-r;
GS[10][0]=GS[4][0]-r;GS[10][1]=GS[4][1];
GS[11][0]=GS[4][0]+r;GS[11][1]=GS[4][1];
GS[12][0]=GS[1][0];GS[12][1]=GS[1][1]-r;
for(i=5;i<12;i++)
{ Line(GS[i][0],GS[i][1],GS[i+1][0],GS[i+1][1],YCOLOR[z1]);  }
Line(GS[12][0],GS[12][1],GS[5][0],GS[5][1],YCOLOR[z1]);
Rectangle(180,160,220,180,YCOLOR[z1]);
Rectangle(180,140,200,160,YCOLOR[z1]);
Rectangle(120,80,140,100,YCOLOR[z1]);
Line(180,120,208,120,YCOLOR[z1]);
Rectangle(100,120,120,80,YCOLOR[z1]);
Rectangle(80,120,100,100,YCOLOR[z1]);
Rectangle(20,160,40,180,YCOLOR[z1]);
Line(60,120,60,92,YCOLOR[z1]);
Rectangle(20,180,60,200,YCOLOR[z1]);
Rectangle(40,200,60,220,YCOLOR[z1]);
Rectangle(100,260,120,280,YCOLOR[z1]);
Line(60,240,32,240,YCOLOR[z1]);
Rectangle(120,240,140,280,YCOLOR[z1]);
Rectangle(140,240,160,260,YCOLOR[z1]);
Rectangle(200,180,220,200,YCOLOR[z1]);
Line(180,240,180,268,YCOLOR[z1]);
//**   A
GS[1][0]=120;GS[1][1]=180;
GS[2][0]=120;GS[2][1]=100;
GS[3][0]=180;GS[3][1]=100;
GS[4][0]=180;GS[4][1]=180;
GS[5][0]=180;GS[5][1]=160;
GS[6][0]=160;GS[6][1]=160;
GS[7][0]=160;GS[7][1]=140;
GS[8][0]=140;GS[8][1]=140;
GS[9][0]=140;GS[9][1]=120;
GS[10][0]=160;GS[10][1]=120;
GS[11][0]=160;GS[11][1]=100;
GS[12][0]=140;GS[12][1]=100;
GS[13][0]=140;GS[13][1]=160;
GS[14][0]=120;GS[14][1]=160;
for(i=1;i<14;i++)
{ Line(GS[i][0],GS[i][1],GS[i+1][0],GS[i+1][1],YCOLOR[z1]);  }
Line(GS[1][0],GS[1][1],GS[4][0],GS[4][1],YCOLOR[z1]);
//** B
GS[1][0]=120;GS[1][1]=180;
GS[2][0]= 40;GS[2][1]=180;
GS[3][0]= 40;GS[3][1]=120;
GS[4][0]=120;GS[4][1]=120;
GS[5][0]=100;GS[5][1]=120;
GS[6][0]=100;GS[6][1]=140;
GS[7][0]= 80;GS[7][1]=140;
GS[8][0]= 80;GS[8][1]=160;
GS[9][0]= 60;GS[9][1]=160;
GS[10][0]= 60;GS[10][1]=140;
GS[11][0]= 40;GS[11][1]=140;
GS[12][0]= 40;GS[12][1]=160;
GS[13][0]=100;GS[13][1]=160;
GS[14][0]=100;GS[14][1]=180;
for(i=1;i<14;i++)
{ Line(GS[i][0],GS[i][1],GS[i+1][0],GS[i+1][1],YCOLOR[z1]);  }
Line(GS[1][0],GS[1][1],GS[4][0],GS[4][1],YCOLOR[z1]);
//** C
GS[1][0]=120;GS[1][1]=180;
GS[2][0]=120;GS[2][1]=260;
GS[3][0]= 60;GS[3][1]=260;
GS[4][0]= 60;GS[4][1]=180;
GS[5][0]= 60;GS[5][1]=200;
GS[6][0]= 80;GS[6][1]=200;
GS[7][0]= 80;GS[7][1]=220;
GS[8][0]=100;GS[8][1]=220;
GS[9][0]=100;GS[9][1]=240;
GS[10][0]= 80;GS[10][1]=240;
GS[11][0]= 80;GS[11][1]=260;
GS[12][0]=100;GS[12][1]=260;
GS[13][0]=100;GS[13][1]=200;
GS[14][0]=120;GS[14][1]=200;
for(i=1;i<14;i++)
{ Line(GS[i][0],GS[i][1],GS[i+1][0],GS[i+1][1],YCOLOR[z1]);  }
Line(GS[1][0],GS[1][1],GS[4][0],GS[4][1],YCOLOR[z1]);
//** D
GS[1][0]=120;GS[1][1]=180;
GS[2][0]=200;GS[2][1]=180;
GS[3][0]=200;GS[3][1]=240;
GS[4][0]=120;GS[4][1]=240;
GS[5][0]=140;GS[5][1]=240;
GS[6][0]=140;GS[6][1]=220;
GS[7][0]=160;GS[7][1]=220;
GS[8][0]=160;GS[8][1]=200;
GS[9][0]=180;GS[9][1]=200;
GS[10][0]=180;GS[10][1]=220;
GS[11][0]=200;GS[11][1]=220;
GS[12][0]=200;GS[12][1]=200;
GS[13][0]=140;GS[13][1]=200;
GS[14][0]=140;GS[14][1]=180;
for(i=1;i<14;i++)
{ Line(GS[i][0],GS[i][1],GS[i+1][0],GS[i+1][1],YCOLOR[z1]);  }
Line(GS[1][0],GS[1][1],GS[4][0],GS[4][1],YCOLOR[z1]);