@maniclang/workbench 0.1.11

package/examples/creator-chaos-game-fern.manic

@@ -0,0 +1,72 @@
+// Existing-Manic treatment of fractales/fig0050.asy.
+// It explains the chaos-game invariant without pretending to plot 200k points.
+
+title("The Chaos-Game Fern");
+canvas("9:16");
+template("black");
+creator(me,"@anish2good name=Manic_Math tagline=Randomness_made_visible yt=zarigatongy x=@anish2good web=8gwifi.org/manic accent=lime secondary=cyan footer=compact cta=Animate_the_rule safe=clean");
+socials(me);
+watermark(mark,(w*0.16,h*0.055),"Made With Manic");
+endcard(me,"title=Make_Randomness_Explain_Itself cta=8gwifi.org/manic");
+
+let u=(w+h-abs(w-h))/1080;
+text(kicker,(cx,h*0.10),"THE CHAOS GAME");
+text(head,(cx,h*0.17),"Four random choices. One fern.");
+text(question,(cx,h*0.24),"Why does the picture not become random noise?");
+text(caption,(cx,h*0.79),"Every choice moves the point into a smaller copy of the same final shape.");
+size(kicker,20*u); bold(kicker); color(kicker,lime);
+size(head,27*u); bold(head); wrap(head,w*0.76);
+size(question,20*u); bold(question); wrap(question,w*0.74); color(question,gold);
+size(caption,20*u); bold(caption); wrap(caption,w*0.74); color(caption,dim);
+
+rect(card0,(cx-150*u,h*0.32),130*u,72*u); text(t0,(cx-150*u,h*0.32),"STEM\n1%");
+rect(card1,(cx+150*u,h*0.32),130*u,72*u); text(t1,(cx+150*u,h*0.32),"UP\n85%");
+rect(card2,(cx-85*u,h*0.39),130*u,72*u); text(t2,(cx-85*u,h*0.39),"LEFT\n7%");
+rect(card3,(cx+85*u,h*0.39),130*u,72*u); text(t3,(cx+85*u,h*0.39),"RIGHT\n7%");
+tag(card0,rules); tag(card1,rules); tag(card2,rules); tag(card3,rules);
+tag(t0,rules); tag(t1,rules); tag(t2,rules); tag(t3,rules);
+color(rules,cyan);
+untraced(card0); untraced(card1); untraced(card2); untraced(card3);
+hidden(t0); hidden(t1); hidden(t2); hidden(t3);
+
+def fern(k,x,y,ang,len,depth) {
+  if depth > 0 && len > 2 {
+    let x2=x+len*cos(ang); let y2=y-len*sin(ang);
+    line(f{k},(x,y),(x2,y2)); hue(f{k},105+depth*8); tag(f{k},fern);
+    fern(3*k,x2,y2,ang+0.06,len*0.82,depth-1);
+    fern(3*k+1,x2,y2,ang+0.88,len*0.40,depth-2);
+    fern(3*k+2,x2,y2,ang-0.88,len*0.40,depth-2);
+  }
+}
+fern(1,cx,h*0.68,1.5708,80*u,8);
+untraced(fern); hidden(kicker); hidden(head); hidden(question); hidden(caption);
+
+step("ask") { par { show(kicker,0.3); show(head,0.45); show(question,0.4); show(caption,0.35); } }
+wait(0.9);
+step("reveal the four choices") {
+  stagger(0.12) {
+    par { draw(card0,0.35,smooth); show(t0,0.25); }
+    par { draw(card1,0.35,smooth); show(t1,0.25); }
+    par { draw(card2,0.35,smooth); show(t2,0.25); }
+    par { draw(card3,0.35,smooth); show(t3,0.25); }
+  }
+  say(caption,"The choices are random, but every allowed move is a contraction.",0.4,smooth);
+}
+wait(0.85);
+step("show the invariant") {
+  par { fade(rules,0.35); draw(fern,3.0,smooth); say(caption,"Repeated contractions can only land on the shared invariant shape: the fern.",0.45,smooth); }
+}
+wait(0.95);
+step("explain the apparent paradox") {
+  par {
+    pulse(fern,0.85);
+    say(caption,"Randomness chooses the route, but the four contraction maps restrict every destination.",0.60,smooth);
+  }
+}
+wait(1.0);
+step("solve") {
+  par { say(head,"Random path. Deterministic destination.",0.45,smooth); pulse(fern,0.8); }
+}
+wait(1.25);
+step("cta") { par { fade(kicker,0.3); fade(head,0.3); fade(question,0.3); fade(caption,0.3); fade(fern,0.4); fade(me.footer,0.3); show(me.endcard,0.6); } }
+wait(2.2);

package/examples/creator-circle-inversion-chain.manic

@@ -0,0 +1,61 @@
+// Existing-Manic treatment of animations/fig0020.asy.
+// Solve one inversion exactly, then use nested circles to show the chain idea.
+
+title("Circle Inversion");
+canvas("9:16");
+template("black");
+creator(me,"@anish2good name=Manic_Geometry tagline=Transformations_made_visible yt=zarigatongy x=@anish2good web=8gwifi.org/manic accent=gold secondary=cyan footer=compact cta=Invert_the_picture safe=clean");
+socials(me);
+watermark(mark,(w*0.16,h*0.055),"Made With Manic");
+endcard(me,"title=Make_Geometry_Move cta=8gwifi.org/manic");
+
+let u=(w+h-abs(w-h))/1080; let oy=h*0.48; let s=75*u; let ox=w*0.23;
+text(kicker,(cx,h*0.10),"CIRCLE INVERSION · UNIT CIRCLE");
+text(head,(cx,h*0.17),"A circle has d = 3 and r = 1. Where does it go?");
+text(caption,(cx,h*0.79),"Inversion preserves circles, but changes their center and radius.");
+equation(work,(cx,h*0.68),`d'=\frac d{d^2-r^2},\qquad r'=\frac r{d^2-r^2}`,30*u);
+size(kicker,20*u); bold(kicker); color(kicker,gold);
+size(head,25*u); bold(head); wrap(head,w*0.76);
+size(caption,20*u); bold(caption); wrap(caption,w*0.74); color(caption,dim);
+
+circle(inv,(ox,oy),s); outlined(inv); outline(inv,cyan); color(inv,panel); stroke(inv,3);
+dot(O,(ox,oy),8*u); color(O,gold);
+circle(before,(ox+3*s,oy),s); outlined(before); outline(before,magenta); color(before,panel); stroke(before,4);
+invertpath(after,before,O,s,300); outline(after,lime); color(after,lime); stroke(after,4);
+circle(c1,(ox+0.59*s,oy),0.09*s); circle(c2,(ox+0.73*s,oy),0.05*s);
+outlined(c1); outlined(c2); outline(c1,lime); outline(c2,lime);
+untraced(inv); untraced(before); untraced(after); untraced(c1); untraced(c2);
+hidden(O);
+hidden(kicker); hidden(head); hidden(caption); hidden(work);
+
+step("pose") {
+  par { show(kicker,0.3); show(head,0.45); show(caption,0.35); }
+  seq { draw(inv,0.65,smooth); show(O,0.2); draw(before,0.65,smooth); }
+}
+wait(0.85);
+step("calculate") {
+  rewrite(work,`d'=\frac38,\qquad r'=\frac18`,0.75,smooth);
+  say(caption,"Substitute d = 3 and r = 1. The image is a much smaller circle inside the inversion circle.",0.45);
+}
+wait(0.8);
+step("show the image") { par { draw(after,0.65,smooth); fade(before,0.35); pulse(after,0.65); } }
+wait(0.85);
+step("read the scale change") {
+  par {
+    pulse(after,0.85);
+    say(caption,"The original circle is far from O, so inversion compresses both its center distance and its radius.",0.60,smooth);
+  }
+}
+wait(0.95);
+step("continue the chain") {
+  seq {
+    draw(c1,0.45,smooth);
+    draw(c2,0.40,smooth);
+    say(caption,"Repeating the same circle rule produces a tangent chain.",0.40);
+  }
+}
+wait(1.0);
+step("solve") { say(head,"The denominator d² − r² controls the image.",0.45,smooth); }
+wait(1.25);
+step("cta") { par { fade(kicker,0.3); fade(head,0.3); fade(caption,0.3); fade(work,0.3); fade(inv,0.3); fade(O,0.3); fade(after,0.3); fade(c1,0.3); fade(c2,0.3); fade(me.footer,0.3); show(me.endcard,0.6); } }
+wait(2.2);

package/examples/creator-convex-hull-depth.manic

@@ -0,0 +1,59 @@
+// Existing-Manic treatment of animations/fig0190.asy.
+// A finite cloud makes the hull/depth question readable and exact.
+
+title("Finding a Convex Hull");
+canvas("9:16");
+template("black");
+creator(me,"@anish2good name=Manic_Data tagline=Algorithms_made_visible yt=zarigatongy x=@anish2good web=8gwifi.org/manic accent=cyan secondary=gold footer=compact cta=Find_the_boundary safe=clean");
+socials(me);
+watermark(mark,(w*0.16,h*0.055),"Made With Manic");
+endcard(me,"title=Turn_Algorithms_Into_Stories cta=8gwifi.org/manic");
+
+let u=(w+h-abs(w-h))/1080;
+text(kicker,(cx,h*0.10),"COMPUTATIONAL GEOMETRY");
+text(head,(cx,h*0.17),"Which points define the convex hull?");
+text(caption,(cx,h*0.79),"Imagine stretching a rubber band around the cloud. Only boundary points touch it.");
+size(kicker,20*u); bold(kicker); color(kicker,cyan);
+size(head,27*u); bold(head); wrap(head,w*0.76);
+size(caption,19*u); bold(caption); wrap(caption,w*0.74); color(caption,dim);
+
+dot(p0,(w*0.19,h*0.52),9*u); dot(p1,(w*0.28,h*0.38),9*u); dot(p2,(w*0.47,h*0.33),9*u);
+dot(p3,(w*0.70,h*0.40),9*u); dot(p4,(w*0.80,h*0.56),9*u); dot(p5,(w*0.64,h*0.66),9*u);
+dot(p6,(w*0.35,h*0.67),9*u); dot(p7,(w*0.39,h*0.49),8*u); dot(p8,(w*0.53,h*0.46),8*u);
+dot(p9,(w*0.62,h*0.54),8*u); dot(p10,(w*0.48,h*0.58),8*u);
+tag(p0,cloud); tag(p1,cloud); tag(p2,cloud); tag(p3,cloud); tag(p4,cloud); tag(p5,cloud);
+tag(p6,cloud); tag(p7,cloud); tag(p8,cloud); tag(p9,cloud); tag(p10,cloud);
+color(cloud,dim);
+polygon(hull,(w*0.19,h*0.52),(w*0.28,h*0.38),(w*0.47,h*0.33),(w*0.70,h*0.40),(w*0.80,h*0.56),(w*0.64,h*0.66),(w*0.35,h*0.67));
+outlined(hull); outline(hull,gold); color(hull,panel); opacity(hull,0.30); stroke(hull,5);
+hidden(cloud); untraced(hull); hidden(kicker); hidden(head); hidden(caption);
+
+step("pose") {
+  par { show(kicker,0.3); show(head,0.45); show(caption,0.35); }
+  stagger(0.045) {
+    show(p0,0.16); show(p1,0.16); show(p2,0.16); show(p3,0.16); show(p4,0.16); show(p5,0.16);
+    show(p6,0.16); show(p7,0.16); show(p8,0.16); show(p9,0.16); show(p10,0.16);
+  }
+}
+wait(0.9);
+step("discard interior points") {
+  par { recolor(p7,dim,0.3); recolor(p8,dim,0.3); recolor(p9,dim,0.3); recolor(p10,dim,0.3); say(caption,"Interior points cannot be touched by a supporting line, so they cannot be hull vertices.",0.45); }
+}
+wait(0.85);
+step("test a supporting line") {
+  say(caption,"A boundary point admits a line with the entire cloud on one side; an interior point never can.",0.65,smooth);
+}
+wait(1.0);
+step("stretch the band") { par { draw(hull,1.6,smooth); say(caption,"The outermost points form the smallest convex polygon containing the entire cloud.",0.45); } }
+wait(0.95);
+step("read the minimal boundary") {
+  par {
+    pulse(hull,0.85);
+    say(caption,"Removing any one hull vertex would leave an extreme point outside the polygon.",0.60,smooth);
+  }
+}
+wait(0.95);
+step("solve") { par { pulse(hull,0.75); say(head,"Seven points define the boundary.",0.4,smooth); } }
+wait(1.25);
+step("cta") { par { fade(kicker,0.3); fade(head,0.3); fade(caption,0.3); fade(cloud,0.3); fade(hull,0.4); fade(me.footer,0.3); show(me.endcard,0.6); } }
+wait(2.2);

package/examples/creator-coordinate-worlds.manic

@@ -0,0 +1,182 @@
+// A complete textbook problem told with three truthful presentations:
+// 2D isolates the useful right triangle, textbook 3D builds the cuboid cleanly,
+// and spatial 3D confirms that the final segment really crosses the volume.
+
+title("The 3–4–12 Box — Find the Space Diagonal");
+canvas("9:16");
+template("paper");
+
+creator(me,"@anish2good name=Manic_Geometry tagline=Textbooks_made_visible yt=zarigatongy x=@anish2good web=8gwifi.org/manic accent=cyan secondary=magenta footer=compact safe=clean");
+socials(me);
+watermark(manicMark,(w*0.17,h*0.065),"Made With Manic");
+endcard(me,"title=Make_Math_Move cta=8gwifi.org/manic");
+
+let u = (w+h-abs(w-h))/2160;
+text(kicker,(cx,h*0.075),"MANIC · PYTHAGORAS IN 3D"); size(kicker,22*u); bold(kicker); color(kicker,cyan); hidden(kicker);
+text(headline,(cx,h*0.13),"A box is 3 × 4 × 12. Find its space diagonal."); size(headline,36*u); bold(headline); wrap(headline,w*0.82); hidden(headline);
+text(chapter,(cx,h*0.205),"THE PROBLEM"); size(chapter,23*u); bold(chapter); color(chapter,gold); hidden(chapter);
+text(caption,(cx,h*0.805),"Connect one corner to the opposite corner—through the box."); size(caption,24*u); bold(caption); wrap(caption,w*0.78); hidden(caption);
+text(note,(cx,h*0.855),"Hint: solve one right triangle at a time."); size(note,21*u); color(note,dim); wrap(note,w*0.78); hidden(note);
+equation(work,(cx,h*0.735),`D=?`,43*u); hidden(work);
+
+// ---------------------------------------------------------------------------
+// 2D: isolate the 3 × 4 floor. This is the truthful view for the first triangle.
+// ---------------------------------------------------------------------------
+let lx = w*0.24;
+let rx = w*0.76;
+let ty = h*0.36;
+let by = h*0.60;
+
+line(floorBottom,(lx,by),(rx,by)); color(floorBottom,cyan); stroke(floorBottom,4*u); untraced(floorBottom); hidden(floorBottom); tag(floorBottom,floor2d);
+line(floorRight,(rx,by),(rx,ty)); color(floorRight,magenta); stroke(floorRight,4*u); untraced(floorRight); hidden(floorRight); tag(floorRight,floor2d);
+line(floorTop,(rx,ty),(lx,ty)); color(floorTop,cyan); stroke(floorTop,4*u); untraced(floorTop); hidden(floorTop); tag(floorTop,floor2d);
+line(floorLeft,(lx,ty),(lx,by)); color(floorLeft,magenta); stroke(floorLeft,4*u); untraced(floorLeft); hidden(floorLeft); tag(floorLeft,floor2d);
+line(floorDiagonal2,(lx,by),(rx,ty)); color(floorDiagonal2,gold); stroke(floorDiagonal2,6*u); untraced(floorDiagonal2); hidden(floorDiagonal2); tag(floorDiagonal2,floor2d);
+
+dot(A2,(lx,by),9*u); filled(A2); color(A2,fg); hidden(A2); tag(A2,floor2d);
+dot(C2,(rx,ty),9*u); filled(C2); color(C2,fg); hidden(C2); tag(C2,floor2d);
+text(a2,(lx-22*u,by+24*u),"A"); size(a2,22*u); bold(a2); hidden(a2); tag(a2,floor2d);
+text(c2,(rx+22*u,ty-20*u),"C"); size(c2,22*u); bold(c2); hidden(c2); tag(c2,floor2d);
+text(side4,(cx,by+32*u),"4"); size(side4,24*u); bold(side4); color(side4,cyan); hidden(side4); tag(side4,floor2d);
+text(side3,(rx+30*u,(ty+by)/2),"3"); size(side3,24*u); bold(side3); color(side3,magenta); hidden(side3); tag(side3,floor2d);
+text(base5,(cx+22*u,(ty+by)/2-18*u),"5"); size(base5,25*u); bold(base5); color(base5,gold); hidden(base5); tag(base5,floor2d);
+
+// ---------------------------------------------------------------------------
+// 3D: the scientific frame retains the real 0..4, 0..3, 0..12 coordinates.
+// Its display cube is intentionally balanced; the numbered axes keep the data
+// honest while the space-diagonal geometry stays readable on a phone.
+// ---------------------------------------------------------------------------
+camera3((9,-11,8),(0,0,0),17,orthographic);
+frame3(boxFrame,(0,0,0),(6,6,6),"x=0..4 y=0..3 z=0..12 xmajor=1 ymajor=1 zmajor=4 planes=xy:min,xz:min,yz:min mode=textbook");
+hidden(boxFrame);
+
+// Data-to-display corners of frame3:
+// (0,0,0) -> (-3,-3,-3), (4,3,0) -> (3,3,-3), (4,3,12) -> (3,3,3).
+point3(A3,(-3,-3,-3),0.15); color(A3,fg); hidden(A3); tag(A3,boxStory);
+point3(C3,(3,3,-3),0.15); color(C3,gold); hidden(C3); tag(C3,boxStory);
+point3(B3,(3,3,3),0.18); color(B3,lime); hidden(B3); tag(B3,boxStory);
+line3(floorDiagonal3,(-3,-3,-3),(3,3,-3)); color(floorDiagonal3,gold); thick(floorDiagonal3,0.075); untraced(floorDiagonal3); hidden(floorDiagonal3); tag(floorDiagonal3,boxStory);
+line3(height3,(3,3,-3),(3,3,3)); color(height3,magenta); thick(height3,0.075); untraced(height3); hidden(height3); tag(height3,boxStory);
+line3(spaceDiagonal,(-3,-3,-3),(3,3,3)); color(spaceDiagonal,lime); thick(spaceDiagonal,0.105); untraced(spaceDiagonal); hidden(spaceDiagonal); tag(spaceDiagonal,boxStory);
+
+text(a3,(0,0),"A"); size(a3,24*u); bold(a3); hidden(a3); pin3(a3,A3,(-18,16)); tag(a3,boxStory);
+text(c3,(0,0),"C"); size(c3,24*u); bold(c3); color(c3,gold); hidden(c3); pin3(c3,C3,(16,14)); tag(c3,boxStory);
+text(b3,(0,0),"B"); size(b3,24*u); bold(b3); color(b3,lime); hidden(b3); pin3(b3,B3,(16,-14)); tag(b3,boxStory);
+point3(floorMid,(0,0,-3),0.01); hidden(floorMid);
+point3(heightMid,(3,3,0),0.01); hidden(heightMid);
+point3(spaceMid,(0,0,0),0.01); hidden(spaceMid);
+text(floorLabel,(0,0),"AC = 5"); size(floorLabel,21*u); bold(floorLabel); color(floorLabel,gold); hidden(floorLabel); pin3(floorLabel,floorMid,(10,18)); tag(floorLabel,boxStory);
+text(heightLabel,(0,0),"CB = 12"); size(heightLabel,21*u); bold(heightLabel); color(heightLabel,magenta); hidden(heightLabel); pin3(heightLabel,heightMid,(18,0)); tag(heightLabel,boxStory);
+text(spaceLabel,(0,0),"AB = 13"); size(spaceLabel,22*u); bold(spaceLabel); color(spaceLabel,lime); hidden(spaceLabel); pin3(spaceLabel,spaceMid,(-18,-22)); tag(spaceLabel,boxStory);
+
+// ---------------------------------------------------------------------------
+// THE SOLUTION
+// ---------------------------------------------------------------------------
+step("pose the box problem") {
+  seq {
+    par { show(kicker,0.35); show(headline,0.50); show(chapter,0.40); show(caption,0.45); show(note,0.40); show(work,0.40); }
+    view3(boxFrame,"isometric",0.80,smooth,1.35);
+    show(boxFrame,0.75);
+    stagger(0.10) { show(A3,0.25); show(a3,0.25); show(B3,0.25); show(b3,0.25); }
+    par { show(spaceDiagonal,0.15); draw(spaceDiagonal,1.20,smooth); }
+    pulse(spaceDiagonal,0.65);
+    wait(0.60);
+  }
+}
+
+step("find the hidden floor diagonal") {
+  seq {
+    par {
+      fade(boxFrame,0.50);
+      fade(boxStory,0.50);
+      say(chapter,"1 · SOLVE THE 2D FLOOR",0.40,smooth);
+      say(caption,"The floor is a 3 × 4 rectangle. Its diagonal is the first hypotenuse.",0.50,smooth);
+      say(note,"This part is planar—so 2D is the clearest explanation.",0.45,smooth);
+      rewrite(work,`AC^2=3^2+4^2`,0.65,smooth);
+    }
+    stagger(0.10) {
+      show(floorBottom,0.10); draw(floorBottom,0.55,smooth);
+      show(floorRight,0.10); draw(floorRight,0.45,smooth);
+      show(floorTop,0.10); draw(floorTop,0.55,smooth);
+      show(floorLeft,0.10); draw(floorLeft,0.45,smooth);
+      show(A2,0.20); show(a2,0.20); show(C2,0.20); show(c2,0.20);
+      show(side4,0.25); show(side3,0.25);
+    }
+    par {
+      show(floorDiagonal2,0.10);
+      draw(floorDiagonal2,1.10,smooth);
+      rewrite(work,`AC=\sqrt{3^2+4^2}=\sqrt{25}=\textcolor{gold}{5}`,1.15,smooth);
+    }
+    show(base5,0.30);
+    pulse(floorDiagonal2,0.65);
+    wait(0.65);
+  }
+}
+
+step("use that answer inside the box") {
+  seq {
+    par {
+      fade(floor2d,0.50);
+      say(chapter,"2 · BUILD THE 3D RIGHT TRIANGLE",0.40,smooth);
+      say(caption,"Now AC = 5 meets the 12-unit height at a right angle.",0.50,smooth);
+      say(note,"The same coordinates return as a clean textbook projection.",0.45,smooth);
+      rewrite(work,`AB^2=AC^2+CB^2`,0.70,smooth);
+    }
+    view3(boxFrame,"isometric",0.75,smooth,1.35);
+    show(boxFrame,0.70);
+    stagger(0.10) {
+      show(A3,0.20); show(a3,0.20);
+      show(C3,0.20); show(c3,0.20);
+      show(floorDiagonal3,0.10); draw(floorDiagonal3,0.90,smooth); show(floorLabel,0.25);
+      show(height3,0.10); draw(height3,0.90,smooth); show(heightLabel,0.25);
+      show(B3,0.20); show(b3,0.20);
+    }
+    wait(0.35);
+  }
+}
+
+step("solve the space diagonal") {
+  seq {
+    par {
+      show(spaceDiagonal,0.10);
+      draw(spaceDiagonal,1.25,smooth);
+      rewrite(work,`AB=\sqrt{\textcolor{gold}{5^2}+\textcolor{magenta}{12^2}}`,0.95,smooth);
+      say(caption,"Pythagoras works again—this time across the volume.",0.45,smooth);
+    }
+    rewrite(work,`AB=\sqrt{25+144}=\sqrt{169}`,0.85,smooth);
+    par {
+      rewrite(work,`\boxed{AB=\textcolor{lime}{13}}`,0.75,smooth);
+      show(spaceLabel,0.30);
+      pulse(spaceDiagonal,0.80);
+      say(note,"Two right triangles · one exact answer",0.40,smooth);
+    }
+    wait(0.80);
+  }
+}
+
+step("see why the answer is spatial") {
+  seq {
+    par {
+      present3(boxFrame,spatial,0.70,smooth);
+      say(chapter,"3 · REVEAL THE SPATIAL TRUTH",0.40,smooth);
+      say(caption,"Orbit the same construction: AB crosses all three dimensions.",0.50,smooth);
+      say(note,"2D to calculate · textbook 3D to explain · spatial 3D to understand",0.50,smooth);
+    }
+    par { orbit3(48,26,12,1.80,smooth); pulse(spaceDiagonal,0.70); }
+    par { orbit3(132,34,12,1.80,smooth); pulse(boxFrame.axes,0.70); }
+    wait(0.85);
+  }
+}
+
+step("creator call to action") {
+  par {
+    fade(boxFrame,0.45);
+    fade(boxStory,0.45);
+    fade(work,0.35);
+    fade(chapter,0.35);
+    fade(caption,0.35);
+    fade(note,0.35);
+    show(me.endcard,0.60);
+  }
+  wait(1.80);
+}

package/examples/creator-ellipse-reflection-property.manic

@@ -0,0 +1,59 @@
+// Existing-Manic treatment of animations/fig0120.asy.
+// The moving-locus source becomes a focused textbook problem with a solution.
+
+title("The Ellipse Reflection Property");
+canvas("9:16");
+template("black");
+creator(me,"@anish2good name=Manic_Optics tagline=Conics_explain_light yt=zarigatongy x=@anish2good web=8gwifi.org/manic accent=cyan secondary=gold footer=compact cta=Follow_the_ray safe=clean");
+socials(me);
+watermark(mark,(w*0.16,h*0.055),"Made With Manic");
+endcard(me,"title=Turn_Properties_Into_Stories cta=8gwifi.org/manic");
+
+let u=(w+h-abs(w-h))/1080; let yy=h*0.48;
+text(kicker,(cx,h*0.10),"ELLIPSE · REFLECTION PROPERTY");
+text(head,(cx,h*0.17),"Where does a ray from F₁ go?");
+text(caption,(cx,h*0.79),"At the boundary, the tangent makes equal angles with the two focal segments.");
+equation(eq,(cx,h*0.72),`\angle(F_1PT)=\angle(TPF_2)`,31*u);
+size(kicker,20*u); bold(kicker); color(kicker,cyan);
+size(head,27*u); bold(head); wrap(head,w*0.76);
+size(caption,19*u); bold(caption); wrap(caption,w*0.72); color(caption,dim);
+
+ellipse(oval,(cx,yy),210*u,125*u,0); color(oval,cyan); stroke(oval,4); untraced(oval);
+dot(F1,(cx-170*u,yy),10*u); dot(F2,(cx+170*u,yy),10*u); color(F1,gold); color(F2,gold);
+dot(P,(cx+77*u,yy-116*u),9*u); color(P,magenta);
+line(inray,(cx-170*u,yy),(cx+77*u,yy-116*u)); color(inray,gold); stroke(inray,4); untraced(inray);
+line(outray,(cx+77*u,yy-116*u),(cx+170*u,yy)); color(outray,magenta); stroke(outray,4); untraced(outray);
+line(tangent,(cx-35*u,yy-145*u),(cx+210*u,yy-88*u)); color(tangent,dim); dashed(tangent,12); untraced(tangent);
+hidden(F1); hidden(F2); hidden(P);
+hidden(kicker); hidden(head); hidden(caption); hidden(eq);
+
+step("pose") {
+  par { show(kicker,0.3); show(head,0.4); show(caption,0.35); }
+  seq {
+    draw(oval,1.05,smooth);
+    par { show(F1,0.2); show(F2,0.2); }
+    show(P,0.2);
+  }
+}
+wait(0.85);
+step("send the ray") {
+  seq {
+    draw(inray,0.75,smooth);
+    draw(tangent,0.60,smooth);
+    say(caption,"At P, draw the tangent. It makes equal angles with PF₁ and PF₂.",0.40);
+  }
+}
+wait(0.85);
+step("reflect") { par { draw(outray,0.7,smooth); show(eq,0.45); say(caption,"Equal incidence and reflection angles force the outgoing ray through F₂.",0.45); } }
+wait(0.95);
+step("read the equal angles") {
+  par {
+    pulse(P,0.80);
+    say(caption,"The tangent bisects the exterior angle between PF₁ and PF₂, turning the geometric fact into the law of reflection.",0.65,smooth);
+  }
+}
+wait(1.0);
+step("solve") { par { pulse(F2,0.75); say(head,"Every focal ray reflects to the other focus.",0.45,smooth); } }
+wait(1.25);
+step("cta") { par { fade(kicker,0.3); fade(head,0.3); fade(caption,0.3); fade(eq,0.3); fade(oval,0.3); fade(F1,0.3); fade(F2,0.3); fade(P,0.3); fade(inray,0.3); fade(outray,0.3); fade(tangent,0.3); fade(me.footer,0.3); show(me.endcard,0.6); } }
+wait(2.2);