[thelist] Director problem
Jeff Haas
jhaas at sfpinc.com
Tue Oct 22 14:52:01 CDT 2002
Can anyone here help me with a Director problem I'm having?
Below is my code for my volume control. It doesn't work as a slider but instead the user clicks to turn down (or up) the volume. I am working with multiple movies and every time I change movies the volume resets itself. How can I get it to "remember" the volume level when it goes to the next movie?
Note: I'm in version D-8.5.1
Thanks in advance.
Jeff
_________
Volume Control Behaviour:
global gCurrentVolume
property mySprite
property myChannel
property pSoundLevel
property pLevel
property pDirection
on new me
myChannel = 2
pDirection = 1
-- pLevel = 5
pSoundLevel = []
pSoundLevel.add( [ #volume 0, #image (member "vol-0") ] )
pSoundLevel.add( [ #volume 63, #image (member "vol-25") ] )
pSoundLevel.add( [ #volume 127, #image (member "vol-50") ] )
pSoundLevel.add( [ #volume 191, #image (member "vol-75") ] )
pSoundLevel.add( [ #volume 255, #image (member "vol-100") ] )
end
on beginSprite me
mySprite = sprite(79)
me.setLevel()
end
on setLevel me
mySprite.member = pSoundLevel[ pLevel ][ #image ]
sound(2).volume = pSoundLevel[ pLevel ][ #volume]
gCurrentVolume = sound(2).volume
end
on mouseUp me
pLevel = pLevel + pDirection
if( pLevel > pSoundLevel.count ) then
pLevel = pSoundLevel.count - 1
pDirection = -1
else if( pLevel < 1 ) then
pLevel = 2
pDirection = 1
end if
me.setLevel()
end
on getPropertyDescriptionList
description = []
addProp description,#pLevel, [#default5, #format#integer,#comment\
"Default Volume (1=0%, 5=100%)", #range1,2,3,4,5]
addProp description,#myChannel, [#default2, #format#integer,\
#comment"Sound Channel"]
return description
end
And my Movie Script:
global gCurrentVolume
on prepareMovie
gCurrentVolume = 0
end
on stopMovie
gCurrentVolume = sound(2).volume
end
Jeffrey Haas
Manager, Technical Development, Digital Media
Spencer Francey Peters
t: 416.203.2300
f: 416.203.0303
e: jhaas at sfpinc.com
More information about the thelist
mailing list