     :y (-read-byte conn)
     :z (-read-int conn)
     :sounddata (-read-int conn)))
+
+(defn read-packet-newinvalidstate [conn]
+  (assoc {}
+    :reason (-read-byte conn)))
 
 
 ; Reading Wrappers -----------------------------------------------------------------

  (-write-int conn z)
  (-write-int conn sounddata))


; Writing Wrappers -----------------------------------------------------------------
(defn flushc [conn]

    :blockchange          (write-packet-blockchange conn payload)
    :explosion            (write-packet-explosion conn payload)
    :soundeffect          (write-packet-soundeffect conn payload)
    :newinvalidstate      (write-packet-newinvalidstate conn payload)

    )
  (flushc conn))
