diff --git a/src/heyarne/all_my_friends/core.cljc b/src/heyarne/all_my_friends/core.cljc
index b15afa5..8f828ec 100644
--- a/src/heyarne/all_my_friends/core.cljc
+++ b/src/heyarne/all_my_friends/core.cljc
@@ -1,15 +1,16 @@
 (ns heyarne.all-my-friends.core
   (:require [quil.core :as q]
-            [quil.middlewares.pause-on-error :refer [pause-on-error]]
-            [quil.middlewares.fun-mode :refer [fun-mode]]
+            [quil.middleware :as qm]
             [camel-snake-kebab.core :refer [->kebab-case-keyword]]
             [cheshire.core :as json]
             [net.cgrand.xforms :as x]
             [thi.ng.geom.vector :as v]
             [thi.ng.geom.core :as g]
+            [thi.ng.geom.line :as l]
             [thi.ng.geom.matrix :as mat]
             [thi.ng.geom.rect :as r]
             [thi.ng.math.core :as m]
+            [thi.ng.math.noise :as n]
             [clojure.java.io :as io]
             [clojure.string :as str]))
 
@@ -111,16 +112,17 @@
 
   (doseq [face current-faces
           p (:scaled-mesh face)
-          :let [p (g/transform (v/vec2 p) transform-matrix)]]
-    (q/ellipse (p :x) (p :y) 6 6)
-    #_(apply q/line pt1 pt2)))
+          :let [p (g/transform (v/vec2 p) transform-matrix)
+                t (m/* (v/randvec2) (* 1.5 (+ 1 (n/noise1 (* 0.002 (q/millis))))))
+                {[a b] :points} (l/line2 (g/translate p (m/- t)) (g/translate p t))]]
+    (q/line a b)))
 
 #_:clj-kondo/ignore
 (q/defsketch all-my-friends
   :title "These are all my friends"
   :settings #(q/smooth 2)
-  :middleware [pause-on-error
-               fun-mode]
+  :middleware [qm/pause-on-error
+               qm/fun-mode]
   :setup setup
   :key-pressed key-pressed
   :draw draw