ans10_4.m

《MATLAB R2007基础教程》 清华大学出版社,包含电子课件,实例原文件,习题答案,都是基于matlab实现

t = -2:0.1:2;
x = cos(t/pi);
y = 2*sin(t/(2*pi));
figure,plot(t,x);
hold on; plot(t,y);
%if waitforbuttonpress
while(1)
    if waitforbuttonpress==0
        get(gcf,'CurrentObject');
        c = ceil((rand) * 5);
        switch c
            case 1
                set(get(gcf,'CurrentObject'),'Color', 'r');
            case 2
                set(get(gcf,'CurrentObject'),'Color', 'g');
            case 3
                set(get(gcf,'CurrentObject'),'Color', 'b');
            case 4
                set(get(gcf,'CurrentObject'),'Color', 'k');
            case 5
                set(get(gcf,'CurrentObject'),'Color', 'y');
        end
    end
end