2020-10-26 21:08:24 -04:00
|
|
|
;;-*-Lisp-*-
|
2020-09-04 14:44:23 -04:00
|
|
|
(in-package goal)
|
|
|
|
|
|
|
|
|
|
;; name: mistycannon.gc
|
|
|
|
|
;; name in dgo: mistycannon
|
|
|
|
|
;; dgos: BEA, L1, MIS
|
|
|
|
|
|
2021-09-28 20:42:00 -04:00
|
|
|
;; TODO - for babak-with-cannon
|
|
|
|
|
(deftype angle-tracker (structure)
|
|
|
|
|
((value float :offset-assert 0)
|
|
|
|
|
(min float :offset-assert 4)
|
|
|
|
|
(range float :offset-assert 8)
|
|
|
|
|
(speed float :offset-assert 12)
|
|
|
|
|
)
|
|
|
|
|
:method-count-assert 9
|
|
|
|
|
:size-assert #x10
|
|
|
|
|
:flag-assert #x900000010
|
|
|
|
|
)
|
|
|
|
|
(deftype mistycannon (process-drawable)
|
|
|
|
|
((rotate angle-tracker :inline :offset-assert 176)
|
|
|
|
|
(tilt angle-tracker :inline :offset-assert 192)
|
|
|
|
|
(front-wheel float :offset-assert 208)
|
|
|
|
|
(rear-wheel float :offset-assert 212)
|
|
|
|
|
(last-known-rotation float :offset-assert 216)
|
|
|
|
|
(part-timer uint64 :offset-assert 224)
|
|
|
|
|
(hellmouth vector :inline :offset-assert 240)
|
|
|
|
|
(postbindinfo-ok basic :offset-assert 256)
|
|
|
|
|
(launch-origin vector :inline :offset-assert 272)
|
|
|
|
|
(goggles vector :inline :offset-assert 288)
|
|
|
|
|
(avoid-entity basic :offset-assert 304)
|
|
|
|
|
(center-point vector :inline :offset-assert 320)
|
|
|
|
|
(at-point vector :inline :offset-assert 336)
|
|
|
|
|
(accuracy-range float :offset-assert 352)
|
|
|
|
|
(target-theta float :offset-assert 356)
|
|
|
|
|
(sound-id sound-id :offset-assert 360)
|
|
|
|
|
(aim-sound-id sound-id :offset-assert 364)
|
|
|
|
|
(player-touching-grips? basic :offset-assert 368)
|
|
|
|
|
)
|
|
|
|
|
:method-count-assert 24
|
|
|
|
|
:size-assert #x174
|
|
|
|
|
:heap-base #x110
|
|
|
|
|
:flag-assert #x1801100174
|
|
|
|
|
(:methods
|
|
|
|
|
(dummy-20 () none 20)
|
|
|
|
|
(dummy-21 () none 21)
|
|
|
|
|
(dummy-22 () none 22)
|
|
|
|
|
(dummy-23 () none 23)
|
|
|
|
|
)
|
|
|
|
|
)
|
