Invenzioni E Inventori 1: Lavoro E Vita Quotidiana/invenzioni-inventori-1.iso/mac/Invenzio/Tori/Sharedi.cst/03031_Script_3031

Text File | 1997-10-08 | 1KB | 27 lines

on VIDEO_SOTTOINV
  ---  PARAMETRI VIDEO
  ---QCAST = NUMERO DEL CAST DEL VIDEO
  ---QSPRITE=NUMERO DELLO SPRITE DEL VIDEO
  ---QSPRITEL=NUMERO DELLO SPRITE DELLA LINEA
  ---QSPRITEB=NUMERO DELLO SPRITE DELLA BARRA
  global membro_quicktime,canale_quicktime,canale_linea,canale_barra,canale_pausa,vidstat
  video membro_quicktime,canale_quicktime,canale_linea,canale_barra

  if vidstat = "play" or vidstat = "avveloce" or vidstat = "inveloce" then

    if not voidp(canale_quicktime) and canale_quicktime > 0 then
      if the castnum of sprite canale_quicktime >0 then
        if the casttype of member the castnum of sprite canale_quicktime of castlib the castLibNum of sprite canale_quicktime= #digitalvideo then
          if the visible of sprite canale_quicktime =false or vidstat = "stop" then
            exit
          else
            if the movieRate of sprite canale_quicktime=0 then
              set the visible of Sprite canale_pausa to false
            end if

          end if
        end if
      end if
    END IF
  END IF
end