      0x03 :chat 
      0x04 :timeupdate 
      0x05 :equipment 
+     0x06 :spawnposition
 })
 (def packet-ids (apply assoc {} (mapcat reverse packet-types)))
 

            (= packet-type :chat) (read-packet-chat conn)
            (= packet-type :timeupdate) (read-packet-timeupdate conn)
            (= packet-type :equipment) (read-packet-equipment conn)
            :else (str "UNKNOWN PACKET TYPE: " packet-id)
            ))
        (println "\n\n\n")))

          (assoc :slot (-read-short conn))
          (assoc :itemid (-read-short conn))
          (assoc :unknown (-read-short conn))))

(defn read-packet-spawnposition [conn]
      (-> {}
          (assoc :x (-read-int conn))
          (assoc :y (-read-int conn))
          (assoc :z (-read-int conn))))


(defn read-packet [conn packet-id]
