home *** CD-ROM | disk | FTP | other *** search
/ Discovering Nature in the City / LUONTOCD.iso / pc / files / intro.dxr / 00001.ls next >
Encoding:
Text File  |  1996-12-17  |  378 b   |  29 lines
  1. global gLanguage
  2.  
  3. on startMovie
  4.   unLoad()
  5.   set the idleLoadMode to 3
  6. end
  7.  
  8. on keyDown
  9.   sound fadeOut 1, 3 * 60
  10.   updateStage()
  11.   cursor(4)
  12.   if gLanguage = "swe" then
  13.     go(1, "mainswe")
  14.   else
  15.     go(1, "main")
  16.   end if
  17. end
  18.  
  19. on fade
  20.   sound fadeOut 1, 3 * 60
  21.   updateStage()
  22.   cursor(4)
  23.   if gLanguage = "swe" then
  24.     go(1, "mainswe")
  25.   else
  26.     go(1, "main")
  27.   end if
  28. end
  29.