摸鱼项，一个解压的小玩意（matlab）

累了就运行一下，盯着小红点脖子动眼睛别动，放松颈椎

clc
clear
close all
figure
axis equal;
h=plot(0,0,'r*');
deltat=0.005;
changetime=0;
ax=cos(unifrnd(0,2*pi));ay=sin(unifrnd(0,2*pi));
vx=0;vy=0;
px=0;py=0;
Size=10
while true
    changetime=changetime+1;
    if changetime==3
        ax=50*cos(unifrnd(0,2*pi));
        ay=50*sin(unifrnd(0,2*pi));
        changetime=0;
    end
    vx=vx+deltat*ax;vy=vy+deltat*ay;
    px=px+deltat*vx;py=py+deltat*vy;
    if px>=1.95*Size||px<=-1.95*Size
        vx=-vx;px=sign(px)*1.95*Size;
    end
    if py>=1.95*Size||py<=-1.95*Size
        vy=-vy;py=sign(py)*1.95*Size;
    end
    set(h,'xdata',px,'ydata',py);
    axis([-2*Size,2*Size,-2*Size,2*Size]);
    pause(deltat);
end