     ;;(video/start-video "192.168.1.1")
     (command drone :ref {:emergency true})
     (Thread/sleep 1000)
-    (command drone :flat-trim)
+    ;;(command drone :flat-trim)
     (Thread/sleep 100000)
     ;;(do-led-animation drone :blink-green-red 3 4000)
     ;;(do-led-animation drone :fire 0.5 4000)

(defn connect! [drone]
  (reset! (:socket drone) (network/make-datagram-socket (:port drone)))
  (navdata/start-navdata-stream @(:navdata-stream drone))
  (let [thread-pool (util/make-sched-thread-pool 1)]
    (reset! (:thread-pool drone) thread-pool)
    (reset! (:command-executor drone)

                 (catch Throwable e
                   (log/error e "Error sending commands"))))
             thread-pool)))
  drone)


