小人表白MATLAB代码

合集下载
  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

function gaobai
sc = get(0,'ScreenSize');
>> figure('toolbar','none',...
'position',[sc(3)/4 50 sc(3)*2/4 sc(4)-100],...
'name','告白Code by QIAOXINGXING');
>> set(gca,'position',[0 0 1 1]);
>> set(gca,'xtick',[],'ytick',[]);
>> hold on;
>> axis equal;
>> axis([-0 8 -.3 3.3]);
>> degree = pi/180;
>> deg1 = [120:-2:60].*degree;
>> deg2 = -deg1;
>> t1 = linspace(-120,-60,length(deg1))*degree;
>> t2 = -pi-t1;
>> u2 = [0,0.5,.5*exp(pi/6*i)+.5];
>> h1 = plot(0);
>> h2 = plot(0);
>> h3 = plot(0);
>> h4 = plot(1);
>> A = 0;
>> for c = 0:5
for b = 1:length(deg1)
delete(h1);delete(h2);delete(h3);delete(h4);
B = exp(i*deg1(b)) + A;
C = exp(i*deg2(b)) + B;
u = [A B C];
E = [.3*exp(i.*(-90:270).*degree),-1.3*i];
E = E + 1.3*i + B;
u1 = u2*exp(i*t1(b)) + .8*i + B;
u11 = u2*exp(i*t2(b)) + .8*i + B;
h1 = plot(u,'linewidth',3);h2 = plot(E,'linewidth',3);
h3 = plot(u1,'linewidth',3);h4 = plot(u11,'linewidth',3);
pause(.001)
end
CC = A;A = C;
end
>> pause(.2)
>> t11 = [-120:2:-15]*degree;
>> t22 = linspace(120,195,length(t11))*degree;
>> for d = 1:length(t11)
delete(h3);delete(h4);
u1 = u2*exp(i*t11(d)) + .8*i + B;
u11 = [.5*exp(i*t22(d)),0,.5*exp(-15*i*degree)] - .5*exp(i*t22(d)) + .8*i + B;
h3 = plot(u1,'linewidth',3); h4 = plot(u11,'linewidth',3);
pause(.001)
end
>> hua_t = [-180:9:120]*degree;
>> hua_u = exp(i*hua_t) + 2/sqrt(3)*exp(-i*pi/6);
>> hua_u1 = hua_u*exp(i*120*degree);
>> hua_u2 = hua_u1*exp(i*120*degree);
>> hua_uu = .09*([hua_u,hua_u1,hua_u2,-i*5] + i*5);
>> hua_uu1 = u1(3) + hua_uu;
>> t33 = [-25:15,15:-1:-25]*degree;
>> for ee = 1:4
if ee == 4 t33 = [-25:3:15,15:-3:-20]*degree; end;
for e = 1:length(t33)
delete(h3);
u1 = u2*exp(i*t33(e)) + .8*i + B;
h3 = plot(u1,'linewidth',3);
pause(.001)
end
end
>> h5 = fill(real(hua_uu1),imag(hua_uu1),'r');
>> h6 = plot(hua_uu1,'r','linewidth',3);
>> pause(1)
>> C = CC;
>> t1 = [120:-.5:100]*degree;
>> t2 = linspace(120,180,length(t1))*degree;
>> t3 = linspace(60,0,length(t1))*degree;
>> for f = 1:length(t1)
delete(h1);delete(h2);delete(h3);delete(h4);delete(h5);delete(h6);
A1 = .5*exp(i*t1(f)) + A;
B = .5*exp(i*t2(f)) + A1;
C1 = .5*exp(i*t3(f)) + C;
u = [A A1 B C1 C];
E = [.3*exp(i.*(-90:270).*degree),-1.3*i];
E = E + 1.3*i + B;
u1 = u2*exp(i*t33(e)) + .8*i + B;
u11 = [.5*exp(i*t22(d)),0,.5*exp(-15*i*degree)] - .5*exp(i*t22(d)) + .8*i + B; hua_uu1 = u1(3) + hua_uu;
h1 = plot(u,'linewidth',3);h2 = plot(E,'linewidth',3);
h3 = plot(u1,'linewidth',3);h4 = plot(u11,'linewidth',3);
h5 = fill(real(hua_uu1),imag(hua_uu1),'r');
h6 = plot(hua_uu1,'r','linewidth',3);
pause(.001)
end
>> pause(1)
>> for g = 0:.03:4
axis([g 8 -.3 3.3]);
pause(.01)
end
>> pause(2)
>> %逐行逐字输出文字
>> TT = {'亲爱的';...
'你知道吗';...
'自打我那天第一次见你';...
'我就把你刻在了心里';...
'我渐渐地明白';...
'我活着的全部意义';...
'就是对你说';...
'不!!';...
'我要大声地喊出来';...
'我喜欢你!!!!!';...
};
>> for a = 1:length(TT(:,1))
T = char(TT(a,:));
for b = 1:length(T)
h(b) = text((4-.32*length(T))/2 + b*.32 + 3.65,3,{T(b)},'color','r',...
'fontunits','normalized','fontsize',.1);
if a == length(TT(:,1)) pause(.04);
else pause(.13);
end
end
pause(1)
if a == length(TT(:,1))-1 pause(3);
end
delete(h);h = [];
end
col = {'y','m','c','r','g','b','k',};
>> for b = 1:555
s = mod(fix(rand(1)*100),7) + 1;
x = rand(1)*4 + 3;
y = rand(1)*3 ;
text(x,y,{'我喜欢你'},'color',char(col(s)),...<br>'fontunits','normalized','fontsize',rand(1)*.17); >> axis([4 8 -.3 3.3]);
>> if b&gt;30
pause(.02)
if mod(b,20)==19
fx = rand(1)*sc(3)*2/3;
fy = rand(1)*sc(4)*2/3;
figure( 'position',[fx,fy,sc(3)/3,sc(4)/3]);
set(gca,'position',[0 0 1 1]); end。

相关文档
最新文档