   and black it out until the stop button is pressed again."
   [controller & {:keys [already-stopped]}]
 
-  (reset! (:stop-mode controller) true)
+  (update-mode! controller :stop true)
   (when-not already-stopped
     (with-show (:show controller)
       (show/stop!)

  [controller message]
  (with-show (:show controller)
    (when (= (:type (show/sync-status)) :manual)
      (let [scale (if @(:shift-mode controller) 1 10)
            delta (/ (sign-velocity (:velocity message)) scale)
            bpm (rhythm/metro-bpm (:metronome (:show controller)))]
        (rhythm/metro-bpm (:metronome (:show controller)) (min controllers/maximum-bpm


    (20 22 24 26) ; Effect end/save pads
    (when (pos? (:velocity message))
      (if (in-mode? controller :record)
        (handle-save-effect controller (:note message))
        (handle-end-effect controller (:note message))))

