anchor.diff:    (setf *screen-keyboard-handler* nil
           *screen-mouse-handler* nil
           *screen-update-handler* #'victory/update
  -        *screen-render-handler* #'victory/draw))
  +        *screen-render-handler* (lambda ()
  +                                  (main-game/draw)
  +                                  (victory/draw))))
   
   (defun victory/update (dt)
     (decf *screen-switch-countdown* dt)
  
positive.code:     (main-game/enter)))
  
  (defun get-ready/draw ()
    (p2dg:with-color (0 0 0 1)
      (p2dg::draw-text "Get ready..."
                       :font *default-mono-font*
  
negative.code:     (intro/enter)))
  
  (defun defeat/draw ()
    ;; TODO draw a full-screen dark quad
    (p2dg:with-color (0 0 0 1)
      (p2dg::draw-text "You lose."
                       :font *default-mono-font*
  