cirshift_example.m

来自「很多matlab的源代码」· M 代码 · 共 58 行

figure('position',[10 10 800 500], 'name','序列的循环移位');

position=0;
N=11;

axes('position',[0.1 0.1 0.65 0.8]);

Hc_close=uicontrol(gcf,'style','push',...%
'position',[650 40 100 25],...        % 
'string','Close',...                 %
'Callback','close');                 %以上四行代码是产生close按键 

Hc_info=uicontrol(gcf,'style','push',...%
'position',[650 100 100 25],...        % 
'string','info',...                 %
'Callback','web exm_1.swf -browser');                 %以上四行代码是产生info按键 

y1=uicontrol('style','radiobutton',...
    'position',[650 380 50 20],...
    'string','N=11',...
    'value',1,...
    'callback',[...
        'set(y1,''value'',1),',...
        'set(y2,''value'',0),',...
        'position=0;',...
        'N=11;'...
        'cirshift_example_sub;'...
]);

y2=uicontrol('style','radiobutton',...
    'position',[650 360 50 20],...
    'string','N=15',...
    'value',0,...
    'callback',[...
        'set(y1,''value'',0),',...
        'set(y2,''value'',1),',...
        'position=0;',...
        'N=15;'...
        'cirshift_example_sub;'...
]);

y3=uicontrol('style','push',...
    'position',[690 300 70 20],...
    'string','右移一位',...
    'callback',[...
        'position=mod(position+1,N),',...
        'cirshift_example_sub;']...
);

y4=uicontrol('style','push',...
    'position',[610 300 70 20],...
    'string','左移一位',...
    'callback',[...
        'position=mod(position-1,N),',...
        'cirshift_example_sub;']...
);

cirshift_example_sub;