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

第11個八角窗形- K 的幾何圖形範例
//K
n=24;r=51;w1=4;v=14;
for(i=1;i<5;i++)
{ GS[i][0]=120+(cos(((i-1)*90)*PI/180)*(r*2));
 GS[i][1]=180+(sin(((i-1)*90)*PI/180)*(r*2));
}
Line(GS[1][0],GS[1][1]+v,GS[2][0]+v,GS[2][1],YCOLOR[z1]);  //外圈菱形
Line(GS[2][0]-v,GS[2][1],GS[3][0],GS[3][1]+v,YCOLOR[z1]);
Line(GS[3][0],GS[3][1]-v,GS[4][0]-v,GS[4][1],YCOLOR[z1]);
Line(GS[4][0]+v,GS[4][1],GS[1][0],GS[1][1]-v,YCOLOR[z1]);
GS[5][0]=GS[1][0];GS[5][1]=GS[1][1]+(n*2);
GS[6][0]=GS[2][0]+(n*2);GS[6][1]=GS[2][1];
GS[7][0]=GS[2][0]-(n*2);GS[7][1]=GS[2][1];
GS[8][0]=GS[3][0];GS[8][1]=GS[3][1]+(n*2);
GS[9][0]=GS[3][0];GS[9][1]=GS[3][1]-(n*2);
GS[10][0]=GS[4][0]-(n*2);GS[10][1]=GS[4][1];
GS[11][0]=GS[4][0]+(n*2);GS[11][1]=GS[4][1];
GS[12][0]=GS[1][0];GS[12][1]=GS[1][1]-(n*2);
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=1;j<5;j++)  { n=(j-1)*4;
for(i=1;i<5;i++)
{ GS[i+n][0]=120+(cos((((i-1)*90+45))*PI/180)*(20*j));
 GS[i+n][1]=180+(sin((((i-1)*90+45))*PI/180)*(20*j));
} if(j==2) goto A3;
Line(GS[1+n][0],GS[1+n][1],GS[2+n][0],GS[2+n][1],YCOLOR[z1]);
Line(GS[2+n][0],GS[2+n][1],GS[3+n][0],GS[3+n][1],YCOLOR[z1]); 
Line(GS[3+n][0],GS[3+n][1],GS[4+n][0],GS[4+n][1],YCOLOR[z1]);
Line(GS[4+n][0],GS[4+n][1],GS[1+n][0],GS[1+n][1],YCOLOR[z1]);
A3: _nop_();
}
Line(GS[9][0],GS[9][1],GS[13][0],GS[9][1],YCOLOR[z1]);
Line(GS[9][0],GS[9][1],GS[9][0],GS[13][1],YCOLOR[z1]);
Line(120,220,120,260,YCOLOR[z1]);
Line(120,260,102,278,YCOLOR[z1]);
Line(120,260,138,278,YCOLOR[z1]);
Line(GS[13][0],GS[13][1],GS[13][0]+18,GS[13][1]+18,YCOLOR[z1]);
Line(GS[10][0],GS[10][1],GS[14][0],GS[10][1],YCOLOR[z1]);
Line(GS[10][0],GS[10][1],GS[10][0],GS[14][1],YCOLOR[z1]);
Line( 80,180,40,180,YCOLOR[z1]);
Line( 40,180,22,162,YCOLOR[z1]);
Line( 40,180,22,198,YCOLOR[z1]);
Line(GS[14][0],GS[14][1],GS[14][0]-18,GS[14][1]+18,YCOLOR[z1]);
Line(GS[11][0],GS[11][1],GS[15][0],GS[11][1],YCOLOR[z1]);
Line(GS[11][0],GS[11][1],GS[11][0],GS[15][1],YCOLOR[z1]);
Line(120,140,120,100,YCOLOR[z1]);
Line(120,100,102, 82,YCOLOR[z1]);
Line(120,100,138, 82,YCOLOR[z1]);
Line(GS[15][0],GS[15][1],GS[15][0]-18,GS[15][1]-18,YCOLOR[z1]);
Line(GS[12][0],GS[12][1],GS[16][0],GS[12][1],YCOLOR[z1]);
Line(GS[12][0],GS[12][1],GS[12][0],GS[16][1],YCOLOR[z1]);
Line(160,180,200,180,YCOLOR[z1]);
Line(200,180,218,162,YCOLOR[z1]);
Line(200,180,218,198,YCOLOR[z1]);
Line(GS[16][0],GS[16][1],GS[16][0]+18,GS[16][1]-18,YCOLOR[z1]);
//***
for(i=5;i<9;i++)  // 內圈菱形
{ GS[i][0]=120+(cos((((i-5)*90))*PI/180)*(42));
 GS[i][1]=180+(sin((((i-5)*90))*PI/180)*(42));
}
Line(GS[5][0],GS[5][1],GS[6][0],GS[6][1],YCOLOR[z1]);
Line(GS[6][0],GS[6][1],GS[7][0],GS[7][1],YCOLOR[z1]); 
Line(GS[7][0],GS[7][1],GS[8][0],GS[8][1],YCOLOR[z1]);
Line(GS[8][0],GS[8][1],GS[5][0],GS[5][1],YCOLOR[z1]);