if the castnum of sprite qsprite <> qcast then exit
--------------BLOCCA IL CUBETTO QUANDO SI ENTRA NEL FRAME
global qvolte_video
if voidp(qvolte_video) then set qvolte_video to false
if not qvolte_video then
set the movierate of sprite 47 to 0
set qvolte_video to true
updatestage
end if
----------------------PORTA IL CURSORINO ALLA FINE
if the movieTime of sprite qsprite = the duration of cast qcast then
set the loch of sprite qspritel to (the right of sprite qspriteb - the width of sprite qspritel)
end if
--------------------
if not tuttos then
if vidstat <> "manuale" then
if the movieTime of sprite qsprite = the duration of cast qcast then set vidstat to "stop"
if vidstat = "play" or vidstat = "avveloce" or vidstat = "inveloce" then
set unita to the duration of cast qcast / 320.0
if integer(the movieTime of sprite qsprite / unita) + the width of sprite qspritel < 320 then
set the loch of sprite qspritel to the loch of sprite qspriteb + integer(the movieTime of sprite qsprite / unita)
updatestage
end if
end if
end if
if vidstat = "inizio" then set the loch of sprite qspritel to the loch of sprite qspriteb
if the movietime of sprite qsprite = the duration of cast qcast then set the loch of sprite qspritel to (the right of sprite qspriteb - the width of sprite qspritel)
end if
----------ACCENDE IL VIDEO IN INGRESSO DEL FRAME
global gia_fatto
if the movieTime of sprite qsprite < 10 and the movieRate of sprite qsprite = 0 and gia_fatto = false then
