home *** CD-ROM | disk | FTP | other *** search
/ Oz - The Magical Adventure / Adventure.iso / pc / dkdata / vanes.dxr / Internal_36_startMovie.ls < prev    next >
Encoding:
Text File  |  2000-06-01  |  775 b   |  35 lines

  1. on startMovie
  2.   global gCurrentScreen, gNavAssert, gAnimList, gMasterMoves, gDifficultyLevel, gGameState
  3.   cursor(4)
  4.   unloadMember()
  5.   preloadMember("balloon.01", "giraffe.20")
  6.   preloadMember("cogs.04", "cogs.40")
  7.   cursor(0)
  8.   initScene(root(the movieName))
  9.   gCurrentScreen = "551"
  10.   gNavAssert = "551"
  11.   gAnimList = EMPTY
  12.   gMasterMoves = 3
  13.   gGameState = 0
  14.   if voidp(gDifficultyLevel) then
  15.     gDifficultyLevel = 2
  16.   end if
  17.   case gDifficultyLevel of
  18.     1:
  19.       member("Level").text = "EASY"
  20.     2:
  21.       member("Level").text = "MEDIUM"
  22.     3:
  23.       member("Level").text = "HARD"
  24.   end case
  25.   case gDifficultyLevel of
  26.     1:
  27.     2:
  28.       QueueHostSound("554211")
  29.     3:
  30.       QueueHostSound("554311")
  31.   end case
  32.   setGame()
  33.   set the keyDownScript to "checkKey"
  34. end
  35.