     (= packet-type :entityaction)         (write-packet-entityaction conn payload)
     (= packet-type :pickupspawn)          (write-packet-pickupspawn conn payload)
     (= packet-type :entitypainting)       (write-packet-entitypainting conn payload)
+    (= packet-type :stanceupdate)         (write-packet-stanceupdate conn payload)
     )
   (flushc conn))
 

  0x17 :addobjectvehicle
  0x18 :mobspawn
  0x19 :entitypainting
})
(def packet-ids (apply assoc {} (mapcat reverse packet-types)))


    (assoc :y (-read-int conn))
    (assoc :z (-read-int conn))
    (assoc :direction (-read-int conn))))

(defn read-packet-stanceupdate [conn]
  (-> {}
    (assoc :unknown1 (-read-float conn))
    (assoc :unknown2 (-read-float conn))
    (assoc :unknown3 (-read-bool conn))
    (assoc :unknown4 (-read-bool conn))
    (assoc :unknown5 (-read-float conn))
    (assoc :unknown6 (-read-float conn))))


; Reading Wrappers -----------------------------------------------------------------
