[decompiler] detect seek! and seekl! macros (#1317)

* detect `seek!` and `seekl!`

* fancy struct instead of pair mess

* fixes

* i think this was wrong?

* update refs

* update source

* More logical branching

* even better branching
This commit is contained in:
ManDude
2022-04-18 20:01:44 +01:00
committed by GitHub
parent cbc6987351
commit 66e395d547
109 changed files with 952 additions and 1398 deletions
+5 -10
View File
@@ -536,10 +536,9 @@
:trans
(behavior ()
(cond
((and (and *target*
(>= (-> self info idle-distance)
(vector-vector-distance (-> self root-overlay trans) (-> *target* control trans))
)
((and (and *target* (>= (-> self info idle-distance)
(vector-vector-distance (-> self root-overlay trans) (-> *target* control trans))
)
)
(send-event *target* 'query 'powerup 3)
)
@@ -548,17 +547,13 @@
(spawn-projectile-blue *target*)
)
)
(set! (-> self float-height-offset)
(seek (-> self float-height-offset) (-> self float-offset) (* 8192.0 (-> *display* seconds-per-frame)))
)
(seek! (-> self float-height-offset) (-> self float-offset) (* 8192.0 (-> *display* seconds-per-frame)))
(draw-eco-beam (-> self root-overlay trans) (-> self beam-end))
(update-trans! (-> self sound) (-> self root-overlay trans))
(update! (-> self sound))
)
(else
(set! (-> self float-height-offset)
(seek (-> self float-height-offset) (-> self idle-offset) (* 16384.0 (-> *display* seconds-per-frame)))
)
(seek! (-> self float-height-offset) (-> self idle-offset) (* 16384.0 (-> *display* seconds-per-frame)))
(stop! (-> self sound))
(if (= (-> self float-height-offset) (-> self idle-offset))
(go citb-chain-plat-settle)