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

 第四個八角窗形-D的幾何圖形範例
r=40;
for(i=1;i<5;i++)
{ GS[i][0]=120+(cos(((i-1)*90)*PI/180)*90);
 GS[i+12][0]=120+(cos(((i-1)*90)*PI/180)*45);
 GS[i+16][0]=120+(cos(((i-1)*90)*PI/180)*60);
 GS[i][1]=180+(sin(((i-1)*90)*PI/180)*90);
 GS[i+12][1]=180+(sin(((i-1)*90)*PI/180)*45);
 GS[i+16][1]=180+(sin(((i-1)*90)*PI/180)*60);
}   
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]);
//****
for(j=0;j<4;j++)   {
for(i=45;i<361;i+=90)
{ x0=GS[17+j][0]+(cos((i)*PI/180)*20);
 y0=GS[17+j][1]+(sin((i)*PI/180)*20);
 Line(GS[17+j][0],GS[17+j][1],x0,y0,YCOLOR[z1]);
 if(i==135 && j==0) { GS[33][0]=x0;GS[33][1]=y0; }
 if(i==315 && j==1) { GS[34][0]=x0;GS[34][1]=y0; }
 if(i==225 && j==1) { GS[35][0]=x0;GS[35][1]=y0; }
 if(i== 45 && j==2) { GS[36][0]=x0;GS[36][1]=y0; }
 if(i==315 && j==2) { GS[37][0]=x0;GS[37][1]=y0; }
 if(i==135 && j==3) { GS[38][0]=x0;GS[38][1]=y0; }
 if(i== 45 && j==3) { GS[39][0]=x0;GS[39][1]=y0; }
 if(i==225 && j==0) { GS[40][0]=x0;GS[40][1]=y0; }
} }
Line(GS[33][0],GS[33][1],GS[33][0],GS[34][1],YCOLOR[z1]);
Line(GS[34][0],GS[34][1],GS[33][0],GS[34][1],YCOLOR[z1]);
Line(GS[35][0],GS[35][1],GS[36][0],GS[35][1],YCOLOR[z1]);
Line(GS[36][0],GS[36][1],GS[36][0],GS[35][1],YCOLOR[z1]);
Line(GS[37][0],GS[37][1],GS[37][0],GS[38][1],YCOLOR[z1]);
Line(GS[38][0],GS[38][1],GS[37][0],GS[38][1],YCOLOR[z1]);
Line(GS[39][0],GS[39][1],GS[40][0],GS[39][1],YCOLOR[z1]);
Line(GS[40][0],GS[40][1],GS[40][0],GS[39][1],YCOLOR[z1]);
//***
GS[25][0]=GS[1][0]+(cos(135*PI/180)*(r-5));
GS[25][1]=GS[1][1]+(sin(135*PI/180)*(r-5));
GS[26][0]=GS[2][0]+(cos(315*PI/180)*(r-5));
GS[26][1]=GS[2][1]+(sin(315*PI/180)*(r-5));
GS[21][0]=GS[25][0];GS[21][1]=GS[26][1];
Line(GS[1][0],GS[1][1],GS[25][0],GS[25][1],YCOLOR[z1]);
Line(GS[21][0],GS[21][1],GS[25][0],GS[25][1],YCOLOR[z1]);
Line(GS[21][0],GS[21][1],GS[26][0],GS[26][1],YCOLOR[z1]);
Line(GS[2][0],GS[2][1],GS[26][0],GS[26][1],YCOLOR[z1]);
//***
GS[27][0]=GS[2][0]+(cos(225*PI/180)*(r-5));
GS[27][1]=GS[2][1]+(sin(225*PI/180)*(r-5));
GS[28][0]=GS[3][0]+(cos(45*PI/180)*(r-5));
GS[28][1]=GS[3][1]+(sin(45*PI/180)*(r-5));
GS[22][0]=GS[28][0];GS[22][1]=GS[27][1];
Line(GS[2][0],GS[2][1],GS[27][0],GS[27][1],YCOLOR[z1]);
Line(GS[22][0],GS[22][1],GS[27][0],GS[27][1],YCOLOR[z1]);
Line(GS[22][0],GS[22][1],GS[28][0],GS[28][1],YCOLOR[z1]);
Line(GS[3][0],GS[3][1],GS[28][0],GS[28][1],YCOLOR[z1]);
//***
GS[29][0]=GS[3][0]+(cos(315*PI/180)*(r-5));
GS[29][1]=GS[3][1]+(sin(315*PI/180)*(r-5));
GS[30][0]=GS[4][0]+(cos(135*PI/180)*(r-5));
GS[30][1]=GS[4][1]+(sin(135*PI/180)*(r-5));
GS[23][0]=GS[29][0];GS[23][1]=GS[30][1];
Line(GS[3][0],GS[3][1],GS[29][0],GS[29][1],YCOLOR[z1]);
Line(GS[23][0],GS[23][1],GS[29][0],GS[29][1],YCOLOR[z1]);
Line(GS[23][0],GS[23][1],GS[30][0],GS[30][1],YCOLOR[z1]);
Line(GS[4][0],GS[4][1],GS[30][0],GS[30][1],YCOLOR[z1]);
//***
GS[31][0]=GS[4][0]+(cos(45*PI/180)*(r-5));
GS[31][1]=GS[4][1]+(sin(45*PI/180)*(r-5));
GS[32][0]=GS[1][0]+(cos(225*PI/180)*(r-5));
GS[32][1]=GS[1][1]+(sin(225*PI/180)*(r-5));
GS[24][0]=GS[32][0];GS[24][1]=GS[31][1];
Line(GS[4][0],GS[4][1],GS[31][0],GS[31][1],YCOLOR[z1]);
Line(GS[24][0],GS[24][1],GS[31][0],GS[31][1],YCOLOR[z1]);
Line(GS[24][0],GS[24][1],GS[32][0],GS[32][1],YCOLOR[z1]);
Line(GS[1][0],GS[1][1],GS[32][0],GS[32][1],YCOLOR[z1]);

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

 第三個八角窗形-C的幾何圖形範例
r=40;
for(i=1;i<5;i++)
{ GS[i][0]=120+(cos(((i-1)*90)*PI/180)*90);
 GS[i+16][0]=120+(cos(((i-1)*90)*PI/180)*20);
 GS[i][1]=180+(sin(((i-1)*90)*PI/180)*90);
 GS[i+16][1]=180+(sin(((i-1)*90)*PI/180)*20);
}
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]); 
}
//****
GS[13][0]=120+(cos(45*PI/180)*r);
GS[13][1]=180+(sin(45*PI/180)*r);
GS[29][0]=GS[1][0]+(cos(135*PI/180)*r);
GS[29][1]=GS[1][1]+(sin(135*PI/180)*r);
GS[30][0]=GS[2][0]+(cos(315*PI/180)*r);
GS[30][1]=GS[2][1]+(sin(315*PI/180)*r);
GS[21][0]=GS[6][0]+(cos(315*PI/180)*(r+10));
GS[21][1]=GS[6][1]+(sin(315*PI/180)*(r+10));
GS[22][0]=GS[5][0]+(cos(135*PI/180)*(r+10));
GS[22][1]=GS[5][1]+(sin(135*PI/180)*(r+10));   
Line(GS[13][0],GS[13][1],120,180,YCOLOR[z1]);
Line(GS[29][0],GS[29][1],GS[1][0],GS[1][1],YCOLOR[z1]);
Line(GS[29][0],GS[29][1],GS[13][0],GS[13][1],YCOLOR[z1]);
Line(GS[30][0],GS[30][1],GS[13][0],GS[13][1],YCOLOR[z1]);
Line(GS[30][0],GS[30][1],GS[2][0],GS[2][1],YCOLOR[z1]);
Line(GS[29][0],GS[29][1],GS[21][0],GS[21][1],YCOLOR[z1]);
Line(GS[30][0],GS[30][1],GS[22][0],GS[22][1],YCOLOR[z1]);
//****
GS[14][0]=120+(cos(135*PI/180)*r);
GS[14][1]=180+(sin(135*PI/180)*r);
GS[31][0]=GS[2][0]+(cos(225*PI/180)*r);
GS[31][1]=GS[2][1]+(sin(225*PI/180)*r);
GS[32][0]=GS[3][0]+(cos(45*PI/180)*r);
GS[32][1]=GS[3][1]+(sin(45*PI/180)*r);
GS[23][0]=GS[8][0]+(cos(45*PI/180)*(r+10));
GS[23][1]=GS[8][1]+(sin(45*PI/180)*(r+10));
GS[24][0]=GS[7][0]+(cos(225*PI/180)*(r+10));
GS[24][1]=GS[7][1]+(sin(225*PI/180)*(r+10));   
Line(GS[14][0],GS[14][1],120,180,YCOLOR[z1]);
Line(GS[31][0],GS[31][1],GS[2][0],GS[2][1],YCOLOR[z1]);
Line(GS[31][0],GS[31][1],GS[14][0],GS[14][1],YCOLOR[z1]);
Line(GS[32][0],GS[32][1],GS[14][0],GS[14][1],YCOLOR[z1]);
Line(GS[32][0],GS[32][1],GS[3][0],GS[3][1],YCOLOR[z1]);
Line(GS[31][0],GS[31][1],GS[23][0],GS[23][1],YCOLOR[z1]);
Line(GS[32][0],GS[32][1],GS[24][0],GS[24][1],YCOLOR[z1]);
//****
GS[15][0]=120+(cos(225*PI/180)*r); 
GS[15][1]=180+(sin(225*PI/180)*r);
GS[33][0]=GS[3][0]+(cos(315*PI/180)*r);
GS[33][1]=GS[3][1]+(sin(315*PI/180)*r);
GS[34][0]=GS[4][0]+(cos(135*PI/180)*r);
GS[34][1]=GS[4][1]+(sin(135*PI/180)*r);
GS[25][0]=GS[10][0]+(cos(135*PI/180)*(r+10))
GS[25][1]=GS[10][1]+(sin(135*PI/180)*(r+10));
GS[26][0]=GS[9][0]+(cos(315*PI/180)*(r+10));
GS[26][1]=GS[9][1]+(sin(315*PI/180)*(r+10));
Line(GS[15][0],GS[15][1],120,180,YCOLOR[z1]);
Line(GS[33][0],GS[33][1],GS[3][0],GS[3][1],YCOLOR[z1]);
Line(GS[33][0],GS[33][1],GS[15][0],GS[15][1],YCOLOR[z1]);
Line(GS[34][0],GS[34][1],GS[15][0],GS[15][1],YCOLOR[z1]);
Line(GS[34][0],GS[34][1],GS[4][0],GS[4][1],YCOLOR[z1]);
Line(GS[33][0],GS[33][1],GS[25][0],GS[25][1],YCOLOR[z1]);
Line(GS[34][0],GS[34][1],GS[26][0],GS[26][1],YCOLOR[z1]);
//****
GS[16][0]=120+(cos(315*PI/180)*r);
GS[16][1]=180+(sin(315*PI/180)*r);
GS[35][0]=GS[4][0]+(cos(45*PI/180)*r);
GS[35][1]=GS[4][1]+(sin(45*PI/180)*r);
GS[36][0]=GS[1][0]+(cos(225*PI/180)*r);
GS[36][1]=GS[1][1]+(sin(225*PI/180)*r);
GS[27][0]=GS[12][0]+(cos(225*PI/180)*(r+10));
GS[27][1]=GS[12][1]+(sin(225*PI/180)*(r+10));
GS[28][0]=GS[11][0]+(cos(45*PI/180)*(r+10));
GS[28][1]=GS[11][1]+(sin(45*PI/180)*(r+10));
Line(GS[16][0],GS[16][1],120,180,YCOLOR[z1]);
Line(GS[35][0],GS[35][1],GS[4][0],GS[4][1],YCOLOR[z1]);
Line(GS[35][0],GS[35][1],GS[16][0],GS[16][1],YCOLOR[z1]);
Line(GS[36][0],GS[36][1],GS[16][0],GS[16][1],YCOLOR[z1]);
Line(GS[36][0],GS[36][1],GS[1][0],GS[1][1],YCOLOR[z1]);
Line(GS[35][0],GS[35][1],GS[27][0],GS[27][1],YCOLOR[z1]);
Line(GS[36][0],GS[36][1],GS[28][0],GS[28][1],YCOLOR[z1]);
//****
Line(GS[17][0],GS[17][1],GS[18][0],GS[18][1],YCOLOR[z1]);
Line(GS[18][0],GS[18][1],GS[19][0],GS[19][1],YCOLOR[z1]);
Line(GS[19][0],GS[19][1],GS[20][0],GS[20][1],YCOLOR[z1]);
Line(GS[20][0],GS[20][1],GS[17][0],GS[17][1],YCOLOR[z1]);
Line(GS[1][0],GS[1][1],GS[17][0],GS[17][1],YCOLOR[z1]);
Line(GS[2][0],GS[2][1],GS[18][0],GS[18][1],YCOLOR[z1]);
Line(GS[3][0],GS[3][1],GS[19][0],GS[19][1],YCOLOR[z1]);
Line(GS[4][0],GS[4][1],GS[20][0],GS[20][1],YCOLOR[z1]);
Line(GS[12][0],GS[12][1],GS[5][0],GS[5][1],YCOLOR[z1]);