Check it out with music: https://youtube.com/shorts/IJpAYHmVY70?feature=share

[code][/code]# Define list of colors[br]n = 1/ 255 [br]C1 = n {51, 102, 204}[br]C2 = n {112, 148, 219}[br]C3 = n {173, 194, 235}[br]C4 = n {214, 224, 245}[br]C5 = n {255, 214, 51}[br]C6 = n {255, 179, 179}[br]C7 = n {230, 242, 255}[br]# C1,2,3,4-> Waves[br]# C5-> Sun[br]# C6-> Background circle[br]# C7-> Background sky[br]LC = {C1, C2, C3, C4, C5, C6, C7}[br][br]#-- Slider to animate --#[br]speed = 0.1[br]t = Slider(0, 24 * 2*pi, 0.01, speed, 200)[br][br]SetCoords(t, 150, 450)[br][br]#-- Point of reference --#[br]O = (0, 6)[br][br]#-- Circular frame --#[br]c: (x-x(O))^2+(y-y(O))^2>=5^2[br][br]SetDynamicColor(c, LC(6,1), LC(6,2), LC(6,3), 1)[br]ShowLabel(c, false)[br][br]#-- Waves --#[br]g(x, y, z, w) = y * sin(x + z * t) - w + y(O)/2[br]LN = 1...4[br]Execute(Zip("f"+N+"(x) = g(x,1/3, 1/("+N+"), "+N+"-4)", N, LN))[br][br]Execute(Zip("SetVisibleInView(f"+N+", 1, false)", N, LN))[br][br]Execute(Zip("A"+N+" = Integral(f"+N+", -6, 6, false)", N, LN))[br][br]Execute(Zip("ShowLabel(A"+N+", false)", N, LN))[br][br]Execute(Zip("SetDynamicColor(A"+N+", LC("+(5-N)+", 1), LC("+(5-N)+", 2), LC("+(5-N)+", 3), 1)", N, LN))[br][br]#-- Sun with rays --#[br]sun = Circle(O, 2)[br][br]SetDynamicColor(sun, LC(5,1), LC(5,2), LC(5,3), 1)[br]SetLineThickness(sun, 10)[br]ShowLabel(sun, false)[br][br]La = Sequence(k, k, 0, 2 * pi, pi/16)[br]Lp = Zip((1; k + t / 24) + O, k, La)[br]L = Zip(Ray(O, P), P, Lp)[br][br]SetDynamicColor(L, LC(5,1), LC(5,2), LC(5,3), 0)[br]SetLineThickness(L, 10)[br]ShowLabel(L, false)[br][br]#-- Set layers to plot --#[br]Lnames = {"sun", "L", "A1", "A2", "A3", "A4", "c", "t"}[br]Execute(Zip("SetLayer("+name+", "+k+")", k, 0...Length(Lnames), name, Lnames))[br][br]# Hide auxiliary stuff[br]SetVisibleInView(O, 1, false)[br]SetVisibleInView(Lp, 1, false)[br]SetVisibleInView(t, 1, false)[br][br]# Final settings[br]SetBackgroundColor(LC(7,1), LC(7,2), LC(7,3))[br]CenterView(O)[br]ShowAxes(false)[br]ShowGrid(false)[br]StartAnimation(t, true)

Note the colors! :) Have fun!

If you like my work, you can support me in Patreon: [url=https://www.patreon.com/jcponce]https://www.patreon.com/jcponce[/url][br][br]There is a digital book with more art here: [url=https://www.patreon.com/jcponce/shop/mathematical-art-with-geogebra-577631?utm_medium=clipboard_copy&utm_source=copyLink&utm_campaign=productshare_creator&utm_content=join_link]Mathematical Art in GeoGebra[/url][br][br]∞Thanks!