Back to Gallery
  • Remix
  • Share
  • New Entry
on 25 Oct 2021
  • 7
  • 16
  • 0
  • 0
  • 277
%Piet black cross random on 2D plane,
close all;clear;
figure('color','k')
hold
Current plot held
%rng shuffle
a=rand(99,9);
s=9; %scale
%b is drift
for k=1:10:660
x=a(k+1);y=a(k+2);
if sqrt((x-2)^2+(y-2)^2)<3
z=rand(2);
p(a(k+2),a(k+3),a(k:k+1),a(k+4)/s)
end
end
%p(1,1,1,.3)
view(7,69)
axis off
function o=p(x,y,z,l)
b=rand-.5;
L='LineW';
plot3([x,x],[y-l,y+l],z,L,6)
plot3([x-l,x+l],[y,y],z+b,L,4)
%drawnow
end
Image
Remix Tree