|
|
|
Direct Media Simple Control
Added on 6/10/1999
|
This behavior is for use with the Direct Media Xtra from Tabuleiro Da Baiana
--DirectMedia Xtra Simple control
property videoSprite -- the sprite number that is getting controlled
property videoCommand -- the command to be issued
on DoControl me
case ( the VideoCommand of me ) of:
#Play:
videoplay(sprite the videoSprite of me)
#Pause:
videopause(sprite the videoSprite of me)
#Rewind:
videoseek(sprite the videoSprite of me, the segmentstart of sprite the videoSprite of me)
end case
end
on mouseUp me
DoControl me
end
---
on getPropertyDescriptionList
set p_list = [ #videoCommand: [ #comment: "Action:",#format: #symbol, #range: [ #Play, #Pause, #Rewind],#default: #Play ], #videoSprite: [ #comment: "DirectMedia Sprite Channel:", #format: #integer, #default: 1] ]
return p_list
end
on getBehaviorDescription
return "Used to create Play, Pause, and Rewind control buttons for a DirectMedia Xtra video sprite. " & RETURN & "PARAMETERS:" & RETURN & "Action - Choose the action to perform on mouseUP ( Play, Pause, Rewind )." & RETURN & "DirectMedia Sprite Channel - Enter the number of sprite channel of the DirectMedia Xtra video that is being controlled."
end
|
|