Last change
on this file since 44 was
44,
checked in by Sam Hocevar, 15 years ago
|
- Importing abuse-frabs 2.10.
|
File size:
1007 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.