北太天元绘制党的二十大精神部分内容

% 北太天元画图党的二十大精神
%(蓝色信纸,撒满随机分布的星星、二十大精神部分语句、红心)
clc
clf
close all
clear all
load_plugin("time");
axis equal;
axis([-12 7 -12 3]);
fill([-12 -12 7 7],[-12 3 3 -12],[ 0.5843 0.8157 0.9882]);
hold on
pause(1)
axis equal;
axis([-12 7 -12 3]);
x = rand(50,1);
y = rand(50,1);
x = -12+ x*19;
y = -12 + y*15;
%金黄色的星星
scatter(x,y,800,'p','filled','MarkerFaceColor',[255/255,233/255,0])
pause(1)
text(-12,2,'党的二十精神', 'Color','red','FontSize',30)
%画一个红心
pause(1)
t=linspace(-2.9,2.9,1000);
X=16.*(sin(t)).^3;
Y=13.*cos(t)-5.*cos(2.*t)-2.*cos(3.*t)-cos(4.*t);
fill(X/13,Y/13+2,[180,39,45]./255,'EdgeColor',[180,39,45]./255,'LineWidth',2)
hold on
hold on
pause(1)
text(-12,-1,'一、坚持党的领导,建设中国特色', 'Color','red','FontSize',30)
text(-12,-2,' 社会主义先进文明', 'Color','red','FontSize',30)
pause(0.3)
text(-12,-3,'二、实行科学发展观,推动经济社会', 'Color','red','FontSize',30)
text(-12,-4,' 发展进入现代化新阶段', 'Color','red','FontSize',30)
pause(0.4)
x = -10:1:5;
y = -5*ones(size(x));
n = length(x);
for k = 1:1:n
scatter(x(1:k),y(1:k),500,'o','filled','MarkerFaceColor',[1,0,0])
pause(0.2)
end
pause(0.4)
text(-12,-6,'六、维护世界和平,推动构建人类', 'Color','red','FontSize',30)
text(-12,-7,' 命运共同体。', 'Color','red','FontSize',30)
pause(0.5)
x = -10:1:5;
y = -8*ones(size(x));
n = length(x);
for k = 1:1:n
scatter(x(1:k),y(1:k),500,'o','filled','MarkerFaceColor',[1,0,0])
pause(0.2)
end
pause(1)
text(-12,-10,'北太天元数值计算通用软件绘制 ', 'Color','red','FontSize',30)
hold off
unload_plugin("time");
