home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PASCAL / SOUNDUP.ZIP / SOUNDUP.DOC < prev    next >
Encoding:
Text File  |  1990-08-21  |  5.4 KB  |  128 lines
  1.  
  2.  
  3.  
  4.  
  5.  
  6.        ▄█████                             ██  ██   ██
  7.        ██                                 ██  ██   ██
  8.        ▀████▄  ▄████▄ ██ ██  ██▄██▄▄  ▄█████  ██   ██  █████▄
  9.            ██  ██  ██ ██ ██  ██▀  ██  ██  ██  ██▄ ▄██  ██  ██
  10.        █████▀  ▀████▀ ▀███▀  ██   ██  ▀█████  ▀█████▀  █████▀
  11.                                                        ██
  12.                                                        ██
  13.                     Version 1.0 By: Andy Sherwood
  14.  
  15.  
  16.  
  17.  
  18.  
  19.  
  20.  
  21.  
  22.  
  23.  
  24.  
  25.  
  26.     SoundUp is a program that is used to easily create sound
  27. effects to be used in your Turbo Pascal 5.5 programs.  It
  28. contains an easy to use editor and simple commands to call the
  29. saved sound files.  The saved files are EXTREMELY small and any
  30. number of them may be loaded at the same time.  SOUNDS.TPU
  31. contains all the commands you will need to run SoundUp sound
  32. files.  There are a few pre-packaged sounds which I thought were
  33. rather nifty, so they are included here.
  34.  
  35. Using The Editor
  36. ~~~~~~~~~~~~~~~~
  37.     The SoundUp editor is VERY easy to use. Simply use the up
  38. and down arrows keys to select the desired voice, delay, or to
  39. set the length of the sound.  When you wish to change a voice,
  40. delay, or the length, simply press Enter and enter the new value. 
  41. There are a couple of special commands, but those will be
  42. discussed later.  After the desired length has been set, and
  43. voices and delays are set, press F1 to hear your sound.  The
  44. sound may be stopped at ANY time by pressing a key.  This is
  45. especially useful if you design an especially irritating sound
  46. that makes, you, your family, and/or the dog cringe.
  47.     If you think your sound isn't really as neat as you thought
  48. it would be, simply press F2 and watch it disappear.  To save
  49. your sound, press F3, a prompt will appear asking you for the
  50. desired filename.  Filenames can contain any number of characters
  51. to allow you to save to a specified path.  You can use any
  52. extension you want, I prefer the .SND extension, but its entirely
  53. up to you.  Pressing F4 will prompt you for the name of a sound
  54. to load, the same rules apply to load as they do for save, you
  55. may enter a desired path.  If the sound you wish load is not
  56. present, SoundUp will simply reply, "File Not Found", and
  57. continue on its merry way.  When you are through using SoundUp,
  58. press F10, and it will clear the screen and exit.
  59.  
  60. Using the SPECIAL commands, OOOooo!
  61. ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  62.     There are a few special commands that can be used in the
  63. Delay or Voice fields.  Many of the niftiest sounds are made by
  64. following the length of the file in the voice.  In TP 5.5, this
  65. is done thusly,
  66.  
  67.   For I:=1 to 5000 Do Sound(I);
  68.  
  69. Well, SoundUp has a set of "L" commands that will allow you to do
  70. this, for instance, if you wish Voice 1 to follow the length,
  71. simply place an "L" in Voice 1.  However, if you wish to have a
  72. sound played WITH the length, you can include a + or - sign.  ie,
  73. L+5000, will play the length plus 5000 in Hz.  The "L" command
  74. can follow the number as well, ie 5000-L.  However, NEVER put a
  75. space between the number and the L command or you may have some
  76. pretty unpredictable results!(this means I never bothered to test
  77. it)  Anyway, both I.SND and PAGE.SND use the L commands to
  78. demonstrate them.
  79.  
  80. Using the SOUNDS.TPU unit
  81. ~~~~~~~~~~~~~~~~~~~~~~~~~
  82.     The SOUNDS.TPU unit contain 3 easy to use commands to load
  83. and play sounds.  LoadSound, PlaySound and KeepSound.  LoadSound
  84. is called with two parameters, the name of the file, and the
  85. variable you wish to store the sound in.  The varible you store
  86. the sound in must be of the type NOISE, ie VAR NeatSound:Noise;.
  87. LoadSound is a function, so it must be called as a "variable" of
  88. the type byte.  It returns a 0 if everything was fine and the
  89. sound loaded, and a 1 if everyting WASN'T just great, and the
  90. sound DID not load.  This usually means that the file wasn't
  91. found.  The PlaySound command is called only with the variable
  92. name of the sound you just loaded, when it is through playing, it
  93. called NoSound from the CRT unit and stops the sound.  KeepSound,
  94. on the otherhand, DOES NOT call NoSound, this allows you to link
  95. many sounds together without a little "click" in the middle of
  96. each sound.  REMEMBER:  You must USE the CRT unit in your
  97. program, or your program will not compile!  Here's a REAL short
  98. example.
  99.  
  100. Program NiftySound;
  101. Uses Crt,Sounds;
  102. Var Snd:Noise;
  103. Begin
  104.     If LoadSound('NIFTY.SND',Snd)=0 Then PlaySound(Snd)
  105.         Else WriteLn('File Not Found');
  106. End.
  107.  
  108.     Pretty simple, huh?  For anyone out there who likes to peek
  109. at .TPU's, you may notice another function in the SOUNDS unit,
  110. this is the EXIST function, it test to see whether a file exists
  111. or not, it is simply returns true or false if a file exists or
  112. not.  It comes in handy from time to time.  I have also included
  113. another sample program called SAMPLE.PAS which will play PAGE.SND
  114. and without stopping move right into I.SND.  I think you will
  115. understand why I called I.SND what I did once you hear it, its
  116. pretty weird.
  117.  
  118. Shareware!
  119. ~~~~~~~~~~
  120.     Thats right, yet ANOTHER shareware product.  Use it,
  121. distribute it, do whatever you want with it, as long as you don't
  122. change the original .ZIP file in any way.  AND!  For those of you
  123. who find in the kindness of your hearts, or who want to get a
  124. hold of the source code, simply send in $10 to:
  125.  
  126.                     Andy Sherwood
  127.                     3440 E. Southern Ave. #1003
  128.                     Mesa, Az 85204