home *** CD-ROM | disk | FTP | other *** search
/ Encyklopedia Omnia / Planeta.iso / data / 0_sigla.dir / 00001_Script_startStop next >
Text File  |  2000-11-14  |  742b  |  28 lines
  1. on startMovie
  2.   global gPlayersObj, gNStesto, gTestQT3presence, gCanSkip
  3.   
  4.   set gCanSkip = 1
  5.   
  6.   -- test QuickTime3 presence, if required
  7.   if gTestQT3presence then
  8.     if not checkQT3() then
  9.       alert "Wymagana instalacja programu QuickTime 3.0.2" & RETURN & "Wybierz przycisk OK."
  10.       open "@::qt3:qt3inst.exe"
  11.       halt
  12.     end if
  13.   end if
  14.   
  15.   -- screen bit-depth
  16.   if the colorDepth <= 8 then set the colorDepth = 16
  17.   if the colorDepth <= 8 then
  18.     alert "Prawid│owe funkcjonowanie programu wymaga trybu HighColor lub TrueColor!"
  19.     halt
  20.   end if
  21.   
  22.   set gNStesto = 2
  23.   set gPlayersObj = new(script "PlayersObject")
  24. end
  25.  
  26. on stopMovie
  27.   if the runMode = "Author" then put " " into field "elenco"
  28. end