• 大小: 1KB
    文件类型: .zip
    金币: 1
    下载: 0 次
    发布日期: 2021-03-22
  • 语言: Matlab
  • 标签: 表白图  MATLAB  

资源简介

我爱你的matlab3D实现图,能让你在表白时更加浪漫

资源截图

代码片段和文件信息

%构造体积方程和坐标轴,画出图形;
[XYZ] = meshgrid(linspace(-33101));
%3D心型图方程如下;
F = -X.^2.*Z.^3-(9/80).*Y.^2.*Z.^3+(X.^2+(9/4).*Y.^2+Z.^2-1).^3;
hFigure = figure;
sz = get(hFigure ‘Position‘);
set(hFigure ‘Position‘ [sz(1)-0.15*sz(3) sz(2) 1.3*sz(3) sz(4)]);
set(hFigure‘color‘‘w‘ ‘menu‘‘none‘)
hAxes = axes(‘Parent‘hFigure‘NextPlot‘‘add‘ ‘DataAspectRatio‘...
    [1 1 1] ‘XLim‘[30 120]‘YLim‘[35 65]‘ZLim‘[30 75]);
view([-39 30]);
axis off
% 制作出动态的隐形效果;
hidden on
% 画出网格,制作网格动态效果;
% 快渲染心得背面:
p = patch(isosurface(F-0.001));
set(p‘FaceColor‘‘w‘‘EdgeColor‘‘w‘);
% 构造Y-Z平面描完函数在该平面的点:
for iX = [35 38 41 45 48 51 54 57 61 64 67]
    plane = reshape(F(:iX:)101101);
    cData = contourc(plane[0 0]);
    xData = iX.*ones(1cData(21));
    plot3(hAxesxDatacData(22:end)cData(12:end)‘k‘);
    pause(.1) drawnow
end
% 构造X-Z平面描完函数在该平面的点:
for iY = [41 44 47 51 55 58 61]
    plane = reshape(F(iY::)101101);
    cData = contourc(plane[0 0]);
    yData = iY.*ones(1cData(21));
    plot3(hAxescData(22:end)yDatacData(12:end)‘k‘);
    pause(.1) drawnow
end
% 构造X-Y平面描完函数在该平面的点:
for iZ = [36 38 40 42 44 46 48 50 52 54 56 58 60 62 64 66 69 71]
    plane = F(::iZ);
    cData = contourc(plane[0 0]);
    startIndex = 1;
    if size(cData2) > (cData(21)+1)
        startIndex = cData(21)+2;
        zData = iZ.*ones(1cData(21));
        plot3(hAxescData(12:(startIndex-1))...
                cData(22:(startIndex-1))zData‘k‘);
    end
    zData = iZ.*ones(1cData(2startIndex));
    plot3(hAxescData(1(startIndex+1):end)...
        cData(2(startIndex+1):end)zData‘k‘);
    pause(.1) drawnow
end
%函数已经画完接下来为文字部分;
pause(.2)
%设置字体大小粗细位置等以下是打出I (心型图) YOU;
text(75070‘I‘ ‘fontWeight‘‘bold‘‘FontAngle‘‘italic‘‘fontsize‘60)
pause(.5)
text(805043‘You‘ ‘fontWeight‘‘bold‘‘FontAngle‘‘italic‘‘fontsize‘60)
pause(.2)

line([20 80][50 50][52.5 52.5] ‘color‘‘w‘)
line([50 50][20 80][52.5 52.5] ‘color‘‘w‘)
line([50 50][50 50][30 80] ‘color‘‘w‘)
%制作者签名;
text(406030‘Made By 徐长源 11/02/2013‘ ‘fontsize‘8)
text(354530‘‘ ‘fontsize‘8)

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     文件        2305  2020-10-22 18:44  I love You.m

评论

共有 条评论