Okay, pamätáte si môj minulý článok so šmahmi farby? Dnes sme spoločne v teame vedcov k1 rozvinuli túto myšlienku a napadlo nás ešte toto: Žé čo sa deje pri experimente 2 štrbín. Vlní sa priestor. Nakreslím: Btw inšpirácia bolo video: https://www.youtube.com/watch?v=59t0ud6Kiaw

Je toto teda reakcia na akciu alebo akcia na reakciu? :)

https://hrubos.tech/blogy/content/images/20260408223542-dosticka.GIF

Príkazy o vlhkej doštičke som samozrejme dával AI, vypľula mi kód za chvíľku, no nápad bol tento:

############################################################
# 1. Inštalácia (len raz)
############################################################
using Pkg
Pkg.add(["Plots", "FFMPEG"])

############################################################
# 2. Knižnice
############################################################
using Plots

############################################################
# 3. Funkcia (kľúčové riešenie problému!)
############################################################
function simulacia()

    n_frames = 160
    ball_x = -5.0
    ball_v = 0.18
    plate_x = 0.0

    n_particles = 120
    particles = [(plate_x, rand()*2 - 1) for _ in 1:n_particles]
    velocities = [(0.0, 0.0) for _ in 1:n_particles]

    hit = false

    anim = @animate for t in 1:n_frames

        # pohyb loptičky
        ball_x += ball_v

        # náraz
        if ball_x >= plate_x && !hit
            hit = true

            velocities = Tuple{Float64,Float64}[]

            for (x,y) in particles
                r = abs(y)

                if r < 0.5
                    # stred
                    push!(velocities, (rand()*1.2 + 0.5, y*2 + rand()*0.5))
                else
                    # okraje
                    push!(velocities, (rand()*0.6 + 0.2, y*1.2 + rand()*0.8))
                end
            end
        end

        # aktualizácia častíc
        if hit
            particles = [(x + vx, y + vy) for ((x,y),(vx,vy)) in zip(particles, velocities)]

            velocities = [
                (vx*0.97, vy*0.97 - 0.02)
                for (vx,vy) in velocities
            ]
        end

        # kreslenie
        plt = scatter([], [], 
            xlim=(-6,6), ylim=(-3,3), 
            legend=false
        )

        scatter!([ball_x], [0], markersize=10)
        plot!([plate_x, plate_x], [-2,2], linewidth=5)

        scatter!(
            [p[1] for p in particles],
            [p[2] for p in particles],
            markersize=3
        )

        plot!([3,3], [-3,3], linewidth=2, linestyle=:dash)

        plt
    end

    mp4(anim, "simulacia.mp4", fps=5)
end

############################################################
# 4. Spustenie
############################################################
simulacia()

---