换滤膜，开关真空泵，转移滤液。
晚餐：沙县小吃，杂酱面+煎蛋，小笼包。共21元。
%作者：slandarer
%链接：https://www.zhihu.com/question/27780598/answer/758261793
bkgPic=imread('5e0f4c5b6edce3b8d8d26710d026b9a.jpg');%图片地址
% lineDensity故障线条密度 | lineLenRange故障线条长度范围 | greenMoveLen绿移距离
[m,n,k]=size(bkgPic);lineDensity=0.6;lineLenRange=[50,80];greenMoveLen=10;
if k~=1,bkgPic=rgb2gray(bkgPic);end
colorList=[21,27,143;68,22,113;94,72,151;175,152,192;221,188,204;217,156,174;203,82,104;232,31,37;151,5,11]';
blueRedPic=cat(3,repmat(interp1(linspace(1,n,size(colorList,2)),colorList(1,:),1:n,'linear'),[m,1]),repmat(interp1(linspace(1,n,size(colorList,2)),colorList(2,:),1:n,'linear'),[m,1]),repmat(interp1(linspace(1,n,size(colorList,2)),colorList(3,:),1:n,'linear'),[m,1]));
blueRedPic=uint8(double(blueRedPic).double(bkgPic)./200);
gm_brPic=cat(3,blueRedPic(:,1+greenMoveLen:end,1),blueRedPic(:,1:end-greenMoveLen,2),blueRedPic(:,1+greenMoveLen:end,3));
[~,movePos]=sort(rand(1,m));movePos=sort(movePos(1:floor(mlineDensity)));movePic=gm_brPic(movePos,:,1);
for i=1:size(movePic,1),gm_brPic(movePos(i),:,1)=imfilter(movePic(i,:),fspecial('motion',randi(lineLenRange,[1,1]),0),'replicate');end
imshow(gm_brPic);