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

;; definition for function target-land-anim
(defbehavior target-land-anim target ()
  (cond
    ((using-gun? self)
     (case (gun->eco (-> self gun gun-type))
       (((pickup-type eco-red) (pickup-type eco-dark))
        jakb-gun-jump-land-ja
        )
       (else
         jakb-gun-jump-land-side-ja
         )
       )
     )
    (else
      (let ((v1-9 (ja-group)))
        (if (and (or (and v1-9 (= v1-9 (-> self draw art-group data 444)))
                     (and (focus-test? self dark) (nonzero? (-> self darkjak)))
                     )
                 (= (-> self ext-anim) (target-anim dark))
                 )
            (-> self draw art-group data 445)
            jakb-jump-land-ja
            )
        )
      )
    )
  )

;; definition for function target-stance-anim
;; WARN: Return type mismatch symbol vs none.
;; WARN: new jak 2 until loop case, check carefully
(defbehavior target-stance-anim target ()
  (local-vars (sv-64 int) (sv-72 ground-tween-info))
  (set! sv-64 22)
  (set! sv-72 (new 'stack 'ground-tween-info))
  (let ((v1-4 (ja-group)))
    (cond
      ((and v1-4 (or (= v1-4 jakb-wade-shallow-walk-ja) (= v1-4 jakb-wade-deep-walk-ja)))
       (set! sv-64 45)
       )
      ((let ((v1-11 (ja-group)))
         (and v1-11 (= v1-11 jakb-roll-flip-ja))
         )
       ((lambda :behavior target
          ()
          (cond
            ((using-gun? self)
             (set! (-> self gun top-anim-low-high) 0.0)
             (case (gun->eco (-> self gun gun-type))
               (((pickup-type eco-blue))
                (push-anim-to-targ
                  (-> self skel top-anim)
                  (the-as art-joint-anim jakb-gun-roll-flip-land-ja)
                  0.0
                  0
                  30
                  1.0
                  10.0
                  #f
                  )
                )
               (else
                 (push-anim-to-targ
                   (-> self skel top-anim)
                   (the-as art-joint-anim jakb-gun-roll-flip-land-ja)
                   0.0
                   0
                   30
                   1.0
                   6.0
                   #f
                   )
                 )
               )
             (ja-no-eval :group! jakb-roll-flip-land-ja :num! (seek! (ja-aframe 48.0 0)) :frame-num 0.0)
             (until (ja-done? 0)
               (suspend)
               (ja :num! (seek! (ja-aframe 48.0 0)))
               )
             (ja-channel-push! 1 (seconds 0.05))
             (let ((gp-2 (target-land-anim)))
               (ja-no-eval :group! gp-2 :num! (seek!) :frame-num (ja-aframe 64.0 0))
               )
             (until (ja-done? 0)
               (ja-blend-eval)
               (suspend)
               (ja :num! (seek!))
               )
             )
            (else
              (ja-no-eval :group! jakb-roll-flip-land-ja :num! (seek!) :frame-num 0.0)
              (until (ja-done? 0)
                (suspend)
                (ja :num! (seek!))
                )
              (ja-no-eval :group! jakb-jump-land-ja :num! (seek!) :frame-num (ja-aframe 55.0 0))
              (until (ja-done? 0)
                (suspend)
                (ja :num! (seek!))
                )
              )
            )
          (none)
          )
        )
       )
      ((let ((v1-18 (ja-group)))
         (and v1-18 (or (= v1-18 jakb-gun-attack-from-stance-end-ja)
                        (= v1-18 jakb-gun-attack-from-stance-blue-end-ja)
                        (= v1-18 jakb-lightjak-shield-end-ja)
                        (= v1-18 jakb-attack-from-stance-alt-end-ja)
                        (= v1-18 jakb-attack-from-stance-end-ja)
                        )
              )
         )
       (ja-no-eval :num! (seek!))
       (while (not (ja-done? 0))
         (suspend)
         (ja-eval)
         )
       )
      ((let ((v1-33 (ja-group)))
         (and v1-33
              (or (= v1-33 jakb-attack-from-stance-ja)
                  (= v1-33 jakb-gun-attack-from-stance-ja)
                  (= v1-33 jakb-gun-attack-from-stance-blue-ja)
                  (= v1-33 jakb-lightjak-shield-ja)
                  )
              )
         )
       ((lambda :behavior target
          ()
          (set! (-> self control mod-surface) *attack-end-mods*)
          (let ((gp-0 (not (using-gun? self))))
            (let* ((v1-3 (ja-group))
                   (a1-0 (cond
                           ((and v1-3 (= v1-3 jakb-gun-attack-from-stance-ja))
                            jakb-gun-attack-from-stance-end-ja
                            )
                           ((let ((v1-10 (ja-group)))
                              (and v1-10 (= v1-10 jakb-gun-attack-from-stance-blue-ja))
                              )
                            jakb-gun-attack-from-stance-blue-end-ja
                            )
                           ((and (= (-> self ext-anim) (target-anim light)) (let ((v1-20 (ja-group)))
                                                                              (and v1-20 (= v1-20 jakb-lightjak-shield-ja))
                                                                              )
                                 )
                            jakb-lightjak-shield-end-ja
                            )
                           ((and (rand-vu-percent? 0.3) (zero? (-> self ext-anim)))
                            jakb-attack-from-stance-alt-end-ja
                            )
                           (else
                             jakb-attack-from-stance-end-ja
                             )
                           )
                         )
                   )
              (ja-no-eval :group! a1-0 :num! (seek!) :frame-num 0.0)
              )
            (until (ja-done? 0)
              (when (nonzero? (-> self gun track-target-hold-time))
                (forward-up-nopitch->quaternion
                  (-> self control dir-targ)
                  (vector-! (new 'stack-no-clear 'vector) (-> self gun track-trans) (-> self control trans))
                  (vector-y-quaternion! (new-stack-vector0) (-> self control dir-targ))
                  )
                (set-quaternion! (-> self control) (-> self control dir-targ))
                (goto cfg-43)
                )
              (if (and gp-0 (using-gun? self))
                  (goto cfg-43)
                  )
              (compute-alignment! (-> self align))
              (align! (-> self align) (align-opts adjust-quat) 1.0 1.0 1.0)
              (suspend)
              (ja :num! (seek!))
              )
            )
          (quaternion-copy! (-> self control dir-targ) (-> self control unknown-quaternion04))
          (label cfg-43)
          (set! (-> self control mod-surface) *walk-mods*)
          (let ((v1-73 (ja-group)))
            (when (and (and v1-73 (= v1-73 jakb-gun-attack-from-stance-end-ja))
                       (and (using-gun? self) (= (gun->eco (-> self gun gun-type)) (pickup-type eco-yellow)))
                       )
              (ja-channel-push! 1 (seconds 0.1))
              (ja-no-eval :group! jakb-gun-front-to-side-hop-ja :num! (seek!) :frame-num (ja-aframe 5.0 0))
              (until (ja-done? 0)
                (suspend)
                (ja :num! (seek!))
                )
              )
            )
          (none)
          )
        )
       )
      ((let ((v1-40 (ja-group)))
         (and v1-40 (= v1-40 (-> self draw art-group data 449)))
         )
       (ja-no-eval :group! (-> self draw art-group data 450) :num! (seek!) :frame-num 0.0)
       (until (ja-done? 0)
         (suspend)
         (ja :num! (seek!))
         )
       )
      ((let ((v1-70 (ja-group)))
         (and v1-70 (= v1-70 jakb-smack-surface-ja))
         )
       (ja-no-eval :group! jakb-smack-surface-end-ja :num! (seek!) :frame-num 0.0)
       (until (ja-done? 0)
         (suspend)
         (ja :num! (seek!))
         )
       )
      ((let ((v1-100 (ja-group)))
         (and v1-100 (or (= v1-100 jakb-powerjak-get-on-ja) (= v1-100 jakb-powerjak-get-on-loop-ja)))
         )
       (set! sv-64 60)
       )
      ((let ((v1-107 (ja-group)))
         (and v1-107 (= v1-107 jakb-darkjak-get-on-fast-ja))
         )
       (ja-no-eval :num! (seek!))
       (while (not (ja-done? 0))
         (suspend)
         (ja-eval)
         )
       )
      ((let ((v1-122 (ja-group)))
         (and v1-122 (or (= v1-122 jakb-attack-punch-ja)
                         (= v1-122 (-> self draw art-group data 452))
                         (= v1-122 (-> self draw art-group data 459))
                         (= v1-122 (-> self draw art-group data 454))
                         (= v1-122 jakb-darkjak-attack-combo3-ja)
                         (= v1-122 (-> self draw art-group data 463))
                         (= v1-122 (-> self draw art-group data 476))
                         )
              )
         )
       ((lambda :behavior target
          ()
          (set! (-> self control bend-target) (-> self control bend-amount))
          (set! (-> self control mod-surface) *walk-no-turn-mods*)
          (let ((gp-0 (not (using-gun? self))))
            (let* ((v1-5 (ja-group))
                   (a1-0 (cond
                           ((and v1-5 (= v1-5 (-> self draw art-group data 452)))
                            (logior! (-> self target-flags) (target-flags lleg-still))
                            (-> self draw art-group data 453)
                            )
                           ((let ((v1-14 (ja-group)))
                              (and v1-14 (= v1-14 (-> self draw art-group data 459)))
                              )
                            (logior! (-> self target-flags) (target-flags lleg-still))
                            (-> self draw art-group data 460)
                            )
                           ((let ((v1-23 (ja-group)))
                              (and v1-23 (= v1-23 (-> self draw art-group data 454)))
                              )
                            (logior! (-> self target-flags) (target-flags lleg-still))
                            (-> self draw art-group data 455)
                            )
                           ((let ((v1-32 (ja-group)))
                              (and v1-32 (= v1-32 jakb-darkjak-attack-combo3-ja))
                              )
                            (logior! (-> self target-flags) (target-flags lleg-still))
                            jakb-darkjak-attack-combo3-end-ja
                            )
                           ((let ((v1-41 (ja-group)))
                              (and v1-41 (= v1-41 (-> self draw art-group data 463)))
                              )
                            (logior! (-> self target-flags) (target-flags lleg-still))
                            (-> self draw art-group data 464)
                            )
                           (else
                             (let ((v1-50 (ja-group)))
                               (cond
                                 ((and v1-50 (= v1-50 (-> self draw art-group data 476)))
                                  (logior! (-> self target-flags) (target-flags lleg-still))
                                  (-> self draw art-group data 477)
                                  )
                                 ((and (rand-vu-percent? 0.3) (zero? (-> self ext-anim)))
                                  jakb-attack-punch-alt-end-ja
                                  )
                                 (else
                                   jakb-attack-punch-end-ja
                                   )
                                 )
                               )
                             )
                           )
                         )
                   )
              (ja-no-eval :group! a1-0 :num! (seek!) :frame-num 0.0)
              )
            (until (ja-done? 0)
              (seek! (-> self control bend-target) 0.0 (seconds-per-frame))
              (if (and gp-0 (using-gun? self))
                  (goto cfg-59)
                  )
              (suspend)
              (ja :num! (seek!))
              )
            )
          (label cfg-59)
          (set! (-> self control mod-surface) *walk-mods*)
          (set! (-> self control bend-target) 0.0)
          (rot->dir-targ! (-> self control))
          (logclear! (-> self target-flags) (target-flags lleg-still rleg-still lleg-no-ik rleg-no-ik))
          (none)
          )
        )
       )
      ((let ((v1-129 (ja-group)))
         (and v1-129 (= v1-129 jakb-gun-attack-butt-ja))
         )
       (set! (-> self control bend-target) (-> self control bend-amount))
       (set! (-> self control mod-surface) *walk-no-turn-mods*)
       (let ((a1-22 jakb-gun-attack-butt-end-ja))
         (ja-no-eval :group! a1-22 :num! (seek!) :frame-num 0.0)
         )
       (until (ja-done? 0)
         (seek! (-> self control bend-target) 0.0 (seconds-per-frame))
         (suspend)
         (ja :num! (seek!))
         )
       (set! (-> self control mod-surface) *walk-mods*)
       (set! (-> self control bend-target) 0.0)
       (rot->dir-targ! (-> self control))
       )
      ((let ((v1-163 (ja-group)))
         (and v1-163 (= v1-163 jakb-gun-attack-butt-blue-ja))
         )
       (set! (-> self control bend-target) (-> self control bend-amount))
       (set! (-> self control mod-surface) *walk-no-turn-mods*)
       (let ((a1-25 jakb-gun-attack-butt-blue-end-ja))
         (ja-no-eval :group! a1-25 :num! (seek!) :frame-num 0.0)
         )
       (until (ja-done? 0)
         (seek! (-> self control bend-target) 0.0 (seconds-per-frame))
         (suspend)
         (ja :num! (seek!))
         )
       (set! (-> self control mod-surface) *walk-mods*)
       (set! (-> self control bend-target) 0.0)
       (rot->dir-targ! (-> self control))
       )
      ((let ((v1-197 (ja-group)))
         (and (and v1-197 (or (= v1-197 jakb-gun-jump-land-ja) (= v1-197 jakb-gun-jump-land-side-ja)))
              (not (using-gun? self))
              )
         )
       (set! sv-64 60)
       )
      ((let ((v1-205 (ja-group)))
         (and v1-205 (or (= v1-205 jakb-duck-stance-ja)
                         (= v1-205 jakb-duck-walk-ja)
                         (= v1-205 jakb-gun-duck-walk-ja)
                         (= v1-205 jakb-duck-roll-ja)
                         (= v1-205 jakb-gun-duck-roll-ja)
                         (= v1-205 (-> self draw art-group data 474))
                         )
              )
         )
       (let ((t9-27
               (lambda :behavior target
                 ()
                 (cond
                   ((and (and (focus-test? self dark) (nonzero? (-> self darkjak))) (= (-> self ext-anim) (target-anim dark)))
                    (ja-channel-push! 1 (seconds 0.04))
                    (ja-no-eval :group! (-> self draw art-group data 475) :num! (seek!) :frame-num 0.0)
                    (until (ja-done? 0)
                      (suspend)
                      (ja :num! (seek!))
                      )
                    12
                    )
                   ((nonzero? (-> self ext-anim))
                    30
                    )
                   (else
                     (ja-channel-push! 1 (seconds 0.04))
                     (ja-no-eval :group! jakb-stance-to-duck-ja :num! (seek! 0.0 1.2) :frame-num max)
                     (until (ja-done? 0)
                       (suspend)
                       (ja :num! (seek! 0.0 1.2))
                       )
                     12
                     )
                   )
                 (none)
                 )
               )
             )
         (new 'stack-no-clear 'array 'time-frame 4)
         (t9-27)
         )
       )
      ((let ((v1-212 (ja-group)))
         (or (and (and v1-212 (or (= v1-212 jakb-walk-ja) (= v1-212 (-> self draw art-group data 442))))
                  (begin (set! sv-64 45) (< 0.5 (-> self skel root-channel 6 frame-interp (-> self skel active-frame-interp))))
                  (not (using-gun? self))
                  )
             (let ((v1-226 (ja-group)))
               (and v1-226 (or (= v1-226 jakb-run-squash-ja)
                               (= v1-226 jakb-run-squash-weak-ja)
                               (= v1-226 jakb-attack-from-stance-run-end-ja)
                               (= v1-226 jakb-attack-from-stance-run-alt-end-ja)
                               )
                    )
               )
             )
         )
       ((lambda :behavior target
          ((arg0 (pointer time-frame)))
          (cond
            ((and (rand-vu-percent? 0.3) (not (and (focus-test? self dark) (nonzero? (-> self darkjak)))))
             (ja-channel-push! 1 (seconds 0.1))
             (ja-no-eval :group! jakb-run-to-stance-fast-ja :num! (seek!) :frame-num 0.0)
             (until (ja-done? 0)
               (if (using-gun? self)
                   (return #f)
                   )
               (suspend)
               (ja :num! (seek!))
               )
             )
            (else
              (let* ((v1-32 (ja-group))
                     (f30-1 (cond
                              ((and v1-32 (or (= v1-32 jakb-walk-ja) (= v1-32 (-> self draw art-group data 442))))
                               (let ((f0-10 (+ 50.0 (* 0.8333333 (+ -25.0 (ja-aframe-num 0))))))
                                 (- f0-10 (* (the float (the int (/ f0-10 50.0))) 50.0))
                                 )
                               )
                              (else
                                0.0
                                )
                              )
                            )
                     )
                (set! (-> arg0 0) (seconds 0.15))
                (ja-channel-push! 1 (-> arg0 0))
                (ja :group! jakb-run-to-stance-loop-ja :num! (identity (ja-aframe f30-1 0)))
                )
              (dotimes (gp-2 3)
                (until (ja-done? 0)
                  (if (using-gun? self)
                      (return #f)
                      )
                  (suspend)
                  (ja :num! (seek!))
                  )
                (ja :num-func num-func-identity :frame-num 0.0)
                )
              (ja-no-eval :group! jakb-run-to-stance-ja :num! (seek! (ja-aframe 82.0 0)) :frame-num 0.0)
              (until (ja-done? 0)
                (suspend)
                (ja :num! (seek! (ja-aframe 82.0 0)))
                )
              (when (not (and (focus-test? self dark) (nonzero? (-> self darkjak))))
                (ja-no-eval :group! jakb-run-to-stance-ja :num! (seek! (ja-aframe 142.0 0)) :frame-num (ja-aframe 82.0 0))
                (until (ja-done? 0)
                  (suspend)
                  (ja :num! (seek! (ja-aframe 142.0 0)))
                  )
                (logior! (-> self target-flags) (target-flags lleg-still rleg-still))
                (ja-no-eval :group! jakb-run-to-stance-ja :num! (seek!) :frame-num (ja-aframe 142.0 0))
                (until (ja-done? 0)
                  (suspend)
                  (ja :num! (seek!))
                  )
                )
              )
            )
          (none)
          )
        (new 'stack-no-clear 'array 'time-frame 4)
        )
       )
      ((let ((v1-233 (ja-group)))
         (and (and v1-233 (= v1-233 jakb-walk-ja)) (>= (-> self control ctrl-xz-vel) 5734.4))
         )
       (set! sv-64 45)
       )
      ((and (and (focus-test? self light) (nonzero? (-> self lightjak)))
            (and (= (-> self ext-anim) (target-anim light)) (let ((v1-250 (ja-group)))
                                                              (and v1-250 (= v1-250 jakb-lightjak-get-on-land-ja))
                                                              )
                 )
            )
       (set! sv-64 45)
       )
      ((and (= (-> self ext-anim) (target-anim light)) (let ((v1-260 (ja-group)))
                                                         (and v1-260 (= v1-260 jakb-lightjak-freeze-ja))
                                                         )
            )
       (ja-channel-push! 1 (seconds 0.05))
       (ja-no-eval :group! jakb-lightjak-freeze-land-ja :num! (seek!) :frame-num 0.0)
       (until (ja-done? 0)
         (suspend)
         (ja :num! (seek!))
         )
       )
      )
    )
  (if (and (using-gun? self) (-> self next-state) (= (-> self next-state name) 'target-stance))
      (go target-gun-stance)
      )
  (when (and (and (focus-test? self light) (nonzero? (-> self lightjak)))
             (and (= (-> self ext-anim) (target-anim light))
                  (zero? (-> self lightjak latch-out-time))
                  (let ((v1-306 (ja-group)))
                    (not (and v1-306 (or (= v1-306 jakb-lightjak-heal-end-ja)
                                         (= v1-306 jakb-lightjak-swoop-land-ja)
                                         (= v1-306 jakb-lightjak-get-on-land-ja)
                                         (= v1-306 jakb-lightjak-shield-end-ja)
                                         (= v1-306 jakb-lightjak-freeze-land-ja)
                                         )
                              )
                         )
                    )
                  )
             )
    (ja-channel-push! 1 (seconds 0.05))
    (ja-no-eval :group! jakb-lightjak-stance-to-stance-ja :num! (seek!) :frame-num 0.0)
    (until (ja-done? 0)
      (if (not (and (focus-test? self light) (nonzero? (-> self lightjak))))
          (goto cfg-316)
          )
      (suspend)
      (ja :num! (seek!))
      )
    )
  (until #f
    (let ((gp-0 (cond
                  ((and (and (focus-test? self dark) (nonzero? (-> self darkjak)))
                        (and (= (-> self ext-anim) (target-anim dark))
                             (zero? (-> self darkjak latch-out-time))
                             (not (using-gun? self))
                             )
                        )
                   (-> self draw art-group data 446)
                   )
                  ((and (and (focus-test? self light) (nonzero? (-> self lightjak)))
                        (and (= (-> self ext-anim) (target-anim light)) (zero? (-> self lightjak latch-out-time)))
                        )
                   jakb-lightjak-stance-ja
                   )
                  (else
                    jakb-stance-loop-ja
                    )
                  )
                )
          )
      (when (not (and (ja-group? gp-0) (= (ja-group-size) 1)))
        (ja-channel-push! 1 (the-as time-frame sv-64))
        (set! (-> self skel root-channel 0 frame-group) (the-as art-joint-anim gp-0))
        )
      )
    (logior! (-> self target-flags) (target-flags lleg-still rleg-still))
    (while (let ((v1-385 (ja-group)))
             (cond
               ((and (and v1-385 (= v1-385 (-> self draw art-group data 446)))
                     (not (and (and (focus-test? self dark) (nonzero? (-> self darkjak)))
                               (and (= (-> self ext-anim) (target-anim dark))
                                    (zero? (-> self darkjak latch-out-time))
                                    (not (using-gun? self))
                                    )
                               )
                          )
                     )
                (set! sv-64 60)
                #f
                )
               (else
                 #t
                 )
               )
             )
      (suspend)
      (ja :num! (loop!))
      (if (can-play-stance-amibent?)
          (go target-stance-ambient)
          )
      )
    (label cfg-316)
    )
  #f
  (none)
  )

;; definition for function target-stance-push
;; WARN: Return type mismatch int vs none.
(defbehavior target-stance-push target ((arg0 int))
  (let ((v1-2 (ja-group)))
    (cond
      ((or (and (and v1-2 (= v1-2 jakb-walk-ja))
                (< 0.5 (-> self skel root-channel 6 frame-interp (-> self skel active-frame-interp)))
                )
           (let ((v1-14 (ja-group)))
             (and v1-14 (or (= v1-14 jakb-run-squash-ja)
                            (= v1-14 jakb-run-squash-weak-ja)
                            (= v1-14 jakb-attack-from-stance-run-end-ja)
                            (= v1-14 jakb-attack-from-stance-run-alt-end-ja)
                            )
                  )
             )
           )
       (ja-channel-push! 1 (seconds 0.15))
       (ja-no-eval :group! jakb-run-to-stance-loop-ja :num! (seek!) :frame-num 0.0)
       (until (ja-done? 0)
         (suspend)
         (ja :num! (seek!))
         )
       (ja-no-eval :group! jakb-run-to-stance-ja :num! (seek!) :frame-num 0.0)
       (until (ja-done? 0)
         (suspend)
         (ja :num! (seek!))
         )
       (ja-channel-push! arg0 (seconds 0.15))
       )
      ((let ((v1-68 (ja-group)))
         (and (and v1-68 (or (= v1-68 jakb-jump-short-land-ja)
                             (= v1-68 jakb-jump-land-ja)
                             (= v1-68 jakb-gun-jump-land-ja)
                             (= v1-68 jakb-gun-jump-land-side-ja)
                             (= v1-68 (-> self draw art-group data 445))
                             )
                   )
              (not (ja-max? 0))
              )
         )
       (ja-no-eval :num! (seek!))
       (while (not (ja-done? 0))
         (suspend)
         (ja-eval)
         )
       (ja-channel-push! arg0 (seconds 0.075))
       )
      ((let ((v1-84 (ja-group)))
         (not (and (and v1-84 (= v1-84 jakb-stance-loop-ja)) (= (ja-group-size) 1)))
         )
       (ja-channel-push! arg0 (seconds 0.075))
       )
      )
    )
  (none)
  )

;; definition for function target-falling-anim
;; INFO: Used lq/sq
(defbehavior target-falling-anim target ((arg0 int) (arg1 time-frame))
  (let ((v1-2 (ja-group)))
    (cond
      ((and v1-2
            (or (= v1-2 jakb-jump-loop-ja) (= v1-2 jakb-attack-uppercut-ja) (= v1-2 jakb-gun-attack-upperbutt-ja))
            )
       )
      ((let ((v1-8 (ja-group)))
         (and v1-8 (or (= v1-8 jakb-edge-grab-stance0-ja) (= v1-8 jakb-edge-grab-stance1-ja)))
         )
       (ja-channel-push! 1 (seconds 0.15))
       (ja-no-eval :group! jakb-edge-grab-off-ja :num! (seek!) :frame-num 0.0)
       (until (ja-done? 0)
         (suspend)
         (ja :num! (seek!))
         )
       )
      ((let ((v1-37 (ja-group)))
         (and v1-37 (= v1-37 jakb-edge-grab-off-ja))
         )
       (until (ja-done? 0)
         (suspend)
         (ja :num! (seek!))
         )
       (ja-channel-push! 1 (seconds 0.15))
       )
      (else
        (let ((v1-52 (ja-group)))
          (cond
            ((and v1-52 (= v1-52 jakb-roll-flip-ja))
             (let ((s5-0 (current-time)))
               (while (or (= arg0 -1) (not (time-elapsed? s5-0 arg0)))
                 (when (time-elapsed? s5-0 (seconds 0.01))
                   (let ((v1-62 (ja-group)))
                     (when (not (and v1-62 (= v1-62 jakb-jump-loop-ja)))
                       (ja-channel-push! 1 (seconds 0.1))
                       (ja :group! jakb-jump-loop-ja :num! min)
                       )
                     )
                   )
                 (let ((v1-71 (new-stack-vector0))
                       (f0-12 (vector-dot (-> self control dynam gravity-normal) (-> self control transv)))
                       )
                   0.0
                   (vector-! v1-71 (-> self control transv) (vector-float*! v1-71 (-> self control dynam gravity-normal) f0-12))
                   (let* ((f2-0 (vector-length v1-71))
                          (f1-2 f2-0)
                          (f2-1 (* 0.9 f2-0))
                          )
                     (vector+!
                       (-> self control transv)
                       (vector-float*! (-> self control transv) (-> self control dynam gravity-normal) f0-12)
                       (vector-float*! v1-71 v1-71 (/ f2-1 f1-2))
                       )
                     )
                   )
                 (suspend)
                 (let ((v1-74 (ja-group)))
                   (if (and v1-74 (= v1-74 jakb-jump-loop-ja))
                       (ja :num! (loop!))
                       (ja :num! (seek!))
                       )
                   )
                 )
               )
             (return #f)
             )
            (else
              (ja-channel-push! 1 arg1)
              (ja :group! jakb-jump-loop-ja)
              (while (!= (-> self skel root-channel 0) (-> self skel channel))
                (suspend)
                )
              )
            )
          )
        )
      )
    )
  (ja-no-eval :group! jakb-jump-loop-ja :num! (loop!) :frame-num 0.0)
  (let ((s5-1 (current-time)))
    (while (or (= arg0 -1)
               (and (not (time-elapsed? s5-1 arg0)) (not (logtest? (-> self control status) (collide-status on-surface))))
               )
      (suspend)
      (ja :group! jakb-jump-loop-ja :num! (loop!))
      )
    )
  #f
  )

;; definition for function target-falling-anim-trans
;; WARN: Return type mismatch int vs none.
(defbehavior target-falling-anim-trans target ()
  (let ((v1-2 (ja-group)))
    (cond
      ((not (and v1-2 (or (= v1-2 jakb-jump-loop-ja)
                          (= v1-2 jakb-jump-land-ja)
                          (= v1-2 jakb-gun-jump-land-ja)
                          (= v1-2 jakb-gun-jump-land-side-ja)
                          )
                 )
            )
       (ja-channel-push! 1 (seconds 0.33))
       (ja :group! jakb-jump-loop-ja)
       )
      ((and (logtest? (-> self control status) (collide-status on-surface))
            (let ((v1-15 (ja-group)))
              (and (not (and v1-15 (= v1-15 jakb-jump-land-ja)))
                   (not (logtest? (-> self control status) (collide-status on-water)))
                   )
              )
            )
       (ja-channel-push! 1 (seconds 0.02))
       (set! (-> self skel root-channel 0 frame-group) (the-as art-joint-anim (target-land-anim)))
       )
      ((let ((v1-23 (ja-group)))
         (and v1-23 (= v1-23 jakb-jump-loop-ja))
         )
       (ja :num! (loop!))
       )
      ((let ((v1-33 (ja-group)))
         (and v1-33
              (or (= v1-33 jakb-jump-land-ja) (= v1-33 jakb-gun-jump-land-ja) (= v1-33 jakb-gun-jump-land-side-ja))
              )
         )
       (ja :num! (seek!))
       )
      )
    )
  0
  (none)
  )

;; definition for function target-walk-anim
;; WARN: Stack slot offset 16 signed mismatch
;; WARN: Stack slot offset 16 signed mismatch
;; WARN: Stack slot offset 16 signed mismatch
;; WARN: Stack slot offset 16 signed mismatch
;; WARN: Stack slot offset 16 signed mismatch
;; WARN: Stack slot offset 16 signed mismatch
;; WARN: Stack slot offset 16 signed mismatch
;; WARN: Stack slot offset 16 signed mismatch
;; WARN: Stack slot offset 16 signed mismatch
;; WARN: Stack slot offset 16 signed mismatch
;; WARN: Return type mismatch symbol vs none.
(defbehavior target-walk-anim target ((arg0 int))
  (local-vars (sv-16 float))
  (let ((f24-0 0.0)
        (f26-0 (fmax 0.0 (fmin 1.0 (* 0.000048828126 (+ -16384.0 (-> self control ctrl-xz-vel))))))
        (f30-0 0.0)
        (f28-0 0.0)
        (s5-0 #f)
        )
    (let ((v1-6 (ja-group)))
      (cond
        ((and v1-6 (= v1-6 jakb-turn-around-ja))
         (set! f26-0 1.0)
         (ja-channel-push! 7 (seconds 0.05))
         )
        ((let ((v1-12 (ja-group)))
           (and v1-12 (or (= v1-12 jakb-duck-roll-ja) (= v1-12 jakb-gun-duck-roll-ja)))
           )
         (ja-channel-push! 7 (seconds 0.075))
         (set! f26-0 1.0)
         )
        ((let ((v1-19 (ja-group)))
           (and v1-19 (= v1-19 jakb-attack-from-stance-ja))
           )
         ((lambda :behavior target
            ()
            (let ((f30-0 (fmax 0.8 (fmin 1.0 (/ (-> self control ctrl-xz-vel) (meters 5))))))
              (cond
                ((and (rand-vu-percent? 0.3) (and (< 20480.0 (-> self control ctrl-xz-vel)) (zero? (-> self ext-anim))))
                 (ja-no-eval :group! jakb-attack-from-stance-alt-end-ja :num! (seek! (ja-aframe 29.0 0) f30-0) :frame-num 0.0)
                 (until (ja-done? 0)
                   (suspend)
                   (ja :num! (seek! (ja-aframe 29.0 0) f30-0))
                   )
                 (ja-no-eval :group! jakb-attack-from-stance-run-alt-end-ja :num! (seek! max f30-0) :frame-num 0.0)
                 (until (ja-done? 0)
                   (suspend)
                   (ja :num! (seek! max f30-0))
                   )
                 )
                (else
                  (ja-no-eval :group! jakb-attack-from-stance-end-ja :num! (seek! (ja-aframe 29.0 0) f30-0) :frame-num 0.0)
                  (until (ja-done? 0)
                    (suspend)
                    (ja :num! (seek! (ja-aframe 29.0 0) f30-0))
                    )
                  (ja-no-eval :group! jakb-attack-from-stance-run-end-ja :num! (seek! max f30-0) :frame-num 0.0)
                  (until (ja-done? 0)
                    (suspend)
                    (ja :num! (seek! max f30-0))
                    )
                  )
                )
              )
            (ja-channel-push! 7 (seconds 0.05))
            (none)
            )
          )
         (set! f26-0 1.0)
         (set! f24-0 30.0)
         )
        ((let ((v1-27 (ja-group)))
           (and v1-27 (or (= v1-27 jakb-darkjak-get-off-ja) (= v1-27 (-> self draw art-group data 461))))
           )
         (set! f26-0 1.0)
         (ja-channel-push! 7 (seconds 0.3))
         )
        ((let ((v1-33 (ja-group)))
           (and v1-33 (or (= v1-33 jakb-attack-punch-ja)
                          (= v1-33 jakb-attack-punch-end-ja)
                          (= v1-33 jakb-gun-attack-butt-ja)
                          (= v1-33 jakb-gun-attack-butt-blue-ja)
                          (= v1-33 (-> self draw art-group data 453))
                          (= v1-33 (-> self draw art-group data 460))
                          (= v1-33 (-> self draw art-group data 455))
                          (= v1-33 jakb-darkjak-attack-combo3-end-ja)
                          (= v1-33 (-> self draw art-group data 464))
                          )
                )
           )
         (set! f26-0 1.0)
         (set! f24-0 30.0)
         (ja-channel-push! 7 (seconds 0.15))
         )
        ((let ((v1-40 (ja-group)))
           (and (and v1-40
                     (or (= v1-40 jakb-walk-ja) (= v1-40 jakb-gun-walk-side-ja) (= v1-40 (-> self draw art-group data 442)))
                     )
                (= (ja-group-size) 7)
                )
           )
         (set! f24-0 (ja-aframe-num 0))
         (set! f26-0 (-> self control unknown-float002))
         (set! f30-0 (-> self control unknown-float-n12iuh3n1))
         (set! f28-0 (-> self control unknown-float-ki1jhbn23hj))
         )
        ((let ((v1-50 (ja-group)))
           (and v1-50 (= v1-50 jakb-ice-skate-ja))
           )
         (set! f24-0 (ja-aframe-num 0))
         (ja-channel-push! 7 (seconds 0.1))
         )
        ((let ((v1-55 (ja-group)))
           (and v1-55 (= v1-55 jakb-wade-shallow-walk-ja))
           )
         (set! f24-0 (ja-aframe-num 0))
         (ja-channel-push! 7 (seconds 0.05))
         )
        ((let ((v1-60 (ja-group)))
           (and (or (and v1-60
                         (or (= v1-60 jakb-jump-loop-ja)
                             (= v1-60 jakb-roll-flip-ja)
                             (= v1-60 jakb-attack-from-jump-end-ja)
                             (= v1-60 jakb-attack-uppercut-ja)
                             (= v1-60 jakb-gun-attack-upperbutt-ja)
                             (= v1-60 jakb-flop-down-land-ja)
                             )
                         )
                    (let ((v1-66 (ja-group)))
                      (and (and v1-66 (or (= v1-66 jakb-jump-ja) (= v1-66 (-> self draw art-group data 444))))
                           (< 30.0 (ja-aframe-num 0))
                           )
                      )
                    )
                (< 12288.0 (-> self control ctrl-xz-vel))
                )
           )
         ((lambda :behavior target
            ()
            (let ((gp-0 (ja-group))
                  (f30-0 (-> self control ground-impact-vel))
                  )
              (let ((v1-7 (ja-group)))
                (if (and v1-7 (or (= v1-7 jakb-roll-flip-ja) (= v1-7 jakb-attack-from-jump-end-ja)))
                    (ja-channel-push! 1 (seconds 0.05))
                    (ja-channel-set! 1)
                    )
                )
              (cond
                ((< (if (= gp-0 jakb-jump-ja)
                        77824.0
                        102400.0
                        )
                    f30-0
                    )
                 (ja-no-eval :group! jakb-run-squash-ja :num! (seek! (ja-aframe 3.0 0) 1.00001) :frame-num 0.0)
                 (until (ja-done? 0)
                   (suspend)
                   (ja :num! (seek! (ja-aframe 3.0 0) 1.00001))
                   )
                 )
                ((< (if (= gp-0 jakb-jump-ja)
                        61440.0
                        102400.0
                        )
                    f30-0
                    )
                 (ja-no-eval :group! jakb-run-squash-ja :num! (seek! (ja-aframe 3.0 0) 1.00001) :frame-num (ja-aframe -1.0 0))
                 (until (ja-done? 0)
                   (suspend)
                   (ja :num! (seek! (ja-aframe 3.0 0) 1.00001))
                   )
                 )
                (else
                  (ja-no-eval :group! jakb-run-squash-weak-ja :num! (seek! (ja-aframe 4.0 0) 1.00001) :frame-num 0.0)
                  (until (ja-done? 0)
                    (suspend)
                    (ja :num! (seek! (ja-aframe 4.0 0) 1.00001))
                    )
                  )
                )
              )
            (when (and (using-gun? self) (not (-> self gun charge-active?)))
              (set! (-> self gun top-anim-low-high) 0.0)
              (case (gun->eco (-> self gun gun-type))
                (((pickup-type eco-blue))
                 (push-anim-to-targ (-> self skel top-anim) (the-as art-joint-anim jakb-gun-run-blue-ja) 16.0 90 60 1.0 0.0 #f)
                 )
                (else
                  (push-anim-to-targ
                    (-> self skel top-anim)
                    (the-as art-joint-anim jakb-gun-front-run-ja)
                    16.0
                    90
                    60
                    1.0
                    0.0
                    #f
                    )
                  )
                )
              )
            (until (ja-done? 0)
              (suspend)
              (ja :num! (seek! max (/ (* (fmax 20480.0 (-> self control ctrl-xz-vel)) (seconds-per-frame))
                                      (/ (-> *TARGET-bank* run-up-cycle-dist) (-> *TARGET-bank* run-cycle-length))
                                      )
                               )
                  )
              )
            (ja-channel-push! 7 (seconds 0.1))
            (none)
            )
          )
         (set! f24-0 30.0)
         (set! f26-0 1.0)
         )
        ((let ((v1-78 (ja-group)))
           (and v1-78 (or (= v1-78 jakb-jump-ja) (= v1-78 (-> self draw art-group data 444))))
           )
         (ja-channel-push! 7 (seconds 0.05))
         (set! s5-0 #t)
         )
        (else
          (let ((v1-84 (ja-group)))
            (cond
              ((and v1-84 (= v1-84 jakb-smack-surface-ja))
               (ja-channel-push! 7 (seconds 0.15))
               )
              ((and (and (focus-test? self dark) (nonzero? (-> self darkjak))) (= (-> self ext-anim) (target-anim dark)))
               (set! f24-0 55.0)
               (ja-channel-push! 7 (seconds 0.1))
               )
              (else
                (ja-channel-push! 7 (seconds 0.05))
                )
              )
            )
          )
        )
      )
    (set! (-> self skel root-channel 3 command) (joint-control-command push))
    (set! (-> self skel root-channel 6 command) (joint-control-command stack))
    (ja :group! jakb-walk-ja)
    (let ((f24-1 (ja-aframe f24-0 0)))
      (cond
        ((and (and (focus-test? self dark) (nonzero? (-> self darkjak)))
              (and (= (-> self ext-anim) (target-anim dark)) (not (using-gun? self)))
              )
         (let ((s4-0 (-> self skel root-channel 0)))
           (let ((f0-3 0.0))
             (set! (-> s4-0 frame-interp 1) f0-3)
             (set! (-> s4-0 frame-interp 0) f0-3)
             )
           (set! (-> s4-0 dist) 12288.0)
           (joint-control-channel-group-eval!
             s4-0
             (the-as art-joint-anim (-> self draw art-group data 442))
             num-func-identity
             )
           (set! (-> s4-0 frame-num) f24-1)
           )
         )
        ((and (using-gun? self) (or (= (gun->eco (-> self gun gun-type)) (pickup-type eco-yellow))
                                    (= (gun->eco (-> self gun gun-type)) (pickup-type eco-blue))
                                    )
              )
         (let ((s4-1 (-> self skel root-channel 0)))
           (let ((f0-5 0.0))
             (set! (-> s4-1 frame-interp 1) f0-5)
             (set! (-> s4-1 frame-interp 0) f0-5)
             )
           (set! (-> s4-1 dist) 12288.0)
           (joint-control-channel-group-eval! s4-1 (the-as art-joint-anim jakb-gun-walk-side-ja) num-func-identity)
           (set! (-> s4-1 frame-num) f24-1)
           )
         )
        (else
          (let ((s4-2 (-> self skel root-channel 0)))
            (let ((f0-7 0.0))
              (set! (-> s4-2 frame-interp 1) f0-7)
              (set! (-> s4-2 frame-interp 0) f0-7)
              )
            (set! (-> s4-2 dist) (-> *TARGET-bank* walk-cycle-dist))
            (joint-control-channel-group-eval! s4-2 (the-as art-joint-anim jakb-walk-ja) num-func-identity)
            (set! (-> s4-2 frame-num) f24-1)
            )
          )
        )
      (let ((s4-3 (-> self skel root-channel 1)))
        (let ((f0-9 0.0))
          (set! (-> s4-3 frame-interp 1) f0-9)
          (set! (-> s4-3 frame-interp 0) f0-9)
          )
        (set! (-> s4-3 dist) (-> *TARGET-bank* walk-down-cycle-dist))
        (joint-control-channel-group-eval! s4-3 (the-as art-joint-anim jakb-walk-down-ja) num-func-identity)
        (set! (-> s4-3 frame-num) f24-1)
        )
      (let ((s4-4 (-> self skel root-channel 2)))
        (let ((f0-11 0.0))
          (set! (-> s4-4 frame-interp 1) f0-11)
          (set! (-> s4-4 frame-interp 0) f0-11)
          )
        (set! (-> s4-4 dist) (-> *TARGET-bank* walk-side-cycle-dist))
        (joint-control-channel-group-eval! s4-4 (the-as art-joint-anim jakb-walk-left-ja) num-func-identity)
        (set! (-> s4-4 frame-num) f24-1)
        )
      (let ((s4-5 (-> self skel root-channel 4)))
        (let ((f0-13 0.0))
          (set! (-> s4-5 frame-interp 1) f0-13)
          (set! (-> s4-5 frame-interp 0) f0-13)
          )
        (set! (-> s4-5 dist) (-> *TARGET-bank* run-down-cycle-dist))
        (joint-control-channel-group-eval! s4-5 (the-as art-joint-anim jakb-run-down-ja) num-func-identity)
        (set! (-> s4-5 frame-num) f24-1)
        )
      (let ((s4-6 (-> self skel root-channel 5)))
        (let ((f0-15 0.0))
          (set! (-> s4-6 frame-interp 1) f0-15)
          (set! (-> s4-6 frame-interp 0) f0-15)
          )
        (set! (-> s4-6 dist) (-> *TARGET-bank* run-side-cycle-dist))
        (joint-control-channel-group-eval! s4-6 (the-as art-joint-anim jakb-run-left-ja) num-func-identity)
        (set! (-> s4-6 frame-num) f24-1)
        )
      (cond
        ((using-gun? self)
         (let ((s4-7 (-> self skel root-channel 3)))
           (let ((f0-17 0.0))
             (set! (-> s4-7 frame-interp 1) f0-17)
             (set! (-> s4-7 frame-interp 0) f0-17)
             )
           (set! (-> s4-7 dist) (-> *TARGET-bank* run-cycle-dist))
           (joint-control-channel-group-eval! s4-7 (the-as art-joint-anim jakb-gun-front-run-ja) num-func-identity)
           (set! (-> s4-7 frame-num) f24-1)
           )
         )
        ((and (and (focus-test? self dark) (nonzero? (-> self darkjak))) (= (-> self ext-anim) (target-anim dark)))
         (let ((s4-8 (-> self skel root-channel 3)))
           (let ((f0-19 0.0))
             (set! (-> s4-8 frame-interp 1) f0-19)
             (set! (-> s4-8 frame-interp 0) f0-19)
             )
           (set! (-> s4-8 dist) 27033.6)
           (joint-control-channel-group-eval!
             s4-8
             (the-as art-joint-anim (-> self draw art-group data 443))
             num-func-identity
             )
           (set! (-> s4-8 frame-num) f24-1)
           )
         )
        (else
          (let ((s4-9 (-> self skel root-channel 3)))
            (let ((f0-21 0.0))
              (set! (-> s4-9 frame-interp 1) f0-21)
              (set! (-> s4-9 frame-interp 0) f0-21)
              )
            (set! (-> s4-9 dist) (-> *TARGET-bank* run-cycle-dist))
            (joint-control-channel-group-eval! s4-9 (the-as art-joint-anim jakb-run-ja) num-func-identity)
            (set! (-> s4-9 frame-num) f24-1)
            )
          )
        )
      )
    (let ((s4-10 (current-time))
          (f24-2 (if (and (using-gun? self) (or (= (gun->eco (-> self gun gun-type)) (pickup-type eco-yellow))
                                                (= (gun->eco (-> self gun gun-type)) (pickup-type eco-blue))
                                                )
                          )
                     0.0
                     1.0
                     )
                 )
          )
      (until (and (>= arg0 0) (time-elapsed? s4-10 arg0))
        (let ((f20-0 (fmax -1.0 (fmin 1.0 (* 2.0 (-> self control local-slope-z)))))
              (f22-1 (fmax -1.0 (fmin 1.0 (* 1.6 (-> self control local-slope-x)))))
              )
          (set! sv-16 (fabs (deg-diff (quaternion-y-angle (-> self control dir-targ)) (y-angle (-> self control)))))
          (set! f26-0 (seek
                        f26-0
                        (fmax 0.0 (fmin 1.0 (* 0.000048828126 (+ -16384.0 (-> self control ctrl-xz-vel)))))
                        (* 2.0 (seconds-per-frame))
                        )
                )
          (if (and (and (focus-test? self dark) (nonzero? (-> self darkjak))) (= (-> self ext-anim) (target-anim dark)))
              (set! f26-0
                    (seek f26-0 (lerp-scale f26-0 (* 0.7 f26-0) sv-16 1820.4445 3640.889) (* 2.0 (seconds-per-frame)))
                    )
              )
          (cond
            ((< 0.5 f26-0)
             (let ((v1-211 (-> self skel effect)))
               (set! (-> v1-211 channel-offset) 3)
               )
             0
             (logclear! (-> self target-flags) (target-flags lleg-no-ik rleg-no-ik))
             )
            (else
              (let ((v1-216 (-> self skel effect)))
                (set! (-> v1-216 channel-offset) 0)
                )
              0
              (logior! (-> self target-flags) (target-flags lleg-no-ik rleg-no-ik))
              )
            )
          (let ((f0-37 (fabs (- f20-0 f30-0))))
            (set! f30-0 (seek f30-0 f20-0 (fmax 0.05 (fmin 0.2 (/ f0-37 4)))))
            )
          (let ((f0-42 (fabs (- f22-1 f28-0))))
            (set! f28-0 (seek f28-0 f22-1 (fmax 0.05 (fmin 0.2 (/ f0-42 4)))))
            )
          )
        (set! (-> self control unknown-float-n12iuh3n1) f30-0)
        (set! (-> self control unknown-float-ki1jhbn23hj) f28-0)
        (set! (-> self control unknown-float002) f26-0)
        (cond
          ((>= f30-0 0.0)
           (let ((v1-233 (-> self skel root-channel 1)))
             (let ((f0-48 (* (fabs f30-0) f24-2)))
               (set! (-> v1-233 frame-interp 1) f0-48)
               (set! (-> v1-233 frame-interp 0) f0-48)
               )
             (set! (-> v1-233 dist) (-> *TARGET-bank* walk-up-cycle-dist))
             (set! (-> v1-233 frame-group) (the-as art-joint-anim jakb-walk-up-ja))
             )
           (let ((v1-236 (-> self skel root-channel 4)))
             (let ((f0-50 (fabs f30-0)))
               (set! (-> v1-236 frame-interp 1) f0-50)
               (set! (-> v1-236 frame-interp 0) f0-50)
               )
             (set! (-> v1-236 dist) (-> *TARGET-bank* run-up-cycle-dist))
             (set! (-> v1-236 frame-group) (the-as art-joint-anim jakb-run-up-ja))
             )
           )
          (else
            (let ((v1-239 (-> self skel root-channel 1)))
              (let ((f0-53 (* (fabs f30-0) f24-2)))
                (set! (-> v1-239 frame-interp 1) f0-53)
                (set! (-> v1-239 frame-interp 0) f0-53)
                )
              (set! (-> v1-239 dist) (-> *TARGET-bank* walk-down-cycle-dist))
              (set! (-> v1-239 frame-group) (the-as art-joint-anim jakb-walk-down-ja))
              )
            (let ((v1-242 (-> self skel root-channel 4)))
              (let ((f0-55 (fabs f30-0)))
                (set! (-> v1-242 frame-interp 1) f0-55)
                (set! (-> v1-242 frame-interp 0) f0-55)
                )
              (set! (-> v1-242 dist) (-> *TARGET-bank* run-down-cycle-dist))
              (set! (-> v1-242 frame-group) (the-as art-joint-anim jakb-run-down-ja))
              )
            )
          )
        (cond
          ((>= f28-0 0.0)
           (let ((v1-245 (-> self skel root-channel 2)))
             (let ((f0-59 (* (fabs f28-0) f24-2)))
               (set! (-> v1-245 frame-interp 1) f0-59)
               (set! (-> v1-245 frame-interp 0) f0-59)
               )
             (set! (-> v1-245 dist) (-> *TARGET-bank* walk-side-cycle-dist))
             (set! (-> v1-245 frame-group) (the-as art-joint-anim jakb-walk-right-ja))
             )
           (let ((v1-248 (-> self skel root-channel 5)))
             (let ((f0-61 (fabs f28-0)))
               (set! (-> v1-248 frame-interp 1) f0-61)
               (set! (-> v1-248 frame-interp 0) f0-61)
               )
             (set! (-> v1-248 dist) (-> *TARGET-bank* run-side-cycle-dist))
             (set! (-> v1-248 frame-group) (the-as art-joint-anim jakb-run-right-ja))
             )
           )
          (else
            (let ((v1-251 (-> self skel root-channel 2)))
              (let ((f0-64 (* (fabs f28-0) f24-2)))
                (set! (-> v1-251 frame-interp 1) f0-64)
                (set! (-> v1-251 frame-interp 0) f0-64)
                )
              (set! (-> v1-251 dist) (-> *TARGET-bank* walk-side-cycle-dist))
              (set! (-> v1-251 frame-group) (the-as art-joint-anim jakb-walk-left-ja))
              )
            (let ((v1-254 (-> self skel root-channel 5)))
              (let ((f0-66 (fabs f28-0)))
                (set! (-> v1-254 frame-interp 1) f0-66)
                (set! (-> v1-254 frame-interp 0) f0-66)
                )
              (set! (-> v1-254 dist) (-> *TARGET-bank* run-side-cycle-dist))
              (set! (-> v1-254 frame-group) (the-as art-joint-anim jakb-run-left-ja))
              )
            )
          )
        (ja :chan 6 :frame-interp0 f26-0 :frame-interp1 f26-0)
        (let* ((f1-14 (* (current-cycle-distance (-> self skel)) (-> self control scale x)))
               (f0-70 (/ (-> self control ctrl-xz-vel) (* 60.0 (/ f1-14 (-> *TARGET-bank* run-cycle-length)))))
               )
          (ja :num! (loop! f0-70))
          )
        (ja :chan 1 :num! (chan 0))
        (ja :chan 2 :num! (chan 0))
        (ja :chan 3 :num! (chan 0))
        (ja :chan 4 :num! (chan 0))
        (ja :chan 5 :num! (chan 0))
        (if (and s5-0 (!= (-> self skel root-channel 0) (-> self skel channel)))
            (ja-blend-eval)
            )
        (suspend)
        )
      )
    )
  (none)
  )

;; definition for function target-hit-ground-flop-anim
;; INFO: Used lq/sq
;; WARN: Return type mismatch int vs none.
(defbehavior target-hit-ground-flop-anim target ((arg0 symbol) (arg1 symbol))
  (let ((f30-0 (if (= arg0 'swim)
                   0.4
                   1.0
                   )
               )
        )
    (if (using-gun? self)
        (push-anim-to-targ
          (-> self skel top-anim)
          (the-as art-joint-anim jakb-gun-flop-down-land-ja)
          0.0
          0
          30
          1.0
          0.0
          #f
          )
        )
    (ja-channel-set! 1)
    (let ((s5-0 (-> self skel root-channel 0)))
      (set! (-> s5-0 frame-group) (the-as art-joint-anim jakb-flop-down-land-ja))
      (set! (-> s5-0 param 0)
            (the float (+ (-> (the-as art-joint-anim jakb-flop-down-land-ja) frames num-frames) -1))
            )
      (let ((f30-1 (seek f30-0 1.0 (* 0.5 (seconds-per-frame)))))
        (set! (-> s5-0 param 1) f30-1)
        (set! (-> s5-0 frame-num) 0.0)
        (joint-control-channel-group! s5-0 (the-as art-joint-anim jakb-flop-down-land-ja) num-func-seek!)
        (until (ja-done? 0)
          (compute-alignment! (-> self align))
          (align!
            (-> self align)
            (if arg1
                (align-opts adjust-y-vel)
                (align-opts adjust-y-vel adjust-xz-vel)
                )
            1.0
            1.0
            1.5
            )
          (when (and (>= 25.0 (ja-aframe-num 0))
                     (and (>= (ja-aframe-num 0) 21.0)
                          (and (-> self next-state) (= (-> self next-state name) 'target-flop-hit-ground))
                          (!= (-> self tobot?) 'tobot)
                          (!= (-> self control unknown-spool-anim00) 'stuck)
                          )
                     )
            (when (and (cpad-hold? (-> self control cpad number) x) (can-jump? #f) (!= (-> self control ground-pat event) 7))
              (let ((v1-55 (new-stack-vector0)))
                (let ((f0-8 (vector-dot (-> self control dynam gravity-normal) (-> self control transv))))
                  0.0
                  (vector-! v1-55 (-> self control transv) (vector-float*! v1-55 (-> self control dynam gravity-normal) f0-8))
                  )
                (let* ((f0-9 (vector-length v1-55))
                       (f1-3 f0-9)
                       (f2-0 0.0)
                       )
                  (vector+!
                    (-> self control transv)
                    (vector-float*! (-> self control transv) (-> self control dynam gravity-normal) f2-0)
                    (vector-float*! v1-55 v1-55 (/ f0-9 f1-3))
                    )
                  )
                )
              (set! (-> self gun surpress-time) (+ (current-time) (seconds 0.4)))
              (if (using-gun? self)
                  (go
                    target-high-jump
                    (-> *TARGET-bank* flop-jump-height-min)
                    (-> *TARGET-bank* flop-jump-height-max)
                    (if arg1
                        'flop
                        'flop-forward
                        )
                    )
                  (go
                    target-duck-high-jump
                    (-> *TARGET-bank* flop-jump-height-min)
                    (-> *TARGET-bank* flop-jump-height-max)
                    (if arg1
                        'flop
                        'flop-forward
                        )
                    )
                  )
              )
            )
          (suspend)
          (let ((s5-1 (-> self skel root-channel 0)))
            (set! (-> s5-1 param 0) (the float (+ (-> s5-1 frame-group frames num-frames) -1)))
            (set! f30-1 (seek f30-1 1.0 (* 0.5 (seconds-per-frame))))
            (set! (-> s5-1 param 1) f30-1)
            (joint-control-channel-group-eval! s5-1 (the-as art-joint-anim #f) num-func-seek!)
            )
          )
        )
      )
    )
  0
  (none)
  )

;; definition for function target-hit-ground-anim
;; WARN: Function target-hit-ground-anim has a return type of none, but the expression builder found a return statement.
(defbehavior target-hit-ground-anim target ((arg0 symbol) (arg1 symbol))
  (cond
    ((logtest? (water-flag swimming) (-> self water flags))
     )
    ((let ((v1-5 (ja-group)))
       (and v1-5 (or (= v1-5 jakb-flop-down-ja)
                     (= v1-5 jakb-flop-down-loop-ja)
                     (= v1-5 jakb-moving-flop-down-ja)
                     (= v1-5 jakb-moving-flop-down-loop-ja)
                     )
            )
       )
     (target-hit-ground-flop-anim arg0 arg1)
     )
    ((and (= (-> self control ground-pat material) (pat-material ice)) (< 16384.0 (-> self control ctrl-xz-vel)))
     )
    ((and (= (-> self ext-anim) (target-anim light)) (let ((v1-23 (ja-group)))
                                                       (and v1-23 (or (= v1-23 jakb-lightjak-swoop1-ja)
                                                                      (= v1-23 jakb-lightjak-swoop2-ja)
                                                                      (= v1-23 jakb-lightjak-swoop-fall-ja)
                                                                      (= v1-23 jakb-lightjak-swoop-fall-loop-ja)
                                                                      )
                                                            )
                                                       )
          )
     (ja-channel-push! 1 (seconds 0.05))
     (ja-no-eval :group! jakb-lightjak-swoop-land-ja :num! (seek!) :frame-num 0.0)
     (until (ja-done? 0)
       (suspend)
       (ja :num! (seek!))
       )
     )
    ((and (= (-> self ext-anim) (target-anim light))
          (let ((v1-55 (ja-group)))
            (and v1-55 (or (= v1-55 jakb-lightjak-freeze-ja) (= v1-55 jakb-lightjak-heal-loop-ja)))
            )
          )
     (ja-channel-push! 1 (seconds 0.05))
     (ja-no-eval :group! jakb-lightjak-swoop-land-ja :num! (seek!) :frame-num 0.0)
     (until (ja-done? 0)
       (suspend)
       (ja :num! (seek!))
       )
     )
    ((let ((v1-84 (ja-group)))
       (or (and v1-84
                (or (= v1-84 jakb-jump-loop-ja) (= v1-84 (-> self draw art-group data 444)) (= v1-84 jakb-flop-jump-ja))
                )
           (let ((v1-90 (ja-group)))
             (and (and v1-90 (= v1-90 jakb-jump-ja))
                  (or (>= (ja-aframe-num 0) 38.0) (and (focus-test? self dark) (nonzero? (-> self darkjak))))
                  )
             )
           )
       )
     (logior! (-> self target-flags) (target-flags lleg-still rleg-still))
     (ja-channel-push! 1 (seconds 0.02))
     (let ((a1-14 (target-land-anim)))
       (ja-no-eval :group! a1-14 :num! (seek!) :frame-num 0.0)
       )
     (until (ja-done? 0)
       (let ((v1-110 (ja-group)))
         (if (or (and (and v1-110 (or (= v1-110 jakb-gun-jump-land-ja) (= v1-110 jakb-gun-jump-land-side-ja)))
                      (not (using-gun? self))
                      )
                 (let ((v1-117 (ja-group)))
                   (and (and v1-117 (= v1-117 jakb-jump-land-ja)) (and (>= (ja-aframe-num 0) 60.0) (using-gun? self)))
                   )
                 )
             (goto cfg-108)
             )
         )
       (suspend)
       (ja :num! (seek!))
       )
     (label cfg-108)
     )
    ((let ((v1-134 (ja-group)))
       (and (and v1-134 (or (= v1-134 jakb-jump-ja) (= v1-134 (-> self draw art-group data 444))))
            (>= (ja-aframe-num 0) 35.0)
            (not (using-gun? self))
            )
       )
     (logior! (-> self target-flags) (target-flags lleg-still rleg-still))
     (ja-channel-set! 1)
     (ja-no-eval :group! jakb-jump-short-land-ja :num! (seek!) :frame-num 0.0)
     (until (ja-done? 0)
       (suspend)
       (ja :num! (seek!))
       )
     (ja-no-eval :group! jakb-jump-land-ja :num! (seek!) :frame-num (ja-aframe 50.0 0))
     (until (ja-done? 0)
       (if (and (using-gun? self) (>= (ja-aframe-num 0) 60.0))
           (return #f)
           )
       (suspend)
       (ja :num! (seek!))
       )
     )
    ((let ((v1-196 (ja-group)))
       (and v1-196
            (or (= v1-196 jakb-jump-ja) (= v1-196 jakb-duck-high-jump-ja) (= v1-196 (-> self draw art-group data 444)))
            )
       )
     ((lambda :behavior target
        ()
        (logior! (-> self target-flags) (target-flags lleg-still rleg-still))
        (ja-channel-set! 1)
        (cond
          ((using-gun? self)
           (ja-no-eval :group! jakb-jump-short-land-ja :num! (seek! (ja-aframe 41.0 0)) :frame-num (ja-aframe 38.0 0))
           (until (ja-done? 0)
             (suspend)
             (ja :num! (seek! (ja-aframe 41.0 0)))
             )
           (ja-no-eval :num! (seek! 0.0))
           (ja-channel-push! 1 (seconds 0.1))
           (case (gun->eco (-> self gun gun-type))
             (((pickup-type eco-red) (pickup-type eco-dark))
              (ja-no-eval :group! jakb-gun-jump-land-ja :num! (seek!) :frame-num (ja-aframe 64.0 0))
              (until (ja-done? 0)
                (ja-blend-eval)
                (if (not (using-gun? self))
                    (goto cfg-19)
                    )
                (suspend)
                (ja :num! (seek!))
                )
              )
             (else
               (ja-no-eval :group! jakb-gun-jump-land-side-ja :num! (seek!) :frame-num (ja-aframe 64.0 0))
               (until (ja-done? 0)
                 (ja-blend-eval)
                 (if (not (using-gun? self))
                     (goto cfg-19)
                     )
                 (suspend)
                 (ja :num! (seek!))
                 )
               )
             )
           (label cfg-19)
           )
          (else
            (ja-no-eval :group! jakb-jump-short-land-ja :num! (seek!) :frame-num (ja-aframe 38.0 0))
            (until (ja-done? 0)
              (suspend)
              (ja :num! (seek!))
              )
            (ja-no-eval :group! jakb-jump-land-ja :num! (seek!) :frame-num (ja-aframe 50.0 0))
            (until (ja-done? 0)
              (if (and (using-gun? self) (>= (ja-aframe-num 0) 60.0))
                  (return #f)
                  )
              (suspend)
              (ja :num! (seek!))
              )
            )
          )
        (none)
        )
      )
     )
    ((let ((v1-202 (ja-group)))
       (and v1-202
            (or (= v1-202 jakb-hit-from-front-ja) (= v1-202 jakb-hit-from-front-alt1-ja) (= v1-202 jakb-hit-from-back-ja))
            )
       )
     (logior! (-> self target-flags) (target-flags lleg-still rleg-still))
     (let* ((v1-210 (ja-group))
            (f30-0 (if (and v1-210 (= v1-210 jakb-hit-from-back-ja))
                       24576.0
                       -24576.0
                       )
                   )
            )
       (ja-channel-push! 1 (seconds 0.04))
       (ja-no-eval :group! jakb-jump-short-land-ja :num! (seek!) :frame-num (ja-aframe 38.0 0))
       (until (ja-done? 0)
         (set-forward-vel f30-0)
         (suspend)
         (ja :num! (seek!))
         )
       )
     (ja-no-eval :group! jakb-jump-land-ja :num! (seek!) :frame-num (ja-aframe 50.0 0))
     (until (ja-done? 0)
       (if (and (using-gun? self) (>= (ja-aframe-num 0) 60.0))
           (return #f)
           )
       (suspend)
       (ja :num! (seek!))
       )
     )
    ((let ((v1-267 (ja-group)))
       (and v1-267
            (or (= v1-267 jakb-jump-ja)
                (= v1-267 (-> self draw art-group data 444))
                (= v1-267 jakb-attack-from-jump-ja)
                (= v1-267 jakb-attack-from-jump-loop-ja)
                (= v1-267 jakb-attack-from-jump-end-ja)
                (= v1-267 jakb-flop-down-land-ja)
                (= v1-267 jakb-attack-uppercut-ja)
                (= v1-267 jakb-gun-attack-upperbutt-ja)
                (= v1-267 jakb-gun-attack-upperbutt-blue-ja)
                (= v1-267 jakb-board-get-off-ja)
                )
            )
       )
     ((lambda :behavior target
        ()
        (logior! (-> self target-flags) (target-flags lleg-still rleg-still))
        (ja-channel-push! 1 (seconds 0.04))
        (cond
          ((using-gun? self)
           (ja-no-eval :group! jakb-jump-short-land-ja :num! (seek! (ja-aframe 41.0 0)) :frame-num (ja-aframe 38.0 0))
           (until (ja-done? 0)
             (suspend)
             (ja :num! (seek! (ja-aframe 41.0 0)))
             )
           (ja-no-eval :num! (seek! 0.0))
           (ja-channel-push! 1 (seconds 0.1))
           (case (gun->eco (-> self gun gun-type))
             (((pickup-type eco-red) (pickup-type eco-dark))
              (ja-no-eval :group! jakb-gun-jump-land-ja :num! (seek!) :frame-num (ja-aframe 64.0 0))
              (until (ja-done? 0)
                (ja-blend-eval)
                (suspend)
                (ja :num! (seek!))
                )
              )
             (else
               (ja-no-eval :group! jakb-gun-jump-land-side-ja :num! (seek!) :frame-num (ja-aframe 64.0 0))
               (until (ja-done? 0)
                 (ja-blend-eval)
                 (suspend)
                 (ja :num! (seek!))
                 )
               )
             )
           )
          ((and (and (focus-test? self dark) (nonzero? (-> self darkjak))) (= (-> self ext-anim) (target-anim dark)))
           (ja-no-eval :group! (-> self draw art-group data 445) :num! (seek!) :frame-num (ja-aframe 42.0 0))
           (until (ja-done? 0)
             (suspend)
             (ja :num! (seek!))
             )
           )
          (else
            (ja-no-eval :group! jakb-jump-land-ja :num! (seek!) :frame-num (ja-aframe 42.0 0))
            (until (ja-done? 0)
              (if (and (using-gun? self) (>= (ja-aframe-num 0) 60.0))
                  (return #f)
                  )
              (suspend)
              (ja :num! (seek!))
              )
            )
          )
        (none)
        )
      )
     )
    ((let ((v1-273 (ja-group)))
       (and v1-273 (or (= v1-273 jakb-carry-jump-ja) (= v1-273 jakb-carry-jump-loop-ja)))
       )
     (logior! (-> self target-flags) (target-flags lleg-still rleg-still))
     (ja-channel-push! 1 (seconds 0.04))
     (ja-no-eval :group! jakb-carry-jump-land-ja :num! (seek!) :frame-num 0.0)
     (until (ja-done? 0)
       (suspend)
       (ja :num! (seek!))
       )
     )
    ((let ((v1-304 (ja-group)))
       (and v1-304 (or (= v1-304 jakb-jump-land-ja)
                       (= v1-304 jakb-gun-jump-land-ja)
                       (= v1-304 jakb-gun-jump-land-side-ja)
                       (= v1-304 jakb-carry-jump-land-ja)
                       (= v1-304 jakb-mech-jump-land-ja)
                       (= v1-304 jakb-mech-carry-jump-land-ja)
                       )
            )
       )
     (logior! (-> self target-flags) (target-flags lleg-still rleg-still))
     (ja-no-eval :num! (seek!))
     (while (not (ja-done? 0))
       (suspend)
       (ja-eval)
       )
     )
    ((let ((v1-320 (ja-group)))
       (and v1-320
            (or (= v1-320 jakb-mech-jump-ja) (= v1-320 jakb-mech-jump-loop-ja) (= v1-320 jakb-mech-hit-front-ja))
            )
       )
     (logior! (-> self target-flags) (target-flags lleg-still rleg-still))
     (ja-channel-push! 1 (seconds 0.017))
     (ja-no-eval :group! jakb-mech-jump-land-ja :num! (seek!) :frame-num 0.0)
     (until (ja-done? 0)
       (suspend)
       (ja :num! (seek!))
       )
     )
    ((let ((v1-351 (ja-group)))
       (and v1-351 (or (= v1-351 jakb-mech-carry-jump-ja) (= v1-351 jakb-mech-carry-jump-loop-ja)))
       )
     (logior! (-> self target-flags) (target-flags lleg-still rleg-still))
     (let ((v1-358 (ja-group)))
       (if (and v1-358 (= v1-358 jakb-mech-carry-jump-loop-ja))
           (ja-channel-set! 1)
           (ja-channel-push! 1 (seconds 0.04))
           )
       )
     (ja-no-eval :group! jakb-mech-carry-jump-land-ja :num! (seek!) :frame-num 0.0)
     (until (ja-done? 0)
       (suspend)
       (ja :num! (seek!))
       )
     )
    )
  (none)
  )

;; definition for function target-attack-air-anim
;; WARN: Return type mismatch symbol vs none.
(defbehavior target-attack-air-anim target ()
  (when (using-gun? self)
    (set! (-> self gun top-anim-low-high) 0.0)
    (case (gun->eco (-> self gun gun-type))
      (((pickup-type eco-yellow))
       (push-anim-to-targ
         (-> self skel top-anim)
         (the-as art-joint-anim jakb-gun-attack-from-stance-ja)
         0.0
         30
         30
         0.6
         0.0
         #f
         )
       )
      (else
        (push-anim-to-targ
          (-> self skel top-anim)
          (the-as art-joint-anim jakb-gun-attack-from-stance-ja)
          3.0
          30
          30
          0.5
          0.0
          #f
          )
        )
      )
    )
  (set! (-> self control unknown-float41) 0.0)
  (set! (-> self control unknown-float42) 0.0)
  (ja-channel-push! 1 (seconds 0.075))
  (set! (-> self control unknown-sound-id01) (sound-play "spin-kick"))
  (ja-no-eval :group! jakb-attack-from-jump-ja :num! (seek!) :frame-num 0.0)
  (until (ja-done? 0)
    (compute-alignment! (-> self align))
    (align! (-> self align) (align-opts adjust-quat) 1.0 1.0 1.0)
    (suspend)
    (ja :num! (seek!))
    )
  (set! (-> self control unknown-sound-id01) (sound-play "spin-kick"))
  (ja :group! jakb-attack-from-jump-loop-ja :num! min)
  (let ((f30-0 -393216.0))
    (let ((f0-11 (target-height-above-ground))
          (f1-1 (vector-dot (-> self control dynam gravity-normal) (-> self control transv)))
          )
      (while (not (or (and (< (fabs (/ f0-11 (/ f1-1 300))) 150.0) (< f1-1 0.0))
                      (time-elapsed? (-> self state-time) (seconds 1.7))
                      )
                  )
        (quaternion-rotate-y!
          (-> self control quat-for-control)
          (-> self control quat-for-control)
          (* f30-0 (seconds-per-frame))
          )
        (suspend)
        (ja :num! (loop!))
        (set! f0-11 (target-height-above-ground))
        (set! f1-1 (vector-dot (-> self control dynam gravity-normal) (-> self control transv)))
        )
      )
    (ja-no-eval :group! jakb-attack-from-jump-end-ja :num! (seek!) :frame-num 0.0)
    (until (ja-done? 0)
      (cond
        ((< (ja-aframe-num 0) 32.0)
         (quaternion-rotate-y!
           (-> self control quat-for-control)
           (-> self control quat-for-control)
           (* f30-0 (seconds-per-frame))
           )
         )
        (else
          (let ((f0-25
                  (deg-diff
                    (quaternion-y-angle (-> self control quat-for-control))
                    (quaternion-y-angle (-> self control dir-targ))
                    )
                  )
                )
            (quaternion-rotate-y!
              (-> self control quat-for-control)
              (-> self control quat-for-control)
              (* -0.2 (fabs f0-25))
              )
            )
          )
        )
      (suspend)
      (ja :num! (seek!))
      )
    )
  (none)
  )

;; definition for function target-edge-grab-anim
;; WARN: Return type mismatch symbol vs none.
;; WARN: new jak 2 until loop case, check carefully
(defbehavior target-edge-grab-anim target ((arg0 float))
  (ja-channel-push! 1 (seconds 0.15))
  (ja :group! jakb-falling-to-edge-grab-ja :num! min)
  (until (ja-done? 0)
    (suspend)
    (ja :num! (seek!))
    )
  (ja-channel-set! 1)
  (until #f
    (ja-no-eval :group! jakb-edge-grab-stance0-ja :num! (seek!) :frame-num 0.0)
    (until (ja-done? 0)
      (can-play-stance-amibent?)
      (suspend)
      (ja :num! (seek!))
      )
    (+! (-> self anim-seed) 1)
    (ja-no-eval :group! jakb-edge-grab-stance1-ja :num! (seek!) :frame-num 0.0)
    (until (ja-done? 0)
      (can-play-stance-amibent?)
      (suspend)
      (ja :num! (seek!))
      )
    )
  #f
  (none)
  )