mirror of
https://github.com/open-goal/jak-project
synced 2026-07-11 15:28:58 -04:00
Tyler Wilding
59 lines
2.0 KiB
Common Lisp
Vendored
Generated
59 lines
2.0 KiB
Common Lisp
Vendored
Generated
;;-*-Lisp-*-
|
|
(in-package goal)
|
|
|
|
;; definition for symbol *HACK-find-nearest-focusable-ignore*, type symbol
|
|
(define *HACK-find-nearest-focusable-ignore* #f)
|
|
|
|
;; definition of type find-sorted-targets-params
|
|
(deftype find-sorted-targets-params (structure)
|
|
((near-point vector :inline)
|
|
(in-dir vector :inline)
|
|
(reject-team int8)
|
|
(min-dist float)
|
|
(max-dist float)
|
|
(inv-slope-dist float)
|
|
(reject-inside-dist float)
|
|
(min-angle-cos float)
|
|
(max-angle-cos float)
|
|
(inv-slope-ang float)
|
|
(required-flags uint32)
|
|
(priority-flags uint32)
|
|
(weights vector :inline)
|
|
(validate basic)
|
|
(validator-params basic)
|
|
)
|
|
)
|
|
|
|
;; definition for method 3 of type find-sorted-targets-params
|
|
(defmethod inspect ((this find-sorted-targets-params))
|
|
(when (not this)
|
|
(set! this this)
|
|
(goto cfg-4)
|
|
)
|
|
(format #t "[~8x] ~A~%" this 'find-sorted-targets-params)
|
|
(format #t "~1Tnear-point: #<vector @ #x~X>~%" (-> this near-point))
|
|
(format #t "~1Tin-dir: #<vector @ #x~X>~%" (-> this in-dir))
|
|
(format #t "~1Treject-team: ~D~%" (-> this reject-team))
|
|
(format #t "~1Tmin-dist: ~f~%" (-> this min-dist))
|
|
(format #t "~1Tmax-dist: ~f~%" (-> this max-dist))
|
|
(format #t "~1Tinv-slope-dist: ~f~%" (-> this inv-slope-dist))
|
|
(format #t "~1Treject-inside-dist: ~f~%" (-> this reject-inside-dist))
|
|
(format #t "~1Tmin-angle-cos: ~f~%" (-> this min-angle-cos))
|
|
(format #t "~1Tmax-angle-cos: ~f~%" (-> this max-angle-cos))
|
|
(format #t "~1Tinv-slope-ang: ~f~%" (-> this inv-slope-ang))
|
|
(format #t "~1Trequired-flags: ~D~%" (-> this required-flags))
|
|
(format #t "~1Tpriority-flags: ~D~%" (-> this priority-flags))
|
|
(format #t "~1Tweights: #<vector @ #x~X>~%" (-> this weights))
|
|
(format #t "~1Tvalidate: ~A~%" (-> this validate))
|
|
(format #t "~1Tvalidator-params: ~A~%" (-> this validator-params))
|
|
(label cfg-4)
|
|
this
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
0
|
|
|
|
|
|
|
|
|