home *** CD-ROM | disk | FTP | other *** search
/ c't freeware shareware 2001 January / CT_SW0101.ISO / pc / software / spiele / strat / fcraft.tgz / fcraft.tar / clone-000402 / data / ccl / sound.ccl < prev    next >
Text File  |  2000-04-02  |  2KB  |  42 lines

  1. ;;   ___________             _________              _____  __
  2. ;;   \_      _____/______   ____   ____ \_   ___ \____________ _/ ____\/  |_
  3. ;;    |    __) \_  __ \_/ __ \_/ __ \/    \  \/\_  __ \__  \\   __\\   __\ 
  4. ;;    |     \   |  | \/\  ___/\  ___/\     \____|  | \// __ \|  |   |  |
  5. ;;    \___  /   |__|    \___  >\___  >\______  /|__|  (____  /__|   |__|
  6. ;;      \/            \/       \/         \/           \/
  7. ;;  ______________________                           ______________________
  8. ;;              T H E   W A R   B E G I N S
  9. ;;       FreeCraft - A free fantasy real time strategy game engine
  10. ;;
  11. ;;    sound.ccl    -    Define the used sounds.
  12. ;;
  13. ;;    (c) Copyright 1999,2000 by Fabrice Rossi
  14. ;;
  15. ;;    $Id: sound.ccl,v 1.3 2000/01/30 00:20:32 root Exp $
  16. ;;
  17.  
  18. ;;    Uncomment this to enable threaded sound
  19. (sound-thread)
  20.  
  21. ;;    Define sounds later used
  22. ;;
  23. (define sound-click (make-sound "click" "click.wav"))
  24. (define sound-explosion (make-sound "explosion" "explosion.wav"))
  25. (define sound-bow-hit (make-sound "bow hit" "bow hit.wav"))
  26. (define sound-fireball-hit (make-sound "fireball hit" "fireball hit.wav"))
  27.  
  28. ;;    Define sounds used by game
  29. ;;
  30. (define-game-sounds
  31.   'placement-error (make-sound "placement error" "placement error.wav")
  32.   'placement-success (make-sound "placement success" "placement sucess.wav")
  33.   'click sound-click
  34. ; FIXME: Not ready
  35. ;  'tree-chopping (make-sound "tree chopping" "tree chopping.wav")
  36. ;  'transport-docking
  37. ;  'building-construction
  38. ;  'basic human voices work complete
  39. ;  'peasant work complete
  40. ;  'basic orc voices work complete
  41.   )
  42.