source: abuse/trunk/data/addon/aliens/sfx.lsp @ 634

Last change on this file since 634 was 589, checked in by Sam Hocevar, 12 years ago

data: remove exact duplicate Lisp files, merge all main space Lisp files,
and move most frabs addons to the main data directory.

File size: 975 bytes
Line 
1;; In places Copyright 1995 Crack dot Com,  All Rights reserved
2;; See licensing information for more details on usage rights
3;;
4;; Mostly Copyright 1997 Mike Moss (tfirestorm@aol.com),  All Rights reserved
5;; See readme for more details on usage rights
6
7(defun aldir (filename) (concatenate 'string "addon/aliens/" filename))
8
9;; alien slash/bite noise
10(def_sound 'ALSLASH_SND         (aldir "aslash01.wav"))
11
12;; alien screaming
13(def_sound 'ALSCREAM_SND        (aldir "alien01.wav"))
14
15;; alien pain sound
16(def_sound 'ALPAIN_SND          (aldir "ahit01.wav"))
17
18;; alien pain sound
19(def_sound 'ALTAUNT_SND         (aldir "altaunt.wav"))
20
21;; alien death
22(setq AL_DEATH (make-array 4 :initial-contents
23                             (list      (def_sound (aldir "adie01.wav"))
24                                        (def_sound (aldir "adie02.wav"))
25                                        (def_sound (aldir "adie03.wav"))
26                                        (def_sound (aldir "adie05.wav")))))
27
28;; egg hatching noise
29(def_sound 'EGGH_SND            (aldir "egghatch.wav"))
30
31;; fh jar breaking noise
32(def_sound 'JBRK_SND            (aldir "jarbreak.wav"))
Note: See TracBrowser for help on using the repository browser.