Rollover Sound

Added on 6/10/1999

Compatibilities:
behavior D6_5 Mac

Rating:

Plays a sound on rollover

property  OverSound, OverSoundChannel
property  X, Y, Num

on MouseWithin me
  if NOT SoundBusy(OverSoundChannel) then
    puppetSound OverSoundChannel, OverSound
  end if
  if the lastEvent < 20 then
    set the volume of sound OverSoundChannel to 255
  else
    set the volume of sound OverSoundChannel to 0
  end if
end

on mouseLeave me
  puppetSound OverSoundChannel, FALSE
end

on beginSprite me
  set Num to the spriteNum of me
end

on getPropertyDescriptionList
  set p_list =[ #OverSound:       [#comment:"Rollover Sound:", #format:#sound,   #default:"" ], ¬
                            #OverSoundChannel:[#comment:"Channel Number:", #format:#integer, #default: 1 ]]
  return p_list
end

on getBehaviorDescription
  return ¬
            "Use this simple behavior to have a Sound play while you move the mouse over the sprite"
end

Upload Provided by ABCUpload ASP

Contact

MMI
22 West Court Sq
Suite 2C
Newnan, GA 30263
USA

Fax - (206) 339-5833

Send e-mail