mirror of
https://github.com/open-goal/jak-project.git
synced 2024-10-20 21:27:52 -04:00
2969833b2d
- `speech` - `ambient` - `water-h` - `vol-h` - `generic-obs` - `carry-h` - `pilot-h` - `board-h` - `gun-h` - `flut-h` - `indax-h` - `lightjak-h` - `darkjak-h` - `target-util` - `history` - `collide-reaction-target` - `logic-target` - `sidekick` - `projectile` - `voicebox` - `ragdoll-edit` - most of `ragdoll` (not added to gsrc yet) - `curves` - `find-nearest` - `lightjak-wings` - `target-handler` - `target-anim` - `target` - `target2` - `target-swim` - `target-lightjak` - `target-invisible` - `target-death` - `target-gun` - `gun-util` - `board-util` - `target-board` - `board-states` - `mech-h` - `vol` - `vent` - `viewer` - `gem-pool` - `collectables` - `crates` - `secrets-menu` Additionally: - Detection of non-virtual state inheritance - Added a config file that allows overriding the process stack size set by `stack-size-set!` calls - Fix for integer multiplication with `r0` - Fixed detection for the following macros: - `static-attack-info` - `defpart` and `defpartgroup` (probably still needs adjustments, uses Jak 2 implementation at the moment) - `sound-play` (Jak 3 seems to always call `sound-play-by-name` with a `sound-group` of 0, so the macro has been temporarily defaulted to use that) One somewhat significant change made here that should be noted is that the return type of `process::init-from-entity!` was changed to `object`. I've been thinking about this for a while, since it looks a bit nicer without the `(none)` at the end and I have recently encountered init methods that early return `0`.
165 lines
3.9 KiB
Common Lisp
165 lines
3.9 KiB
Common Lisp
;;-*-Lisp-*-
|
|
(in-package goal)
|
|
|
|
;; name: speech-h.gc
|
|
;; name in dgo: speech-h
|
|
;; dgos: GAME
|
|
|
|
;; +++speech-type-flag
|
|
(defenum speech-type-flag
|
|
:type uint8
|
|
:bitfield #t
|
|
(random-order 0)
|
|
(linked-next 1)
|
|
(skip-first-time 2)
|
|
(first-time 3)
|
|
)
|
|
;; ---speech-type-flag
|
|
|
|
|
|
;; +++speech-type
|
|
(defenum speech-type
|
|
:type int8
|
|
(none 0)
|
|
(guard-generic-battle 1)
|
|
(guard-generic-battle-b 2)
|
|
(guard-battle-victory 3)
|
|
(guard-battle-victory-b 4)
|
|
(guard-change-targets 5)
|
|
(guard-change-targets-b 6)
|
|
(guard-go-hostile 7)
|
|
(guard-go-hostile-b 8)
|
|
(guard-hit 9)
|
|
(guard-hit-b 10)
|
|
(guard-witness-death 11)
|
|
(guard-witness-death-b 12)
|
|
(guard-chatter 13)
|
|
(guard-chatter-b 14)
|
|
(guard-chatter-jak 15)
|
|
(guard-chatter-jak-b 16)
|
|
(guard-bumped-by-jak 17)
|
|
(guard-bumped-by-jak-b 18)
|
|
(civ-m-ambient 19)
|
|
(civ-m-alert 20)
|
|
(civ-m-cower 21)
|
|
(civ-m-touched-by-player 22)
|
|
(civ-m-shot-by-player 23)
|
|
(civ-m-avoiding-player-vehicle 24)
|
|
(civ-m-hit-by-player-vehicle 25)
|
|
(civ-m-player-stealing-vehicle 26)
|
|
(civ-f-ambient 27)
|
|
(civ-f-alert 28)
|
|
(civ-f-cower 29)
|
|
(civ-f-touched-by-player 30)
|
|
(civ-f-shot-by-player 31)
|
|
(civ-f-avoiding-player-vehicle 32)
|
|
(civ-f-hit-by-player-vehicle 33)
|
|
(race-jak-start 34)
|
|
(race-jak-lap 35)
|
|
(race-jak-last-lap 36)
|
|
(race-jak-hit 37)
|
|
(race-jak-got-hit 38)
|
|
(race-jak-ambient 39)
|
|
(race-jak-pass 40)
|
|
(race-jak-jump 41)
|
|
(race-jak-win 42)
|
|
(race-daxter-start 43)
|
|
(race-daxter-lap 44)
|
|
(race-daxter-last-lap 45)
|
|
(race-daxter-hit 46)
|
|
(race-daxter-got-hit 47)
|
|
(race-daxter-ambient 48)
|
|
(race-daxter-pass 49)
|
|
(race-daxter-jump 50)
|
|
(race-daxter-win 51)
|
|
(race-errol-start 52)
|
|
(race-errol-last-lap 53)
|
|
(race-errrol-hit 54)
|
|
(race-errol-got-hit 55)
|
|
(race-errol-ambient 56)
|
|
(race-errol-pass 57)
|
|
(race-errol-got-passed 58)
|
|
(race-errol-win 59)
|
|
(race-errol-lose 60)
|
|
)
|
|
;; ---speech-type
|
|
|
|
|
|
;; +++speech-channel-flag
|
|
(defenum speech-channel-flag
|
|
:type uint8
|
|
:bitfield #t
|
|
(disable 0)
|
|
)
|
|
;; ---speech-channel-flag
|
|
|
|
|
|
;; DECOMP BEGINS
|
|
|
|
(deftype speech-type-info (structure)
|
|
((channel uint8)
|
|
(flags speech-type-flag)
|
|
(priority int8)
|
|
(delay-pre-time uint16)
|
|
(request-timeout uint16)
|
|
(min-delay uint16)
|
|
(max-delay uint16)
|
|
(delay uint16)
|
|
(play-index int16)
|
|
(list (array string))
|
|
(time uint64)
|
|
)
|
|
)
|
|
|
|
|
|
(deftype speech-request (structure)
|
|
((handle handle)
|
|
(time time-frame)
|
|
(priority float)
|
|
(speech-type speech-type)
|
|
)
|
|
:pack-me
|
|
)
|
|
|
|
|
|
(deftype speech-channel (structure)
|
|
((flags speech-channel-flag)
|
|
(gui-channel gui-channel)
|
|
(delay uint16)
|
|
(id sound-id)
|
|
(update-time time-frame)
|
|
(start-time time-frame)
|
|
(end-time time-frame)
|
|
(request speech-request :inline)
|
|
(last-request speech-request :inline)
|
|
(target-pos vector :inline)
|
|
(speech-table (pointer speech-type-info))
|
|
)
|
|
(:methods
|
|
(speech-channel-method-9 (_type_ process-drawable speech-type) int)
|
|
(speech-channel-method-10 (_type_ handle) none)
|
|
(speech-channel-method-11 (_type_) none)
|
|
(reset-channel! (_type_) none)
|
|
(init! (_type_) none)
|
|
(speech-channel-method-14 (_type_ speech-type float) none)
|
|
)
|
|
)
|
|
|
|
|
|
(deftype speech-control (structure)
|
|
((channel-array speech-channel 2 :inline)
|
|
(speech-table speech-type-info 61)
|
|
)
|
|
(:methods
|
|
(speech-table-reset! (_type_) none)
|
|
(speech-table-set! (_type_ speech-type speech-type-info) none)
|
|
(speech-control-method-11 (_type_) none)
|
|
(speech-control-method-12 (_type_ process-drawable speech-type) none)
|
|
(speech-control-method-13 (_type_ process-drawable speech-type int) none)
|
|
(speech-control-method-14 (_type_ handle) none)
|
|
(speech-control-method-15 (_type_) none)
|
|
(speech-control-method-16 (_type_) none)
|
|
(speech-control-method-17 (_type_ speech-type float) none)
|
|
)
|
|
)
|