www.pudn.com > work.rar > jiami.m

mima=InputDlg('Please in put your key:','请输入您的密码：'); 
x=length(mima{:}); 
if x>5  handl=errordlg('您的密码太长，请输入小于6位字符的密码'); 
else 
mima=abs(mima{:}); 
X=N;Y=M;P=f1; 
if mod(X+mima(1),2)==1; 
c=ones(mima(1),Y); 
X=X+mima(1);B=magic(X);P=cat(1,P,c);P=B*P; 
else  kk=mima(1)+1;c=ones(kk,Y);X=X+kk;B=magic(X);P=cat(1,P,c);P=B*P; 
end 
for i=2:x 
    l=mima(i)-mima(i-1); 
    if l>0; 
        if mod(X+l,2)==1; 
            c=ones(l,Y);X=X+l;B=magic(X);P=cat(1,P,c);P=B*P; 
        else gg=l+1;c=ones(gg,Y);X=X+gg;B=magic(X);P=cat(1,P,c);P=B*P; 
        end 
    elseif l<0 
        q=abs(l); 
        if mod(Y+q,2)==1;Y=Y+q;c=zeros(X,q);B=magic(Y);P=cat(2,P,c);P=P*B; 
        else hh=q+1;Y=Y+hh;c=zeros(X,hh);;B=magic(Y);P=cat(2,P,c);P=P*B; 
        end 
    else  
        if mod(X,2)==1;B=magic(X);P=B*P; 
        else X=X+1;c=ones(1,Y);B=magic(X);P=cat(1,P,c);P=B*P; 
        end 
    end 
end    
ff=mat2gray(P); 
figure;imshow(ff); 
end