At 04:01 +0800 04/13/2002, noelle cheng wrote:

>But I can't place a  QT music file into the sound channel. Is this 
>what you mean?

Ohhhhhh... No, that's another critter entirely. The sound volume 
slider behavior, as written, is supposed to affect sound file 
playback using such types as MP3, WAV, SWA and so on -- the stuff you 
normally put into sound channels.

It could be rewritten to affect QT sprite sound via 
sprite(theQuickTimeMovieSpriteNumer).volume. You'd want to change the 
getPropertyDescriptionList line that asks about channel numbers, and 
let it go all the way to 1000 for the range instead of just 8.

Try making these changes (you can leave the rest of the slider 
behavior code alone):


on getPropertyDescriptionList me

   set pdlist to [\
     #pSoundChannel: [#comment:"Which QuickTime Sound Sprite",\
                      #format:#integer,\
                      #default:1,\
                      #range:[#min:1,#max:( the lastChannel )]] ]
                      -- Note the use of 'the lastChannel' here,
                      -- which lets this range go all the way to
                      -- whatever the maximum number of sprites
                      -- might be in the current movie, since it
                      -- is not necessarily going to be 1000.
   return pdlist

end getPropertyDescriptionList



on adjustVolume me

   set myLocH = the locH of sprite pMySprite
   set sliderChange = pSliderBottom + myLocH
   sprite(pSoundChannel).volume = sliderChange * pDeltaFactor
   -- Here we change the volume of the *sprite* containing the
   -- QuickTime movie or audio, instead of changing the *sound
   -- channel volume*.

end

-- 

              Warren Ockrassa | http://www.nightwares.com/
  Director help | Free files | Sample chapters | Freelance | Consulting
        Author | Director 8.5 Shockwave Studio: A Beginner's Guide
                    Published by Osborne/McGraw-Hill
          http://www.osborne.com/indexes/beginners_guides.shtml
[To remove yourself from this list, or to change to digest mode, go to 
http://www.penworks.com/lingo-l.cgi  To post messages to the list, email 
[EMAIL PROTECTED]  (Problems, email [EMAIL PROTECTED]). Lingo-L is for 
learning and helping with programming Lingo.  Thanks!]

Reply via email to