最新matlab漢明碼和循環(huán)碼的編程設(shè)計(jì)(已改無(wú)錯(cuò)字)
2022-07-28 02:21:31 本頁(yè)面
【正文】 。clc。r=[1 0 0 1 1 1 1]。h=[1,0,0。1,1,0。1,1,1。0,1,1。1,0,1。0,1,0。0,0,1]。b=flipud(h)。s=r*b。for i=1:3 if rem(abs(s(i)),2)==0 s(i)=0。end endfor i=1:3 if rem(abs(s(i)),2)==1 s(i)=1。endend if s==[0 0 0] e=[0 0 0 0 0 0 0 ]。 elseif s==[1 0 0] e=[0 0 0 0 0 0 1]。 elseif s==[1 1 0] e=[0 0 0 0 0 1 0]。 elseif s==[1 1 1] e=[0 0 0 0 1 0 0]。 elseif s==[0 1 1] e=[0 0 0 1 0 0 0]。 elseif s==[1 0 1] e=[0 0 1 0 0 0 0]。 elseif s==[0 1 0] e=[0 1 0 0 0 0 0]。 else s==[0 0 1] e=[1 0 0 0 0 0 0]。 endu=r+e。for i=1:7 if rem(abs(u(i)),2)==0 u(i)=0。end endfor i=1:7 if rem(abs(u(i)),2)==1 u(i)=1。endendData=zeros(1,4)。 Data(1)=u(4)。 Data(2)=u(5)。 Data(3)=u(6)。 Data(4)=u(7)。if e==[0 0 0 0 0 0 0]disp(39。沒(méi)有錯(cuò)誤：39。)k=0,elsedisp(39。第幾位錯(cuò)誤：39。) k=find(e) 。enddisp(39。接收碼字39。)rdisp(39。譯碼輸出序列：39。)Data第幾位錯(cuò)誤：k = 5接收碼字r = 1 0 0 1 1 1 1譯碼輸出序列：Data =1 0 1 1以上編碼有個(gè)缺點(diǎn)，就是它只能對(duì)一個(gè)消息矢量（4位）進(jìn)行編碼，我又在這個(gè)基礎(chǔ)上編寫(xiě)了一個(gè)可以同時(shí)對(duì)位數(shù)是4的倍數(shù)的消息矢量進(jìn)行編碼。5．多位循環(huán)碼（4的倍數(shù)）的編碼程序如下：clear。clc。a=[1 1 0 0 1 0 1 1]。[X,N]=size(a)。%將信息碼分為M幀，1幀4個(gè)信息碼M=ceil(N/4)。 d=zeros(1,4)。b=zeros(1,7*M)。 Data=zeros(1,7)。for k=1:M for j=1:4 d(j)=a(j+(k1)*4)。end%生成多項(xiàng)式Gx=[1 0 1 1]。Data(1)=d(4)。 Data(2)=d(3)。 Data(3)=d(2)。 Data(4)=d(1)。 %Data除以Gx得到余數(shù)Rx [Qx,Rx]=deconv(Data,Gx)。 e=Rx+Data。 b(7*k6:7*k)=e(1:7)。c=b(1+(k1)*7)。b(1+(k1)*7)=b(7+(k1)*7)。b(7+(k1)*7)=c。c=b(2+(k1)*7)。b(2+(k1)*7)=b(6+(k1)*7)。b(6+(k1)*7)=c。c=b(3+(k1)*7)。b(3+(k1)*7)=b(5+(k1)*7)。b(5+(k1)*7)=c。endfor i=1:M*7 if rem(abs(b(i)),2)==0 b(i)=0。endendfor i=1:M*7 if rem(abs(b(i)),2)==1 b(i)=1。endend disp(39。輸入序列：39。)。adisp(39。編碼輸出序列：39。)。b程序運(yùn)行結(jié)果如下：輸入序列：a = 1 1 0 0 1 0
環(huán)評(píng)公示相關(guān)推薦
鄂ICP備17016276號(hào)-1