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

;; name: blit-displays-h.gc
;; name in dgo: blit-displays-h
;; dgos: GAME

;; DECOMP BEGINS

(deftype blit-displays-work (structure)
  ((adgif-tmpl                dma-gif-packet  :inline)
   (sprite-tmpl               dma-gif-packet  :inline)
   (contrast-tmpl             dma-gif-packet  :inline)
   (sprite-slow-tmpl          dma-gif-packet  :inline)
   (draw-slow-time-tmpl       dma-gif-packet  :inline)
   (line-tmpl                 dma-gif-packet  :inline)
   (scan-tmpl                 dma-gif-packet  :inline)
   (color                     vector4w        :inline)
   (line-color                uint64)
   (scan-colors               vector4w        15 :inline)
   (zoom-blur-pos             vector          :inline)
   (zoom-blur-count           int32)
   (zoom-blur-texels          int32)
   (zoom-blur-alpha-target    float)
   (zoom-blur-alpha-current   float)
   (zoom-blur-2d              symbol)
   (menu-mode                 symbol)
   (screen-copied             symbol)
   (vu1-enable-user-menu      vu1-renderer-mask)
   (texture-enable-user-menu  uint32)
   (count-down                uint32)
   (horizontal-flip-flag      symbol)
   (scan-alpha                float)
   (scanline                  uint32)
   (progress-interp           float)
   (progress-interp-dest      float)
   (progress-interp-speed     float)
   (slow-time                 float)
   )
  (:methods
    (blit-displays-work-method-9 (_type_ dma-buffer int int int) none)
    (blit-displays-work-method-10 (_type_ dma-buffer int int int) none)
    (blit-displays-work-method-11 (_type_ dma-buffer int) none)
    (draw-letterbox (_type_ dma-buffer float int float) none)
    (blit-displays-work-method-13 (_type_ dma-buffer int int int) none)
    (blit-displays-work-method-14 (_type_ dma-buffer vector) none)
    (blit-displays-work-method-15 (_type_ dma-buffer) none)
    (draw-zoom-blur (_type_ dma-buffer int) none)
    (setup-zoom-blur-2d (_type_ vector int float symbol) none)
    (setup-brightness-and-contrast (_type_ dma-buffer float float) none)
    (do-blit-displays (_type_) none)
    (draw-sky (_type_ dma-buffer) none)
    (get-menu-mode (_type_) symbol)
    (get-screen-copied (_type_) symbol)
    (get-horizontal-flip-flag (_type_) symbol)
    (set-menu-mode (_type_ symbol) symbol)
    (set-screen-copied (_type_ symbol) symbol)
    (set-horizontal-flip-flag (_type_ symbol) symbol)
    )
  )


(defmethod get-menu-mode ((this blit-displays-work))
  (-> this menu-mode)
  )

(defmethod get-screen-copied ((this blit-displays-work))
  (-> this screen-copied)
  )

(defmethod get-horizontal-flip-flag ((this blit-displays-work))
  (-> this horizontal-flip-flag)
  )

(defmethod set-menu-mode ((this blit-displays-work) (arg0 symbol))
  (set! (-> this menu-mode) arg0)
  arg0
  )

(defmethod set-screen-copied ((this blit-displays-work) (arg0 symbol))
  (set! (-> this screen-copied) arg0)
  arg0
  )

(defmethod set-horizontal-flip-flag ((this blit-displays-work) (arg0 symbol))
  (set! (-> this horizontal-flip-flag) arg0)
  arg0
  )

(define-extern *blit-displays-work* blit-displays-work)
