You don't know

(piirrä (layouts/superimpose (let [liikkeen-määrä 15 keskipiste 400 tärinän-kesto 0.2] (assoc (teksti (let [texts ["YOU DON'T KNO%" "YOU D_N'7 KNOW" "YO? DON'L KNOW" "YOU DON'P #NOW"]] (get texts (int (* (dec (count texts)) (mod (* 3.5 (aika)) 1))))) 40 [200 200 200 255]) :x (edes-takas (- keskipiste liikkeen-määrä) keskipiste tärinän-kesto (aika)) :y (edes-takas (- keskipiste liikkeen-määrä) keskipiste (* 0.9 tärinän-kesto) (aika))))))