mouse.m

来自「与神经网络有关的资料与神经网络有关的资料与神经网络有关的资料」· M 代码 · 共 13 行

function mouse(action)
switch action
    case 'start'
        set(gcbf,'windowbuttonmotionfcn','mouse move');
        set(gcbf,'windowbuttonupfcn','mouse stop');
    case 'move'
        point=get(gca,'currentpoint');
        line(point(:,1),point(:,2),'clipping','on',...
            'erasemode','background','marker','o','color','k','linewidth',5);
    case 'stop'
        set(gcbf,'windowbuttonmotionfcn','');
        set(gcbf,'windowbuttonupfcn','');
end