2019年圣诞问候

发布的克里夫硅藻土，2019年12月24日

2次查看(最近30天 0喜欢| 2的评论

灵感来自Patsy和https://www.amazon.com/gp/product/B075JDVR53．

类型xmas_2019.m

功能xmas_2019 %圣诞祝福。Set (gcf，'pos'，[800 200 420 315]) CLF轴([0 1 0 1])轴off for k = 1:3 [x,y] = base(k);Patch (x,y，灰色)[x,y] = edge(k);火焰(k) =补丁(x, y, ' w ');End gif_frame('html/xmas_2019.gif') for k = 1:50 r = randi(2,1,3)-1;j =兰迪(3,1,1);如标准(r) > 0火焰(j)。FaceColor = r;[x,y] = base(k) xo =[。33 .45 .57];y =[。38．3.0 .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 = [.33 .45 .57]; yo = [.38 .30 .44]; e = [2 0 0 2 3]; x = xo(k) + .01*[e 5 10-fliplr(e)]; y = yo(k) + .08*[0:4 5 4:-1:0]; end function g = gray g = [.5 .5 .5]; end end

发布与MATLAB®R2018b