;;-*-Lisp-*- (in-package goal) ;; name: sparticle-launcher.gc ;; name in dgo: sparticle-launcher ;; dgos: GAME, ENGINE ;; TODO - for shadow (define *part-id-table* (new 'global 'boxed-array sparticle-launcher 3584)) (define *part-group-id-table* (new 'global 'boxed-array sparticle-launch-group 1024))