Botones de control
Hola amigo espero que Estes muy bien, mi pregunta es como puedo hacer para que los botones que tengo funcionen como controles de un video (play, stop, rew, ff, pause, etc). La cosa es que no conozco casi nada de director.
Gracias por ayudarme.
Gracias por ayudarme.
1 respuesta
Respuesta de bedelludrica
1
Con mi video control te resultara muy sencillo hacerlo.
property p_tipo_control, pVideoSprite,ptitulo
on getPropertyDescriptionList me
list = [:]
addProp list, #ptitulo,[#comment:"comportamiento realizado por",#format:#symbol,#range:[#bedelludrica],#default:#bedelludrica]
addProp list, #p_tipo_control, [#comment: "accion de este boton",\
#format: #symbol,¬
#range: [#play, #stop, #pausa, #salto_adelante, #salto_atras,\
#vete_comienzo, #marcha_atras, #adelante_rapido, #atras_rapido, #vete_final],\
#default: #stop]
addProp list, #pVideoSprite, [#comment: "¿cual es el sprite de video?",\
#format: #sprite, #default: 1]
return list
end
on mousedown me
sendsprite(sprite 3,#estado,1)
end
on mouseUp me
case p_tipo_control of
#play:
sprite(pVideoSprite).movieRate = 1
#stop:
sprite(pVideoSprite).movieRate = 0
sprite(pVideoSprite).movieTime = 0
#vete_comienzo:
sprite(pVideoSprite).movieRate = 0
sprite(pVideoSprite).movieTime = 0
#vete_final:
sprite(pVideoSprite).movieRate = 0
sprite(pVideoSprite).movieTime = sprite(pVideoSprite).duration
#marcha_atras:
sprite(pVideoSprite).movieRate = -1
#pausa:
sprite(pVideoSprite).movieRate = 0
#salto_adelante:
sprite(pVideoSprite).movieTime = sprite(pVideoSprite).movieTime + 4*60
#salto_atras:
sprite(pVideoSprite).movieTime = sprite(pVideoSprite).movieTime - 4*60
#adelante_rapido:
sprite(pVideoSprite).movieRate = 3
#atras_rapido:
sprite(pVideoSprite).movieRate = -3
-- #repeticion:
-- sprite(pVideoSprite).member.loop = ¬
-- not sprite(pVideoSprite).member.loop
end case
end
Tambien te pongo aqui para crear un barra de video.
property s
property p_linea_pelicula,poduracion,p_velo,p_s
property p_origen_barra, p_pantalla_pelicula, longitud_barra
on getPropertyDescriptionList
list=[:]
addprop list , #p_linea_pelicula , [#comment:"elige el sprite barra de video",\
#format:#integer,#default:2]
addprop list , #p_pantalla_pelicula , [#comment:"elige el sprite pantalla de video",\
#format:#integer,#default:6]
return list
end getPropertyDescriptionList
on beginsprite me
sprite(p_pantalla_pelicula).member.loop =1
sprite(me.spritenum).moveableSprite=true
sprite(me.spritenum).loc=p_origen_barra
poduracion=sprite(p_pantalla_pelicula).duration
sprite(p_pantalla_pelicula).member.pausedAtStart=true
sprite(p_pantalla_pelicula).movietime=0
sprite(me.spritenum).constraint= p_linea_pelicula
p_origen_barra=sprite(p_linea_pelicula ).loch
longitud_barra=sprite(p_linea_pelicula ).width
p_s=sprite(me.spritenum)
sprite(me.spritenum).loc=sprite(p_linea_pelicula ).loc
end
on mousedown me
s=0
p_velo=sprite(p_pantalla_pelicula).movierate
sprite(p_pantalla_pelicula).movieRate = 0
end
on mouseup me
sprite(p_pantalla_pelicula).movierate=p_velo
s=1
end
on estado me,l
s=l
end
on exitframe me
if s=0 then
posicion_topo=sprite(me.spritenum).locH
topo_relativo=posicion_topo - p_origen_barra
posicion_pelicula=(topo_relativo*float(poduracion))/longitud_barra
sprite(p_pantalla_pelicula).movietime=float(posicion_pelicula)
else if s=1 then
posi=sprite(p_pantalla_pelicula).movietime
pos_barr=(posi*longitud_barra)/poduracion
p= pos_barr+p_origen_barra
sprite(me.spritenum).locH=p
end if
end
property p_tipo_control, pVideoSprite,ptitulo
on getPropertyDescriptionList me
list = [:]
addProp list, #ptitulo,[#comment:"comportamiento realizado por",#format:#symbol,#range:[#bedelludrica],#default:#bedelludrica]
addProp list, #p_tipo_control, [#comment: "accion de este boton",\
#format: #symbol,¬
#range: [#play, #stop, #pausa, #salto_adelante, #salto_atras,\
#vete_comienzo, #marcha_atras, #adelante_rapido, #atras_rapido, #vete_final],\
#default: #stop]
addProp list, #pVideoSprite, [#comment: "¿cual es el sprite de video?",\
#format: #sprite, #default: 1]
return list
end
on mousedown me
sendsprite(sprite 3,#estado,1)
end
on mouseUp me
case p_tipo_control of
#play:
sprite(pVideoSprite).movieRate = 1
#stop:
sprite(pVideoSprite).movieRate = 0
sprite(pVideoSprite).movieTime = 0
#vete_comienzo:
sprite(pVideoSprite).movieRate = 0
sprite(pVideoSprite).movieTime = 0
#vete_final:
sprite(pVideoSprite).movieRate = 0
sprite(pVideoSprite).movieTime = sprite(pVideoSprite).duration
#marcha_atras:
sprite(pVideoSprite).movieRate = -1
#pausa:
sprite(pVideoSprite).movieRate = 0
#salto_adelante:
sprite(pVideoSprite).movieTime = sprite(pVideoSprite).movieTime + 4*60
#salto_atras:
sprite(pVideoSprite).movieTime = sprite(pVideoSprite).movieTime - 4*60
#adelante_rapido:
sprite(pVideoSprite).movieRate = 3
#atras_rapido:
sprite(pVideoSprite).movieRate = -3
-- #repeticion:
-- sprite(pVideoSprite).member.loop = ¬
-- not sprite(pVideoSprite).member.loop
end case
end
Tambien te pongo aqui para crear un barra de video.
property s
property p_linea_pelicula,poduracion,p_velo,p_s
property p_origen_barra, p_pantalla_pelicula, longitud_barra
on getPropertyDescriptionList
list=[:]
addprop list , #p_linea_pelicula , [#comment:"elige el sprite barra de video",\
#format:#integer,#default:2]
addprop list , #p_pantalla_pelicula , [#comment:"elige el sprite pantalla de video",\
#format:#integer,#default:6]
return list
end getPropertyDescriptionList
on beginsprite me
sprite(p_pantalla_pelicula).member.loop =1
sprite(me.spritenum).moveableSprite=true
sprite(me.spritenum).loc=p_origen_barra
poduracion=sprite(p_pantalla_pelicula).duration
sprite(p_pantalla_pelicula).member.pausedAtStart=true
sprite(p_pantalla_pelicula).movietime=0
sprite(me.spritenum).constraint= p_linea_pelicula
p_origen_barra=sprite(p_linea_pelicula ).loch
longitud_barra=sprite(p_linea_pelicula ).width
p_s=sprite(me.spritenum)
sprite(me.spritenum).loc=sprite(p_linea_pelicula ).loc
end
on mousedown me
s=0
p_velo=sprite(p_pantalla_pelicula).movierate
sprite(p_pantalla_pelicula).movieRate = 0
end
on mouseup me
sprite(p_pantalla_pelicula).movierate=p_velo
s=1
end
on estado me,l
s=l
end
on exitframe me
if s=0 then
posicion_topo=sprite(me.spritenum).locH
topo_relativo=posicion_topo - p_origen_barra
posicion_pelicula=(topo_relativo*float(poduracion))/longitud_barra
sprite(p_pantalla_pelicula).movietime=float(posicion_pelicula)
else if s=1 then
posi=sprite(p_pantalla_pelicula).movietime
pos_barr=(posi*longitud_barra)/poduracion
p= pos_barr+p_origen_barra
sprite(me.spritenum).locH=p
end if
end
