;;-*-Lisp-*-
(in-package goal)

;; name: depth-cue-h.gc
;; name in dgo: depth-cue-h
;; dgos: GAME, ENGINE


(deftype depth-cue-data (structure)
  ((data      vector :inline :offset-assert 0)
   (sharpness float          :offset 0)
   (alpha     float          :offset 4)
   (distance  float          :offset 8)
   (w         float          :offset 12)
   )
  :method-count-assert 9
  :size-assert         #x10
  :flag-assert         #x900000010
  )

(deftype depth-cue-work (structure)
  ((texture-strip-tmpl dma-gif-packet :inline :offset-assert 0)
   (temp-strip-tmpl    dma-gif-packet :inline :offset-assert 32)
   (stencil-tmpl       dma-gif-packet :inline :offset-assert 64)
   (clear-color        vector4w       :inline :offset-assert 96)
   (set-color          vector4w       :inline :offset-assert 112)
   (draw-color         vector4w       :inline :offset-assert 128)
   (depth              depth-cue-data         :offset-assert 144)
   (front              depth-cue-data         :offset-assert 148)
   )
  :method-count-assert 9
  :size-assert         #x98
  :flag-assert         #x900000098
  )