      0x0E :playerdigging
      0x0F :playerblockplacement
      0x10 :holdingchange
+     0x11 :usebed
 })
 (def packet-ids (apply assoc {} (mapcat reverse packet-types)))
 

      (-write-byte conn (:holdingchange packet-ids))

      (-write-short conn slot))


; Writing Wrappers -----------------------------------------------------------------

            (= packet-type :playerdigging)        (read-packet-playerdigging conn)
            (= packet-type :playerblockplacement) (read-packet-playerblockplacement conn)
            (= packet-type :holdingchange)        (read-packet-holdingchange conn)
            (= packet-type :usebed)               (read-packet-usebed conn)
            :else (str "UNKNOWN PACKET TYPE: " packet-id)
            ))
        (println "\n\n\n")))
