Code
#Program to code a pookalam.
#outerborder
c=circle (x=0,y=0,r=130,fill="orange",stroke="orange")
li=circle(x=90,y=90,r=3,fill="yellow",stroke="red",stroke_width=2) |repeat(36,rotate(50))
com=combine([c,li])
#layer1
r1=rectangle (w=140,h=140,fill ="yellow") |repeat (20,rotate(50))
r2=rectangle (w=160,h=160,fill="red",stroke="yellow") |rotate(50)|repeat(20,rotate(50))
r3=rectangle (w=180,h=180,fill="maroon",stroke="yellow",stroke_width=1.5) |repeat (20,rotate(50))
show(com,r3,r2,r1)
#layer2
s=ellipse (h=100,w=20,x=0,y=50,fill="green")|repeat (30,rotate(20))
s1=ellipse (h=70,w=20,x=0,y=50,fill="orange") |rotate(30)|repeat(30,rotate(20))
c1=combine([s,s1])
s2=ellipse(h=40,w=10,x=0,y=50,fill="red") |repeat (30,rotate(20))
s3=ellipse(h=40,w=10,x=0,y=50,fill="gold") |rotate(30)|repeat (30,rotate(20))
c2=combine([s2,s3])
show(c1,c2)
#layer3
inside=circle(x=0,y=0,r=60,fill="maroon")
show(inside)
#layer4
f1=ellipse(x=0,y=0,h=50,w=55,fill="red",stroke="green",stroke_width=3)
f2=circle(x=0,y=20,r=25,fill="red", stroke="green",stroke_width=3)
show(f1,f2)
#forloop
x,y=0,20
r=25
n=4
step=r/n
for i in range(n):
c=circle(x=x,y=y,r=r,stroke="yellow")
show(c)
r=r-step
f3=ellipse(x=0,y=-25,h=30,w=70,fill="peachpuff")
f4=circle(x=0,y=-10,r=20,fill="green")
f51=circle(x=-23,y=-10,r=8,fill="yellow",stroke="black",stroke_width=2)
f5a=circle(x=-23,y=-8,r=5,fill="orange")
f52=circle(x=23,y=-10,r=8,fill="yellow",stroke="black", stroke_width=2)
f5b=circle(x=23,y=-8,r=5,fill="orange")
show(f3,f4,f51,f5a,f52,f5b)
f6=rectangle (x=0,y=5,h=15,w=40,fill="Orange",stroke="black",stroke_width=2)
f61=rectangle (x=0,y=4,h=10,w=40,fill="red", stroke="black")
f62=circle(x=0,y=3,r=3,fill="lightgreen")
show(f6,f61,f62)
eye1=ellipse(x=-10,y=-12,h=2,w=12,fill="white",stroke="black",stroke_width=2)
eye2=ellipse(x=10,y=-12,h=2,w=12,fill="white",stroke="black",stroke_width=2)
brow1=rectangle (x=6,y=9,h=1,w=12,fill="black")
brow2=rectangle(x=6,y=-9,h=1,w=12,fill ="black")
b1=brow1|rotate(160)
b2=brow2|rotate(20)
bindi1=circle(x=0,y=6,r=2,fill="red",stroke="white")
bindi2=circle(x=0,y=-6,r=2,fill="white",stroke="red")
show(eye1,b1,eye2,b2,bindi1,bindi2)
m1=circle(x=8,y=-23,r=2,fill="red")
m2=circle(x=-8,y=-23,r=2,fill="red")
m=ellipse(x=0,y=-25,h=3,w=15,fill="red")
show(m1,m2,m)
#lights
l=circle(x=35,y=37,r=2,fill="yellow",stroke="red")|repeat(20,rotate(20))
show(l)
#happy Onam in advance. May this Onam be filled with happiness and prosperity.
#Thank you.