home *** CD-ROM | disk | FTP | other *** search
/ cyber.net interactivo 3 / inter@ivo 1996-04.iso / cybint3 / bin / intro.dxr / 00052_OUTScript.ls < prev    next >
Encoding:
Text File  |  1996-03-21  |  423 b   |  26 lines

  1. on exitFrame
  2.   global sector
  3.   unLoad()
  4.   if sector = 1 then
  5.     go("alfa", "sector")
  6.   end if
  7.   if sector = 2 then
  8.     go("fi", "sector")
  9.   end if
  10.   if sector = 3 then
  11.     go("w", "sector")
  12.   end if
  13.   if sector = 4 then
  14.     go("pi", "sector")
  15.   end if
  16.   if sector = 5 then
  17.     go("delta", "sector")
  18.   end if
  19.   if sector = 6 then
  20.     go("psi", "sector")
  21.   end if
  22.   if sector = 7 then
  23.     go("lamda", "sector")
  24.   end if
  25. end
  26.