\documentclass[11pt]{article} \usepackage{fig4tex} \begin{document} % 1. Definition of characteristic points %\figinit{1cm,orthogonal} \figinit{1cm,realistic} \def\ray{2} \def\hau{4.8} \def\lcap{.3} \def\haui{2.3} \def\ang{45} \def\angi{20} \def\angii{25} %Anneaux. \figpt 1:(0,0,0) \figpt 2:(0,-\ray,0) \figvectC 0 (0,0,1) \figptrot 3:=2/1,\ang,0/ \figptrot 4:=2/1,\angi,0/ \figptrot 5:=2/1,\angii,0/ \figpttra 6:=4/\lcap,0/ \figpttra 7:=5/\lcap,0/ \figpttra 8:=4/-\lcap,0/ \figpttra 9:=5/-\lcap,0/ \figvectC 0 (0,0,1) \figptstra 11=1,2,3,4,5,6,7,8,9/-\hau,0/ \figptsrot 22=2,3,4,5,6,7,8,9/1,\ang,0/ \figptsrot 32=12,13,14,15,16,17,18,19/11,\ang,0/ \figptsrot 42=22,23,24,25,26,27,28,29/1,\ang,0/ \figptsrot 52=32,33,34,35,36,37,38,39/11,\ang,0/ \figptsrot 62=42,43,44,45,46,47,48,49/1,\ang,0/ \figptsrot 72=52,53,54,55,56,57,58,59/11,\ang,0/ \figptsrot 82=62,63,64,65,66,67,68,69/1,\ang,0/ \figptsrot 92=72,73,74,75,76,77,78,79/11,\ang,0/ \figptsrot 102=82,83,84,85,86,87,88,89/1,\ang,0/ \figptsrot 112=92,93,94,95,96,97,98,99/11,\ang,0/ \figptsrot 122=102,103,104,105,106,107,108,109/1,\ang,0/ \figptsrot 132=112,113,114,115,116,117,118,119/11,\ang,0/ \figptsrot 142=122,123,124,125,126,127,128,129/1,\ang,0/ \figptsrot 152=132,133,134,135,136,137,138,139/11,\ang,0/ %Branches. \figvectC 0 (0,0,1) \figptstra 160=2,22,42,62,82,102,122,142/-\haui,0/ \figptstra 170=12,32,52,72,92,112,132,152/\haui,0/ \figvectC 0 (0,1,0) \figptstra 180=160,161,162,163,164,165,166,167/-\lcap,0/ \figptstra 190=160,161,162,163,164,165,166,167/\lcap,0/ \figptstra 200=170,171,172,173,174,175,176,177/-\lcap,0/ \figptstra 210=170,171,172,173,174,175,176,177/\lcap,0/ % 2. Creation of the graphical file \figset proj(psi=-1,theta=15) \figdrawbegin{} %Anneau du haut. \figset (width=1) \figdrawarccircP 1;\ray[2,4,4] \figdrawarccircP 1;\ray[5,3,3] \figdrawline[6,8] \figdrawline[7,9] \figdrawarccircP 1;\ray[22,24,24] \figdrawarccircP 1;\ray[25,23,23] \figdrawline[26,28] \figdrawline[27,29] \figdrawarccircP 1;\ray[42,44,44] \figdrawarccircP 1;\ray[45,43,43] \figdrawline[46,48] \figdrawline[47,49] \figdrawarccircP 1;\ray[62,64,64] \figdrawarccircP 1;\ray[65,63,63] \figdrawline[66,68] \figdrawline[67,69] \figset (width=default) \figdrawarccircP 1;\ray[82,84,84] \figdrawarccircP 1;\ray[85,83,83] \figdrawline[86,88] \figdrawline[87,89] \figdrawarccircP 1;\ray[102,104,104] \figdrawarccircP 1;\ray[105,103,103] \figdrawline[106,108] \figdrawline[107,109] \figdrawarccircP 1;\ray[122,124,124] \figdrawarccircP 1;\ray[125,123,123] \figdrawline[126,128] \figdrawline[127,129] \figdrawarccircP 1;\ray[142,144,144] \figdrawarccircP 1;\ray[145,143,143] \figdrawline[146,148] \figdrawline[147,149] %Brins verticaux. \figset (width=1) \figdrawline[2,160] \figdrawline[22,161] \figdrawline[42,162] \figdrawline[62,163] \figdrawline[82,164] \figset (width=default) \figdrawline[102,165] \figdrawline[122,166] \figdrawline[142,167] \figset (width=1) \figdrawline[12,170] \figdrawline[32,171] \figdrawline[52,172] \figdrawline[72,173] \figdrawline[92,174] \figset (width=default) \figdrawline[112,175] \figdrawline[132,176] \figdrawline[152,177] \figset (width=1) \figdrawline[180,190] \figdrawline[181,191] \figdrawline[182,192] \figdrawline[183,193] \figdrawline[184,194] \figset (width=default) \figdrawline[185,195] \figdrawline[186,196] \figdrawline[187,197] \figset (width=1) \figdrawline[200,210] \figdrawline[201,211] \figdrawline[202,212] \figdrawline[203,213] \figdrawline[204,214] \figset (width=default) \figdrawline[205,215] \figdrawline[206,216] \figdrawline[207,217] %Anneau du bas. \figset (width=1) \figdrawarccircP 11;\ray[12,14,14] \figdrawarccircP 11;\ray[15,13,13] \figdrawline[16,18] \figdrawline[17,19] \figdrawarccircP 11;\ray[32,34,34] \figdrawarccircP 11;\ray[35,33,33] \figdrawline[36,38] \figdrawline[37,39] \figdrawarccircP 11;\ray[52,54,54] \figdrawarccircP 11;\ray[55,53,53] \figdrawline[56,58] \figdrawline[57,59] \figdrawarccircP 11;\ray[72,74,74] \figdrawarccircP 11;\ray[75,73,73] \figdrawline[76,78] \figdrawline[77,79] \figset (width=default) \figdrawarccircP 11;\ray[92,94,94] \figdrawarccircP 11;\ray[95,93,93] \figdrawline[96,98] \figdrawline[97,99] \figdrawarccircP 11;\ray[112,114,114] \figdrawarccircP 11;\ray[115,113,113] \figdrawline[116,118] \figdrawline[117,119] \figdrawarccircP 11;\ray[132,134,134] \figdrawarccircP 11;\ray[135,133,133] \figdrawline[136,138] \figdrawline[137,139] \figdrawarccircP 11;\ray[152,154,154] \figdrawarccircP 11;\ray[155,153,153] \figdrawline[156,158] \figdrawline[157,159] \figdrawend % 3. Writing text on the figure \figvisu{\figBoxA}{{\sc Fig. 1}\ --\ L'antenne cage d'oiseau}{} \box\figBoxA \end{document} |