- /
-
balloons IV
on 22 Nov 2023
- 19
- 51
- 0
- 0
- 1163
drawframe(1);
Write your drawframe function below
function drawframe(f)
l=@linspace;
p=@patch;
t=l(pi,-pi);
r=1+.3*sech(5*(pi/2+t));
x=r.*cos(t);
y=r.*sin(t);
a=[.1;.1];
b=-[1.3;1.7];
c=.1*[-2 -1 1 2];
d=-[1.7 2 2 1.7];
figure('color', [.6 1 1])
hold
plot([a+f/6 -a+f/6],b-f/6,'color', [.6 1 1])
hc=text(-6,-6,'🗻🗻🗻','color','k','FontSize',100-f/3);
hc=text(-7,-11.2,'◼◼◼','color','k','FontSize',115+f/4);
hc=text(-3,-11.2,'◼◼◼','color','k','FontSize',115+f/4);
hc=text(0+f/10,1,"\bf YAAAYYYY!!! \rm",'color','b','FontSize',12+f/10);
hc=text(0,-10,'\bf MATHWORKS \rm','color','r','FontSize',15+f/17);
hc=text(-3,-12.5,'\bf 40th B-day 2024! \rm','color','y','FontSize',15+f/17);
plot([a -a],b,'k')
p(c,d,'k')
p(x,y,'r')
X=[x;y];
P=[.8 0;0 1]*X;
p(P(1,:),P(2,:),'g')
P=[.4 0;0 1]*X;
p(P(1,:),P(2,:),'b')
plot([a+3.5 -a+3.5],b-2,'k')
p(c+3.5,d-2,'k')
p(x+3.5,y-2,'g')
X=[x;y];
P=[.8 0;0 1]*X;
p(P(1,:)+3.5,P(2,:)-2,'y')
P=[.4 0;0 1]*X;
p(P(1,:)+3.5,P(2,:)-2,'m')
plot([a+7 -a+7],b+.5,'k')
p(c+7,d+.5,'k')
p(x+7,y+.5,'b')
X=[x;y];
P=[.8 0;0 1]*X;
p(P(1,:)+7,P(2,:)+.5,'m')
P=[.4 0;0 1]*X;
p(P(1,:)+7,P(2,:)+.5,'r')
plot([a+12 -a+12],b-2,'k')
p(c+12,d-2,'k')
p(x+12,y-2,'m')
X=[x;y];
P=[.8 0;0 1]*X;
p(P(1,:)+12,P(2,:)-2,'b')
P=[.4 0;0 1]*X;
p(P(1,:)+12,P(2,:)-2,'y')
ylim([0,1.5+f/3])
xlim([-1.5,2+f/3])
axis equal off
end