diff --git a/2020/sketch_2020_10_13a/sketch_2020_10_13a.gif b/2020/sketch_2020_10_13a/sketch_2020_10_13a.gif
new file mode 100644
index 00000000..4c7a332f
Binary files /dev/null and b/2020/sketch_2020_10_13a/sketch_2020_10_13a.gif differ
diff --git a/2020/sketch_2020_10_13a/sketch_2020_10_13a.pyde b/2020/sketch_2020_10_13a/sketch_2020_10_13a.pyde
new file mode 100644
index 00000000..a77c9ea2
--- /dev/null
+++ b/2020/sketch_2020_10_13a/sketch_2020_10_13a.pyde
@@ -0,0 +1,91 @@
+from villares.arcs import arc_filleted_poly
+
+ps = [(0, 48), (0, 0), (48, 0), (48, 48)]
+
+
+def setup():
+    global slabs, slabs2
+    size(450, 450)
+    noStroke()
+
+    # slabs = []
+    # for i in range(12):
+    #     r = color(128, 128, random(255))
+    #     b = color(random(255), 129, 129)
+    #     for j in range(8):
+    #         pushMatrix()
+    #         translate(-140 + i * 60 - 5 * j, -60 + j * 96)
+    #         slabs.append((rdc_s(100, 0), r))
+    #         translate(60, 0)
+    #         slabs.append((rdc_s(100, 0), r))
+    #         translate(-50, 112)
+    #         slabs.append((rdc_s(100, 0, 180), b))
+    #         translate(60, 0)
+    #         slabs.append((rdc_s(100, 0, 180), b))
+    #         popMatrix()
+
+
+    slabs2 = []
+    for i in range(12):
+        r = color(128, random(255), 128)
+        b = color(129, random(255), 129)
+        for j in range(8):
+            pushMatrix()
+            translate(-140 + i * 55, -60 + j * 55)
+            slabs2.append((reg(100, 0), r))
+            translate(55, 0)
+            slabs2.append((reg(100, 0), r))
+            translate(-55, 110)
+            slabs2.append((reg(100, 0), b))
+            translate(55, 0)
+            slabs2.append((reg(100, 0), b))
+            popMatrix()
+
+
+def draw():
+    background(250)
+    global t, d_factor
+    t = frameCount / 300.
+    d_factor = map(mouseX, 0, width, 1, 0)
+
+    for i, slab in enumerate(distorter(slabs2)):
+        pts, c = slab
+        other = color(100, 255)
+        if 67 < i < 72:
+            fill(lerpColor(c, other, d_factor))
+        else:
+            fill(lerpColor(other, c, d_factor))
+        arc_filleted_poly(pts, [8] * 4)
+        fill(0)
+        # text(str(i), pts[2][0], pts[2][1])
+
+
+def distorter(col):
+    return (([distort(pt) for pt in pts], c)
+            for pts, c in col)
+
+def distort(pt):
+    s = 0.002
+    x = pt[0] + (300 * noise(100 + pt[1] * s, pt[01] * s, t) - 150) * d_factor
+    y = pt[1] + (300 * noise(pt[0] * s, pt[1] * s, t) - 150) * d_factor
+    return (x, y)
+
+def rdc_s(x, y, r=0):
+    new_ps = []
+    pushMatrix()
+    translate(x, y)
+    rotate(radians(-300 + r))
+    for xp, yp in ps:
+        new_ps.append((screenX(xp, yp), screenY(xp, yp)))
+    popMatrix()
+    return new_ps
+
+def reg(x, y, r=0):
+    new_ps = []
+    pushMatrix()
+    translate(x, y)
+    rotate(radians(r))
+    for xp, yp in ps:
+        new_ps.append((screenX(xp, yp), screenY(xp, yp)))
+    popMatrix()
+    return new_ps