function dec=trdec(n,b)
ch1='0123456789ABCDEF';    %十六進制的16個符號
k=1;
while n~=0                  %不斷除某進制基數取余直到商為0
   p(k)=rem(n,b);
   n=fix(n/b);
   k=k+1;
end
k=k-1;
strdec='';
while k>=1                   %形成某進制數的字符串
   kb=p(k);
   strdec=strcat(strdec,ch1(kb+1:kb+1));
   k=k-1;
end
dec=strdec;