imshow（‘cast.bmp‘）
[xa]=ginput
n=numel（x）

%?B樣條曲線生成程序
%?說明：給定8個控制頂點(diǎn){（3?5）（2?4）（3?2）（6?1）（5?8）（10?6）（8?1）（6?0）}
%load?c;x=800:25:1800;
%a（1:）=x;a（2:）=c;
%a=[10?15?20?25?30?35?40?45?50?55?60?65?70?75?80?85?90;
???%?20?16?26?26?26?26?24?24?24?22?22?16?28?26?26?26?24];?%?控制頂點(diǎn)數(shù)組；
%a=[4?3?2?3?6?5?10?8?6?4;6?5?4?2?1?8?6?1?0?-1];%增加兩個控制頂點(diǎn)（4?6）（4?－1）從而使曲線通過原來的首末點(diǎn)；
%plot（a（1:）a（2:）‘:‘）;?%?繪制控制多邊形；
%hold?on;?%?默認(rèn)為hold?off，此命令用來保留控制多邊形的圖形；?
for?i=1:n-3;?%?由于4個頂點(diǎn)可以確定一條B樣條，共有8個控制頂點(diǎn)，可確定5條B樣條曲線；
%for?i=1:7;
hold?on
for?u=0:0.001:1;?%?參數(shù)u；

b0=1.0./6.*（1-u）.^3;?%?基函數(shù)b0；
b1=1.0./6.*（3.*u.^3-6.*u.^2+4）;?%?基函數(shù)b1；
b2=1.0./6.*（-3.*u.^3+3.*u.^2+3.*u+1）;?%?基函數(shù)b2；
b3=1.0./6.*u.^3;?%?基函數(shù)b3；

s=b0.*x（i）+b1.*x（i+1）+b2.*x（i+2）+b3.*x（i+3）;?%?確定曲線的橫坐標(biāo)x；
y=b0.*a（i）+b1.*a（i+1）+b2.*a（i+2）+b3.*a（i+3）;?%?確定曲線的縱坐標(biāo)y；

?plot（sy‘r‘）;?%?繪制曲線坐標(biāo)點(diǎn)；
end
end?
hold?off;

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件???????1039??2009-10-10?00:15??牙齒\11912884mmdraw\B.m

?????文件????????485??2009-10-09?22:53??牙齒\11912884mmdraw\mmdraw.m

?????文件???????7159??2009-10-10?20:41??牙齒\abc.png

?????文件???????1037??2009-10-11?09:08??牙齒\area.m

?????文件???????1037??2009-10-11?09:08??牙齒\b樣條.m

?????文件?????380406??2009-10-09?19:12??牙齒\cast.bmp

?????文件????????973??2009-10-10?23:43??牙齒\CubicNaturalSpline.asv

?????文件????????981??2009-10-10?23:46??牙齒\CubicNaturalSpline.m

?????文件????????794??2009-10-10?13:01??牙齒\FiveOrder.m

?????文件???????1235??2009-10-09?18:52??牙齒\PiecewiseFiveOrder.m

?????文件????????861??2009-10-09?18:52??牙齒\PiecewiseTwoOrder.m

?????文件?????221707??2009-10-10?15:42??牙齒\pp1.fig

?????文件?????251341??2009-10-10?23:30??牙齒\pp2.png

?????文件???????1652??2009-10-09?20:11??牙齒\sanci.m

?????文件????????293??2009-10-10?12:13??牙齒\try.asv

?????文件????????293??2009-10-10?12:13??牙齒\try.m

?????文件????????292??2009-10-09?18:37??牙齒\TwoOrder.m

?????文件?????????31??2009-10-10?20:36??牙齒\untitled4.asv

?????文件???????1049??2009-10-09?20:59??牙齒\untitled4.fig

?????文件????????274??2009-10-11?00:25??牙齒\untitled4.m

?????目錄??????????0??2009-10-10?00:12??牙齒\11912884mmdraw

?????目錄??????????0??2009-10-11?09:08??牙齒

-----------?---------??----------?-----??----

???????????????873157????????????????????23