Eidos Interactive CD-ROM 1997/EIDOS.ISO/data/apache.dxr/00001.ls

Text File | 1997-10-27 | 679 b | 38 lines

on startMovie
  puppetTempo(30)
  set the exitLock to 1
  set the timeoutLength to 180 * 60
  set the timeoutScript to "showDemo"
  set the keyDownScript to "set the timeoutKeyDown to TRUE"
  set the mouseDownScript to "set the timeoutMouse to TRUE"
  startText()
end

on showDemo
  set the timeoutPlay to 1
  set the timeoutScript to EMPTY
  go("demo")
end

on exitVideo
  if the keyCode = 53 then
    stopEvent()
  end if
  set the movieRate of sprite 10 to 0
  set the timeoutScript to "showDemo"
  set the timeoutPlay to 0
  cursor(-1)
  updateStage()
  go(the frame + 1)
end

on returnToMenu
  cleanUp()
  unloadMember("demo")
  go("exit")
end

on stopMovie
  cleanUp()
end