Pookkalam by Nandana s kartha

Code

#outer circle
c = circle(r=150,fill = "black")
show(c)
shape = circle(x=100, y=0, r=50,fill="#0c541e") | repeat(18, rotate(20))
show(shape)
shape = circle(x=85, y=0, r=50,fill="#541e0c") | repeat(18, rotate(20))
show(shape)
shape = circle(x=70, y=0, r=50,fill="#b50a0a") | repeat(18, rotate(20))
show(shape)
c2 = circle(r=100, fill="#ea410e",stroke="#541e0c")
show (c2)


#inside moon

s = circle(x=80, y=0, r=16,stroke="#541e0c",stroke_width=2)
s1 = s | repeat(20, scale(0.8))
s2 = s1 | repeat(36, rotate(10))
show(s2)
c2 = circle(x=0,y=20,r=80, fill="white",stroke="#541e0c", stroke_width=5)
show (c2)
#body and wings

b1=ellipse(w=8,h=67)
show(b1)
c3 = circle(x=0,y=32,r=5)
show (c3)
b2 = ellipse(w=20,h=2,x=5,y=35)
b3=b2|rotate(60)|translate(x=32,y=25)
b4=b3|rotate(60)|translate(x=32,y=20)
show(b3,b4)

s1=ellipse(w=50,h=70,x=30,y=30,fill="#541e0c",stroke="#0c541e",stroke_width=3)| rotate(-45)|translate(x=-18,y=24)
s2=ellipse(w=50,h=30,x=25,y=-25,fill="#541e0c",stroke="#0c541e",stroke_width=3)| rotate(-45)|translate(x=22,y=14)
s3=ellipse(w=50,h=70,x=30,y=30,fill="#541e0c",stroke="#0c541e",stroke_width=3)| rotate(-45)|translate(x=-18,y=24)|rotate(90)
s4=ellipse(w=50,h=30,x=25,y=-25,fill="#541e0c",stroke="#0c541e",stroke_width=3) | rotate(-45)|translate(x=22,y=14)| rotate(270)
show(s1,s2,s3,s4)
s5=ellipse(w=50,h=70,x=30,y=30,fill="red")| rotate(-45)|translate(x=-18,y=24)|scale(0.85)
s6=ellipse(w=50,h=30,x=25,y=-25,fill="red") | rotate(-45)|translate(x=22,y=14)|scale(0.85)
s7=ellipse(w=50,h=70,x=30,y=30,fill="red")| rotate(-45)|translate(x=-18,y=24)|rotate(90)|scale(0.85)
s8=ellipse(w=50,h=30,x=25,y=-25,fill="red") | rotate(-45)|translate(x=22,y=14)| rotate(270)|scale(0.85)
show(s5,s6,s7,s8)
s5=ellipse(w=50,h=70,x=30,y=30,fill="#ea410e")| rotate(-45)|translate(x=-18,y=24)|scale(0.7)
s6=ellipse(w=50,h=30,x=25,y=-25,fill="#ea410e") | rotate(-45)|translate(x=22,y=14)|scale(0.7)
s7=ellipse(w=50,h=70,x=30,y=30,fill="#ea410e")| rotate(-45)|translate(x=-18,y=24)|rotate(90)|scale(0.7)
s8=ellipse(w=50,h=30,x=25,y=-25,fill="#ea410e") | rotate(-45)|translate(x=22,y=14)| rotate(270)|scale(0.7)
show(s5,s6,s7,s8)
s5=ellipse(w=50,h=70,x=30,y=30,fill="yellow")| rotate(-45)|translate(x=-18,y=24)|scale(0.55)
s6=ellipse(w=50,h=30,x=25,y=-25,fill="yellow") | rotate(-45)|translate(x=22,y=14)|scale(0.55)
s7=ellipse(w=50,h=70,x=30,y=30,fill="yellow")| rotate(-45)|translate(x=-18,y=24)|rotate(90)|scale(0.55)
s8=ellipse(w=50,h=30,x=25,y=-25,fill="yellow") | rotate(-45)|translate(x=22,y=14)| rotate(270)|scale(0.55)
show(s5,s6,s7,s8)
s5=ellipse(w=50,h=70,x=30,y=30,fill="white")| rotate(-45)|translate(x=-18,y=24)|scale(0.4)
s6=ellipse(w=50,h=30,x=25,y=-25,fill="white") | rotate(-45)|translate(x=22,y=14)|scale(0.4)
s7=ellipse(w=50,h=70,x=30,y=30,fill="white")| rotate(-45)|translate(x=-18,y=24)|rotate(90)|scale(0.4)
s8=ellipse(w=50,h=30,x=25,y=-25,fill="white") | rotate(-45)|translate(x=22,y=14)| rotate(270)|scale(0.4)
show(s5,s6,s7,s8)

b1=ellipse(w=10,h=67,fill="#601710")
show(b1)
c3 = circle(x=0,y=32,r=5,fill="#601710")
show (c3)
b2 = ellipse(w=20,h=2,x=5,y=35,fill="black")
b3=b2|rotate(60)|translate(x=32,y=25)
b4=b3|rotate(60)|translate(x=32,y=20)
show(b3,b4)

p1 = point(7,82.5)
p2 = point(-7,82.5)
p3 = point(5,65)
p4 = point(-5,65)
neck = polygon([p1, p2, p3, p4], fill="black")
head = circle(x=0, y=88, r=4, fill="black")
body = neck + head
rep1 = body|repeat(3, rotate(14)|translate(y=14)|scale(0.8))
rep2 = body|repeat(3, rotate(-14)|translate(y=14)|scale(0.8))                
show(rep1,rep2)