Hold on a frame till sound finishes playing

 

Compatibilities:

This item has not yet been rated

Holds for a sound to finish

---- written for Director 8 --- ---- Kumar.K kumark@icode.com ---- -- custom properties -- property soundchannel,whereto ------ Get Behavior Description List ------ on getPropertyDescriptionList me   set description = [:]   if the currentspritenum <> 0 then exit   addProp description, #soundchannel, [#comment: "Wait for Which Channel ?", #format:#Integer, #range:[#min:1,#Max:8],#default:1]   addProp description, #whereto, [#comment: "What to do after sound finishes Playing ?", #format:#String,   #range:["Go Next Frame","Go Next Marker", "Go Previous marker", "Go Loop","Exit"],#default:"Go Next Frame"]     return description end getPropertyDescriptionList ------ Get Behavior Description List ------ -- Get Behavior description -- on getBehaviorDescription   return "This Behavior waits on a frame till the sound in the specified finishes Playing. " & RETURN & RETURN &   "Parameters" & RETURN &   "* Sound Channel" & RETURN &   "* What to do after sound gets over" end -- Get Behavior description -- -- Events -- on prepareframe me   sound(soundchannel).breakLoop() end on ExitFrame me   if soundbusy(soundchannel) then     go the frame   else     case whereto of:       "Go Next Frame": go the frame + 1       "Go Next Marker": go Next       "Go Previous marker": go previous       "Go Loop":         go loop       "Exit":quit     end case   end if end ExitFrame ------ Events ------ ------ Can be attached to only Script Channel ------ on isOKToAttach (me, aSpriteType, aSpriteNum)   case aSpriteType of     #script:       return true   end case end isOKToAttach ------ Can be attached to only Script Channel ------

Upload Provided by ABCUpload ASP