功能蜡烛_2020%假期问候。颜色= get(gca,'colororder');火焰= init;tic while toc <3600如果mod(toc,20)> 15 c ='k';否则i = randi(长度(颜色));c =颜色(i,:);end j = randi(长度(火焰));火焰(J).faceColor = C;暂停(1/6)端%-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------函数火焰= INIT CLF轴([0 1 0 1])轴off k = 1:5 [x,y] = base(k); patch(x,y,'w') [x,y] = edge(k); flames(k) = patch(x,y,'k'); end end function [x,y] = base(k) xo = [.21 .33 .45 .57 .69]; ys = [.52 .30 .38 .30 .44]; x = xo(k) + .10*[0 1 1 0 0]; y = ys(k)*[0 0 1 1 0]; end function [x,y] = edge(k) xo = [.21 .33 .45 .57 .69]; yo = [.52 .30 .38 .30 .44]; v = [2,0,0,2,3,5]; t = 0:0.1:5; e = makima(0:5,v,t); x = xo(k) + .01*[e 10-fliplr(e)]; y = yo(k) + .08*[t fliplr(t)]; end % Inspired by Patsy and % 。结尾