clear
step=0.001;
lx01=0.00211227780579900:step:0.411069843744428;
lp01=[-176.005080556556,123.147258364760,-20.1899751941186, ...
-6.72615435595669,2.48362932697840,0.147767013558471;];
ly01=polyval(lp01,lx01);
lx02=0.0600303759519374:step:0.200995511537031;
lp02=[-872.029166103838,474.855360843514,-92.2367453875136, ...
8.47850875347052,0.000348570446643371;];
ly02=polyval(lp02,lx02);
ly03=0.409326424870466:step:0.521243523316062;
lp03=[2.30335310088175,-2.00785202998652,0.638343120016478;];
lx03=polyval(lp03,ly03);
lx04=0.283785512097452:step:0.689995578900771;
lp04=[264.143986666020,-681.382174174604,692.124441424812, ...
-347.347604924714,86.6788005725257,-7.93971612731400;];
ly04=polyval(lp04,lx04);
lx04a=0.753878368257753:step:1.00009238455751;
lp04a=[900.908496223659,-3773.78282951212,6269.75000147385, ...
-5171.47836028935,2119.36184917660,-344.662389962526;];
ly04a=polyval(lp04a,lx04a);
lth05=0:step*8:pi;
lp05=[0.000526322191979936,-0.00134553068914202,-0.00889671134486562, ...
0.0348016814916735,-0.0341761490821137,0.0104176749255943, ...
0.0195334236398807;];
lr05=polyval(lp05,lth05);
lx05=cos(lth05).*lr05+0.238960979412169;
ly05=sin(lth05).*lr05+0.520207253886011;
lx06=0.226699476770548:step:0.284731583800775;
lp06=[2.93985306628878,-1.19534709523670,0.670315295773551;];
ly06=polyval(lp06,lx06);
lx07=0.267997411873793:step:0.297478614843006;
lp07=[-25.2923350493529,13.6371102924014,-1.28089772300128;];
ly07=polyval(lp07,lx07);
%%% er duo 01
ly08=0.803108808290155:step:0.987383419689119;
lp08=[-2314.97820884443,10713.5307456258,-19797.8773820618, ...
18263.0255482606,-8410.52556190168,1547.47142924173;];
lx08=polyval(lp08,ly08);
ly09=0.985492227979275:(-step):0.787673575129534;
lp09=[4056.62869793398,-18391.9751537952,33305.7130578068, ...
-30113.1321418908,13594.0648491848,-2450.66759871006;];
lx09=polyval(lp09,ly09);
lx10=[5.56304481839811e-001,5.60281433251308e-001;];
ly10=[7.58549222797927e-001,8.03108808290155e-001;];
lx11=[5.94649507593705e-001,6.10418736403422e-001;];
ly11=[7.55440414507772e-001,7.92746113989637e-001;];
lx12=[5.24887278952115e-001,5.58301618597827e-001;];
ly12=[8.07253886010363e-001,7.89637305699482e-001;];
lx13=[5.37643480520275e-001,5.56324860786322e-001;];
ly13=[7.80310880829016e-001,7.79274611398964e-001;];
lx14=[5.37631253152368e-001,5.55333425038593e-001;];
ly14=[7.67875647668394e-001,7.70984455958549e-001;];
%%%%%%
lx15=[6.05496201873844e-001,6.19262180241592e-001;];
ly15=[7.86528497409326e-001,7.86528497409326e-001;];
lx16=[6.00568572607639e-001,6.21218559106587e-001;];
ly16=[7.75129533678756e-001,7.76165803108808e-001;];
lx17=[5.99577136859910e-001,6.21208369633332e-001;];
ly17=[7.66839378238342e-001,7.65803108808290e-001;];
%%% er duo 02
ly18=7.57512953367876e-001:step:1.00000000000000e+000;
lp18=[170.722623348685,-612.863660186096,824.493052577476, ...
-492.043219392781,110.504381570785;];
lx18=polyval(lp18,ly18);
ly19=7.32715025906736e-001:step:1.00000000000000e+000;
lp19=[-4181169.54417196,29157840.1228221,-88833357.7820459, ...
154433372.562480,-167558474.305026,116184974.599878, ...
-50279458.4433820,12415647.4850803,-1339373.88666238;];
lx19=polyval(lp19,ly19);
lx20=[0.691955920338698;0.706747978663243;];
ly20=[0.716062176165803;0.759585492227979;];
lx21=[0.742068768754999;0.765719555127598;];
ly21=[0.680829015544041;0.733678756476684;];
lx22=[0.674312847397354;0.700835027333262;];
ly22=[0.773056994818653;0.746113989637306;];
lx23=[0.667423744529527;0.696893739078158;];
ly23=[0.766839378238342;0.737823834196891;];
lx24=[0.664456569917618;0.693929621308226;];
ly24=[0.749222797927461;0.723316062176166;];
lx25=[0.664433134129131;0.692947356086427;];
ly25=[0.725388601036269;0.724352331606218;];
lx26=[0.768658199214392;0.800122273679062;];
ly26=[0.722279792746114;0.721243523316062;];
lx27=[0.764716910959288;0.807968168085551;];
ly27=[0.713989637305700;0.700518134715026;];
lx28=[0.754873879794784;0.790263958304675;];
ly28=[0.703626943005181;0.695336787564767;];
lx29=[0.748961947412129;0.769608877069100;];
ly29=[0.691191709844560;0.689119170984456;];
%%%%%%%%%hu xu
lx30=[0.182400741793653;0.205997523957999;];
ly30=[0.498445595854922;0.496373056994819;];
lx31=[0.157779917567161;0.201053591534586;];
ly31=[0.459067357512953;0.468393782383420;];
lx32=[0.183323908070572;0.200048909471625;];
ly32=[0.437305699481865;0.446632124352332;];
lx33=0.389823773060052:step:0.571694662244435;
lp33=[3.97634953263124,-6.53435480077416,3.29132101914065, ...
-0.0777437512523878;];
ly33=polyval(lp33,lx33);
lx34=0.340647337235902:step:0.564760725694285;
lp34=[-0.239371312053280,-0.117771239596493,0.502931303333842;];
ly34=polyval(lp34,lx34);
lx35=0.375008278947020:step:0.504729444011392;
lp35=[-0.489769398059546,-0.127092220925268,0.496328522913176;];
ly35=polyval(lp35,lx35);
%%%eye
lth36=-0.0433925716324605:step*10:6.26860742836754;
lp36=[8.78652680045393e-05,-0.00170450486853367,0.0125900775612520, ...
-0.0437017980815538,0.0701022102833395,-0.0419042124805459, ...
0.0490947177912678;];
lr36=polyval(lp36,lth36);
lx36=cos(lth36-0.38).*lr36+0.412096476844058;
ly36=sin(lth36-0.38).*lr36+0.541865284974093;
%%zuiba
lx37=[0.213783300472282;0.219685043381682;0.225579653659804;];
ly37=[0.414507772020725;0.416580310880829;0.411398963730570;];
%%dayanzhu
theta=pi/6.0;theta2=0:step*10:2*pi;
lx38a=3.90901819330450e-001;
ly38a=5.44041450777202e-001;
lx38=0.007*cos(theta2+theta)+lx38a;
ly38=0.014*sin(theta2+theta)+ly38a;
%%bizi
lx39=[0.227655249361884;0.234541295387735;0.242404511898757; ...
0.242400436109455;0.235518465872907;];
ly39=[0.522279792746114;0.525388601036269;0.522279792746114; ...
0.518134715025907;0.519170984455959;];
%%shengshang
theta=pi/6.0;
lx40a=-0.0266757880341640:step:0.0317219164624668;
lp40=[-61.7601767298083,0.185536998006574,0.0314627050352118;];
ly40a=polyval(lp40,lx40a);
lx40=lx40a.*cos(-theta)-ly40a.*sin(-theta)+0.0657104457385076;
ly40=lx40a.*sin(-theta)+ly40a.*cos(-theta)+0.224414507772021;
lx41=0.0308684539002756:step:0.0808952725938833;
lp41=[-23.6698643791334,2.02430520094728,0.178564288608925;];
ly41=polyval(lp41,lx41);
theta=pi/6.0;
lx42a=-0.0495649029899251:step:0.0452702953190851;
lp42=[-31.5875204663530,-0.252813382694133,0.0324225891413174;];
ly42a=polyval(lp42,lx42a);
lx42=lx42a.*cos(-theta)-ly42a.*sin(-theta)+0.175286451566886;
ly42=lx42a.*sin(-theta)+ly42a.*cos(-theta)+0.152101324122050;
lx43=0.116107397048110:step:0.194839250869926;
lp43=[8576.22491059292,-5358.50113297354,1226.03404791562, ...
-122.224903874383,4.64016758494591;];
ly43=polyval(lp43,lx43);
theta=pi/6.0;
lx44a=-0.0385108057968070:step:0.0394797671848785;
lp44=[-39.2691660918760,0.0608536646034008,0.0288854388192575;];
ly44a=polyval(lp44,lx44a);
lx44=lx44a.*cos(-theta)-ly44a.*sin(-theta)+0.297422572740102;
ly44=lx44a.*sin(-theta)+ly44a.*cos(-theta)+0.0470762398223538;
lx45=0.249758448347013:step:0.317036256183737;
lp45=[2570.50305556199,-2986.99303119013,1284.19992410626, ...
-242.657914964208,17.0706020824133;];
ly45=polyval(lp45,lx45);
ly46=7.05699481865285e-001:step:9.03626943005181e-001;
lp46=[-53.7472847793073,155.339686651290, ...
-165.016473629647,76.0385573453201,-12.3668308756510;];
lx46=polyval(lp46,ly46);
lx47=0.383388101752080:step:0.406975713390496;
lp47=[-576632.614943629,917676.798553916,-547698.451798575, ...
145290.041618509,-14452.8755975040;];
ly47=polyval(lp47,lx47);
ly48=0.844559585492228:step:0.934578756476684;
lp48=[1416.81147854063,-4997.50873296243,6609.81816084696, ...
-3884.96173437801,856.535088870617;];
lx48=polyval(lp48,ly48);
ly49=0.933906217616580:-step:0.843250777202073;
lp49=[-18942.6364795068,85801.3716944349,-155524.116419816, ...
141009.875782825,-63949.7676814293,11605.4629714167;];
lx49=polyval(lp49,ly49);
ly50=0.842595854922280:-step:0.755440414507772;
lp50=[-37.3515252597458,92.2275517865486,-76.4196730366941, ...
21.7195857359293;];
lx50=polyval(lp50,ly50);
theta2=0:step*10:2*pi;
lx51a=4.00989397853078e-001;
ly51a=8.03108808290155e-001;
lx51=0.005*cos(theta2)+lx51a;
ly51=0.009*sin(theta2)+ly51a;
lx52a=3.76401179941003e-001;
ly52a=7.96891191709845e-001;
lx52=0.0048*cos(theta2)+lx52a;
ly52=0.0086*sin(theta2)+ly52a;
plot(lx01,ly01,lx02,ly02,lx03,ly03,lx04,ly04, ...
lx04a,ly04a,lx05,ly05,lx06,ly06,lx07,ly07, ...
lx08,ly08,lx09,ly09,lx10,ly10,lx11,ly11,lx12,ly12, ...
lx13,ly13,lx14,ly14,lx15,ly15,lx16,ly16,lx17,ly17,lx18,ly18, ...
lx19,ly19,lx20,ly20,lx21,ly21,lx22,ly22,lx23,ly23,lx24,ly24, ...
lx25,ly25,lx26,ly26,lx27,ly27,lx28,ly28,lx29,ly29,lx30,ly30, ...
lx31,ly31,lx32,ly32,lx33,ly33,lx34,ly34,lx35,ly35,lx36,ly36, ...
lx37,ly37,lx38,ly38,lx39,ly39,lx40,ly40,lx41,ly41, ...
lx42,ly42,lx43,ly43,lx44,ly44,lx45,ly45,lx46,ly46, ...
lx47,ly47,lx48,ly48,lx49,ly49,lx50,ly50,lx51,ly51,lx52,ly52)
hold on
fill(lx38,ly38,'k')
hold off
clear
axis equal
<img src="https://img-blog.csdn.net/20150824115021152?watermark/2/text/aHR0cDovL2Jsb2cuY3Nkbi5uZXQv/font/5a6L5L2T/fontsize/400/fill/I0JBQkFCMA==/dissolve/70/gravity/Center" alt="" />
